Been meaning to do this for years: introduce a configuration option
[u/mdw/putty] / cmdline.c
1 /*
2 * cmdline.c - command-line parsing shared between many of the
3 * PuTTY applications
4 */
5
6 #include <stdio.h>
7 #include <assert.h>
8 #include <stdlib.h>
9 #include "putty.h"
10
11 /*
12 * Some command-line parameters need to be saved up until after
13 * we've loaded the saved session which will form the basis of our
14 * eventual running configuration. For this we use the macro
15 * SAVEABLE, which notices if the `need_save' parameter is set and
16 * saves the parameter and value on a list.
17 *
18 * We also assign priorities to saved parameters, just to slightly
19 * ameliorate silly ordering problems. For example, if you specify
20 * a saved session to load, it will be loaded _before_ all your
21 * local modifications such as -L are evaluated; and if you specify
22 * a protocol and a port, the protocol is set up first so that the
23 * port can override its choice of port number.
24 *
25 * (In fact -load is not saved at all, since in at least Plink the
26 * processing of further command-line options depends on whether or
27 * not the loaded session contained a hostname. So it must be
28 * executed immediately.)
29 */
30
31 #define NPRIORITIES 2
32
33 struct cmdline_saved_param {
34 char *p, *value;
35 };
36 struct cmdline_saved_param_set {
37 struct cmdline_saved_param *params;
38 int nsaved, savesize;
39 };
40
41 /*
42 * C guarantees this structure will be initialised to all zero at
43 * program start, which is exactly what we want.
44 */
45 static struct cmdline_saved_param_set saves[NPRIORITIES];
46
47 static void cmdline_save_param(char *p, char *value, int pri)
48 {
49 if (saves[pri].nsaved >= saves[pri].savesize) {
50 saves[pri].savesize = saves[pri].nsaved + 32;
51 saves[pri].params = sresize(saves[pri].params, saves[pri].savesize,
52 struct cmdline_saved_param);
53 }
54 saves[pri].params[saves[pri].nsaved].p = p;
55 saves[pri].params[saves[pri].nsaved].value = value;
56 saves[pri].nsaved++;
57 }
58
59 void cmdline_cleanup(void)
60 {
61 int pri;
62
63 for (pri = 0; pri < NPRIORITIES; pri++)
64 sfree(saves[pri].params);
65 }
66
67 #define SAVEABLE(pri) do { \
68 if (need_save) { cmdline_save_param(p, value, pri); return ret; } \
69 } while (0)
70
71 static char *cmdline_password = NULL;
72
73 /*
74 * Similar interface to get_userpass_input(), except that here a -1
75 * return means that we aren't capable of processing the prompt and
76 * someone else should do it.
77 */
78 int cmdline_get_passwd_input(prompts_t *p, unsigned char *in, int inlen) {
79
80 static int tried_once = 0;
81
82 /*
83 * We only handle prompts which don't echo (which we assume to be
84 * passwords), and (currently) we only cope with a password prompt
85 * that comes in a prompt-set on its own.
86 */
87 if (!cmdline_password || in || p->n_prompts != 1 || p->prompts[0]->echo) {
88 return -1;
89 }
90
91 /*
92 * If we've tried once, return utter failure (no more passwords left
93 * to try).
94 */
95 if (tried_once)
96 return 0;
97
98 strncpy(p->prompts[0]->result, cmdline_password,
99 p->prompts[0]->result_len);
100 p->prompts[0]->result[p->prompts[0]->result_len-1] = '\0';
101 memset(cmdline_password, 0, strlen(cmdline_password));
102 tried_once = 1;
103 return 1;
104
105 }
106
107 /*
108 * Here we have a flags word which describes the capabilities of
109 * the particular tool on whose behalf we're running. We will
110 * refuse certain command-line options if a particular tool
111 * inherently can't do anything sensible. For example, the file
112 * transfer tools (psftp, pscp) can't do a great deal with protocol
113 * selections (ever tried running scp over telnet?) or with port
114 * forwarding (even if it wasn't a hideously bad idea, they don't
115 * have the select() infrastructure to make them work).
116 */
117 int cmdline_tooltype = 0;
118
119 static int cmdline_check_unavailable(int flag, char *p)
120 {
121 if (cmdline_tooltype & flag) {
122 cmdline_error("option \"%s\" not available in this tool", p);
123 return 1;
124 }
125 return 0;
126 }
127
128 #define UNAVAILABLE_IN(flag) do { \
129 if (cmdline_check_unavailable(flag, p)) return ret; \
130 } while (0)
131
132 /*
133 * Process a standard command-line parameter. `p' is the parameter
134 * in question; `value' is the subsequent element of argv, which
135 * may or may not be required as an operand to the parameter.
136 * If `need_save' is 1, arguments which need to be saved as
137 * described at this top of this file are, for later execution;
138 * if 0, they are processed normally. (-1 is a special value used
139 * by pterm to count arguments for a preliminary pass through the
140 * argument list; it causes immediate return with an appropriate
141 * value with no action taken.)
142 * Return value is 2 if both arguments were used; 1 if only p was
143 * used; 0 if the parameter wasn't one we recognised; -2 if it
144 * should have been 2 but value was NULL.
145 */
146
147 #define RETURN(x) do { \
148 if ((x) == 2 && !value) return -2; \
149 ret = x; \
150 if (need_save < 0) return x; \
151 } while (0)
152
153 int cmdline_process_param(char *p, char *value, int need_save, Config *cfg)
154 {
155 int ret = 0;
156
157 if (!strcmp(p, "-load")) {
158 RETURN(2);
159 /* This parameter must be processed immediately rather than being
160 * saved. */
161 do_defaults(value, cfg);
162 loaded_session = TRUE;
163 return 2;
164 }
165 if (!strcmp(p, "-ssh")) {
166 RETURN(1);
167 UNAVAILABLE_IN(TOOLTYPE_FILETRANSFER | TOOLTYPE_NONNETWORK);
168 SAVEABLE(0);
169 default_protocol = cfg->protocol = PROT_SSH;
170 default_port = cfg->port = 22;
171 return 1;
172 }
173 if (!strcmp(p, "-telnet")) {
174 RETURN(1);
175 UNAVAILABLE_IN(TOOLTYPE_FILETRANSFER | TOOLTYPE_NONNETWORK);
176 SAVEABLE(0);
177 default_protocol = cfg->protocol = PROT_TELNET;
178 default_port = cfg->port = 23;
179 return 1;
180 }
181 if (!strcmp(p, "-rlogin")) {
182 RETURN(1);
183 UNAVAILABLE_IN(TOOLTYPE_FILETRANSFER | TOOLTYPE_NONNETWORK);
184 SAVEABLE(0);
185 default_protocol = cfg->protocol = PROT_RLOGIN;
186 default_port = cfg->port = 513;
187 return 1;
188 }
189 if (!strcmp(p, "-raw")) {
190 RETURN(1);
191 UNAVAILABLE_IN(TOOLTYPE_FILETRANSFER | TOOLTYPE_NONNETWORK);
192 SAVEABLE(0);
193 default_protocol = cfg->protocol = PROT_RAW;
194 }
195 if (!strcmp(p, "-v")) {
196 RETURN(1);
197 flags |= FLAG_VERBOSE;
198 }
199 if (!strcmp(p, "-l")) {
200 RETURN(2);
201 UNAVAILABLE_IN(TOOLTYPE_NONNETWORK);
202 SAVEABLE(0);
203 strncpy(cfg->username, value, sizeof(cfg->username));
204 cfg->username[sizeof(cfg->username) - 1] = '\0';
205 }
206 if (!strcmp(p, "-loghost")) {
207 RETURN(2);
208 UNAVAILABLE_IN(TOOLTYPE_NONNETWORK);
209 SAVEABLE(0);
210 strncpy(cfg->loghost, value, sizeof(cfg->loghost));
211 cfg->loghost[sizeof(cfg->loghost) - 1] = '\0';
212 }
213 if ((!strcmp(p, "-L") || !strcmp(p, "-R") || !strcmp(p, "-D"))) {
214 char *fwd, *ptr, *q, *qq;
215 int dynamic, i=0;
216 RETURN(2);
217 UNAVAILABLE_IN(TOOLTYPE_FILETRANSFER | TOOLTYPE_NONNETWORK);
218 SAVEABLE(0);
219 dynamic = !strcmp(p, "-D");
220 fwd = value;
221 ptr = cfg->portfwd;
222 /* if existing forwards, find end of list */
223 while (*ptr) {
224 while (*ptr)
225 ptr++;
226 ptr++;
227 }
228 i = ptr - cfg->portfwd;
229 ptr[0] = p[1]; /* insert a 'L', 'R' or 'D' at the start */
230 ptr++;
231 if (1 + strlen(fwd) + 2 > sizeof(cfg->portfwd) - i) {
232 cmdline_error("out of space for port forwardings");
233 return ret;
234 }
235 strncpy(ptr, fwd, sizeof(cfg->portfwd) - i - 2);
236 if (!dynamic) {
237 /*
238 * We expect _at least_ two colons in this string. The
239 * possible formats are `sourceport:desthost:destport',
240 * or `sourceip:sourceport:desthost:destport' if you're
241 * specifying a particular loopback address. We need to
242 * replace the one between source and dest with a \t;
243 * this means we must find the second-to-last colon in
244 * the string.
245 */
246 q = qq = strchr(ptr, ':');
247 while (qq) {
248 char *qqq = strchr(qq+1, ':');
249 if (qqq)
250 q = qq;
251 qq = qqq;
252 }
253 if (q) *q = '\t'; /* replace second-last colon with \t */
254 }
255 cfg->portfwd[sizeof(cfg->portfwd) - 1] = '\0';
256 cfg->portfwd[sizeof(cfg->portfwd) - 2] = '\0';
257 ptr[strlen(ptr)+1] = '\000'; /* append 2nd '\000' */
258 }
259 if ((!strcmp(p, "-nc"))) {
260 char *host, *portp;
261
262 RETURN(2);
263 UNAVAILABLE_IN(TOOLTYPE_FILETRANSFER | TOOLTYPE_NONNETWORK);
264 SAVEABLE(0);
265
266 host = portp = value;
267 while (*portp && *portp != ':')
268 portp++;
269 if (*portp) {
270 unsigned len = portp - host;
271 if (len >= sizeof(cfg->ssh_nc_host))
272 len = sizeof(cfg->ssh_nc_host) - 1;
273 memcpy(cfg->ssh_nc_host, value, len);
274 cfg->ssh_nc_host[len] = '\0';
275 cfg->ssh_nc_port = atoi(portp+1);
276 } else {
277 cmdline_error("-nc expects argument of form 'host:port'");
278 return ret;
279 }
280 }
281 if (!strcmp(p, "-m")) {
282 char *filename, *command;
283 int cmdlen, cmdsize;
284 FILE *fp;
285 int c, d;
286
287 RETURN(2);
288 UNAVAILABLE_IN(TOOLTYPE_FILETRANSFER | TOOLTYPE_NONNETWORK);
289 SAVEABLE(0);
290
291 filename = value;
292
293 cmdlen = cmdsize = 0;
294 command = NULL;
295 fp = fopen(filename, "r");
296 if (!fp) {
297 cmdline_error("unable to open command "
298 "file \"%s\"", filename);
299 return ret;
300 }
301 do {
302 c = fgetc(fp);
303 d = c;
304 if (c == EOF)
305 d = 0;
306 if (cmdlen >= cmdsize) {
307 cmdsize = cmdlen + 512;
308 command = sresize(command, cmdsize, char);
309 }
310 command[cmdlen++] = d;
311 } while (c != EOF);
312 cfg->remote_cmd_ptr = command;
313 cfg->remote_cmd_ptr2 = NULL;
314 cfg->nopty = TRUE; /* command => no terminal */
315 }
316 if (!strcmp(p, "-P")) {
317 RETURN(2);
318 UNAVAILABLE_IN(TOOLTYPE_NONNETWORK);
319 SAVEABLE(1); /* lower priority than -ssh,-telnet */
320 cfg->port = atoi(value);
321 }
322 if (!strcmp(p, "-pw")) {
323 RETURN(2);
324 UNAVAILABLE_IN(TOOLTYPE_NONNETWORK);
325 SAVEABLE(1);
326 /* We delay evaluating this until after the protocol is decided,
327 * so that we can warn if it's of no use with the selected protocol */
328 if (cfg->protocol != PROT_SSH)
329 cmdline_error("the -pw option can only be used with the "
330 "SSH protocol");
331 else {
332 cmdline_password = dupstr(value);
333 /* Assuming that `value' is directly from argv, make a good faith
334 * attempt to trample it, to stop it showing up in `ps' output
335 * on Unix-like systems. Not guaranteed, of course. */
336 memset(value, 0, strlen(value));
337 }
338 }
339
340 if (!strcmp(p, "-agent") || !strcmp(p, "-pagent") ||
341 !strcmp(p, "-pageant")) {
342 RETURN(1);
343 UNAVAILABLE_IN(TOOLTYPE_NONNETWORK);
344 SAVEABLE(0);
345 cfg->tryagent = TRUE;
346 }
347 if (!strcmp(p, "-noagent") || !strcmp(p, "-nopagent") ||
348 !strcmp(p, "-nopageant")) {
349 RETURN(1);
350 UNAVAILABLE_IN(TOOLTYPE_NONNETWORK);
351 SAVEABLE(0);
352 cfg->tryagent = FALSE;
353 }
354
355 if (!strcmp(p, "-A")) {
356 RETURN(1);
357 UNAVAILABLE_IN(TOOLTYPE_FILETRANSFER | TOOLTYPE_NONNETWORK);
358 SAVEABLE(0);
359 cfg->agentfwd = 1;
360 }
361 if (!strcmp(p, "-a")) {
362 RETURN(1);
363 UNAVAILABLE_IN(TOOLTYPE_FILETRANSFER | TOOLTYPE_NONNETWORK);
364 SAVEABLE(0);
365 cfg->agentfwd = 0;
366 }
367
368 if (!strcmp(p, "-X")) {
369 RETURN(1);
370 UNAVAILABLE_IN(TOOLTYPE_FILETRANSFER | TOOLTYPE_NONNETWORK);
371 SAVEABLE(0);
372 cfg->x11_forward = 1;
373 }
374 if (!strcmp(p, "-x")) {
375 RETURN(1);
376 UNAVAILABLE_IN(TOOLTYPE_FILETRANSFER | TOOLTYPE_NONNETWORK);
377 SAVEABLE(0);
378 cfg->x11_forward = 0;
379 }
380
381 if (!strcmp(p, "-t")) {
382 RETURN(1);
383 UNAVAILABLE_IN(TOOLTYPE_FILETRANSFER | TOOLTYPE_NONNETWORK);
384 SAVEABLE(1); /* lower priority than -m */
385 cfg->nopty = 0;
386 }
387 if (!strcmp(p, "-T")) {
388 RETURN(1);
389 UNAVAILABLE_IN(TOOLTYPE_FILETRANSFER | TOOLTYPE_NONNETWORK);
390 SAVEABLE(1);
391 cfg->nopty = 1;
392 }
393
394 if (!strcmp(p, "-N")) {
395 RETURN(1);
396 UNAVAILABLE_IN(TOOLTYPE_FILETRANSFER | TOOLTYPE_NONNETWORK);
397 SAVEABLE(0);
398 cfg->ssh_no_shell = 1;
399 }
400
401 if (!strcmp(p, "-C")) {
402 RETURN(1);
403 UNAVAILABLE_IN(TOOLTYPE_NONNETWORK);
404 SAVEABLE(0);
405 cfg->compression = 1;
406 }
407
408 if (!strcmp(p, "-1")) {
409 RETURN(1);
410 UNAVAILABLE_IN(TOOLTYPE_NONNETWORK);
411 SAVEABLE(0);
412 cfg->sshprot = 0; /* ssh protocol 1 only */
413 }
414 if (!strcmp(p, "-2")) {
415 RETURN(1);
416 UNAVAILABLE_IN(TOOLTYPE_NONNETWORK);
417 SAVEABLE(0);
418 cfg->sshprot = 3; /* ssh protocol 2 only */
419 }
420
421 if (!strcmp(p, "-i")) {
422 RETURN(2);
423 UNAVAILABLE_IN(TOOLTYPE_NONNETWORK);
424 SAVEABLE(0);
425 cfg->keyfile = filename_from_str(value);
426 }
427
428 if (!strcmp(p, "-4") || !strcmp(p, "-ipv4")) {
429 RETURN(1);
430 SAVEABLE(1);
431 cfg->addressfamily = ADDRTYPE_IPV4;
432 }
433 if (!strcmp(p, "-6") || !strcmp(p, "-ipv6")) {
434 RETURN(1);
435 SAVEABLE(1);
436 cfg->addressfamily = ADDRTYPE_IPV6;
437 }
438
439 return ret; /* unrecognised */
440 }
441
442 void cmdline_run_saved(Config *cfg)
443 {
444 int pri, i;
445 for (pri = 0; pri < NPRIORITIES; pri++)
446 for (i = 0; i < saves[pri].nsaved; i++)
447 cmdline_process_param(saves[pri].params[i].p,
448 saves[pri].params[i].value, 0, cfg);
449 }