| /* |
| * Copyright (c) 2005, 2013, Oracle and/or its affiliates. All rights reserved. |
| * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. |
| * |
| * This code is free software; you can redistribute it and/or modify it |
| * under the terms of the GNU General Public License version 2 only, as |
| * published by the Free Software Foundation. Oracle designates this |
| * particular file as subject to the "Classpath" exception as provided |
| * by Oracle in the LICENSE file that accompanied this code. |
| * |
| * This code is distributed in the hope that it will be useful, but WITHOUT |
| * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or |
| * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License |
| * version 2 for more details (a copy is included in the LICENSE file that |
| * accompanied this code). |
| * |
| * You should have received a copy of the GNU General Public License version |
| * 2 along with this work; if not, write to the Free Software Foundation, |
| * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. |
| * |
| * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA |
| * or visit www.oracle.com if you need additional information or have any |
| * questions. |
| */ |
| |
| /* |
| * Class-Path Wildcards |
| * |
| * The syntax for wildcards is a single asterisk. The class path |
| * foo/"*", e.g., loads all jar files in the directory named foo. |
| * (This requires careful quotation when used in shell scripts.) |
| * |
| * Only files whose names end in .jar or .JAR are matched. |
| * Files whose names end in .zip, or which have a particular |
| * magic number, regardless of filename extension, are not |
| * matched. |
| * |
| * Files are considered regardless of whether or not they are |
| * "hidden" in the UNIX sense, i.e., have names beginning with '.'. |
| * |
| * A wildcard only matches jar files, not class files in the same |
| * directory. If you want to load both class files and jar files from |
| * a single directory foo then you can say foo:foo/"*", or foo/"*":foo |
| * if you want the jar files to take precedence. |
| * |
| * Subdirectories are not searched recursively, i.e., foo/"*" only |
| * looks for jar files in foo, not in foo/bar, foo/baz, etc. |
| * |
| * Expansion of wildcards is done early, prior to the invocation of a |
| * program's main method, rather than late, during the class-loading |
| * process itself. Each element of the input class path containing a |
| * wildcard is replaced by the (possibly empty) sequence of elements |
| * generated by enumerating the jar files in the named directory. If |
| * the directory foo contains a.jar, b.jar, and c.jar, |
| * e.g., then the class path foo/"*" is expanded into |
| * foo/a.jar:foo/b.jar:foo/c.jar, and that string would be the value |
| * of the system property java.class.path. |
| * |
| * The order in which the jar files in a directory are enumerated in |
| * the expanded class path is not specified and may vary from platform |
| * to platform and even from moment to moment on the same machine. A |
| * well-constructed application should not depend upon any particular |
| * order. If a specific order is required then the jar files can be |
| * enumerated explicitly in the class path. |
| * |
| * The CLASSPATH environment variable is not treated any differently |
| * from the -classpath (equiv. -cp) command-line option, |
| * i.e. wildcards are honored in all these cases. |
| * |
| * Class-path wildcards are not honored in the Class-Path jar-manifest |
| * header. |
| * |
| * Class-path wildcards are honored not only by the Java launcher but |
| * also by most other command-line tools that accept class paths, and |
| * in particular by javac and javadoc. |
| * |
| * Class-path wildcards are not honored in any other kind of path, and |
| * especially not in the bootstrap class path, which is a mere |
| * artifact of our implementation and not something that developers |
| * should use. |
| * |
| * Classpath wildcards are only expanded in the Java launcher code, |
| * supporting the use of wildcards on the command line and in the |
| * CLASSPATH environment variable. We do not support the use of |
| * wildcards by applications that embed the JVM. |
| */ |
| |
| #include <stddef.h> |
| #include <stdio.h> |
| #include <stdlib.h> |
| #include <string.h> |
| #include <sys/types.h> |
| #include "java.h" /* Strictly for PATH_SEPARATOR/FILE_SEPARATOR */ |
| #include "jli_util.h" |
| |
| #ifdef _WIN32 |
| #include <windows.h> |
| #else /* Unix */ |
| #include <unistd.h> |
| #include <dirent.h> |
| #endif /* Unix */ |
| |
| static int |
| exists(const char* filename) |
| { |
| #ifdef _WIN32 |
| return _access(filename, 0) == 0; |
| #else |
| return access(filename, F_OK) == 0; |
| #endif |
| } |
| |
| #define NEW_(TYPE) ((TYPE) JLI_MemAlloc(sizeof(struct TYPE##_))) |
| |
| /* |
| * Wildcard directory iteration. |
| * WildcardIterator_for(wildcard) returns an iterator. |
| * Each call to that iterator's next() method returns the basename |
| * of an entry in the wildcard's directory. The basename's memory |
| * belongs to the iterator. The caller is responsible for prepending |
| * the directory name and file separator, if necessary. |
| * When done with the iterator, call the close method to clean up. |
| */ |
| typedef struct WildcardIterator_* WildcardIterator; |
| |
| #ifdef _WIN32 |
| struct WildcardIterator_ |
| { |
| HANDLE handle; |
| char *firstFile; /* Stupid FindFirstFile...FindNextFile */ |
| }; |
| // since this is used repeatedly we keep it here. |
| static WIN32_FIND_DATA find_data; |
| static WildcardIterator |
| WildcardIterator_for(const char *wildcard) |
| { |
| WildcardIterator it = NEW_(WildcardIterator); |
| HANDLE handle = FindFirstFile(wildcard, &find_data); |
| if (handle == INVALID_HANDLE_VALUE) { |
| JLI_MemFree(it); |
| return NULL; |
| } |
| it->handle = handle; |
| it->firstFile = find_data.cFileName; |
| return it; |
| } |
| |
| static char * |
| WildcardIterator_next(WildcardIterator it) |
| { |
| if (it->firstFile != NULL) { |
| char *firstFile = it->firstFile; |
| it->firstFile = NULL; |
| return firstFile; |
| } |
| return FindNextFile(it->handle, &find_data) |
| ? find_data.cFileName : NULL; |
| } |
| |
| static void |
| WildcardIterator_close(WildcardIterator it) |
| { |
| if (it) { |
| FindClose(it->handle); |
| JLI_MemFree(it->firstFile); |
| JLI_MemFree(it); |
| } |
| } |
| |
| #else /* Unix */ |
| struct WildcardIterator_ |
| { |
| DIR *dir; |
| }; |
| |
| static WildcardIterator |
| WildcardIterator_for(const char *wildcard) |
| { |
| DIR *dir; |
| int wildlen = JLI_StrLen(wildcard); |
| if (wildlen < 2) { |
| dir = opendir("."); |
| } else { |
| char *dirname = JLI_StringDup(wildcard); |
| dirname[wildlen - 1] = '\0'; |
| dir = opendir(dirname); |
| JLI_MemFree(dirname); |
| } |
| if (dir == NULL) |
| return NULL; |
| else { |
| WildcardIterator it = NEW_(WildcardIterator); |
| it->dir = dir; |
| return it; |
| } |
| } |
| |
| static char * |
| WildcardIterator_next(WildcardIterator it) |
| { |
| struct dirent* dirp = readdir(it->dir); |
| return dirp ? dirp->d_name : NULL; |
| } |
| |
| static void |
| WildcardIterator_close(WildcardIterator it) |
| { |
| if (it) { |
| closedir(it->dir); |
| JLI_MemFree(it); |
| } |
| } |
| #endif /* Unix */ |
| |
| static int |
| equal(const char *s1, const char *s2) |
| { |
| return JLI_StrCmp(s1, s2) == 0; |
| } |
| |
| /* |
| * FileList ADT - a dynamic list of C filenames |
| */ |
| struct FileList_ |
| { |
| char **files; |
| int size; |
| int capacity; |
| }; |
| typedef struct FileList_ *FileList; |
| |
| static FileList |
| FileList_new(int capacity) |
| { |
| FileList fl = NEW_(FileList); |
| fl->capacity = capacity; |
| fl->files = (char **) JLI_MemAlloc(capacity * sizeof(fl->files[0])); |
| fl->size = 0; |
| return fl; |
| } |
| |
| |
| |
| static void |
| FileList_free(FileList fl) |
| { |
| if (fl) { |
| if (fl->files) { |
| int i; |
| for (i = 0; i < fl->size; i++) |
| JLI_MemFree(fl->files[i]); |
| JLI_MemFree(fl->files); |
| } |
| JLI_MemFree(fl); |
| } |
| } |
| |
| static void |
| FileList_ensureCapacity(FileList fl, int capacity) |
| { |
| if (fl->capacity < capacity) { |
| while (fl->capacity < capacity) |
| fl->capacity *= 2; |
| fl->files = JLI_MemRealloc(fl->files, |
| fl->capacity * sizeof(fl->files[0])); |
| } |
| } |
| |
| static void |
| FileList_add(FileList fl, char *file) |
| { |
| FileList_ensureCapacity(fl, fl->size+1); |
| fl->files[fl->size++] = file; |
| } |
| |
| static void |
| FileList_addSubstring(FileList fl, const char *beg, int len) |
| { |
| char *filename = (char *) JLI_MemAlloc(len+1); |
| memcpy(filename, beg, len); |
| filename[len] = '\0'; |
| FileList_ensureCapacity(fl, fl->size+1); |
| fl->files[fl->size++] = filename; |
| } |
| |
| static char * |
| FileList_join(FileList fl, char sep) |
| { |
| int i; |
| int size; |
| char *path; |
| char *p; |
| for (i = 0, size = 1; i < fl->size; i++) |
| size += (int)JLI_StrLen(fl->files[i]) + 1; |
| |
| path = JLI_MemAlloc(size); |
| |
| for (i = 0, p = path; i < fl->size; i++) { |
| int len = (int)JLI_StrLen(fl->files[i]); |
| if (i > 0) *p++ = sep; |
| memcpy(p, fl->files[i], len); |
| p += len; |
| } |
| *p = '\0'; |
| |
| return path; |
| } |
| |
| static FileList |
| FileList_split(const char *path, char sep) |
| { |
| const char *p, *q; |
| int len = (int)JLI_StrLen(path); |
| int count; |
| FileList fl; |
| for (count = 1, p = path; p < path + len; p++) |
| count += (*p == sep); |
| fl = FileList_new(count); |
| for (p = path;;) { |
| for (q = p; q <= path + len; q++) { |
| if (*q == sep || *q == '\0') { |
| FileList_addSubstring(fl, p, q - p); |
| if (*q == '\0') |
| return fl; |
| p = q + 1; |
| } |
| } |
| } |
| } |
| |
| static int |
| isJarFileName(const char *filename) |
| { |
| int len = (int)JLI_StrLen(filename); |
| return (len >= 4) && |
| (filename[len - 4] == '.') && |
| (equal(filename + len - 3, "jar") || |
| equal(filename + len - 3, "JAR")) && |
| /* Paranoia: Maybe filename is "DIR:foo.jar" */ |
| (JLI_StrChr(filename, PATH_SEPARATOR) == NULL); |
| } |
| |
| static char * |
| wildcardConcat(const char *wildcard, const char *basename) |
| { |
| int wildlen = (int)JLI_StrLen(wildcard); |
| int baselen = (int)JLI_StrLen(basename); |
| char *filename = (char *) JLI_MemAlloc(wildlen + baselen); |
| /* Replace the trailing '*' with basename */ |
| memcpy(filename, wildcard, wildlen-1); |
| memcpy(filename+wildlen-1, basename, baselen+1); |
| return filename; |
| } |
| |
| static FileList |
| wildcardFileList(const char *wildcard) |
| { |
| const char *basename; |
| FileList fl = FileList_new(16); |
| WildcardIterator it = WildcardIterator_for(wildcard); |
| |
| if (it == NULL) |
| { |
| FileList_free(fl); |
| return NULL; |
| } |
| |
| while ((basename = WildcardIterator_next(it)) != NULL) |
| if (isJarFileName(basename)) |
| FileList_add(fl, wildcardConcat(wildcard, basename)); |
| WildcardIterator_close(it); |
| return fl; |
| } |
| |
| static int |
| isWildcard(const char *filename) |
| { |
| int len = (int)JLI_StrLen(filename); |
| return (len > 0) && |
| (filename[len - 1] == '*') && |
| (len == 1 || IS_FILE_SEPARATOR(filename[len - 2])) && |
| (! exists(filename)); |
| } |
| |
| static void |
| FileList_expandWildcards(FileList fl) |
| { |
| int i, j; |
| for (i = 0; i < fl->size; i++) { |
| if (isWildcard(fl->files[i])) { |
| FileList expanded = wildcardFileList(fl->files[i]); |
| if (expanded != NULL && expanded->size > 0) { |
| JLI_MemFree(fl->files[i]); |
| FileList_ensureCapacity(fl, fl->size + expanded->size); |
| for (j = fl->size - 1; j >= i+1; j--) |
| fl->files[j+expanded->size-1] = fl->files[j]; |
| for (j = 0; j < expanded->size; j++) |
| fl->files[i+j] = expanded->files[j]; |
| i += expanded->size - 1; |
| fl->size += expanded->size - 1; |
| /* fl expropriates expanded's elements. */ |
| expanded->size = 0; |
| } |
| FileList_free(expanded); |
| } |
| } |
| } |
| |
| const char * |
| JLI_WildcardExpandClasspath(const char *classpath) |
| { |
| char *expanded; |
| FileList fl; |
| |
| if (JLI_StrChr(classpath, '*') == NULL) |
| return classpath; |
| fl = FileList_split(classpath, PATH_SEPARATOR); |
| FileList_expandWildcards(fl); |
| expanded = FileList_join(fl, PATH_SEPARATOR); |
| FileList_free(fl); |
| if (getenv(JLDEBUG_ENV_ENTRY) != 0) |
| printf("Expanded wildcards:\n" |
| " before: \"%s\"\n" |
| " after : \"%s\"\n", |
| classpath, expanded); |
| return expanded; |
| } |
| |
| #ifdef DEBUG_WILDCARD |
| static void |
| FileList_print(FileList fl) |
| { |
| int i; |
| putchar('['); |
| for (i = 0; i < fl->size; i++) { |
| if (i > 0) printf(", "); |
| printf("\"%s\"",fl->files[i]); |
| } |
| putchar(']'); |
| } |
| |
| static void |
| wildcardExpandArgv(const char ***argv) |
| { |
| int i; |
| for (i = 0; (*argv)[i]; i++) { |
| if (equal((*argv)[i], "-cp") || |
| equal((*argv)[i], "-classpath")) { |
| i++; |
| (*argv)[i] = wildcardExpandClasspath((*argv)[i]); |
| } |
| } |
| } |
| |
| static void |
| debugPrintArgv(char *argv[]) |
| { |
| int i; |
| putchar('['); |
| for (i = 0; argv[i]; i++) { |
| if (i > 0) printf(", "); |
| printf("\"%s\"", argv[i]); |
| } |
| printf("]\n"); |
| } |
| |
| int |
| main(int argc, char *argv[]) |
| { |
| argv[0] = "java"; |
| wildcardExpandArgv((const char***)&argv); |
| debugPrintArgv(argv); |
| /* execvp("java", argv); */ |
| return 0; |
| } |
| #endif /* DEBUG_WILDCARD */ |
| |
| /* Cute little perl prototype implementation.... |
| |
| my $sep = ($^O =~ /^(Windows|cygwin)/) ? ";" : ":"; |
| |
| sub expand($) { |
| opendir DIR, $_[0] or return $_[0]; |
| join $sep, map {"$_[0]/$_"} grep {/\.(jar|JAR)$/} readdir DIR; |
| } |
| |
| sub munge($) { |
| join $sep, |
| map {(! -r $_ and s/[\/\\]+\*$//) ? expand $_ : $_} split $sep, $_[0]; |
| } |
| |
| for (my $i = 0; $i < @ARGV - 1; $i++) { |
| $ARGV[$i+1] = munge $ARGV[$i+1] if $ARGV[$i] =~ /^-c(p|lasspath)$/; |
| } |
| |
| $ENV{CLASSPATH} = munge $ENV{CLASSPATH} if exists $ENV{CLASSPATH}; |
| @ARGV = ("java", @ARGV); |
| print "@ARGV\n"; |
| exec @ARGV; |
| |
| */ |