Subversion Repositories c0or1k

/*

 * Environment accessor functions

 *

 * Copyright (C) 2008 Bahadir Balban

 */

#include <string.h>

#include <stdlib.h>

#include <libposix.h>

char **__environ;

/*

 * Search for given name in name=value string pairs located

 * in the environment segment, and return the pointer to value

 * string.

 */

char *getenv(const char *name)

{

        char **envp = __environ;

        int length;

        if (!envp)

                return 0;

        length = strlen(name);

        while(*envp) {

                if (memcmp(name, *envp, length) == 0 &&

                    (*envp)[length] == '=')

                        return *envp + length + 1;

                envp++;

        }

        return 0;

}