| /* | |
| * 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); | |
| } |