X-Git-Url: http://git.marmaro.de/?p=mmh;a=blobdiff_plain;f=sbr%2Futils.c;h=5c1253d8b174f1e2883d4ecb016838ada0980f65;hp=2a7a1ccfb150ac67826d8b23abb0a953711f6209;hb=714b5c530ece27ea2835a313013f5b770163403c;hpb=08aa8c17c3241bb5c6a997ed2e01e25a4d0089ce diff --git a/sbr/utils.c b/sbr/utils.c index 2a7a1cc..5c1253d 100644 --- a/sbr/utils.c +++ b/sbr/utils.c @@ -1,143 +1,230 @@ - /* - * utils.c -- various utility routines - * - * $Id$ - * - * This code is Copyright (c) 2006, by the authors of nmh. See the - * COPYRIGHT file in the root directory of the nmh distribution for - * complete copyright information. - */ +** utils.c -- various utility routines +** +** This code is Copyright (c) 2006, by the authors of nmh. See the +** COPYRIGHT file in the root directory of the nmh distribution for +** complete copyright information. +*/ #include #include #include +#include #include /* - * Safely call malloc - */ +** We allocate space for messages (msgs array) +** this number of elements at a time. +*/ +#define MAXMSGS 256 + +/* +** Safely call malloc +*/ void * mh_xmalloc(size_t size) { - void *memory; + void *memory; - if (size == 0) - adios(NULL, "Tried to malloc 0 bytes"); + if (size == 0) + adios(NULL, "Tried to malloc 0 bytes"); - memory = malloc(size); - if (!memory) - adios(NULL, "Malloc failed"); + memory = malloc(size); + if (!memory) + adios(NULL, "Malloc failed"); - return memory; + return memory; } /* - * Safely call realloc - */ +** Safely call realloc +*/ void * mh_xrealloc(void *ptr, size_t size) { - void *memory; + void *memory; - if (size == 0) - adios(NULL, "Tried to realloc 0bytes"); + /* Some non-POSIX realloc()s don't cope with realloc(NULL,sz) */ + if (!ptr) + return mh_xmalloc(size); - memory = realloc(ptr, size); - if (!memory) - adios(NULL, "Realloc failed"); + if (size == 0) + adios(NULL, "Tried to realloc 0bytes"); - return memory; + memory = realloc(ptr, size); + if (!memory) + adios(NULL, "Realloc failed"); + + return memory; } /* - * Return the present working directory, if the current directory does not - * exist, or is too long, make / the pwd. - */ +** Return the present working directory, if the current directory does not +** exist, or is too long, make / the pwd. +*/ char * pwd(void) { - register char *cp; - static char curwd[PATH_MAX]; - - if (!getcwd (curwd, PATH_MAX)) { - admonish (NULL, "unable to determine working directory"); - if (!mypath || !*mypath - || (strcpy (curwd, mypath), chdir (curwd)) == -1) { - strcpy (curwd, "/"); - chdir (curwd); - } - return curwd; - } - - if ((cp = curwd + strlen (curwd) - 1) > curwd && *cp == '/') - *cp = '\0'; - - return curwd; + register char *cp; + static char curwd[PATH_MAX]; + + if (!getcwd(curwd, PATH_MAX)) { + admonish(NULL, "unable to determine working directory"); + if (!mypath || !*mypath + || (strcpy(curwd, mypath), chdir(curwd)) == -1) { + strcpy(curwd, "/"); + chdir(curwd); + } + return curwd; + } + + if ((cp = curwd + strlen(curwd) - 1) > curwd && *cp == '/') + *cp = '\0'; + + return curwd; } /* - * add -- If "s1" is NULL, this routine just creates a - * -- copy of "s2" into newly malloc'ed memory. - * -- - * -- If "s1" is not NULL, then copy the concatenation - * -- of "s1" and "s2" (note the order) into newly - * -- malloc'ed memory. Then free "s1". - */ +** add -- If "s1" is NULL, this routine just creates a +** -- copy of "s2" into newly malloc'ed memory. +** -- +** -- If "s1" is not NULL, then copy the concatenation +** -- of "s1" and "s2" (note the order) into newly +** -- malloc'ed memory. Then free "s1". +*/ char * -add (char *s2, char *s1) +add(char *s2, char *s1) +{ + char *cp; + size_t len1 = 0, len2 = 0; + + if (s1) + len1 = strlen(s1); + if (s2) + len2 = strlen(s2); + + cp = mh_xmalloc(len1 + len2 + 1); + + /* Copy s1 and free it */ + if (s1) { + memcpy(cp, s1, len1); + free(s1); + } + + /* Copy s2 */ + if (s2) + memcpy(cp + len1, s2, len2); + + /* Now NULL terminate the string */ + cp[len1 + len2] = '\0'; + + return cp; +} + +/* +** folder_exists +** Check to see if a folder exists. +*/ +int +folder_exists(char *folder) { - char *cp; - size_t len1 = 0, len2 = 0; + struct stat st; + int exists = 0; + + if (stat(folder, &st) == -1) { + /* + ** The folder either doesn't exist, or we hit an error. + ** Either way return a failure. + */ + exists = 0; + } else { + /* We can see a folder with the right name */ + exists = 1; + } + + return exists; +} - if (s1) - len1 = strlen (s1); - if (s2) - len2 = strlen (s2); - cp = mh_xmalloc (len1 + len2 + 1); +/* +** create_folder +** Check to see if a folder exists, if not, prompt the user to create it. +*/ +void +create_folder(char *folder, int autocreate, void (*done_callback)(int)) +{ + struct stat st; + extern int errno; + char *cp; + + if (stat(folder, &st) == -1) { + if (errno != ENOENT) + adios(folder, "error on folder"); + if (autocreate == 0) { + /* ask before creating folder */ + cp = concat("Create folder \"", folder, "\"? ", NULL); + if (!getanswer(cp)) + done_callback(1); + free(cp); + } else if (autocreate == -1) { + /* do not create, so exit */ + done_callback(1); + } + if (!makedir(folder)) + adios(NULL, "unable to create folder %s", folder); + } +} + +/* +** num_digits +** Return the number of digits in a nonnegative integer. +*/ +int +num_digits(int n) +{ + int ndigits = 0; - /* Copy s1 and free it */ - if (s1) { - memcpy (cp, s1, len1); - free (s1); - } + /* Sanity check */ + if (n < 0) + adios(NULL, "oops, num_digits called with negative value"); - /* Copy s2 */ - if (s2) - memcpy (cp + len1, s2, len2); + if (n == 0) + return 1; - /* Now NULL terminate the string */ - cp[len1 + len2] = '\0'; + while (n) { + n /= 10; + ndigits++; + } - return cp; + return ndigits; } /* - * create_folder - * Check to see if a folder exists, if not, prompt the user to create - * it. - */ -void create_folder(char *folder, int autocreate, void (*done_callback)()) +** Append a message arg to an array of them, resizing it if necessary. +** The function is written to suit the arg parsing code it was extracted +** from, and will probably be changed when the other code is cleaned up. +*/ +void +app_msgarg(struct msgs_array *msgs, char *cp) +{ + if(msgs->size >= msgs->max) + msgs->msgs = mh_xrealloc(msgs->msgs, + (msgs->max+=MAXMSGS)*sizeof(*msgs->msgs)); + msgs->msgs[msgs->size++] = cp; +} + +/* Open a form or components file */ +int +open_form(char **form, char *def) { - struct stat st; - extern int errno; - char *cp; - - if (stat (folder, &st) == -1) { - if (errno != ENOENT) - adios (folder, "error on folder"); - if (autocreate == 0) { - /* ask before creating folder */ - cp = concat ("Create folder \"", folder, "\"? ", NULL); - if (!getanswer (cp)) - done_callback (1); - free (cp); - } else if (autocreate == -1) { - /* do not create, so exit */ - done_callback (1); - } - if (!makedir (folder)) - adios (NULL, "unable to create folder %s", folder); - } + int in; + if (*form) { + if ((in = open(etcpath(*form), O_RDONLY)) == NOTOK) + adios(*form, "unable to open form file"); + } else { + if ((in = open(etcpath(def), O_RDONLY)) == NOTOK) + adios(def, "unable to open default components file"); + *form = def; + } + return in; }