X-Git-Url: http://www.privoxy.org/gitweb/?p=privoxy.git;a=blobdiff_plain;f=list.c;h=2cbe763d2b7e38b115c665866fa86be5392bcb60;hp=0625e660f40a918b7dbfa7ed08c15f533bd7ba0c;hb=38ac8f2652413024377cb1822c6d397fb1d3800d;hpb=20b6fe1c584e105f529d0fc92c02d62c214a29d3 diff --git a/list.c b/list.c index 0625e660..2cbe763d 100644 --- a/list.c +++ b/list.c @@ -1,4 +1,4 @@ -const char list_rcs[] = "$Id: list.c,v 1.9 2001/09/16 13:20:29 jongfoster Exp $"; +const char list_rcs[] = "$Id: list.c,v 1.17 2006/07/18 14:48:46 david__schmidt Exp $"; /********************************************************************* * * File : $Source: /cvsroot/ijbswa/current/list.c,v $ @@ -8,13 +8,13 @@ const char list_rcs[] = "$Id: list.c,v 1.9 2001/09/16 13:20:29 jongfoster Exp $" * `destroy_list', `enlist' and `list_to_text' * * Copyright : Written by and Copyright (C) 2001 the SourceForge - * IJBSWA team. http://ijbswa.sourceforge.net + * Privoxy team. http://www.privoxy.org/ * * Based on the Internet Junkbuster originally written - * by and Copyright (C) 1997 Anonymous Coders and + * by and Copyright (C) 1997 Anonymous Coders and * Junkbusters Corporation. http://www.junkbusters.com * - * This program is free software; you can redistribute it + * This program is free software; you can redistribute it * and/or modify it under the terms of the GNU General * Public License as published by the Free Software * Foundation; either version 2 of the License, or (at @@ -34,6 +34,40 @@ const char list_rcs[] = "$Id: list.c,v 1.9 2001/09/16 13:20:29 jongfoster Exp $" * * Revisions : * $Log: list.c,v $ + * Revision 1.17 2006/07/18 14:48:46 david__schmidt + * Reorganizing the repository: swapping out what was HEAD (the old 3.1 branch) + * with what was really the latest development (the v_3_0_branch branch) + * + * Revision 1.15.2.2 2004/05/25 02:04:23 david__schmidt + * Removed the "arbitrary" 1000 filter limit in file.c. See tracker #911950. + * + * Revision 1.15.2.1 2002/11/28 18:14:54 oes + * Added unmap function that removes all items with a given + * name from a map. + * + * Revision 1.15 2002/03/26 22:29:55 swa + * we have a new homepage! + * + * Revision 1.14 2002/03/24 13:25:43 swa + * name change related issues + * + * Revision 1.13 2002/03/07 03:46:17 oes + * Fixed compiler warnings + * + * Revision 1.12 2001/10/25 03:40:48 david__schmidt + * Change in porting tactics: OS/2's EMX porting layer doesn't allow multiple + * threads to call select() simultaneously. So, it's time to do a real, live, + * native OS/2 port. See defines for __EMX__ (the porting layer) vs. __OS2__ + * (native). Both versions will work, but using __OS2__ offers multi-threading. + * + * Revision 1.11 2001/10/23 21:21:03 jongfoster + * New error handling - error codes are now jb_errs, not ints. + * Changed the way map() handles out-of-memory, to dramatically + * reduce the amount of error-checking clutter needed. + * + * Revision 1.10 2001/09/16 17:30:24 jongfoster + * Fixing a compiler warning. + * * Revision 1.9 2001/09/16 13:20:29 jongfoster * Rewrite of list library. Now has seperate header and list_entry * structures. Also added a large sprinking of assert()s to the list @@ -102,7 +136,7 @@ const char list_rcs[] = "$Id: list.c,v 1.9 2001/09/16 13:20:29 jongfoster Exp $" #endif #include -#ifndef _WIN32 +#if !defined(_WIN32) && !defined(__OS2__) #include #endif @@ -120,15 +154,15 @@ static int list_is_valid (const struct list *the_list); /********************************************************************* * - * Function : list_init + * Function : init_list * * Description : Create a new, empty list in user-allocated memory. * Caller should allocate a "struct list" variable, * then pass it to this function. * (Implementation note: Rather than calling this * function, you can also just memset the memory to - * zero, e.g. if you have a larger structure you - * want to initialize quickly. However, that isn't + * zero, e.g. if you have a larger structure you + * want to initialize quickly. However, that isn't * really good design.) * * Parameters : @@ -154,9 +188,9 @@ void init_list(struct list *the_list) * calling list_init(). * * (Implementation note: You *can* reuse the_list - * without calling list_init(), but please don't. + * without calling list_init(), but please don't. * If you want to remove all entries from a list - * and still have a usable list, then use + * and still have a usable list, then use * list_remove_all().) * * Parameters : @@ -174,7 +208,7 @@ void destroy_list (struct list *the_list) for (cur_entry = the_list->first; cur_entry ; cur_entry = next_entry) { next_entry = cur_entry->next; - freez((char *)cur_entry->str); + freez(cur_entry->str); free(cur_entry); } @@ -190,7 +224,7 @@ void destroy_list (struct list *the_list) * Description : Check that a string list is valid. The intended * usage is "assert(list_is_valid(the_list))". * Currently this checks that "the_list->last" - * is correct, and that the list dosn't contain + * is correct, and that the list dosn't contain * circular references. It is likely to crash if * it's passed complete garbage. * @@ -209,7 +243,7 @@ static int list_is_valid (const struct list *the_list) #if 1 const struct list_entry *cur_entry; const struct list_entry *last_entry = NULL; - int length = 0; + int entry = 0; assert(the_list); @@ -220,27 +254,32 @@ static int list_is_valid (const struct list *the_list) if (cur_entry->str) { /* - * Just check that this string can be accessed - i.e. it's a valid + * Just check that this string can be accessed - i.e. it's a valid * pointer. */ - strlen(cur_entry->str); + (void)strlen(cur_entry->str); } /* * Check for looping back to first */ - if ((length != 0) && (cur_entry == the_list->first)) + if ((entry++ != 0) && (cur_entry == the_list->first)) { return 0; } /* - * Arbitrarily limit length to prevent infinite loops. - */ - if (++length > 1000) - { + * Arbitrarily limit list length to prevent infinite loops. + * Note that the 1000 limit was hit by a real user in tracker 911950; + * removing it for now. Real circular references should eventually + * be caught by the check above, anyway. + */ + /* + if (entry > 1000) + { return 0; - } + } + */ /* * Check this isn't marked as the last entry, unless of course it's @@ -269,11 +308,12 @@ static int list_is_valid (const struct list *the_list) * 1 : the_list = pointer to list * 2 : str = string to add to the list (maybe NULL) * - * Returns : 0 on success, nonzero on out-of-memory error. On - * error, the_list will be unchanged. + * Returns : JB_ERR_OK on success + * JB_ERR_MEMORY on out-of-memory error. + * On error, the_list will be unchanged. * *********************************************************************/ -int enlist(struct list *the_list, const char *str) +jb_err enlist(struct list *the_list, const char *str) { struct list_entry *cur; @@ -282,7 +322,7 @@ int enlist(struct list *the_list, const char *str) if (NULL == (cur = (struct list_entry *)zalloc(sizeof(*cur)))) { - return 1; + return JB_ERR_MEMORY; } if (str) @@ -290,7 +330,7 @@ int enlist(struct list *the_list, const char *str) if (NULL == (cur->str = strdup(str))) { free(cur); - return 1; + return JB_ERR_MEMORY; } } /* else { cur->str = NULL; } - implied by zalloc */ @@ -309,7 +349,7 @@ int enlist(struct list *the_list, const char *str) } assert(list_is_valid(the_list)); - return 0; + return JB_ERR_OK; } @@ -324,11 +364,12 @@ int enlist(struct list *the_list, const char *str) * 1 : the_list = pointer to list * 2 : str = string to add to the list (maybe NULL) * - * Returns : 0 on success, nonzero on out-of-memory error. On - * error, the_list will be unchanged. + * Returns : JB_ERR_OK on success + * JB_ERR_MEMORY on out-of-memory error. + * On error, the_list will be unchanged. * *********************************************************************/ -int enlist_first(struct list *the_list, const char *str) +jb_err enlist_first(struct list *the_list, const char *str) { struct list_entry *cur; @@ -337,7 +378,7 @@ int enlist_first(struct list *the_list, const char *str) if (NULL == (cur = (struct list_entry *)zalloc(sizeof(*cur)))) { - return 1; + return JB_ERR_MEMORY; } if (str) @@ -345,11 +386,11 @@ int enlist_first(struct list *the_list, const char *str) if (NULL == (cur->str = strdup(str))) { free(cur); - return 1; + return JB_ERR_MEMORY; } } /* else { cur->str = NULL; } - implied by zalloc */ - + cur->next = the_list->first; the_list->first = cur; @@ -359,7 +400,7 @@ int enlist_first(struct list *the_list, const char *str) } assert(list_is_valid(the_list)); - return 0; + return JB_ERR_OK; } @@ -370,7 +411,7 @@ int enlist_first(struct list *the_list, const char *str) * Description : Append a string into a specified string list, * if & only if it's not there already. * If the num_significant_chars argument is nonzero, - * only compare up to the nth character. + * only compare up to the nth character. * * Parameters : * 1 : the_list = pointer to list @@ -378,14 +419,15 @@ int enlist_first(struct list *the_list, const char *str) * 3 : num_significant_chars = number of chars to use * for uniqueness test, or 0 to require an exact match. * - * Returns : 0 on success, nonzero on out-of-memory error. On - * error, the_list will be unchanged. "Success" - * does not indicate whether or not the item was - * already in the list. + * Returns : JB_ERR_OK on success + * JB_ERR_MEMORY on out-of-memory error. + * On error, the_list will be unchanged. + * "Success" does not indicate whether or not the + * item was already in the list. * *********************************************************************/ -int enlist_unique(struct list *the_list, const char *str, - int num_significant_chars) +jb_err enlist_unique(struct list *the_list, const char *str, + size_t num_significant_chars) { struct list_entry *cur_entry; @@ -393,7 +435,7 @@ int enlist_unique(struct list *the_list, const char *str, assert(list_is_valid(the_list)); assert(str); assert(num_significant_chars >= 0); - assert((size_t)num_significant_chars <= strlen(str)); + assert(num_significant_chars <= strlen(str)); if (num_significant_chars > 0) { @@ -403,7 +445,7 @@ int enlist_unique(struct list *the_list, const char *str, && (0 == strncmp(str, cur_entry->str, num_significant_chars))) { /* Already there */ - return 0; + return JB_ERR_OK; } } } @@ -415,7 +457,7 @@ int enlist_unique(struct list *the_list, const char *str, if ( (cur_entry->str != NULL) && (0 == strcmp(str, cur_entry->str))) { /* Already there */ - return 0; + return JB_ERR_OK; } } } @@ -437,16 +479,18 @@ int enlist_unique(struct list *the_list, const char *str, * 2 : name = HTTP header name (e.g. "Content-type") * 3 : value = HTTP header value (e.g. "text/html") * - * Returns : 0 on success, nonzero on out-of-memory error. On - * error, the_list will be unchanged. "Success" - * does not indicate whether or not the header was - * already in the list. + * Returns : JB_ERR_OK on success + * JB_ERR_MEMORY on out-of-memory error. + * On error, the_list will be unchanged. + * "Success" does not indicate whether or not the + * header was already in the list. * *********************************************************************/ -int enlist_unique_header(struct list *the_list, const char *name, const char *value) +jb_err enlist_unique_header(struct list *the_list, const char *name, + const char *value) { - int length; - int result; + size_t length; + jb_err result; char *str; assert(the_list); @@ -457,7 +501,7 @@ int enlist_unique_header(struct list *the_list, const char *name, const char *va length = strlen(name) + 2; if (NULL == (str = (char *)malloc(length + strlen(value) + 1))) { - return 1; + return JB_ERR_MEMORY; } strcpy(str, name); str[length - 2] = ':'; @@ -471,6 +515,7 @@ int enlist_unique_header(struct list *the_list, const char *name, const char *va assert(list_is_valid(the_list)); return result; + } @@ -481,7 +526,7 @@ int enlist_unique_header(struct list *the_list, const char *name, const char *va * Description : Remove all entries from a list. On return, the_list * is a valid, empty list. Note that this is similar * to destroy_list(), but the difference is that this - * function guarantees that the list structure is still + * function guarantees that the list structure is still * valid after the call. * * Parameters : @@ -501,7 +546,7 @@ void list_remove_all(struct list *the_list) for (cur_entry = the_list->first; cur_entry ; cur_entry = next_entry) { next_entry = cur_entry->next; - freez((char *)cur_entry->str); + freez(cur_entry->str); free(cur_entry); } @@ -531,7 +576,7 @@ char *list_to_text(const struct list *the_list) struct list_entry *cur_entry; char *ret = NULL; char *s; - int size = 2; + size_t size = 2; assert(the_list); assert(list_is_valid(the_list)); @@ -546,7 +591,7 @@ char *list_to_text(const struct list *the_list) if ((ret = (char *)malloc(size + 1)) == NULL) { - return(NULL); + return NULL; } ret[size] = '\0'; @@ -564,7 +609,7 @@ char *list_to_text(const struct list *the_list) } *s++ = '\r'; *s++ = '\n'; - return(ret); + return ret; } @@ -679,11 +724,12 @@ int list_remove_list(struct list *dest, const struct list *src) * All existing entries will be removed. * 1 : src = pointer to source list for copy. * - * Returns : 0 on success, nonzero on error. On error, dest - * will be empty. + * Returns : JB_ERR_OK on success + * JB_ERR_MEMORY on out-of-memory error. + * On error, dest will be empty. * *********************************************************************/ -int list_duplicate(struct list *dest, const struct list *src) +jb_err list_duplicate(struct list *dest, const struct list *src) { struct list_entry * cur_src; struct list_entry * cur_dest; @@ -707,7 +753,7 @@ int list_duplicate(struct list *dest, const struct list *src) assert(list_is_valid(src)); assert(list_is_valid(dest)); - return 1; + return JB_ERR_MEMORY; } if (cur_src->str) @@ -720,7 +766,7 @@ int list_duplicate(struct list *dest, const struct list *src) assert(list_is_valid(src)); assert(list_is_valid(dest)); - return 1; + return JB_ERR_MEMORY; } } /* else { cur_dest->str = NULL; } - implied by zalloc */ @@ -736,7 +782,7 @@ int list_duplicate(struct list *dest, const struct list *src) assert(list_is_valid(src)); assert(list_is_valid(dest)); - return 1; + return JB_ERR_MEMORY; } if (cur_src->str) { @@ -748,7 +794,7 @@ int list_duplicate(struct list *dest, const struct list *src) assert(list_is_valid(src)); assert(list_is_valid(dest)); - return 1; + return JB_ERR_MEMORY; } } /* else { cur_dest->str = NULL; } - implied by zalloc */ @@ -760,7 +806,7 @@ int list_duplicate(struct list *dest, const struct list *src) assert(list_is_valid(src)); assert(list_is_valid(dest)); - return 0; + return JB_ERR_OK; } @@ -775,12 +821,13 @@ int list_duplicate(struct list *dest, const struct list *src) * 1 : dest = pointer to destination list for merge. * 2 : src = pointer to source for merge. * - * Returns : 0 on success, nonzero on out-of-memory error. + * Returns : JB_ERR_OK on success + * JB_ERR_MEMORY on out-of-memory error. * On error, some (but not all) of src might have * been copied into dest. * *********************************************************************/ -int list_append_list_unique(struct list *dest, const struct list *src) +jb_err list_append_list_unique(struct list *dest, const struct list *src) { struct list_entry * cur; @@ -798,7 +845,7 @@ int list_append_list_unique(struct list *dest, const struct list *src) assert(list_is_valid(src)); assert(list_is_valid(dest)); - return 1; + return JB_ERR_MEMORY; } } } @@ -806,7 +853,7 @@ int list_append_list_unique(struct list *dest, const struct list *src) assert(list_is_valid(src)); assert(list_is_valid(dest)); - return 0; + return JB_ERR_OK; } @@ -826,7 +873,7 @@ int list_is_empty(const struct list *the_list) { assert(the_list); assert(list_is_valid(the_list)); - + return (the_list->first == NULL); } @@ -871,10 +918,10 @@ void free_map(struct map *the_map) return; } - for (cur_entry = the_map->first; cur_entry != NULL; cur_entry = next_entry) + for (cur_entry = the_map->first; cur_entry != NULL; cur_entry = next_entry) { - freez((char *)cur_entry->name); - freez((char *)cur_entry->value); + freez(cur_entry->name); + freez(cur_entry->value); next_entry = cur_entry->next; free(cur_entry); @@ -897,6 +944,27 @@ void free_map(struct map *the_map) * later, set the copy flags for constants or * strings that will be independantly free()d. * + * Note2: This function allows NULL parameters - it + * returns JB_ERR_MEMORY in that case. + * + * Note3: If this function returns JB_ERR_MEMORY, + * it will free(name) unless you specify + * name_needs_copying, and similarly it will + * free(value) unless you specify + * value_needs_copying. + * + * Due to Note2 and Note3 above, the following code + * is legal, and will never crash or leak memory even + * if the system runs out of memory: + * + * err = map(mymap, "xyz", 1, html_encode(somestring), 0); + * + * err will be set to JB_ERR_MEMORY if either call runs + * out-of-memory. Without these features, you would + * need to check the return value of html_encode in the + * above example for NULL, which (at least) doubles the + * amount of error-checking code needed. + * * Parameters : * 1 : the_map = map to add to * 2 : name = name to add @@ -904,22 +972,31 @@ void free_map(struct map *the_map) * 4 : value = value to add * 5 : value_needs_copying = flag set if a copy of value should be used * - * Returns : 0 on success, nonzero on out-of-memory error. + * Returns : JB_ERR_OK on success + * JB_ERR_MEMORY on out-of-memory error. * *********************************************************************/ -int map(struct map *the_map, - const char *name, int name_needs_copying, - const char *value, int value_needs_copying) +jb_err map(struct map *the_map, + const char *name, int name_needs_copying, + const char *value, int value_needs_copying) { struct map_entry *new_entry; assert(the_map); - assert(name); - assert(value); - if (NULL == (new_entry = zalloc(sizeof(*new_entry)))) + if ( (NULL == value) + || (NULL == name) + || (NULL == (new_entry = zalloc(sizeof(*new_entry)))) ) { - return 1; + if ((name != NULL) && (!name_needs_copying)) + { + free((char *)name); + } + if ((value != NULL) && (!value_needs_copying)) + { + free((char *)value); + } + return JB_ERR_MEMORY; } if (name_needs_copying) @@ -927,7 +1004,11 @@ int map(struct map *the_map, if (NULL == (name = strdup(name))) { free(new_entry); - return 1; + if (!value_needs_copying) + { + free((char *)value); + } + return JB_ERR_MEMORY; } } @@ -935,12 +1016,9 @@ int map(struct map *the_map, { if (NULL == (value = strdup(value))) { - if (name_needs_copying) - { - free((char *)name); - } + free((char *)name); free(new_entry); - return 1; + return JB_ERR_MEMORY; } } @@ -959,7 +1037,72 @@ int map(struct map *the_map, the_map->last = new_entry; } - return 0; + return JB_ERR_OK; +} + + +/********************************************************************* + * + * Function : unmap + * + * Description : Remove all map_entry structs with a given name from + * a given map. + * + * Parameters : + * 1 : the_map = map to look in + * 2 : name = name to unmap + * + * Returns : JB_ERR_OK + * + *********************************************************************/ +jb_err unmap(struct map *the_map, const char *name) +{ + struct map_entry *cur_entry, *last_entry; + + assert(the_map); + assert(name); + + last_entry = the_map->first; + + for (cur_entry = the_map->first; cur_entry != NULL; cur_entry = cur_entry->next) + { + if (!strcmp(name, cur_entry->name)) + { + /* + * Update the incoming pointer + */ + if (cur_entry == the_map->first) + { + the_map->first = cur_entry->next; + } + else + { + last_entry->next = cur_entry->next; + } + + /* + * Update the map's last pointer + */ + if (cur_entry == the_map->last) + { + the_map->last = last_entry; + } + + /* + * Free the map_entry + */ + freez(cur_entry->name); + freez(cur_entry->value); + freez(cur_entry); + + cur_entry = last_entry; + } + else + { + last_entry = cur_entry; + } + } + return JB_ERR_OK; }