FreeCalypso > hg > fc-pcsc-tools
annotate uicc/dispatch.c @ 119:0ac0aee0df11
fc-uicc-tool: remaining PIN commands from fc-simtool
author | Mychaela Falconia <falcon@freecalypso.org> |
---|---|
date | Fri, 19 Feb 2021 23:42:18 +0000 |
parents | 5d45cde6e4b2 |
children | a98992e9fe82 |
rev | line source |
---|---|
22
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
1 /* |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
2 * This module implements the command dispatch for fc-uicc-tool |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
3 */ |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
4 |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
5 #include <ctype.h> |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
6 #include <stdio.h> |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
7 #include <string.h> |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
8 #include <strings.h> |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
9 #include <stdlib.h> |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
10 |
119
0ac0aee0df11
fc-uicc-tool: remaining PIN commands from fc-simtool
Mychaela Falconia <falcon@freecalypso.org>
parents:
118
diff
changeset
|
11 extern int cmd_change_pin(); |
22
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
12 extern int cmd_dir(); |
119
0ac0aee0df11
fc-uicc-tool: remaining PIN commands from fc-simtool
Mychaela Falconia <falcon@freecalypso.org>
parents:
118
diff
changeset
|
13 extern int cmd_disable_pin(); |
0ac0aee0df11
fc-uicc-tool: remaining PIN commands from fc-simtool
Mychaela Falconia <falcon@freecalypso.org>
parents:
118
diff
changeset
|
14 extern int cmd_enable_pin(); |
22
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
15 extern int cmd_exec(); |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
16 extern int cmd_iccid(); |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
17 extern int cmd_readbin(); |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
18 extern int cmd_readef(); |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
19 extern int cmd_readrec(); |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
20 extern int cmd_select(); |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
21 extern int cmd_select_aid(); |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
22 extern int cmd_select_isim(); |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
23 extern int cmd_select_usim(); |
107
f1836c8d36cb
hexdump output commands reworked to support redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
106
diff
changeset
|
24 extern int cmd_sim_resp(); |
119
0ac0aee0df11
fc-uicc-tool: remaining PIN commands from fc-simtool
Mychaela Falconia <falcon@freecalypso.org>
parents:
118
diff
changeset
|
25 extern int cmd_unblock_pin(); |
22
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
26 extern int cmd_update_bin(); |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
27 extern int cmd_update_bin_imm(); |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
28 extern int cmd_update_rec(); |
118
5d45cde6e4b2
fc-uicc-tool: verify-pin command family implemented
Mychaela Falconia <falcon@freecalypso.org>
parents:
107
diff
changeset
|
29 extern int cmd_verify_hex(); |
5d45cde6e4b2
fc-uicc-tool: verify-pin command family implemented
Mychaela Falconia <falcon@freecalypso.org>
parents:
107
diff
changeset
|
30 extern int cmd_verify_pin(); |
22
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
31 |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
32 extern int good_exit(); |
29
d368051576d0
fc-simtool & fc-uicc-tool: add explicit atr command
Mychaela Falconia <falcon@freecalypso.org>
parents:
22
diff
changeset
|
33 extern int retrieve_atr(); |
22
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
34 |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
35 static struct cmdtab { |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
36 char *cmd; |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
37 int minargs; |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
38 int maxargs; |
105
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
39 int allow_redir; |
22
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
40 int (*func)(); |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
41 } cmdtab[] = { |
105
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
42 {"atr", 0, 0, 0, retrieve_atr}, |
119
0ac0aee0df11
fc-uicc-tool: remaining PIN commands from fc-simtool
Mychaela Falconia <falcon@freecalypso.org>
parents:
118
diff
changeset
|
43 {"change-pin", 3, 3, 0, cmd_change_pin}, |
106
dcfec53643c5
EF_DIR dump commands support output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
105
diff
changeset
|
44 {"dir", 0, 0, 1, cmd_dir}, |
119
0ac0aee0df11
fc-uicc-tool: remaining PIN commands from fc-simtool
Mychaela Falconia <falcon@freecalypso.org>
parents:
118
diff
changeset
|
45 {"disable-pin", 2, 2, 0, cmd_disable_pin}, |
0ac0aee0df11
fc-uicc-tool: remaining PIN commands from fc-simtool
Mychaela Falconia <falcon@freecalypso.org>
parents:
118
diff
changeset
|
46 {"enable-pin", 2, 2, 0, cmd_enable_pin}, |
105
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
47 {"exec", 1, 1, 0, cmd_exec}, |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
48 {"exit", 0, 0, 0, good_exit}, |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
49 {"iccid", 0, 0, 0, cmd_iccid}, |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
50 {"quit", 0, 0, 0, good_exit}, |
107
f1836c8d36cb
hexdump output commands reworked to support redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
106
diff
changeset
|
51 {"readbin", 2, 2, 1, cmd_readbin}, |
f1836c8d36cb
hexdump output commands reworked to support redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
106
diff
changeset
|
52 {"readef", 1, 1, 1, cmd_readef}, |
f1836c8d36cb
hexdump output commands reworked to support redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
106
diff
changeset
|
53 {"readrec", 1, 2, 1, cmd_readrec}, |
105
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
54 {"select", 1, 1, 0, cmd_select}, |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
55 {"select-aid", 1, 1, 0, cmd_select_aid}, |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
56 {"select-isim", 0, 0, 0, cmd_select_isim}, |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
57 {"select-usim", 0, 0, 0, cmd_select_usim}, |
107
f1836c8d36cb
hexdump output commands reworked to support redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
106
diff
changeset
|
58 {"sim-resp", 0, 0, 1, cmd_sim_resp}, |
119
0ac0aee0df11
fc-uicc-tool: remaining PIN commands from fc-simtool
Mychaela Falconia <falcon@freecalypso.org>
parents:
118
diff
changeset
|
59 {"unblock-pin", 3, 3, 0, cmd_unblock_pin}, |
105
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
60 {"update-bin", 2, 2, 0, cmd_update_bin}, |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
61 {"update-bin-imm", 2, 2, 0, cmd_update_bin_imm}, |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
62 {"update-rec", 2, 2, 0, cmd_update_rec}, |
118
5d45cde6e4b2
fc-uicc-tool: verify-pin command family implemented
Mychaela Falconia <falcon@freecalypso.org>
parents:
107
diff
changeset
|
63 {"verify-ext", 2, 2, 0, cmd_verify_pin}, |
5d45cde6e4b2
fc-uicc-tool: verify-pin command family implemented
Mychaela Falconia <falcon@freecalypso.org>
parents:
107
diff
changeset
|
64 {"verify-hex", 2, 2, 0, cmd_verify_hex}, |
5d45cde6e4b2
fc-uicc-tool: verify-pin command family implemented
Mychaela Falconia <falcon@freecalypso.org>
parents:
107
diff
changeset
|
65 {"verify-pin", 2, 2, 0, cmd_verify_pin}, |
105
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
66 {0, 0, 0, 0, 0} |
22
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
67 }; |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
68 |
105
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
69 static FILE * |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
70 handle_output_redir(str) |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
71 char *str; |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
72 { |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
73 char *cp, *fn; |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
74 FILE *outf; |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
75 |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
76 for (cp = str; isspace(*cp); cp++) |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
77 ; |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
78 if (!*cp || *cp == '#') { |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
79 fprintf(stderr, "error: no filename after '>'\n"); |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
80 return(0); |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
81 } |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
82 for (fn = cp; *cp && !isspace(*cp); cp++) |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
83 ; |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
84 if (*cp) |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
85 *cp++ = '\0'; |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
86 while (isspace(*cp)) |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
87 cp++; |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
88 if (*cp && *cp != '#') { |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
89 fprintf(stderr, "error: invalid syntax after '>'\n"); |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
90 return(0); |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
91 } |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
92 outf = fopen(fn, "w"); |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
93 if (!outf) |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
94 perror(fn); |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
95 return outf; |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
96 } |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
97 |
22
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
98 simtool_dispatch_cmd(cmd, is_script) |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
99 char *cmd; |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
100 { |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
101 char *argv[10]; |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
102 char *cp, **ap; |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
103 struct cmdtab *tp; |
105
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
104 FILE *outf; |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
105 int rc; |
22
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
106 |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
107 for (cp = cmd; isspace(*cp); cp++) |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
108 ; |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
109 if (!*cp || *cp == '#') |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
110 return(0); |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
111 if (is_script) |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
112 printf("Script command: %s\n", cp); |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
113 argv[0] = cp; |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
114 while (*cp && !isspace(*cp)) |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
115 cp++; |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
116 if (*cp) |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
117 *cp++ = '\0'; |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
118 for (tp = cmdtab; tp->cmd; tp++) |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
119 if (!strcmp(tp->cmd, argv[0])) |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
120 break; |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
121 if (!tp->func) { |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
122 fprintf(stderr, "error: no such command\n"); |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
123 return(-1); |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
124 } |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
125 for (ap = argv + 1; ; ) { |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
126 while (isspace(*cp)) |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
127 cp++; |
105
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
128 if (!*cp || *cp == '#' || *cp == '>') |
22
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
129 break; |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
130 if (ap - argv - 1 >= tp->maxargs) { |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
131 fprintf(stderr, "error: too many arguments\n"); |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
132 return(-1); |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
133 } |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
134 if (*cp == '"') { |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
135 *ap++ = ++cp; |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
136 for (;;) { |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
137 if (!*cp) { |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
138 unterm_qstring: fprintf(stderr, |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
139 "error: unterminated quoted string\n"); |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
140 return(-1); |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
141 } |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
142 if (*cp == '"') |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
143 break; |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
144 if (*cp++ == '\\') { |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
145 if (!*cp) |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
146 goto unterm_qstring; |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
147 cp++; |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
148 } |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
149 } |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
150 *cp++ = '\0'; |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
151 } else { |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
152 *ap++ = cp; |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
153 while (*cp && !isspace(*cp)) |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
154 cp++; |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
155 if (*cp) |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
156 *cp++ = '\0'; |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
157 } |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
158 } |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
159 if (ap - argv - 1 < tp->minargs) { |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
160 fprintf(stderr, "error: too few arguments\n"); |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
161 return(-1); |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
162 } |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
163 *ap = 0; |
105
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
164 if (*cp == '>') { |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
165 if (!tp->allow_redir) { |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
166 fprintf(stderr, |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
167 "error: command does not support output redirection\n"); |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
168 return(-1); |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
169 } |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
170 outf = handle_output_redir(cp + 1); |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
171 if (!outf) |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
172 return(-1); |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
173 } else |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
174 outf = stdout; |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
175 rc = tp->func(ap - argv, argv, outf); |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
176 if (outf != stdout) |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
177 fclose(outf); |
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
178 return rc; |
22
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
179 } |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
180 |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
181 dispatch_ready_argv(argc, argv) |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
182 char **argv; |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
183 { |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
184 struct cmdtab *tp; |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
185 |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
186 for (tp = cmdtab; tp->cmd; tp++) |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
187 if (!strcmp(tp->cmd, argv[0])) |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
188 break; |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
189 if (!tp->func) { |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
190 fprintf(stderr, "error: no such command\n"); |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
191 return(-1); |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
192 } |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
193 if (argc - 1 > tp->maxargs) { |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
194 fprintf(stderr, "error: too many arguments\n"); |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
195 return(-1); |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
196 } |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
197 if (argc - 1 < tp->minargs) { |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
198 fprintf(stderr, "error: too few arguments\n"); |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
199 return(-1); |
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
200 } |
105
16481db543e8
fc-uicc-tool: infrastructure for output redirection
Mychaela Falconia <falcon@freecalypso.org>
parents:
29
diff
changeset
|
201 return tp->func(argc, argv, stdout); |
22
1b1468869ccf
new trimmed fc-uicc-tool is here
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
202 } |