struct cmd_syndesc *retopts;
int code;
int tc;
+ int retval;
+ char *retstring;
- plan(51);
+ plan(79);
initialize_CMD_error_table();
cmd_FreeOptions(&retopts);
cmd_FreeArgv(tv);
+ /* Check Accessors */
+ code = cmd_ParseLine("-first 1 -second second -flag", tv, &tc, 100);
+ is_int(0, code, "cmd_ParseLine succeeds");
+ code = cmd_Parse(tc, tv, &retopts);
+
+ code = cmd_OptionAsInt(retopts, 0, &retval);
+ is_int(0, code, "cmd_OptionsAsInt succeeds");
+ is_int(1, retval, " ... and returns correct value");
+
+ code = cmd_OptionAsString(retopts, 1, &retstring);
+ is_int(0, code, "cmd_OptionsAsString succeeds");
+ is_string("second", retstring, " ... and returns correct value");
+ free(retstring);
+ retstring = NULL;
+
+ code = cmd_OptionAsFlag(retopts, 2, &retval);
+ is_int(0, code, "cmd_OptionsAsFlag succeeds");
+ ok(retval, " ... and flag is correct");
+
+ cmd_FreeOptions(&retopts);
+ cmd_FreeArgv(tv);
+
+ /* Add an alias */
+ code = cmd_AddParmAlias(opts, 1, "-twa");
+ is_int(0, code, "cmd_AddParmAlias succeeds");
+
+ code = cmd_ParseLine("-first 1 -twa tup", tv, &tc, 100);
+ is_int(0, code, "cmd_ParseLine succeeds");
+ code = cmd_Parse(tc, tv, &retopts);
+ is_int(0, code, "cmd_Parse succeeds for alias");
+ cmd_OptionAsString(retopts, 1, &retstring);
+ is_string("tup", retstring, " ... and we have the correct value");
+ free(retstring);
+ retstring = NULL;
+
+ cmd_FreeOptions(&retopts);
+ cmd_FreeArgv(tv);
+
+ /* Add something that can be a flag or a value, and put something after
+ * it so we can check for parse problems*/
+ cmd_AddParm(opts, "-perhaps", CMD_SINGLE_OR_FLAG, CMD_OPTIONAL,
+ "what am I");
+ cmd_AddParm(opts, "-sanity", CMD_SINGLE, CMD_OPTIONAL, "sanity check");
+
+ /* Try using as an option */
+
+ code = cmd_ParseLine("-first 1 -perhaps 2 -sanity 3", tv, &tc, 100);
+ is_int(0, code, "cmd_ParseLine succeeds");
+ code = cmd_Parse(tc, tv, &retopts);
+ is_int(0, code, "cmd_Parse succeeds for option-as-flag as opt");
+ code = cmd_OptionAsInt(retopts, 6, &retval);
+ is_int(0, code, "cmd_OptionAsInt succeeds");
+ is_int(2, retval, " ... and we have the correct value");
+ cmd_FreeOptions(&retopts);
+ cmd_FreeArgv(tv);
+
+ /* And now, as a flag */
+
+ code = cmd_ParseLine("-first 1 -perhaps -sanity 3", tv, &tc, 100);
+ is_int(0, code, "cmd_ParseLine succeeds");
+ code = cmd_Parse(tc, tv, &retopts);
+ is_int(0, code, "cmd_Parse succeeds for option-as-flag as flag");
+ code = cmd_OptionAsInt(retopts, 6, &retval);
+ is_int(CMD_MISSING, code, " ... pulling out a value fails as expected");
+ cmd_OptionAsFlag(retopts, 6, &retval);
+ ok(retval, " ... but parsing as a flag works");
+ cmd_FreeOptions(&retopts);
+ cmd_FreeArgv(tv);
+
+ /* Check that we can produce help output */
+ code = cmd_ParseLine("-help", tv, &tc, 100);
+ is_int(0, code, "cmd_ParseLine succeeds");
+ code = cmd_Parse(tc, tv, &retopts);
+ is_int(CMD_USAGE, code, "cmd_Parse returns usage error with help output");
+ ok(retopts == NULL, " ... and options is empty");
+
+ /* Check splitting with '=' */
+
+ code = cmd_ParseLine("-first 1 -perhaps=6 -sanity=3", tv, &tc, 100);
+ is_int(0, code, "cmd_ParseLine succeeds");
+ code = cmd_Parse(tc, tv, &retopts);
+ is_int(0, code, "cmd_Parse succeeds for items split with '='");
+ code = cmd_OptionAsInt(retopts, 6, &retval);
+ is_int(0, code, "cmd_OptionAsInt succeeds");
+ is_int(6, retval, " ... and we have the correct value once");
+ code = cmd_OptionAsInt(retopts, 7, &retval);
+ is_int(0, code, "cmd_OptionAsInt succeeds");
+ is_int(3, retval, " ... and we have the correct value twice");
+ cmd_FreeOptions(&retopts);
+ cmd_FreeArgv(tv);
+
return 0;
}