|  | /* | 
|  | * Copyright (C) 2002-2005 Roman Zippel <zippel@linux-m68k.org> | 
|  | * Copyright (C) 2002-2005 Sam Ravnborg <sam@ravnborg.org> | 
|  | * | 
|  | * Released under the terms of the GNU GPL v2.0. | 
|  | */ | 
|  |  | 
|  | #include <stdarg.h> | 
|  | #include <stdlib.h> | 
|  | #include <string.h> | 
|  | #include "lkc.h" | 
|  |  | 
|  | /* file already present in list? If not add it */ | 
|  | struct file *file_lookup(const char *name) | 
|  | { | 
|  | struct file *file; | 
|  |  | 
|  | for (file = file_list; file; file = file->next) { | 
|  | if (!strcmp(name, file->name)) { | 
|  | return file; | 
|  | } | 
|  | } | 
|  |  | 
|  | file = xmalloc(sizeof(*file)); | 
|  | memset(file, 0, sizeof(*file)); | 
|  | file->name = xstrdup(name); | 
|  | file->next = file_list; | 
|  | file_list = file; | 
|  | return file; | 
|  | } | 
|  |  | 
|  | /* Allocate initial growable string */ | 
|  | struct gstr str_new(void) | 
|  | { | 
|  | struct gstr gs; | 
|  | gs.s = xmalloc(sizeof(char) * 64); | 
|  | gs.len = 64; | 
|  | gs.max_width = 0; | 
|  | strcpy(gs.s, "\0"); | 
|  | return gs; | 
|  | } | 
|  |  | 
|  | /* Free storage for growable string */ | 
|  | void str_free(struct gstr *gs) | 
|  | { | 
|  | if (gs->s) | 
|  | free(gs->s); | 
|  | gs->s = NULL; | 
|  | gs->len = 0; | 
|  | } | 
|  |  | 
|  | /* Append to growable string */ | 
|  | void str_append(struct gstr *gs, const char *s) | 
|  | { | 
|  | size_t l; | 
|  | if (s) { | 
|  | l = strlen(gs->s) + strlen(s) + 1; | 
|  | if (l > gs->len) { | 
|  | gs->s = xrealloc(gs->s, l); | 
|  | gs->len = l; | 
|  | } | 
|  | strcat(gs->s, s); | 
|  | } | 
|  | } | 
|  |  | 
|  | /* Append printf formatted string to growable string */ | 
|  | void str_printf(struct gstr *gs, const char *fmt, ...) | 
|  | { | 
|  | va_list ap; | 
|  | char s[10000]; /* big enough... */ | 
|  | va_start(ap, fmt); | 
|  | vsnprintf(s, sizeof(s), fmt, ap); | 
|  | str_append(gs, s); | 
|  | va_end(ap); | 
|  | } | 
|  |  | 
|  | /* Retrieve value of growable string */ | 
|  | const char *str_get(struct gstr *gs) | 
|  | { | 
|  | return gs->s; | 
|  | } | 
|  |  | 
|  | void *xmalloc(size_t size) | 
|  | { | 
|  | void *p = malloc(size); | 
|  | if (p) | 
|  | return p; | 
|  | fprintf(stderr, "Out of memory.\n"); | 
|  | exit(1); | 
|  | } | 
|  |  | 
|  | void *xcalloc(size_t nmemb, size_t size) | 
|  | { | 
|  | void *p = calloc(nmemb, size); | 
|  | if (p) | 
|  | return p; | 
|  | fprintf(stderr, "Out of memory.\n"); | 
|  | exit(1); | 
|  | } | 
|  |  | 
|  | void *xrealloc(void *p, size_t size) | 
|  | { | 
|  | p = realloc(p, size); | 
|  | if (p) | 
|  | return p; | 
|  | fprintf(stderr, "Out of memory.\n"); | 
|  | exit(1); | 
|  | } | 
|  |  | 
|  | char *xstrdup(const char *s) | 
|  | { | 
|  | char *p; | 
|  |  | 
|  | p = strdup(s); | 
|  | if (p) | 
|  | return p; | 
|  | fprintf(stderr, "Out of memory.\n"); | 
|  | exit(1); | 
|  | } | 
|  |  | 
|  | char *xstrndup(const char *s, size_t n) | 
|  | { | 
|  | char *p; | 
|  |  | 
|  | p = strndup(s, n); | 
|  | if (p) | 
|  | return p; | 
|  | fprintf(stderr, "Out of memory.\n"); | 
|  | exit(1); | 
|  | } |