File Manager

003 File Manager

Current Path: /usr/src/contrib/ntp/sntp/libopts

usr / src / contrib / ntp / sntp / libopts /

📁 ..
📄 COPYING.gplv3(34.34 KB)
📄 COPYING.lgplv3(7.45 KB)
📄 COPYING.mbsd(1.41 KB)
📄 MakeDefs.inc(0 B)
📄 Makefile.am(2.51 KB)
📄 Makefile.in(27.52 KB)
📄 README(4.84 KB)
📄 ag-char-map.h(26.67 KB)
📄 alias.c(3.26 KB)
📄 ao-strs.c(13.82 KB)
📄 ao-strs.h(14.02 KB)
📁 autoopts
📄 autoopts.c(11.94 KB)
📄 autoopts.h(12.96 KB)
📄 boolean.c(2.45 KB)
📄 check.c(4.84 KB)
📁 compat
📄 configfile.c(35.76 KB)
📄 cook.c(9.18 KB)
📄 enum.c(18.09 KB)
📄 env.c(7.17 KB)
📄 file.c(5.67 KB)
📄 find.c(22 KB)
📄 genshell.c(30.64 KB)
📄 genshell.h(7.77 KB)
📄 gettext.h(9.79 KB)
📄 init.c(8.42 KB)
📄 intprops.h(14.58 KB)
📄 libopts.c(1.06 KB)
📄 load.c(15.98 KB)
📁 m4
📄 makeshell.c(24.36 KB)
📄 nested.c(24.33 KB)
📄 numeric.c(5.05 KB)
📄 option-value-type.c(5.5 KB)
📄 option-value-type.h(2.36 KB)
📄 option-xat-attribute.c(5.04 KB)
📄 option-xat-attribute.h(2.25 KB)
📄 parse-duration.c(12.11 KB)
📄 parse-duration.h(3.32 KB)
📄 pgusage.c(4.89 KB)
📄 proto.h(2.73 KB)
📄 putshell.c(14.62 KB)
📄 reset.c(3.84 KB)
📄 restore.c(6.82 KB)
📄 save.c(20.53 KB)
📄 sort.c(9.84 KB)
📄 stack.c(7.23 KB)
📄 stdnoreturn.in.h(1.77 KB)
📄 streqvcmp.c(8.14 KB)
📄 text_mmap.c(11.05 KB)
📄 time.c(3.77 KB)
📄 tokenize.c(8.99 KB)
📄 usage.c(38.19 KB)
📄 version.c(6.11 KB)

Editing: env.c

/**
 * \file environment.c
 *
 *  This file contains all of the routines that must be linked into
 *  an executable to use the generated option processing.  The optional
 *  routines are in separately compiled modules so that they will not
 *  necessarily be linked in.
 *
 * @addtogroup autoopts
 * @{
 */
/*
 *  This file is part of AutoOpts, a companion to AutoGen.
 *  AutoOpts is free software.
 *  AutoOpts is Copyright (C) 1992-2015 by Bruce Korb - all rights reserved
 *
 *  AutoOpts is available under any one of two licenses.  The license
 *  in use must be one of these two and the choice is under the control
 *  of the user of the license.
 *
 *   The GNU Lesser General Public License, version 3 or later
 *      See the files "COPYING.lgplv3" and "COPYING.gplv3"
 *
 *   The Modified Berkeley Software Distribution License
 *      See the file "COPYING.mbsd"
 *
 *  These files have the following sha256 sums:
 *
 *  8584710e9b04216a394078dc156b781d0b47e1729104d666658aecef8ee32e95  COPYING.gplv3
 *  4379e7444a0e2ce2b12dd6f5a52a27a4d02d39d247901d3285c88cf0d37f477b  COPYING.lgplv3
 *  13aa749a5b0a454917a944ed8fffc530b784f5ead522b1aacaf4ec8aa55a6239  COPYING.mbsd
 */

/* = = = START-STATIC-FORWARD = = = */
static void
do_env_opt(tOptState * os, char * env_name,
            tOptions * pOpts, teEnvPresetType type);
/* = = = END-STATIC-FORWARD = = = */

/*
 *  doPrognameEnv - check for preset values from the ${PROGNAME}
 *  environment variable.  This is accomplished by parsing the text into
 *  tokens, temporarily replacing the arg vector and calling
 *  immediate_opts and/or regular_opts.
 */
LOCAL void
doPrognameEnv(tOptions * pOpts, teEnvPresetType type)
{
    char const *        env_opts = getenv(pOpts->pzPROGNAME);
    token_list_t *      pTL;
    int                 sv_argc;
    proc_state_mask_t   sv_flag;
    char **             sv_argv;

/*
     *  No such beast?  Then bail now.
     */
    if (env_opts == NULL)
        return;

/*
     *  Tokenize the string.  If there's nothing of interest, we'll bail
     *  here immediately.
     */
    pTL = ao_string_tokenize(env_opts);
    if (pTL == NULL)
        return;

/*
     *  Substitute our $PROGNAME argument list for the real one
     */
    sv_argc = (int)pOpts->origArgCt;
    sv_argv = pOpts->origArgVect;
    sv_flag = pOpts->fOptSet;

/*
     *  We add a bogus pointer to the start of the list.  The program name
     *  has already been pulled from "argv", so it won't get dereferenced.
     *  The option scanning code will skip the "program name" at the start
     *  of this list of tokens, so we accommodate this way ....
     */
    {
        uintptr_t v = (uintptr_t)(pTL->tkn_list);
        pOpts->origArgVect = VOIDP(v - sizeof(char *));
    }
    pOpts->origArgCt   = (unsigned int)pTL->tkn_ct   + 1;
    pOpts->fOptSet    &= ~OPTPROC_ERRSTOP;

pOpts->curOptIdx   = 1;
    pOpts->pzCurOpt    = NULL;

switch (type) {
    case ENV_IMM:
        (void)immediate_opts(pOpts);
        break;

case ENV_ALL:
        (void)immediate_opts(pOpts);
        pOpts->curOptIdx = 1;
        pOpts->pzCurOpt  = NULL;
        /* FALLTHROUGH */

case ENV_NON_IMM:
        (void)regular_opts(pOpts);
    }

/*
     *  Free up the temporary arg vector and restore the original program args.
     */
    free(pTL);
    pOpts->origArgVect = sv_argv;
    pOpts->origArgCt   = (unsigned int)sv_argc;
    pOpts->fOptSet     = sv_flag;
}

