aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorMattias Andrée <maandree@operamail.com>2013-06-21 04:26:53 +0200
committerMattias Andrée <maandree@operamail.com>2013-06-21 04:26:53 +0200
commit5f0d02335c5e74872ee19885c9d51c0c599fd597 (patch)
treefc907ea751c6af0a71fb6e14deee350065134f4a /src
parentderp (diff)
downloadargparser-5f0d02335c5e74872ee19885c9d51c0c599fd597.tar.gz
argparser-5f0d02335c5e74872ee19885c9d51c0c599fd597.tar.bz2
argparser-5f0d02335c5e74872ee19885c9d51c0c599fd597.tar.xz
almost complete implementation of parse in C version
Signed-off-by: Mattias Andrée <maandree@operamail.com>
Diffstat (limited to 'src')
-rw-r--r--src/argparser.c198
1 files changed, 197 insertions, 1 deletions
diff --git a/src/argparser.c b/src/argparser.c
index b72639f..dc6e5eb 100644
--- a/src/argparser.c
+++ b/src/argparser.c
@@ -159,6 +159,10 @@ extern void args_dispose()
free(args_message);
if (args_program_dispose)
free(args_program);
+
+ args_files = null;
+ args_message = null;
+ args_program_dispose = false;
}
@@ -634,7 +638,199 @@ extern void args_help()
*/
extern long args_parse(int argc, char** argv)
{
- /* TODO */
+ char** argend = argv + argc;
+ long dashed = false, tmpdashed = false, get = 0, dontget = 0, rc = true;
+ long argptr = 0, optptr = 0, freeptr = 0, queuesize/*TODO*/ = argc - 1;
+ char** argqueue;
+ char** optqueue;
+ char** freequeue;
+
+ args_unrecognised_count = 0;
+ args_arguments_count = argc - 1;
+ args_arguments = argv + 1;
+ args_files = (char**)malloc((argc - 1) * sizeof(char*));
+
+ argqueue = (char**)malloc(queuesize * sizeof(char*));
+ optqueue = (char**)malloc(queuesize * sizeof(char*));
+ freequeue = (char**)malloc(queuesize * sizeof(char*));
+
+ while (argv != argend)
+ {
+ char* arg = *argv++;
+ if ((get > 0) && (dontget == 0))
+ {
+ get--;
+ *(argqueue + argptr++) = arg;
+ }
+ else if (tmpdashed)
+ {
+ *(args_files + args_files_count++) = arg;
+ tmpdashed = 0;
+ }
+ else if (dashed)
+ *(args_files + args_files_count++) = arg;
+ else if ((*arg == '+') && (*(arg + 1) == '+') && (*(arg + 2) == 0))
+ tmpdashed = true;
+ else if ((*arg == '-') && (*(arg + 1) == '-') && (*(arg + 2) == 0))
+ dashed = true;
+ else if (((*arg == '-') || (*arg == '+')) && (*(arg + 1) != 0))
+ if (*arg == *(arg + 1))
+ {
+ if (dontget > 0)
+ dontget--;
+ else if (args_optmap_contains(arg) == false) /* TODO */
+ {
+ if (++args_unrecognised_count <= 5)
+ fprintf(args_out, "%s: warning: unrecognised option %s\n", args_program, arg);
+ rc = false;
+ }
+ else
+ {
+ long type = args_optmap_get_type(arg); /* TODO */
+ long eq = 0;
+ if (type != ARGUMENTLESS)
+ while (*(arg + eq) && (*(arg + eq) != '='))
+ eq++;
+ if (type == ARGUMENTLESS)
+ {
+ *(optqueue + optptr++) = arg;
+ *(argqueue + argptr++) = null;
+ }
+ else if (*(arg + eq) == '=')
+ {
+ char* arg_opt = (char*)malloc((eq + 1) * sizeof(char));
+ long i;
+ for (i = 0; i < eq; i++)
+ *(arg_opt + i) = *(arg + i);
+ *(arg_opt + eq) = 0;
+ if (args_optmap_contains(arg_opt) && ((type = args_optmap_get_type(arg_opt)) >= ARGUMENTED))
+ {
+ *(optqueue + optptr++) = arg_opt;
+ *(argqueue + argptr++) = arg + eq + 1;
+ *(freequeue + freeptr++) = arg_opt;
+ if (type == VARIADIC)
+ dashed = true;
+ }
+ else
+ {
+ if (++args_unrecognised_count <= 5)
+ fprintf(args_out, "%s: warning: unrecognised option %s\n", args_program, arg);
+ rc = false;
+ free(arg_opts);
+ }
+ }
+ else if (type == ARGUMENTED)
+ {
+ *(optqueue + optptr++) = arg;
+ get++;
+ }
+ else
+ {
+ *(optqueue + optptr++) = arg;
+ *(argqueue + argptr++) = null;
+ dashed = true;
+ }
+ }
+ }
+ else
+ {
+ char sign = *arg;
+ long i = 1;
+ while (*(arg + i))
+ {
+ char* narg = (char*)malloc(3 * sizeof(char));
+ *(narg + 0) = sign;
+ *(narg + 1) = *(arg + i);
+ *(narg + 2) = 0;
+ i++;
+ if (args_optmap_contains(narg))
+ {
+ long type = args_optmap_get_type(narg);
+ *(freequeue + freeptr++) = narg;
+ *(optqueue + optptr++) = narg;
+ if (type == ARGUMENTLESS)
+ *(argqueue + argptr++) = null;
+ else if (type == ARGUMENTED)
+ {
+ if (*(arg + i))
+ *(argqueue + argptr++) = arg + i;
+ else
+ get++;
+ break;
+ }
+ else
+ {
+ *(argqueue + argptr++) = *(arg + i) ? (arg + i) : null;
+ dashed = true;
+ break;
+ }
+ }
+ else
+ {
+ if (++args_unrecognised_count <= 5)
+ fprintf(args_out, "%s: warning: unrecognised option %s\n", args_program, arg);
+ rc = false;
+ free(narg);
+ }
+ }
+ }
+ else
+ {
+ if (++args_unrecognised_count <= 5)
+ fprintf(args_out, "%s: warning: unrecognised option %s\n", args_program, arg);
+ rc = false;
+ }
+ }
+
+ {
+ long i = 0;
+ while (i < optptr)
+ {
+ char* opt = args_optmap_get_std(*(optqueue + i));
+ char* arg = argptr > i ? *(optqueue + i) : null;
+ i++;
+ if ((args_optmap_contains(opt) == false) || (args_opts_has(opt)/*TODO*/ == false))
+ args_opts_new(opt); /*TODO*/
+ if (argptr >= i)
+ args_opts_append(opt, arg); /*TODO*/
+ }
+ }
+
+ {
+ long i = 0, j = 0, n = args_get_options_count();
+ for (; i < n; i++)
+ if (args_options_get_type(i) == VARIADIC)
+ {
+ char* std = args_options_get_standard(i); /*TODO*/
+ if (args_opts_has(std))
+ {
+ if (*(args_opts_get(std)) == null)
+ args_opts_clear(std); /*TODO*/
+ for (j = 0; j < args_files_count; j++)
+ args_opts_append(std, *(args_files + j));
+ args_files_count = 0;
+ break;
+ }
+ }
+ }
+
+ for (freeptr -= 1; freeptr >= 0; freeptr--)
+ free(*(freequeue + freeptr));
+
+ free(argqueue);
+ free(optqueue);
+ free(freequeue);
+
+ /* TODO ' '.join(self.files) if len(self.files) > 0 else None */
+
+ if (args_unrecognsed_count > 5)
+ {
+ long more = args_unrecognsed_count - 5;
+ char* option_s = more == 1 ? "option" : "options";
+ fprintf(args_out, "%s: warning: %i more unrecognised %s\n", args_program, more, option_s);
+ }
+
+ return rc;
}