2 * utils.c -- various utility routines
4 * This code is Copyright (c) 2006, by the authors of nmh. See the
5 * COPYRIGHT file in the root directory of the nmh distribution for
6 * complete copyright information.
16 * We allocate space for messages (msgs array)
17 * this number of elements at a time.
25 mh_xmalloc(size_t size)
30 adios(NULL, "Tried to malloc 0 bytes");
32 memory = malloc(size);
34 adios(NULL, "Malloc failed");
43 mh_xrealloc(void *ptr, size_t size)
47 /* Some non-POSIX realloc()s don't cope with realloc(NULL,sz) */
49 return mh_xmalloc(size);
52 adios(NULL, "Tried to realloc 0bytes");
54 memory = realloc(ptr, size);
56 adios(NULL, "Realloc failed");
62 * Return the present working directory, if the current directory does not
63 * exist, or is too long, make / the pwd.
69 static char curwd[PATH_MAX];
71 if (!getcwd (curwd, PATH_MAX)) {
72 admonish (NULL, "unable to determine working directory");
73 if (!mypath || !*mypath
74 || (strcpy (curwd, mypath), chdir (curwd)) == -1) {
81 if ((cp = curwd + strlen (curwd) - 1) > curwd && *cp == '/')
88 * add -- If "s1" is NULL, this routine just creates a
89 * -- copy of "s2" into newly malloc'ed memory.
91 * -- If "s1" is not NULL, then copy the concatenation
92 * -- of "s1" and "s2" (note the order) into newly
93 * -- malloc'ed memory. Then free "s1".
96 add (char *s2, char *s1)
99 size_t len1 = 0, len2 = 0;
106 cp = mh_xmalloc (len1 + len2 + 1);
108 /* Copy s1 and free it */
110 memcpy (cp, s1, len1);
116 memcpy (cp + len1, s2, len2);
118 /* Now NULL terminate the string */
119 cp[len1 + len2] = '\0';
126 * Check to see if a folder exists.
129 folder_exists(char *folder)
134 if (stat (folder, &st) == -1) {
135 /* The folder either doesn't exist, or we hit an error.
136 * Either way return a failure.
140 /* We can see a folder with the right name */
150 * Check to see if a folder exists, if not, prompt the user to create it.
153 create_folder(char *folder, int autocreate, void (*done_callback)(int))
159 if (stat (folder, &st) == -1) {
161 adios (folder, "error on folder");
162 if (autocreate == 0) {
163 /* ask before creating folder */
164 cp = concat ("Create folder \"", folder, "\"? ", NULL);
168 } else if (autocreate == -1) {
169 /* do not create, so exit */
172 if (!makedir (folder))
173 adios (NULL, "unable to create folder %s", folder);
179 * Return the number of digits in a nonnegative integer.
188 adios (NULL, "oops, num_digits called with negative value");
202 * Append a message arg to an array of them, resizing it if necessary.
203 * The function is written to suit the arg parsing code it was extracted
204 * from, and will probably be changed when the other code is cleaned up.
207 app_msgarg(struct msgs_array *msgs, char *cp)
209 if(msgs->size >= msgs->max)
210 msgs->msgs = mh_xrealloc(msgs->msgs, (msgs->max+=MAXMSGS)*sizeof(*msgs->msgs));
211 msgs->msgs[msgs->size++] = cp;
214 /* Open a form or components file */
216 open_form(char **form, char *def)
220 if ((in = open (etcpath (*form), O_RDONLY)) == NOTOK)
221 adios (*form, "unable to open form file");
223 if ((in = open (etcpath (def), O_RDONLY)) == NOTOK)
224 adios (def, "unable to open default components file");