%% options copyright owner = Dirk Krause copyright year = 2015-xxxx license = bsd %% module #include "dk4opt.h" #include "dk4strd.h" #include "dk4mem.h" $!trace-include int dk4opt_get_bool(int *dptr, dk4_option_t *optptr, dk4_er_t *erp) { int back = 0; if ((NULL != dptr) && (NULL != optptr)) { if (0 != optptr->found) { switch ((optptr->spec).argtype) { case DK4_OPT_ARG_BOOL: { *dptr = (optptr->val).b; back = 1; } break; case DK4_OPT_ARG_SIZE: { if (0 < (optptr->val).s) { *dptr = 1; } else { *dptr = 0; } back = 1; } break; case DK4_OPT_ARG_INT: { if ((dk4_im_t)0L != (optptr->val).i) { *dptr = 1; } else { *dptr = 0; } back = 1; } break; case DK4_OPT_ARG_UNSIGNED: { if ((dk4_um_t)0UL < (optptr->val).u) { *dptr = 1; } else { *dptr = 0; } back = 1; } break; case DK4_OPT_ARG_STRING: { if (NULL != (optptr->val).t) { if (dk4str_is_bool((optptr->val).t)) { if (dk4str_is_on((optptr->val).t)) { *dptr = 1; } else { *dptr = 0; } back = 1; } else { dk4error_set_simple_error_code(erp, DK4_E_SYNTAX); } } 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_INVALID_ARGUMENTS); } return back; }