+++ /dev/null
-/*\r
- * winutils.c: miscellaneous Windows utilities for GUI apps\r
- */\r
-\r
-#include <stdio.h>\r
-#include <stdlib.h>\r
-#include <ctype.h>\r
-\r
-#include "putty.h"\r
-#include "misc.h"\r
-\r
-#ifdef TESTMODE\r
-/* Definitions to allow this module to be compiled standalone for testing\r
- * split_into_argv(). */\r
-#define smalloc malloc\r
-#define srealloc realloc\r
-#define sfree free\r
-#endif\r
-\r
-/*\r
- * GetOpenFileName/GetSaveFileName tend to muck around with the process'\r
- * working directory on at least some versions of Windows.\r
- * Here's a wrapper that gives more control over this, and hides a little\r
- * bit of other grottiness.\r
- */\r
-\r
-struct filereq_tag {\r
- TCHAR cwd[MAX_PATH];\r
-};\r
-\r
-/*\r
- * `of' is expected to be initialised with most interesting fields, but\r
- * this function does some administrivia. (assume `of' was memset to 0)\r
- * save==1 -> GetSaveFileName; save==0 -> GetOpenFileName\r
- * `state' is optional.\r
- */\r
-BOOL request_file(filereq *state, OPENFILENAME *of, int preserve, int save)\r
-{\r
- TCHAR cwd[MAX_PATH]; /* process CWD */\r
- BOOL ret;\r
-\r
- /* Get process CWD */\r
- if (preserve) {\r
- DWORD r = GetCurrentDirectory(lenof(cwd), cwd);\r
- if (r == 0 || r >= lenof(cwd))\r
- /* Didn't work, oh well. Stop trying to be clever. */\r
- preserve = 0;\r
- }\r
-\r
- /* Open the file requester, maybe setting lpstrInitialDir */\r
- {\r
-#ifdef OPENFILENAME_SIZE_VERSION_400\r
- of->lStructSize = OPENFILENAME_SIZE_VERSION_400;\r
-#else\r
- of->lStructSize = sizeof(*of);\r
-#endif\r
- of->lpstrInitialDir = (state && state->cwd[0]) ? state->cwd : NULL;\r
- /* Actually put up the requester. */\r
- ret = save ? GetSaveFileName(of) : GetOpenFileName(of);\r
- }\r
-\r
- /* Get CWD left by requester */\r
- if (state) {\r
- DWORD r = GetCurrentDirectory(lenof(state->cwd), state->cwd);\r
- if (r == 0 || r >= lenof(state->cwd))\r
- /* Didn't work, oh well. */\r
- state->cwd[0] = '\0';\r
- }\r
- \r
- /* Restore process CWD */\r
- if (preserve)\r
- /* If it fails, there's not much we can do. */\r
- (void) SetCurrentDirectory(cwd);\r
-\r
- return ret;\r
-}\r
-\r
-filereq *filereq_new(void)\r
-{\r
- filereq *ret = snew(filereq);\r
- ret->cwd[0] = '\0';\r
- return ret;\r
-}\r
-\r
-void filereq_free(filereq *state)\r
-{\r
- sfree(state);\r
-}\r
-\r
-/*\r
- * Message box with optional context help.\r
- */\r
-\r
-/* Callback function to launch context help. */\r
-static VOID CALLBACK message_box_help_callback(LPHELPINFO lpHelpInfo)\r
-{\r
- char *context = NULL;\r
-#define CHECK_CTX(name) \\r
- do { \\r
- if (lpHelpInfo->dwContextId == WINHELP_CTXID_ ## name) \\r
- context = WINHELP_CTX_ ## name; \\r
- } while (0)\r
- CHECK_CTX(errors_hostkey_absent);\r
- CHECK_CTX(errors_hostkey_changed);\r
- CHECK_CTX(errors_cantloadkey);\r
- CHECK_CTX(option_cleanup);\r
- CHECK_CTX(pgp_fingerprints);\r
-#undef CHECK_CTX\r
- if (context)\r
- launch_help(hwnd, context);\r
-}\r
-\r
-int message_box(LPCTSTR text, LPCTSTR caption, DWORD style, DWORD helpctxid)\r
-{\r
- MSGBOXPARAMS mbox;\r
- \r
- /*\r
- * We use MessageBoxIndirect() because it allows us to specify a\r
- * callback function for the Help button.\r
- */\r
- mbox.cbSize = sizeof(mbox);\r
- /* Assumes the globals `hinst' and `hwnd' have sensible values. */\r
- mbox.hInstance = hinst;\r
- mbox.hwndOwner = hwnd;\r
- mbox.lpfnMsgBoxCallback = &message_box_help_callback;\r
- mbox.dwLanguageId = LANG_NEUTRAL;\r
- mbox.lpszText = text;\r
- mbox.lpszCaption = caption;\r
- mbox.dwContextHelpId = helpctxid;\r
- mbox.dwStyle = style;\r
- if (helpctxid != 0 && has_help()) mbox.dwStyle |= MB_HELP;\r
- return MessageBoxIndirect(&mbox);\r
-}\r
-\r
-/*\r
- * Display the fingerprints of the PGP Master Keys to the user.\r
- */\r
-void pgp_fingerprints(void)\r
-{\r
- message_box("These are the fingerprints of the PuTTY PGP Master Keys. They can\n"\r
- "be used to establish a trust path from this executable to another\n"\r
- "one. See the manual for more information.\n"\r
- "(Note: these fingerprints have nothing to do with SSH!)\n"\r
- "\n"\r
- "PuTTY Master Key (RSA), 1024-bit:\n"\r
- " " PGP_RSA_MASTER_KEY_FP "\n"\r
- "PuTTY Master Key (DSA), 1024-bit:\n"\r
- " " PGP_DSA_MASTER_KEY_FP,\r
- "PGP fingerprints", MB_ICONINFORMATION | MB_OK,\r
- HELPCTXID(pgp_fingerprints));\r
-}\r
-\r
-/*\r
- * Split a complete command line into argc/argv, attempting to do\r
- * it exactly the same way Windows itself would do it (so that\r
- * console utilities, which receive argc and argv from Windows,\r
- * will have their command lines processed in the same way as GUI\r
- * utilities which get a whole command line and must break it\r
- * themselves).\r
- * \r
- * Does not modify the input command line.\r
- * \r
- * The final parameter (argstart) is used to return a second array\r
- * of char * pointers, the same length as argv, each one pointing\r
- * at the start of the corresponding element of argv in the\r
- * original command line. So if you get half way through processing\r
- * your command line in argc/argv form and then decide you want to\r
- * treat the rest as a raw string, you can. If you don't want to,\r
- * `argstart' can be safely left NULL.\r
- */\r
-void split_into_argv(char *cmdline, int *argc, char ***argv,\r
- char ***argstart)\r
-{\r
- char *p;\r
- char *outputline, *q;\r
- char **outputargv, **outputargstart;\r
- int outputargc;\r
-\r
- /*\r
- * At first glance the rules appeared to be:\r
- *\r
- * - Single quotes are not special characters.\r
- *\r
- * - Double quotes are removed, but within them spaces cease\r
- * to be special.\r
- *\r
- * - Backslashes are _only_ special when a sequence of them\r
- * appear just before a double quote. In this situation,\r
- * they are treated like C backslashes: so \" just gives a\r
- * literal quote, \\" gives a literal backslash and then\r
- * opens or closes a double-quoted segment, \\\" gives a\r
- * literal backslash and then a literal quote, \\\\" gives\r
- * two literal backslashes and then opens/closes a\r
- * double-quoted segment, and so forth. Note that this\r
- * behaviour is identical inside and outside double quotes.\r
- *\r
- * - Two successive double quotes become one literal double\r
- * quote, but only _inside_ a double-quoted segment.\r
- * Outside, they just form an empty double-quoted segment\r
- * (which may cause an empty argument word).\r
- *\r
- * - That only leaves the interesting question of what happens\r
- * when one or more backslashes precedes two or more double\r
- * quotes, starting inside a double-quoted string. And the\r
- * answer to that appears somewhat bizarre. Here I tabulate\r
- * number of backslashes (across the top) against number of\r
- * quotes (down the left), and indicate how many backslashes\r
- * are output, how many quotes are output, and whether a\r
- * quoted segment is open at the end of the sequence:\r
- * \r
- * backslashes\r
- * \r
- * 0 1 2 3 4\r
- * \r
- * 0 0,0,y | 1,0,y 2,0,y 3,0,y 4,0,y\r
- * --------+-----------------------------\r
- * 1 0,0,n | 0,1,y 1,0,n 1,1,y 2,0,n\r
- * q 2 0,1,n | 0,1,n 1,1,n 1,1,n 2,1,n\r
- * u 3 0,1,y | 0,2,n 1,1,y 1,2,n 2,1,y\r
- * o 4 0,1,n | 0,2,y 1,1,n 1,2,y 2,1,n\r
- * t 5 0,2,n | 0,2,n 1,2,n 1,2,n 2,2,n\r
- * e 6 0,2,y | 0,3,n 1,2,y 1,3,n 2,2,y\r
- * s 7 0,2,n | 0,3,y 1,2,n 1,3,y 2,2,n\r
- * 8 0,3,n | 0,3,n 1,3,n 1,3,n 2,3,n\r
- * 9 0,3,y | 0,4,n 1,3,y 1,4,n 2,3,y\r
- * 10 0,3,n | 0,4,y 1,3,n 1,4,y 2,3,n\r
- * 11 0,4,n | 0,4,n 1,4,n 1,4,n 2,4,n\r
- * \r
- * \r
- * [Test fragment was of the form "a\\\"""b c" d.]\r
- * \r
- * There is very weird mod-3 behaviour going on here in the\r
- * number of quotes, and it even applies when there aren't any\r
- * backslashes! How ghastly.\r
- * \r
- * With a bit of thought, this extremely odd diagram suddenly\r
- * coalesced itself into a coherent, if still ghastly, model of\r
- * how things work:\r
- * \r
- * - As before, backslashes are only special when one or more\r
- * of them appear contiguously before at least one double\r
- * quote. In this situation the backslashes do exactly what\r
- * you'd expect: each one quotes the next thing in front of\r
- * it, so you end up with n/2 literal backslashes (if n is\r
- * even) or (n-1)/2 literal backslashes and a literal quote\r
- * (if n is odd). In the latter case the double quote\r
- * character right after the backslashes is used up.\r
- * \r
- * - After that, any remaining double quotes are processed. A\r
- * string of contiguous unescaped double quotes has a mod-3\r
- * behaviour:\r
- * \r
- * * inside a quoted segment, a quote ends the segment.\r
- * * _immediately_ after ending a quoted segment, a quote\r
- * simply produces a literal quote.\r
- * * otherwise, outside a quoted segment, a quote begins a\r
- * quoted segment.\r
- * \r
- * So, for example, if we started inside a quoted segment\r
- * then two contiguous quotes would close the segment and\r
- * produce a literal quote; three would close the segment,\r
- * produce a literal quote, and open a new segment. If we\r
- * started outside a quoted segment, then two contiguous\r
- * quotes would open and then close a segment, producing no\r
- * output (but potentially creating a zero-length argument);\r
- * but three quotes would open and close a segment and then\r
- * produce a literal quote.\r
- */\r
-\r
- /*\r
- * First deal with the simplest of all special cases: if there\r
- * aren't any arguments, return 0,NULL,NULL.\r
- */\r
- while (*cmdline && isspace(*cmdline)) cmdline++;\r
- if (!*cmdline) {\r
- if (argc) *argc = 0;\r
- if (argv) *argv = NULL;\r
- if (argstart) *argstart = NULL;\r
- return;\r
- }\r
-\r
- /*\r
- * This will guaranteeably be big enough; we can realloc it\r
- * down later.\r
- */\r
- outputline = snewn(1+strlen(cmdline), char);\r
- outputargv = snewn(strlen(cmdline)+1 / 2, char *);\r
- outputargstart = snewn(strlen(cmdline)+1 / 2, char *);\r
-\r
- p = cmdline; q = outputline; outputargc = 0;\r
-\r
- while (*p) {\r
- int quote;\r
-\r
- /* Skip whitespace searching for start of argument. */\r
- while (*p && isspace(*p)) p++;\r
- if (!*p) break;\r
-\r
- /* We have an argument; start it. */\r
- outputargv[outputargc] = q;\r
- outputargstart[outputargc] = p;\r
- outputargc++;\r
- quote = 0;\r
-\r
- /* Copy data into the argument until it's finished. */\r
- while (*p) {\r
- if (!quote && isspace(*p))\r
- break; /* argument is finished */\r
-\r
- if (*p == '"' || *p == '\\') {\r
- /*\r
- * We have a sequence of zero or more backslashes\r
- * followed by a sequence of zero or more quotes.\r
- * Count up how many of each, and then deal with\r
- * them as appropriate.\r
- */\r
- int i, slashes = 0, quotes = 0;\r
- while (*p == '\\') slashes++, p++;\r
- while (*p == '"') quotes++, p++;\r
-\r
- if (!quotes) {\r
- /*\r
- * Special case: if there are no quotes,\r
- * slashes are not special at all, so just copy\r
- * n slashes to the output string.\r
- */\r
- while (slashes--) *q++ = '\\';\r
- } else {\r
- /* Slashes annihilate in pairs. */\r
- while (slashes >= 2) slashes -= 2, *q++ = '\\';\r
-\r
- /* One remaining slash takes out the first quote. */\r
- if (slashes) quotes--, *q++ = '"';\r
-\r
- if (quotes > 0) {\r
- /* Outside a quote segment, a quote starts one. */\r
- if (!quote) quotes--, quote = 1;\r
-\r
- /* Now we produce (n+1)/3 literal quotes... */\r
- for (i = 3; i <= quotes+1; i += 3) *q++ = '"';\r
-\r
- /* ... and end in a quote segment iff 3 divides n. */\r
- quote = (quotes % 3 == 0);\r
- }\r
- }\r
- } else {\r
- *q++ = *p++;\r
- }\r
- }\r
-\r
- /* At the end of an argument, just append a trailing NUL. */\r
- *q++ = '\0';\r
- }\r
-\r
- outputargv = sresize(outputargv, outputargc, char *);\r
- outputargstart = sresize(outputargstart, outputargc, char *);\r
-\r
- if (argc) *argc = outputargc;\r
- if (argv) *argv = outputargv; else sfree(outputargv);\r
- if (argstart) *argstart = outputargstart; else sfree(outputargstart);\r
-}\r
-\r
-#ifdef TESTMODE\r
-\r
-const struct argv_test {\r
- const char *cmdline;\r
- const char *argv[10];\r
-} argv_tests[] = {\r
- /*\r
- * We generate this set of tests by invoking ourself with\r
- * `-generate'.\r
- */\r
- {"ab c\" d", {"ab", "c d", NULL}},\r
- {"a\"b c\" d", {"ab c", "d", NULL}},\r
- {"a\"\"b c\" d", {"ab", "c d", NULL}},\r
- {"a\"\"\"b c\" d", {"a\"b", "c d", NULL}},\r
- {"a\"\"\"\"b c\" d", {"a\"b c", "d", NULL}},\r
- {"a\"\"\"\"\"b c\" d", {"a\"b", "c d", NULL}},\r
- {"a\"\"\"\"\"\"b c\" d", {"a\"\"b", "c d", NULL}},\r
- {"a\"\"\"\"\"\"\"b c\" d", {"a\"\"b c", "d", NULL}},\r
- {"a\"\"\"\"\"\"\"\"b c\" d", {"a\"\"b", "c d", NULL}},\r
- {"a\\b c\" d", {"a\\b", "c d", NULL}},\r
- {"a\\\"b c\" d", {"a\"b", "c d", NULL}},\r
- {"a\\\"\"b c\" d", {"a\"b c", "d", NULL}},\r
- {"a\\\"\"\"b c\" d", {"a\"b", "c d", NULL}},\r
- {"a\\\"\"\"\"b c\" d", {"a\"\"b", "c d", NULL}},\r
- {"a\\\"\"\"\"\"b c\" d", {"a\"\"b c", "d", NULL}},\r
- {"a\\\"\"\"\"\"\"b c\" d", {"a\"\"b", "c d", NULL}},\r
- {"a\\\"\"\"\"\"\"\"b c\" d", {"a\"\"\"b", "c d", NULL}},\r
- {"a\\\"\"\"\"\"\"\"\"b c\" d", {"a\"\"\"b c", "d", NULL}},\r
- {"a\\\\b c\" d", {"a\\\\b", "c d", NULL}},\r
- {"a\\\\\"b c\" d", {"a\\b c", "d", NULL}},\r
- {"a\\\\\"\"b c\" d", {"a\\b", "c d", NULL}},\r
- {"a\\\\\"\"\"b c\" d", {"a\\\"b", "c d", NULL}},\r
- {"a\\\\\"\"\"\"b c\" d", {"a\\\"b c", "d", NULL}},\r
- {"a\\\\\"\"\"\"\"b c\" d", {"a\\\"b", "c d", NULL}},\r
- {"a\\\\\"\"\"\"\"\"b c\" d", {"a\\\"\"b", "c d", NULL}},\r
- {"a\\\\\"\"\"\"\"\"\"b c\" d", {"a\\\"\"b c", "d", NULL}},\r
- {"a\\\\\"\"\"\"\"\"\"\"b c\" d", {"a\\\"\"b", "c d", NULL}},\r
- {"a\\\\\\b c\" d", {"a\\\\\\b", "c d", NULL}},\r
- {"a\\\\\\\"b c\" d", {"a\\\"b", "c d", NULL}},\r
- {"a\\\\\\\"\"b c\" d", {"a\\\"b c", "d", NULL}},\r
- {"a\\\\\\\"\"\"b c\" d", {"a\\\"b", "c d", NULL}},\r
- {"a\\\\\\\"\"\"\"b c\" d", {"a\\\"\"b", "c d", NULL}},\r
- {"a\\\\\\\"\"\"\"\"b c\" d", {"a\\\"\"b c", "d", NULL}},\r
- {"a\\\\\\\"\"\"\"\"\"b c\" d", {"a\\\"\"b", "c d", NULL}},\r
- {"a\\\\\\\"\"\"\"\"\"\"b c\" d", {"a\\\"\"\"b", "c d", NULL}},\r
- {"a\\\\\\\"\"\"\"\"\"\"\"b c\" d", {"a\\\"\"\"b c", "d", NULL}},\r
- {"a\\\\\\\\b c\" d", {"a\\\\\\\\b", "c d", NULL}},\r
- {"a\\\\\\\\\"b c\" d", {"a\\\\b c", "d", NULL}},\r
- {"a\\\\\\\\\"\"b c\" d", {"a\\\\b", "c d", NULL}},\r
- {"a\\\\\\\\\"\"\"b c\" d", {"a\\\\\"b", "c d", NULL}},\r
- {"a\\\\\\\\\"\"\"\"b c\" d", {"a\\\\\"b c", "d", NULL}},\r
- {"a\\\\\\\\\"\"\"\"\"b c\" d", {"a\\\\\"b", "c d", NULL}},\r
- {"a\\\\\\\\\"\"\"\"\"\"b c\" d", {"a\\\\\"\"b", "c d", NULL}},\r
- {"a\\\\\\\\\"\"\"\"\"\"\"b c\" d", {"a\\\\\"\"b c", "d", NULL}},\r
- {"a\\\\\\\\\"\"\"\"\"\"\"\"b c\" d", {"a\\\\\"\"b", "c d", NULL}},\r
- {"\"ab c\" d", {"ab c", "d", NULL}},\r
- {"\"a\"b c\" d", {"ab", "c d", NULL}},\r
- {"\"a\"\"b c\" d", {"a\"b", "c d", NULL}},\r
- {"\"a\"\"\"b c\" d", {"a\"b c", "d", NULL}},\r
- {"\"a\"\"\"\"b c\" d", {"a\"b", "c d", NULL}},\r
- {"\"a\"\"\"\"\"b c\" d", {"a\"\"b", "c d", NULL}},\r
- {"\"a\"\"\"\"\"\"b c\" d", {"a\"\"b c", "d", NULL}},\r
- {"\"a\"\"\"\"\"\"\"b c\" d", {"a\"\"b", "c d", NULL}},\r
- {"\"a\"\"\"\"\"\"\"\"b c\" d", {"a\"\"\"b", "c d", NULL}},\r
- {"\"a\\b c\" d", {"a\\b c", "d", NULL}},\r
- {"\"a\\\"b c\" d", {"a\"b c", "d", NULL}},\r
- {"\"a\\\"\"b c\" d", {"a\"b", "c d", NULL}},\r
- {"\"a\\\"\"\"b c\" d", {"a\"\"b", "c d", NULL}},\r
- {"\"a\\\"\"\"\"b c\" d", {"a\"\"b c", "d", NULL}},\r
- {"\"a\\\"\"\"\"\"b c\" d", {"a\"\"b", "c d", NULL}},\r
- {"\"a\\\"\"\"\"\"\"b c\" d", {"a\"\"\"b", "c d", NULL}},\r
- {"\"a\\\"\"\"\"\"\"\"b c\" d", {"a\"\"\"b c", "d", NULL}},\r
- {"\"a\\\"\"\"\"\"\"\"\"b c\" d", {"a\"\"\"b", "c d", NULL}},\r
- {"\"a\\\\b c\" d", {"a\\\\b c", "d", NULL}},\r
- {"\"a\\\\\"b c\" d", {"a\\b", "c d", NULL}},\r
- {"\"a\\\\\"\"b c\" d", {"a\\\"b", "c d", NULL}},\r
- {"\"a\\\\\"\"\"b c\" d", {"a\\\"b c", "d", NULL}},\r
- {"\"a\\\\\"\"\"\"b c\" d", {"a\\\"b", "c d", NULL}},\r
- {"\"a\\\\\"\"\"\"\"b c\" d", {"a\\\"\"b", "c d", NULL}},\r
- {"\"a\\\\\"\"\"\"\"\"b c\" d", {"a\\\"\"b c", "d", NULL}},\r
- {"\"a\\\\\"\"\"\"\"\"\"b c\" d", {"a\\\"\"b", "c d", NULL}},\r
- {"\"a\\\\\"\"\"\"\"\"\"\"b c\" d", {"a\\\"\"\"b", "c d", NULL}},\r
- {"\"a\\\\\\b c\" d", {"a\\\\\\b c", "d", NULL}},\r
- {"\"a\\\\\\\"b c\" d", {"a\\\"b c", "d", NULL}},\r
- {"\"a\\\\\\\"\"b c\" d", {"a\\\"b", "c d", NULL}},\r
- {"\"a\\\\\\\"\"\"b c\" d", {"a\\\"\"b", "c d", NULL}},\r
- {"\"a\\\\\\\"\"\"\"b c\" d", {"a\\\"\"b c", "d", NULL}},\r
- {"\"a\\\\\\\"\"\"\"\"b c\" d", {"a\\\"\"b", "c d", NULL}},\r
- {"\"a\\\\\\\"\"\"\"\"\"b c\" d", {"a\\\"\"\"b", "c d", NULL}},\r
- {"\"a\\\\\\\"\"\"\"\"\"\"b c\" d", {"a\\\"\"\"b c", "d", NULL}},\r
- {"\"a\\\\\\\"\"\"\"\"\"\"\"b c\" d", {"a\\\"\"\"b", "c d", NULL}},\r
- {"\"a\\\\\\\\b c\" d", {"a\\\\\\\\b c", "d", NULL}},\r
- {"\"a\\\\\\\\\"b c\" d", {"a\\\\b", "c d", NULL}},\r
- {"\"a\\\\\\\\\"\"b c\" d", {"a\\\\\"b", "c d", NULL}},\r
- {"\"a\\\\\\\\\"\"\"b c\" d", {"a\\\\\"b c", "d", NULL}},\r
- {"\"a\\\\\\\\\"\"\"\"b c\" d", {"a\\\\\"b", "c d", NULL}},\r
- {"\"a\\\\\\\\\"\"\"\"\"b c\" d", {"a\\\\\"\"b", "c d", NULL}},\r
- {"\"a\\\\\\\\\"\"\"\"\"\"b c\" d", {"a\\\\\"\"b c", "d", NULL}},\r
- {"\"a\\\\\\\\\"\"\"\"\"\"\"b c\" d", {"a\\\\\"\"b", "c d", NULL}},\r
- {"\"a\\\\\\\\\"\"\"\"\"\"\"\"b c\" d", {"a\\\\\"\"\"b", "c d", NULL}},\r
-};\r
-\r
-int main(int argc, char **argv)\r
-{\r
- int i, j;\r
-\r
- if (argc > 1) {\r
- /*\r
- * Generation of tests.\r
- * \r
- * Given `-splat <args>', we print out a C-style\r
- * representation of each argument (in the form "a", "b",\r
- * NULL), backslash-escaping each backslash and double\r
- * quote.\r
- * \r
- * Given `-split <string>', we first doctor `string' by\r
- * turning forward slashes into backslashes, single quotes\r
- * into double quotes and underscores into spaces; and then\r
- * we feed the resulting string to ourself with `-splat'.\r
- * \r
- * Given `-generate', we concoct a variety of fun test\r
- * cases, encode them in quote-safe form (mapping \, " and\r
- * space to /, ' and _ respectively) and feed each one to\r
- * `-split'.\r
- */\r
- if (!strcmp(argv[1], "-splat")) {\r
- int i;\r
- char *p;\r
- for (i = 2; i < argc; i++) {\r
- putchar('"');\r
- for (p = argv[i]; *p; p++) {\r
- if (*p == '\\' || *p == '"')\r
- putchar('\\');\r
- putchar(*p);\r
- }\r
- printf("\", ");\r
- }\r
- printf("NULL");\r
- return 0;\r
- }\r
-\r
- if (!strcmp(argv[1], "-split") && argc > 2) {\r
- char *str = malloc(20 + strlen(argv[0]) + strlen(argv[2]));\r
- char *p, *q;\r
-\r
- q = str + sprintf(str, "%s -splat ", argv[0]);\r
- printf(" {\"");\r
- for (p = argv[2]; *p; p++, q++) {\r
- switch (*p) {\r
- case '/': printf("\\\\"); *q = '\\'; break;\r
- case '\'': printf("\\\""); *q = '"'; break;\r
- case '_': printf(" "); *q = ' '; break;\r
- default: putchar(*p); *q = *p; break;\r
- }\r
- }\r
- *p = '\0';\r
- printf("\", {");\r
- fflush(stdout);\r
-\r
- system(str);\r
-\r
- printf("}},\n");\r
-\r
- return 0;\r
- }\r
-\r
- if (!strcmp(argv[1], "-generate")) {\r
- char *teststr, *p;\r
- int i, initialquote, backslashes, quotes;\r
-\r
- teststr = malloc(200 + strlen(argv[0]));\r
-\r
- for (initialquote = 0; initialquote <= 1; initialquote++) {\r
- for (backslashes = 0; backslashes < 5; backslashes++) {\r
- for (quotes = 0; quotes < 9; quotes++) {\r
- p = teststr + sprintf(teststr, "%s -split ", argv[0]);\r
- if (initialquote) *p++ = '\'';\r
- *p++ = 'a';\r
- for (i = 0; i < backslashes; i++) *p++ = '/';\r
- for (i = 0; i < quotes; i++) *p++ = '\'';\r
- *p++ = 'b';\r
- *p++ = '_';\r
- *p++ = 'c';\r
- *p++ = '\'';\r
- *p++ = '_';\r
- *p++ = 'd';\r
- *p = '\0';\r
-\r
- system(teststr);\r
- }\r
- }\r
- }\r
- return 0;\r
- }\r
-\r
- fprintf(stderr, "unrecognised option: \"%s\"\n", argv[1]);\r
- return 1;\r
- }\r
-\r
- /*\r
- * If we get here, we were invoked with no arguments, so just\r
- * run the tests.\r
- */\r
-\r
- for (i = 0; i < lenof(argv_tests); i++) {\r
- int ac;\r
- char **av;\r
-\r
- split_into_argv(argv_tests[i].cmdline, &ac, &av);\r
-\r
- for (j = 0; j < ac && argv_tests[i].argv[j]; j++) {\r
- if (strcmp(av[j], argv_tests[i].argv[j])) {\r
- printf("failed test %d (|%s|) arg %d: |%s| should be |%s|\n",\r
- i, argv_tests[i].cmdline,\r
- j, av[j], argv_tests[i].argv[j]);\r
- }\r
-#ifdef VERBOSE\r
- else {\r
- printf("test %d (|%s|) arg %d: |%s| == |%s|\n",\r
- i, argv_tests[i].cmdline,\r
- j, av[j], argv_tests[i].argv[j]);\r
- }\r
-#endif\r
- }\r
- if (j < ac)\r
- printf("failed test %d (|%s|): %d args returned, should be %d\n",\r
- i, argv_tests[i].cmdline, ac, j);\r
- if (argv_tests[i].argv[j])\r
- printf("failed test %d (|%s|): %d args returned, should be more\n",\r
- i, argv_tests[i].cmdline, ac);\r
- }\r
-\r
- return 0;\r
-}\r
-\r
-#endif\r