static void
do_env_opt(tOptState * os, char * env_name,
            tOptions * pOpts, teEnvPresetType type)
{
    os->pzOptArg = getenv(env_name);
    if (os->pzOptArg == NULL)
        return;

os->flags   = OPTST_PRESET | OPTST_ALLOC_ARG | os->pOD->fOptState;
    os->optType = TOPT_UNDEFINED;

if (  (os->pOD->pz_DisablePfx != NULL)
       && (streqvcmp(os->pzOptArg, os->pOD->pz_DisablePfx) == 0)) {
        os->flags |= OPTST_DISABLED;
        os->pzOptArg = NULL;
        handle_opt(pOpts, os);
        return;
    }

switch (type) {
    case ENV_IMM:
        /*
         *  Process only immediate actions
         */
        if (DO_IMMEDIATELY(os->flags))
            break;
        return;

case ENV_NON_IMM:
        /*
         *  Process only NON immediate actions
         */
        if (DO_NORMALLY(os->flags) || DO_SECOND_TIME(os->flags))
            break;
        return;

default: /* process everything */
        break;
    }

/*
     *  Make sure the option value string is persistent and consistent.
     *
     *  The interpretation of the option value depends
     *  on the type of value argument the option takes
     */
    if (OPTST_GET_ARGTYPE(os->pOD->fOptState) == OPARG_TYPE_NONE) {
        /*
         *  Ignore any value.
         */
        os->pzOptArg = NULL;

} else if (os->pzOptArg[0] == NUL) {
        /*
         * If the argument is the empty string and the argument is
         * optional, then treat it as if the option was not specified.
         */
        if ((os->pOD->fOptState & OPTST_ARG_OPTIONAL) == 0)
            return;
        os->pzOptArg = NULL;

} else {
        AGDUPSTR(os->pzOptArg, os->pzOptArg, "option argument");
        os->flags |= OPTST_ALLOC_ARG;
    }

handle_opt(pOpts, os);
}

/*
 *  env_presets - check for preset values from the envrionment
 *  This routine should process in all, immediate or normal modes....
 */
LOCAL void
env_presets(tOptions * pOpts, teEnvPresetType type)
{
    int        ct;
    tOptState  st;
    char *     pzFlagName;
    size_t     spaceLeft;
    char       zEnvName[ AO_NAME_SIZE ];

/*
     *  Finally, see if we are to look at the environment
     *  variables for initial values.
     */
    if ((pOpts->fOptSet & OPTPROC_ENVIRON) == 0)
        return;

doPrognameEnv(pOpts, type);

ct  = pOpts->presetOptCt;
    st.pOD = pOpts->pOptDesc;

pzFlagName = zEnvName
        + snprintf(zEnvName, sizeof(zEnvName), "%s_", pOpts->pzPROGNAME);
    spaceLeft = AO_NAME_SIZE - (unsigned long)(pzFlagName - zEnvName) - 1;

for (;ct-- > 0; st.pOD++) {
        size_t nln;

/*
         *  If presetting is disallowed, then skip this entry
         */
        if (  ((st.pOD->fOptState & OPTST_NO_INIT) != 0)
           || (st.pOD->optEquivIndex != NO_EQUIVALENT)  )
            continue;

/*
         *  IF there is no such environment variable,
         *  THEN skip this entry, too.
         */
        nln = strlen(st.pOD->pz_NAME) + 1;
        if (nln <= spaceLeft) {
            /*
             *  Set up the option state
             */
            memcpy(pzFlagName, st.pOD->pz_NAME, nln);
            do_env_opt(&st, zEnvName, pOpts, type);
        }
    }

/*
     *  Special handling for ${PROGNAME_LOAD_OPTS}
     */
    if (  (pOpts->specOptIdx.save_opts != NO_EQUIVALENT)
       && (pOpts->specOptIdx.save_opts != 0)) {
        size_t nln;
        st.pOD = pOpts->pOptDesc + pOpts->specOptIdx.save_opts + 1;

if (st.pOD->pz_NAME == NULL)
            return;

nln = strlen(st.pOD->pz_NAME) + 1;

if (nln > spaceLeft)
            return;

memcpy(pzFlagName, st.pOD->pz_NAME, nln);
        do_env_opt(&st, zEnvName, pOpts, type);
    }
}

/** @}
 *
 * Local Variables:
 * mode: C
 * c-file-style: "stroustrup"
 * indent-tabs-mode: nil
 * End:
 * end of autoopts/environment.c */

003 File Manager

Editing: env.c

Upload File

Create Folder