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

106
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_;\ break; \
int brk_;\ } \
if (argv[0][1] == '-' && argv[0][2] == '\0') {\ for (argparsed = 0, (*argv)++; (*argv)[0]; (*argv)++) { \
argv++;\ switch((*argv)[0])
argc--;\ #define ARGEND if (argparsed) { \
break;\ if ((*argv)[1] != '\0') { \
}\ break; \
for (brk_ = 0, argv[0]++, argv_ = argv;\ } else { \
argv[0][0] && !brk_;\ argc--, argv++; \
argv[0]++) {\ break; \
if (argv_ != argv)\ } \
break;\ } \
argc_ = argv[0][0];\ } \
switch (argc_) }
#define ARGC() *argv[0]
/* Handles obsolete -NUM syntax */ #define ARGF_(x) (((*argv)[1] == '\0' && !*(argv + 1)) ? \
#define ARGNUM case '0':\ (x) : \
case '1':\ (argparsed = 1, ((*argv)[1] != '\0') ? \
case '2':\ (&(*argv)[1]) : \
case '3':\ (*(argv + 1)) \
case '4':\ ) \
case '5':\ )
case '6':\ #define EARGF(x) ARGF_(((x), exit(1), (char *)0))
case '7':\ #define ARGF() ARGF_((char *)0)
case '8':\
case '9'
#define ARGEND }\
}
#define ARGC() argc_
#define ARGNUMF() (brk_ = 1, estrtonum(argv[0], 0, INT_MAX))
#define EARGF(x) ((argv[0][1] == '\0' && argv[1] == NULL)?\
((x), abort(), (char *)0) :\
(brk_ = 1, (argv[0][1] != '\0')?\
(&argv[0][1]) :\
(argc--, argv++, argv[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