Import rewritten arg.h from farbfeld

This commit is contained in:
Laslo Hunhold 2017-08-02 08:38:06 +02:00
parent ecb0d9e54e
commit 63bafbf1d1

98
arg.h
View file

@ -1,65 +1,55 @@
/* /*
* Copy me if you can. * ISC-License
* by 20h *
* (c) 2017 Laslo Hunhold <dev@frign.de>
*
* Permission to use, copy, modify, and/or distribute this software for any
* purpose with or without fee is hereby granted, provided that the above
* copyright notice and this permission notice appear in all copies.
*
* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL
* WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED
* WARRANTIES OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE
* AUTHOR BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL
* DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR
* PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
* TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
* PERFORMANCE OF THIS SOFTWARE.
*/ */
#ifndef ARG_H
#ifndef ARG_H__ #define ARG_H
#define ARG_H__
extern char *argv0; extern char *argv0;
/* use main(int argc, char *argv[]) */ /* int main(int argc, char *argv[]) */
#define ARGBEGIN for (argv0 = *argv, argv++, argc--;\ #define ARGBEGIN for (argv0 = *argv, argc--, argv++; \
argv[0] && argv[0][0] == '-'\ *argv && (*argv)[0] == '-' && (*argv)[1]; argc--, argv++) { \
&& argv[0][1];\ int argparsed; \
argc--, argv++) {\ if ((*argv)[1] == '-' && (*argv)[2] == '\0') { \
char argc_;\ argc--, argv++; \
char **argv_;\
int brk_;\
if (argv[0][1] == '-' && argv[0][2] == '\0') {\
argv++;\
argc--;\
break; \ break; \
} \ } \
for (brk_ = 0, argv[0]++, argv_ = argv;\ for (argparsed = 0, (*argv)++; (*argv)[0]; (*argv)++) { \
argv[0][0] && !brk_;\ switch((*argv)[0])
argv[0]++) {\ #define ARGEND if (argparsed) { \
if (argv_ != argv)\ if ((*argv)[1] != '\0') { \
break; \ break; \
argc_ = argv[0][0];\ } else { \
switch (argc_) argc--, argv++; \
break; \
/* Handles obsolete -NUM syntax */ } \
#define ARGNUM case '0':\ } \
case '1':\ } \
case '2':\
case '3':\
case '4':\
case '5':\
case '6':\
case '7':\
case '8':\
case '9'
#define ARGEND }\
} }
#define ARGC() *argv[0]
#define ARGC() argc_ #define ARGF_(x) (((*argv)[1] == '\0' && !*(argv + 1)) ? \
(x) : \
#define ARGNUMF() (brk_ = 1, estrtonum(argv[0], 0, INT_MAX)) (argparsed = 1, ((*argv)[1] != '\0') ? \
(&(*argv)[1]) : \
#define EARGF(x) ((argv[0][1] == '\0' && argv[1] == NULL)?\ (*(argv + 1)) \
((x), abort(), (char *)0) :\ ) \
(brk_ = 1, (argv[0][1] != '\0')?\ )
(&argv[0][1]) :\ #define EARGF(x) ARGF_(((x), exit(1), (char *)0))
(argc--, argv++, argv[0]))) #define ARGF() ARGF_((char *)0)
#define ARGF() ((argv[0][1] == '\0' && argv[1] == NULL)?\
(char *)0 :\
(brk_ = 1, (argv[0][1] != '\0')?\
(&argv[0][1]) :\
(argc--, argv++, argv[0])))
#define LNGARG() &argv[0][0]
#endif #endif