X-Git-Url: http://www.privoxy.org/gitweb/?p=privoxy.git;a=blobdiff_plain;f=miscutil.c;h=49e19b0b3817354d068fe407b73b401d00c11a09;hp=c3c270c5296641fef25fb3181cafd2eb98b3eb21;hb=b6619e83a3f38095ff7732bd765e601de26fb717;hpb=2935a01f7fffce53f81e235557f3ae5459e200e6 diff --git a/miscutil.c b/miscutil.c index c3c270c5..49e19b0b 100644 --- a/miscutil.c +++ b/miscutil.c @@ -1,4 +1,4 @@ -const char miscutil_rcs[] = "$Id: miscutil.c,v 1.3 2001/05/29 23:10:09 oes Exp $"; +const char miscutil_rcs[] = "$Id: miscutil.c,v 1.18 2001/09/20 13:33:43 steudten Exp $"; /********************************************************************* * * File : $Source: /cvsroot/ijbswa/current/miscutil.c,v $ @@ -36,6 +36,57 @@ const char miscutil_rcs[] = "$Id: miscutil.c,v 1.3 2001/05/29 23:10:09 oes Exp $ * * Revisions : * $Log: miscutil.c,v $ + * Revision 1.18 2001/09/20 13:33:43 steudten + * + * change long to int as return value in hash_string(). Remember the wraparound + * for int = long = sizeof(4) - thats maybe not what we want. + * + * Revision 1.17 2001/09/13 20:51:29 jongfoster + * Fixing potential problems with characters >=128 in simplematch() + * This was also a compiler warning. + * + * Revision 1.16 2001/09/10 10:56:59 oes + * Silenced compiler warnings + * + * Revision 1.15 2001/07/13 14:02:24 oes + * Removed vim-settings + * + * Revision 1.14 2001/06/29 21:45:41 oes + * Indentation, CRLF->LF, Tab-> Space + * + * Revision 1.13 2001/06/29 13:32:14 oes + * Removed logentry from cancelled commit + * + * Revision 1.12 2001/06/09 10:55:28 jongfoster + * Changing BUFSIZ ==> BUFFER_SIZE + * + * Revision 1.11 2001/06/07 23:09:19 jongfoster + * Cosmetic indentation changes. + * + * Revision 1.10 2001/06/07 14:51:38 joergs + * make_path() no longer adds '/' if the dir already ends in '/'. + * + * Revision 1.9 2001/06/07 14:43:17 swa + * slight mistake in make_path, unix path style is /. + * + * Revision 1.8 2001/06/05 22:32:01 jongfoster + * New function make_path() to splice directory and file names together. + * + * Revision 1.7 2001/06/03 19:12:30 oes + * introduced bindup() + * + * Revision 1.6 2001/06/01 18:14:49 jongfoster + * Changing the calls to strerr() to check HAVE_STRERR (which is defined + * in config.h if appropriate) rather than the NO_STRERR macro. + * + * Revision 1.5 2001/06/01 10:31:51 oes + * Added character class matching to trivimatch; renamed to simplematch + * + * Revision 1.4 2001/05/31 17:32:31 oes + * + * - Enhanced domain part globbing with infix and prefix asterisk + * matching and optional unanchored operation + * * Revision 1.3 2001/05/29 23:10:09 oes * * @@ -79,7 +130,13 @@ const char miscutil_rcs[] = "$Id: miscutil.c,v 1.3 2001/05/29 23:10:09 oes Exp $ #include #include #include +#include +/* + * FIXME: Only need project.h for BUFFER_SIZE. It would be nice + * to remove this dependency. + */ +#include "project.h" #include "miscutil.h" #include "errlog.h" @@ -135,9 +192,9 @@ void *zalloc(int size) * Returns : an unsigned long variable with the hashed value. * *********************************************************************/ -unsigned long hash_string( const char* s ) +unsigned int hash_string( const char* s ) { - unsigned long h = 0ul; + unsigned int h = 0; for ( ; *s; ++s ) { @@ -200,12 +257,12 @@ char *strdup( const char *s ) char *safe_strerror(int err) { char *s = NULL; - char buf[BUFSIZ]; + char buf[BUFFER_SIZE]; -#ifndef NOSTRERROR +#ifdef HAVE_STRERROR s = strerror(err); -#endif /* NOSTRERROR */ +#endif /* HAVE_STRERROR */ if (s == NULL) { @@ -331,17 +388,20 @@ char *chomp(char *string) } + /********************************************************************* * * Function : strsav * * Description : Reallocate "old" and append text to it. This makes * it easier to append to malloc'd strings. + * Running out of memory is a FATAL error. * * Parameters : * 1 : old = Old text that is to be extended. Will be - * free()d by this routine. + * free()d by this routine. May be NULL. * 2 : text_to_append = Text to be appended to old. + * May be NULL. * * Returns : Pointer to newly malloc'ed appended string. * If there is no text to append, return old. Caller @@ -358,50 +418,100 @@ char *strsav(char *old, const char *text_to_append) return(old); } - if (NULL != old) + if (NULL == old) { - old_len = strlen(old); + if ((p = strdup(text_to_append)) == NULL) + { + log_error(LOG_LEVEL_FATAL, "strdup() failed!", new_len); + /* Never get here - LOG_LEVEL_FATAL causes program exit */ + } + return p; } - else + + old_len = strlen(old); + new_len = old_len + strlen(text_to_append) + 1; + + if ((p = realloc(old, new_len)) == NULL) { - old_len = 0; + log_error(LOG_LEVEL_FATAL, "realloc(%d) bytes failed!", new_len); + /* Never get here - LOG_LEVEL_FATAL causes program exit */ } - new_len = old_len + strlen(text_to_append) + 1; + strcpy(p + old_len, text_to_append); + return(p); +} + - if (old) +/********************************************************************* + * + * Function : string_append + * + * Description : Reallocate target_string and append text to it. + * This makes it easier to append to malloc'd strings. + * This is similar to strsav(), but running out of + * memory isn't catastrophic. + * + * Parameters : + * 1 : target_string = Pointer to old text that is to be + * extended. *target_string will be free()d by this + * routine. target_string must be non-NULL. + * If *target_string is NULL, this routine will + * do nothing and return with an error - this allows + * you to make many calls to this routine and only + * check for errors after the last one. + * 2 : text_to_append = Text to be appended to old. + * Must not be NULL. + * + * Returns : On success, returns 0 and sets *target_string to + * newly malloc'ed appended string. Caller must free(). + * On out-of-memory, returns nonzero (and free()s + * *target_string and sets it to NULL). + * + *********************************************************************/ +int string_append(char **target_string, const char *text_to_append) +{ + size_t old_len; + char *new_string; + + assert(target_string); + assert(text_to_append); + + if (*target_string == NULL) { - if ((p = realloc(old, new_len)) == NULL) - { - log_error(LOG_LEVEL_FATAL, "realloc(%d) bytes failed!", new_len); - /* Never get here - LOG_LEVEL_FATAL causes program exit */ - } + return(1); } - else + + if (*text_to_append == '\0') { - if ((p = (char *)malloc(new_len)) == NULL) - { - log_error(LOG_LEVEL_FATAL, "malloc(%d) bytes failed!", new_len); - /* Never get here - LOG_LEVEL_FATAL causes program exit */ - } + return(0); } - strcpy(p + old_len, text_to_append); - return(p); + old_len = strlen(*target_string); + + if (NULL == (new_string = realloc(*target_string, + strlen(text_to_append) + old_len + 1))) + { + free(*target_string); + *target_string = NULL; + return(1); + } + + strcpy(new_string + old_len, text_to_append); + + *target_string = new_string; + return(0); } /********************************************************************* * - * Function : trivimatch - * - * Description : Trivial string matching, with only one metacharacter, - * namely '*', which stands for zero or more arbitrary - * characters. + * Function : simplematch * - * Note: The * is greedy, i.e. it will try to match as - * much text es possible. + * Description : String matching, with a (greedy) '*' wildcard that + * stands for zero or more arbitrary characters and + * character classes in [], which take both enumerations + * and ranges. * * Parameters : * 1 : pattern = pattern for matching @@ -410,15 +520,21 @@ char *strsav(char *old, const char *text_to_append) * Returns : 0 if match, else nonzero * *********************************************************************/ -int trivimatch(char *pattern, char *text) +int simplematch(char *pattern, char *text) { - char *fallback; - char *pat = pattern; - char *txt = text; + unsigned char *pat = (unsigned char *) pattern; + unsigned char *txt = (unsigned char *) text; + unsigned char *fallback = pat; int wildcard = 0; + unsigned char lastchar = 'a'; + unsigned i; + unsigned char charmap[32]; + + while (*txt) { + /* EOF pattern but !EOF text? */ if (*pat == '\0') { @@ -428,49 +544,186 @@ int trivimatch(char *pattern, char *text) /* '*' in the pattern? */ if (*pat == '*') { - + /* The pattern ends afterwards? Speed up the return. */ if (*++pat == '\0') { return 0; } - + /* Else, set wildcard mode and remember position after '*' */ wildcard = 1; fallback = pat; } - /* Compare: */ - if (*pat != *txt) + /* Character range specification? */ + if (*pat == '[') + { + memset(charmap, '\0', sizeof(charmap)); + + while (*++pat != ']') + { + if (!*pat) + { + return 1; + } + else if (*pat == '-') + { + if ((*++pat == ']') || *pat == '\0') + { + return(1); + } + for(i = lastchar; i <= *pat; i++) + { + charmap[i / 8] |= (1 << (i % 8)); + } + } + else + { + charmap[*pat / 8] |= (1 << (*pat % 8)); + lastchar = *pat; + } + } + } /* -END- if Character range specification */ + + + /* Compare: Char match, or char range match*/ + if ((*pat == *txt) + || ((*pat == ']') && (charmap[*txt / 8] & (1 << (*txt % 8)))) ) + { + /* Sucess, go ahead */ + pat++; + } + else { - /* In wildcard mode, just try again */ + /* In wildcard mode, just try again after failiure */ if(wildcard) { - /* Without wildcard mode, this is fatal! */ pat = fallback; } - /* Bad luck otherwise */ + /* Else, bad luck */ else { return 1; } } - /* We had a match, advance */ - else - { - pat++; - } txt++; - } + } - if(*pat == '*') pat++; + /* Cut off extra '*'s */ + if(*pat == '*') pat++; - /* Hey, we've made it all the way through! */ - return(*pat); + /* If this is the pattern's end, fine! */ + return(*pat); } + +/********************************************************************* + * + * Function : bindup + * + * Description : Duplicate the first n characters of a string that may + * contain '\0' characters. + * + * Parameters : + * 1 : string = string to be duplicated + * 2 : n = number of bytes to duplicate + * + * Returns : pointer to copy, or NULL if failiure + * + *********************************************************************/ +char *bindup(const char *string, int n) +{ + char *dup; + + if (NULL == (dup = (char *)malloc(n))) + { + return NULL; + } + else + { + memcpy(dup, string, n); + } + + return dup; + +} + + +/********************************************************************* + * + * Function : make_path + * + * Description : Takes a directory name and a file name, returns + * the complete path. Handles windows/unix differences. + * If the file name is already an absolute path, or if + * the directory name is NULL or empty, it returns + * the filename. + * + * Parameters : + * 1 : dir: Name of directory or NULL for none. + * 2 : file: Name of file. Should not be NULL or empty. + * + * Returns : "dir/file" (Or on windows, "dir\file"). + * It allocates the string on the heap. Caller frees. + * Returns NULL in error (i.e. NULL file or out of + * memory) + * + *********************************************************************/ +char * make_path(const char * dir, const char * file) +{ +#ifdef AMIGA + char path[512]; + + if(dir) + { + strncpy(path,dir,512); + path[511]=0; + } else { + path[0]=0; + } + if(AddPart(path,file,512)) + { + return strdup(path); + } else { + return NULL; + } +#else /* ndef AMIGA */ + + if ((file == NULL) || (*file == '\0')) + { + return NULL; /* Error */ + } + + if ((dir == NULL) || (*dir == '\0') /* No directory specified */ +#ifdef _WIN32 + || (*file == '\\') || (file[1] == ':') /* Absolute path (DOS) */ +#else /* ifndef _WIN32 */ + || (*file == '/') /* Absolute path (U*ix) */ +#endif /* ifndef _WIN32 */ + ) + { + return strdup(file); + } + else + { + char * path = malloc(strlen(dir) + strlen(file) + 2); + strcpy(path, dir); +#ifdef _WIN32 + strcat(path, "\\"); +#else /* ifndef _WIN32 */ + if(path[strlen(path)-1] != '/') strcat(path, "/"); +#endif /* ifndef _WIN32 */ + strcat(path, file); + + return path; + } +#endif /* ndef AMIGA */ +} + + /* Local Variables: tab-width: 3