env.c

/*
 * Copyright (c) 2005-2012 by KoanLogic s.r.l. - All rights reserved.
 */

#include <sys/types.h>
#include <sys/stat.h>

#include <string.h>
#include <stdlib.h>
#include <stdio.h>

#include <toolbox/env.h>
#include <toolbox/carpal.h>
#include <toolbox/misc.h>

int u_env_init (const char *prefix, const char *cfile)
{
    enum { BUFSZ = 1024 };
    struct stat sb;
    char line[BUFSZ], pcmd[BUFSZ], *val;
    FILE *pi = NULL;

    dbg_return_if (cfile == NULL || prefix == NULL, ~0);

    /* if 'cfile' does not exist bail out */
    dbg_err_sifm (stat(cfile, &sb) == -1, "%s", cfile);

    dbg_err_if (u_snprintf(pcmd, BUFSZ, ". %s 2>/dev/null && env", cfile));

    dbg_err_if ((pi = popen(pcmd, "r")) == NULL);

    while(fgets(line, BUFSZ-1, pi))
    {
        if(strncmp(line, prefix, strlen(prefix)) == 0)
        {
            line[strlen(line)-1] = 0;
            val = strchr(line, '=');
            if(!val)
                continue; /* should never happen... */
            *val++ = 0;
            /* line is the name and val the value */
            dbg_err_if(setenv(line, val, 1));
        }
    }

    pclose(pi);
    return 0;
err:
    U_PCLOSE(pi);
    return ~0;
}

const char *u_env_var (const char *name)
{
    return getenv(name);
}