Linux Audio

Check our new training course

Loading...
v4.17
 
  1/*
  2 * Copyright 2011 The Chromium Authors, All Rights Reserved.
  3 * Copyright 2008 Jon Loeliger, Freescale Semiconductor, Inc.
  4 *
  5 * util_is_printable_string contributed by
  6 *	Pantelis Antoniou <pantelis.antoniou AT gmail.com>
  7 *
  8 * This program is free software; you can redistribute it and/or
  9 * modify it under the terms of the GNU General Public License as
 10 * published by the Free Software Foundation; either version 2 of the
 11 * License, or (at your option) any later version.
 12 *
 13 *  This program is distributed in the hope that it will be useful,
 14 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 15 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 16 *  General Public License for more details.
 17 *
 18 *  You should have received a copy of the GNU General Public License
 19 *  along with this program; if not, write to the Free Software
 20 *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307
 21 *                                                                   USA
 22 */
 23
 24#include <ctype.h>
 25#include <stdio.h>
 26#include <stdlib.h>
 27#include <stdarg.h>
 28#include <string.h>
 29#include <assert.h>
 
 30
 31#include <errno.h>
 32#include <fcntl.h>
 33#include <unistd.h>
 34
 35#include "libfdt.h"
 36#include "util.h"
 37#include "version_gen.h"
 38
 39char *xstrdup(const char *s)
 40{
 41	int len = strlen(s) + 1;
 42	char *d = xmalloc(len);
 43
 44	memcpy(d, s, len);
 45
 46	return d;
 47}
 48
 49/* based in part from (3) vsnprintf */
 50int xasprintf(char **strp, const char *fmt, ...)
 51{
 52	int n, size = 128;	/* start with 128 bytes */
 
 
 
 
 
 
 
 
 
 
 
 53	char *p;
 54	va_list ap;
 55
 56	/* initial pointer is NULL making the fist realloc to be malloc */
 57	p = NULL;
 58	while (1) {
 59		p = xrealloc(p, size);
 60
 61		/* Try to print in the allocated space. */
 62		va_start(ap, fmt);
 63		n = vsnprintf(p, size, fmt, ap);
 64		va_end(ap);
 
 
 65
 66		/* If that worked, return the string. */
 67		if (n > -1 && n < size)
 68			break;
 69		/* Else try again with more space. */
 70		if (n > -1)	/* glibc 2.1 */
 71			size = n + 1; /* precisely what is needed */
 72		else		/* glibc 2.0 */
 73			size *= 2; /* twice the old size */
 74	}
 75	*strp = p;
 76	return strlen(p);
 77}
 78
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 79char *join_path(const char *path, const char *name)
 80{
 81	int lenp = strlen(path);
 82	int lenn = strlen(name);
 83	int len;
 84	int needslash = 1;
 85	char *str;
 86
 87	len = lenp + lenn + 2;
 88	if ((lenp > 0) && (path[lenp-1] == '/')) {
 89		needslash = 0;
 90		len--;
 91	}
 92
 93	str = xmalloc(len);
 94	memcpy(str, path, lenp);
 95	if (needslash) {
 96		str[lenp] = '/';
 97		lenp++;
 98	}
 99	memcpy(str+lenp, name, lenn+1);
100	return str;
101}
102
103bool util_is_printable_string(const void *data, int len)
104{
105	const char *s = data;
106	const char *ss, *se;
107
108	/* zero length is not */
109	if (len == 0)
110		return 0;
111
112	/* must terminate with zero */
113	if (s[len - 1] != '\0')
114		return 0;
115
116	se = s + len;
117
118	while (s < se) {
119		ss = s;
120		while (s < se && *s && isprint((unsigned char)*s))
121			s++;
122
123		/* not zero, or not done yet */
124		if (*s != '\0' || s == ss)
125			return 0;
126
127		s++;
128	}
129
130	return 1;
131}
132
133/*
134 * Parse a octal encoded character starting at index i in string s.  The
135 * resulting character will be returned and the index i will be updated to
136 * point at the character directly after the end of the encoding, this may be
137 * the '\0' terminator of the string.
138 */
139static char get_oct_char(const char *s, int *i)
140{
141	char x[4];
142	char *endx;
143	long val;
144
145	x[3] = '\0';
146	strncpy(x, s + *i, 3);
147
148	val = strtol(x, &endx, 8);
149
150	assert(endx > x);
151
152	(*i) += endx - x;
153	return val;
154}
155
156/*
157 * Parse a hexadecimal encoded character starting at index i in string s.  The
158 * resulting character will be returned and the index i will be updated to
159 * point at the character directly after the end of the encoding, this may be
160 * the '\0' terminator of the string.
161 */
162static char get_hex_char(const char *s, int *i)
163{
164	char x[3];
165	char *endx;
166	long val;
167
168	x[2] = '\0';
169	strncpy(x, s + *i, 2);
170
171	val = strtol(x, &endx, 16);
172	if (!(endx  > x))
173		die("\\x used with no following hex digits\n");
174
175	(*i) += endx - x;
176	return val;
177}
178
179char get_escape_char(const char *s, int *i)
180{
181	char	c = s[*i];
182	int	j = *i + 1;
183	char	val;
184
185	switch (c) {
186	case 'a':
187		val = '\a';
188		break;
189	case 'b':
190		val = '\b';
191		break;
192	case 't':
193		val = '\t';
194		break;
195	case 'n':
196		val = '\n';
197		break;
198	case 'v':
199		val = '\v';
200		break;
201	case 'f':
202		val = '\f';
203		break;
204	case 'r':
205		val = '\r';
206		break;
207	case '0':
208	case '1':
209	case '2':
210	case '3':
211	case '4':
212	case '5':
213	case '6':
214	case '7':
215		j--; /* need to re-read the first digit as
216		      * part of the octal value */
217		val = get_oct_char(s, &j);
218		break;
219	case 'x':
220		val = get_hex_char(s, &j);
221		break;
222	default:
223		val = c;
224	}
225
226	(*i) = j;
227	return val;
228}
229
230int utilfdt_read_err_len(const char *filename, char **buffp, off_t *len)
231{
232	int fd = 0;	/* assume stdin */
233	char *buf = NULL;
234	off_t bufsize = 1024, offset = 0;
235	int ret = 0;
236
237	*buffp = NULL;
238	if (strcmp(filename, "-") != 0) {
239		fd = open(filename, O_RDONLY);
240		if (fd < 0)
241			return errno;
242	}
243
244	/* Loop until we have read everything */
245	buf = xmalloc(bufsize);
246	do {
247		/* Expand the buffer to hold the next chunk */
248		if (offset == bufsize) {
249			bufsize *= 2;
250			buf = xrealloc(buf, bufsize);
251		}
252
253		ret = read(fd, &buf[offset], bufsize - offset);
254		if (ret < 0) {
255			ret = errno;
256			break;
257		}
258		offset += ret;
259	} while (ret != 0);
260
261	/* Clean up, including closing stdin; return errno on error */
262	close(fd);
263	if (ret)
264		free(buf);
265	else
266		*buffp = buf;
267	*len = bufsize;
 
268	return ret;
269}
270
271int utilfdt_read_err(const char *filename, char **buffp)
272{
273	off_t len;
274	return utilfdt_read_err_len(filename, buffp, &len);
275}
276
277char *utilfdt_read_len(const char *filename, off_t *len)
278{
279	char *buff;
280	int ret = utilfdt_read_err_len(filename, &buff, len);
281
282	if (ret) {
283		fprintf(stderr, "Couldn't open blob from '%s': %s\n", filename,
284			strerror(ret));
285		return NULL;
286	}
287	/* Successful read */
288	return buff;
289}
290
291char *utilfdt_read(const char *filename)
292{
293	off_t len;
294	return utilfdt_read_len(filename, &len);
295}
296
297int utilfdt_write_err(const char *filename, const void *blob)
298{
299	int fd = 1;	/* assume stdout */
300	int totalsize;
301	int offset;
302	int ret = 0;
303	const char *ptr = blob;
304
305	if (strcmp(filename, "-") != 0) {
306		fd = open(filename, O_WRONLY | O_CREAT | O_TRUNC, 0666);
307		if (fd < 0)
308			return errno;
309	}
310
311	totalsize = fdt_totalsize(blob);
312	offset = 0;
313
314	while (offset < totalsize) {
315		ret = write(fd, ptr + offset, totalsize - offset);
316		if (ret < 0) {
317			ret = -errno;
318			break;
319		}
320		offset += ret;
321	}
322	/* Close the file/stdin; return errno on error */
323	if (fd != 1)
324		close(fd);
325	return ret < 0 ? -ret : 0;
326}
327
328
329int utilfdt_write(const char *filename, const void *blob)
330{
331	int ret = utilfdt_write_err(filename, blob);
332
333	if (ret) {
334		fprintf(stderr, "Couldn't write blob to '%s': %s\n", filename,
335			strerror(ret));
336	}
337	return ret ? -1 : 0;
338}
339
340int utilfdt_decode_type(const char *fmt, int *type, int *size)
341{
342	int qualifier = 0;
343
344	if (!*fmt)
345		return -1;
346
347	/* get the conversion qualifier */
348	*size = -1;
349	if (strchr("hlLb", *fmt)) {
350		qualifier = *fmt++;
351		if (qualifier == *fmt) {
352			switch (*fmt++) {
353/* TODO:		case 'l': qualifier = 'L'; break;*/
354			case 'h':
355				qualifier = 'b';
356				break;
357			}
358		}
359	}
360
361	/* we should now have a type */
362	if ((*fmt == '\0') || !strchr("iuxs", *fmt))
363		return -1;
364
365	/* convert qualifier (bhL) to byte size */
366	if (*fmt != 's')
367		*size = qualifier == 'b' ? 1 :
368				qualifier == 'h' ? 2 :
369				qualifier == 'l' ? 4 : -1;
370	*type = *fmt++;
371
372	/* that should be it! */
373	if (*fmt)
374		return -1;
375	return 0;
376}
377
378void utilfdt_print_data(const char *data, int len)
379{
380	int i;
381	const char *s;
382
383	/* no data, don't print */
384	if (len == 0)
385		return;
386
387	if (util_is_printable_string(data, len)) {
388		printf(" = ");
389
390		s = data;
391		do {
392			printf("\"%s\"", s);
393			s += strlen(s) + 1;
394			if (s < data + len)
395				printf(", ");
396		} while (s < data + len);
397
398	} else if ((len % 4) == 0) {
399		const fdt32_t *cell = (const fdt32_t *)data;
400
401		printf(" = <");
402		for (i = 0, len /= 4; i < len; i++)
403			printf("0x%08x%s", fdt32_to_cpu(cell[i]),
404			       i < (len - 1) ? " " : "");
405		printf(">");
406	} else {
407		const unsigned char *p = (const unsigned char *)data;
408		printf(" = [");
409		for (i = 0; i < len; i++)
410			printf("%02x%s", *p++, i < len - 1 ? " " : "");
411		printf("]");
412	}
413}
414
415void NORETURN util_version(void)
416{
417	printf("Version: %s\n", DTC_VERSION);
418	exit(0);
419}
420
421void NORETURN util_usage(const char *errmsg, const char *synopsis,
422			 const char *short_opts,
423			 struct option const long_opts[],
424			 const char * const opts_help[])
425{
426	FILE *fp = errmsg ? stderr : stdout;
427	const char a_arg[] = "<arg>";
428	size_t a_arg_len = strlen(a_arg) + 1;
429	size_t i;
430	int optlen;
431
432	fprintf(fp,
433		"Usage: %s\n"
434		"\n"
435		"Options: -[%s]\n", synopsis, short_opts);
436
437	/* prescan the --long opt length to auto-align */
438	optlen = 0;
439	for (i = 0; long_opts[i].name; ++i) {
440		/* +1 is for space between --opt and help text */
441		int l = strlen(long_opts[i].name) + 1;
442		if (long_opts[i].has_arg == a_argument)
443			l += a_arg_len;
444		if (optlen < l)
445			optlen = l;
446	}
447
448	for (i = 0; long_opts[i].name; ++i) {
449		/* helps when adding new applets or options */
450		assert(opts_help[i] != NULL);
451
452		/* first output the short flag if it has one */
453		if (long_opts[i].val > '~')
454			fprintf(fp, "      ");
455		else
456			fprintf(fp, "  -%c, ", long_opts[i].val);
457
458		/* then the long flag */
459		if (long_opts[i].has_arg == no_argument)
460			fprintf(fp, "--%-*s", optlen, long_opts[i].name);
461		else
462			fprintf(fp, "--%s %s%*s", long_opts[i].name, a_arg,
463				(int)(optlen - strlen(long_opts[i].name) - a_arg_len), "");
464
465		/* finally the help text */
466		fprintf(fp, "%s\n", opts_help[i]);
467	}
468
469	if (errmsg) {
470		fprintf(fp, "\nError: %s\n", errmsg);
471		exit(EXIT_FAILURE);
472	} else
473		exit(EXIT_SUCCESS);
474}
v6.2
  1// SPDX-License-Identifier: GPL-2.0-or-later
  2/*
  3 * Copyright 2011 The Chromium Authors, All Rights Reserved.
  4 * Copyright 2008 Jon Loeliger, Freescale Semiconductor, Inc.
  5 *
  6 * util_is_printable_string contributed by
  7 *	Pantelis Antoniou <pantelis.antoniou AT gmail.com>
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
  8 */
  9
 10#include <ctype.h>
 11#include <stdio.h>
 12#include <stdlib.h>
 13#include <stdarg.h>
 14#include <string.h>
 15#include <assert.h>
 16#include <inttypes.h>
 17
 18#include <errno.h>
 19#include <fcntl.h>
 20#include <unistd.h>
 21
 22#include "libfdt.h"
 23#include "util.h"
 24#include "version_gen.h"
 25
 26char *xstrdup(const char *s)
 27{
 28	int len = strlen(s) + 1;
 29	char *d = xmalloc(len);
 30
 31	memcpy(d, s, len);
 32
 33	return d;
 34}
 35
 36char *xstrndup(const char *s, size_t n)
 
 37{
 38	size_t len = strnlen(s, n) + 1;
 39	char *d = xmalloc(len);
 40
 41	memcpy(d, s, len - 1);
 42	d[len - 1] = '\0';
 43
 44	return d;
 45}
 46
 47int xavsprintf_append(char **strp, const char *fmt, va_list ap)
 48{
 49	int n, size = 0;	/* start with 128 bytes */
 50	char *p;
 51	va_list ap_copy;
 52
 53	p = *strp;
 54	if (p)
 55		size = strlen(p);
 56
 57	va_copy(ap_copy, ap);
 58	n = vsnprintf(NULL, 0, fmt, ap_copy) + 1;
 59	va_end(ap_copy);
 60
 61	p = xrealloc(p, size + n);
 62
 63	n = vsnprintf(p + size, n, fmt, ap);
 64
 
 
 
 
 
 
 
 
 
 65	*strp = p;
 66	return strlen(p);
 67}
 68
 69int xasprintf_append(char **strp, const char *fmt, ...)
 70{
 71	int n;
 72	va_list ap;
 73
 74	va_start(ap, fmt);
 75	n = xavsprintf_append(strp, fmt, ap);
 76	va_end(ap);
 77
 78	return n;
 79}
 80
 81int xasprintf(char **strp, const char *fmt, ...)
 82{
 83	int n;
 84	va_list ap;
 85
 86	*strp = NULL;
 87
 88	va_start(ap, fmt);
 89	n = xavsprintf_append(strp, fmt, ap);
 90	va_end(ap);
 91
 92	return n;
 93}
 94
 95char *join_path(const char *path, const char *name)
 96{
 97	int lenp = strlen(path);
 98	int lenn = strlen(name);
 99	int len;
100	int needslash = 1;
101	char *str;
102
103	len = lenp + lenn + 2;
104	if ((lenp > 0) && (path[lenp-1] == '/')) {
105		needslash = 0;
106		len--;
107	}
108
109	str = xmalloc(len);
110	memcpy(str, path, lenp);
111	if (needslash) {
112		str[lenp] = '/';
113		lenp++;
114	}
115	memcpy(str+lenp, name, lenn+1);
116	return str;
117}
118
119bool util_is_printable_string(const void *data, int len)
120{
121	const char *s = data;
122	const char *ss, *se;
123
124	/* zero length is not */
125	if (len == 0)
126		return 0;
127
128	/* must terminate with zero */
129	if (s[len - 1] != '\0')
130		return 0;
131
132	se = s + len;
133
134	while (s < se) {
135		ss = s;
136		while (s < se && *s && isprint((unsigned char)*s))
137			s++;
138
139		/* not zero, or not done yet */
140		if (*s != '\0' || s == ss)
141			return 0;
142
143		s++;
144	}
145
146	return 1;
147}
148
149/*
150 * Parse a octal encoded character starting at index i in string s.  The
151 * resulting character will be returned and the index i will be updated to
152 * point at the character directly after the end of the encoding, this may be
153 * the '\0' terminator of the string.
154 */
155static char get_oct_char(const char *s, int *i)
156{
157	char x[4];
158	char *endx;
159	long val;
160
161	x[3] = '\0';
162	strncpy(x, s + *i, 3);
163
164	val = strtol(x, &endx, 8);
165
166	assert(endx > x);
167
168	(*i) += endx - x;
169	return val;
170}
171
172/*
173 * Parse a hexadecimal encoded character starting at index i in string s.  The
174 * resulting character will be returned and the index i will be updated to
175 * point at the character directly after the end of the encoding, this may be
176 * the '\0' terminator of the string.
177 */
178static char get_hex_char(const char *s, int *i)
179{
180	char x[3];
181	char *endx;
182	long val;
183
184	x[2] = '\0';
185	strncpy(x, s + *i, 2);
186
187	val = strtol(x, &endx, 16);
188	if (!(endx  > x))
189		die("\\x used with no following hex digits\n");
190
191	(*i) += endx - x;
192	return val;
193}
194
195char get_escape_char(const char *s, int *i)
196{
197	char	c = s[*i];
198	int	j = *i + 1;
199	char	val;
200
201	switch (c) {
202	case 'a':
203		val = '\a';
204		break;
205	case 'b':
206		val = '\b';
207		break;
208	case 't':
209		val = '\t';
210		break;
211	case 'n':
212		val = '\n';
213		break;
214	case 'v':
215		val = '\v';
216		break;
217	case 'f':
218		val = '\f';
219		break;
220	case 'r':
221		val = '\r';
222		break;
223	case '0':
224	case '1':
225	case '2':
226	case '3':
227	case '4':
228	case '5':
229	case '6':
230	case '7':
231		j--; /* need to re-read the first digit as
232		      * part of the octal value */
233		val = get_oct_char(s, &j);
234		break;
235	case 'x':
236		val = get_hex_char(s, &j);
237		break;
238	default:
239		val = c;
240	}
241
242	(*i) = j;
243	return val;
244}
245
246int utilfdt_read_err(const char *filename, char **buffp, size_t *len)
247{
248	int fd = 0;	/* assume stdin */
249	char *buf = NULL;
250	size_t bufsize = 1024, offset = 0;
251	int ret = 0;
252
253	*buffp = NULL;
254	if (strcmp(filename, "-") != 0) {
255		fd = open(filename, O_RDONLY);
256		if (fd < 0)
257			return errno;
258	}
259
260	/* Loop until we have read everything */
261	buf = xmalloc(bufsize);
262	do {
263		/* Expand the buffer to hold the next chunk */
264		if (offset == bufsize) {
265			bufsize *= 2;
266			buf = xrealloc(buf, bufsize);
267		}
268
269		ret = read(fd, &buf[offset], bufsize - offset);
270		if (ret < 0) {
271			ret = errno;
272			break;
273		}
274		offset += ret;
275	} while (ret != 0);
276
277	/* Clean up, including closing stdin; return errno on error */
278	close(fd);
279	if (ret)
280		free(buf);
281	else
282		*buffp = buf;
283	if (len)
284		*len = bufsize;
285	return ret;
286}
287
288char *utilfdt_read(const char *filename, size_t *len)
 
 
 
 
 
 
289{
290	char *buff;
291	int ret = utilfdt_read_err(filename, &buff, len);
292
293	if (ret) {
294		fprintf(stderr, "Couldn't open blob from '%s': %s\n", filename,
295			strerror(ret));
296		return NULL;
297	}
298	/* Successful read */
299	return buff;
300}
301
 
 
 
 
 
 
302int utilfdt_write_err(const char *filename, const void *blob)
303{
304	int fd = 1;	/* assume stdout */
305	int totalsize;
306	int offset;
307	int ret = 0;
308	const char *ptr = blob;
309
310	if (strcmp(filename, "-") != 0) {
311		fd = open(filename, O_WRONLY | O_CREAT | O_TRUNC, 0666);
312		if (fd < 0)
313			return errno;
314	}
315
316	totalsize = fdt_totalsize(blob);
317	offset = 0;
318
319	while (offset < totalsize) {
320		ret = write(fd, ptr + offset, totalsize - offset);
321		if (ret < 0) {
322			ret = -errno;
323			break;
324		}
325		offset += ret;
326	}
327	/* Close the file/stdin; return errno on error */
328	if (fd != 1)
329		close(fd);
330	return ret < 0 ? -ret : 0;
331}
332
333
334int utilfdt_write(const char *filename, const void *blob)
335{
336	int ret = utilfdt_write_err(filename, blob);
337
338	if (ret) {
339		fprintf(stderr, "Couldn't write blob to '%s': %s\n", filename,
340			strerror(ret));
341	}
342	return ret ? -1 : 0;
343}
344
345int utilfdt_decode_type(const char *fmt, int *type, int *size)
346{
347	int qualifier = 0;
348
349	if (!*fmt)
350		return -1;
351
352	/* get the conversion qualifier */
353	*size = -1;
354	if (strchr("hlLb", *fmt)) {
355		qualifier = *fmt++;
356		if (qualifier == *fmt) {
357			switch (*fmt++) {
358/* TODO:		case 'l': qualifier = 'L'; break;*/
359			case 'h':
360				qualifier = 'b';
361				break;
362			}
363		}
364	}
365
366	/* we should now have a type */
367	if ((*fmt == '\0') || !strchr("iuxsr", *fmt))
368		return -1;
369
370	/* convert qualifier (bhL) to byte size */
371	if (*fmt != 's' && *fmt != 'r')
372		*size = qualifier == 'b' ? 1 :
373				qualifier == 'h' ? 2 :
374				qualifier == 'l' ? 4 : -1;
375	*type = *fmt++;
376
377	/* that should be it! */
378	if (*fmt)
379		return -1;
380	return 0;
381}
382
383void utilfdt_print_data(const char *data, int len)
384{
385	int i;
386	const char *s;
387
388	/* no data, don't print */
389	if (len == 0)
390		return;
391
392	if (util_is_printable_string(data, len)) {
393		printf(" = ");
394
395		s = data;
396		do {
397			printf("\"%s\"", s);
398			s += strlen(s) + 1;
399			if (s < data + len)
400				printf(", ");
401		} while (s < data + len);
402
403	} else if ((len % 4) == 0) {
404		const fdt32_t *cell = (const fdt32_t *)data;
405
406		printf(" = <");
407		for (i = 0, len /= 4; i < len; i++)
408			printf("0x%08" PRIx32 "%s", fdt32_to_cpu(cell[i]),
409			       i < (len - 1) ? " " : "");
410		printf(">");
411	} else {
412		const unsigned char *p = (const unsigned char *)data;
413		printf(" = [");
414		for (i = 0; i < len; i++)
415			printf("%02x%s", *p++, i < len - 1 ? " " : "");
416		printf("]");
417	}
418}
419
420void NORETURN util_version(void)
421{
422	printf("Version: %s\n", DTC_VERSION);
423	exit(0);
424}
425
426void NORETURN util_usage(const char *errmsg, const char *synopsis,
427			 const char *short_opts,
428			 struct option const long_opts[],
429			 const char * const opts_help[])
430{
431	FILE *fp = errmsg ? stderr : stdout;
432	const char a_arg[] = "<arg>";
433	size_t a_arg_len = strlen(a_arg) + 1;
434	size_t i;
435	int optlen;
436
437	fprintf(fp,
438		"Usage: %s\n"
439		"\n"
440		"Options: -[%s]\n", synopsis, short_opts);
441
442	/* prescan the --long opt length to auto-align */
443	optlen = 0;
444	for (i = 0; long_opts[i].name; ++i) {
445		/* +1 is for space between --opt and help text */
446		int l = strlen(long_opts[i].name) + 1;
447		if (long_opts[i].has_arg == a_argument)
448			l += a_arg_len;
449		if (optlen < l)
450			optlen = l;
451	}
452
453	for (i = 0; long_opts[i].name; ++i) {
454		/* helps when adding new applets or options */
455		assert(opts_help[i] != NULL);
456
457		/* first output the short flag if it has one */
458		if (long_opts[i].val > '~')
459			fprintf(fp, "      ");
460		else
461			fprintf(fp, "  -%c, ", long_opts[i].val);
462
463		/* then the long flag */
464		if (long_opts[i].has_arg == no_argument)
465			fprintf(fp, "--%-*s", optlen, long_opts[i].name);
466		else
467			fprintf(fp, "--%s %s%*s", long_opts[i].name, a_arg,
468				(int)(optlen - strlen(long_opts[i].name) - a_arg_len), "");
469
470		/* finally the help text */
471		fprintf(fp, "%s\n", opts_help[i]);
472	}
473
474	if (errmsg) {
475		fprintf(fp, "\nError: %s\n", errmsg);
476		exit(EXIT_FAILURE);
477	} else
478		exit(EXIT_SUCCESS);
479}