%% options copyright owner = Dirk Krause copyright year = 2015-xxxx license = bsd %% module #include "dk4opt.h" #include "dk4aopt.h" $!trace-include const dkChar * dk4app_opt_get_string_ptr_long(dk4_app_t *app, const dkChar *n, dk4_er_t *erp) { const dkChar *back = NULL; dk4_option_t *optr = NULL; $? "+ dk4app_opt_get_string_ptr_long" if ((NULL != app) && (NULL != n)) { if (NULL != app->i_opt_short) { optr = (dk4_option_t *)dk4sto_it_find_like(app->i_opt_short, n, 3); if (NULL != optr) { if (0 != optr->found) { switch ((optr->spec).argtype) { case DK4_OPT_ARG_STRING : { if (NULL != (optr->val).t) { back = (optr->val).t; } else { dk4error_set_simple_error_code(erp, DK4_E_NOT_FOUND); } } break; default : { dk4error_set_simple_error_code(erp, DK4_E_SYNTAX); } break; } } else { dk4error_set_simple_error_code(erp, DK4_E_NOT_FOUND); } } else { dk4error_set_simple_error_code(erp, DK4_E_SYNTAX); } } else { dk4error_set_simple_error_code(erp, DK4_E_INVALID_ARGUMENTS); } } else { dk4error_set_simple_error_code(erp, DK4_E_INVALID_ARGUMENTS); } $? "- dk4app_opt_get_string_ptr_long PTR=%d", TR_IPTR(back) return back; }