struct ccommand clist[] = {
    ......
    {"CGIPath", S1A, c_set_string, &cgi_path},
    ......
}

extern char *cgi_path;

common_cgi_env[common_cgi_env_count++] = env_gen_extra("PATH",
                                        ((cgi_path !=
                                        NULL) ? cgi_path :
                                        DEFAULT_PATH), 0);

extern char *cgi_path;
extern short common_cgi_env_count;

extern char *cgi_path;
extern char *cgi_ld_library_path;
extern short common_cgi_env_count;

{"CGIPath", S1A, c_set_string, &cgi_path},
{"CGIumask", S1A, c_set_int, &cgi_umask},

{"CGIPath", S1A, c_set_string, &cgi_path},
{"CGILdLibraryPath", S1A, c_set_string, &cgi_ld_library_path},
{"CGIumask", S1A, c_set_int, &cgi_umask},

common_cgi_env[common_cgi_env_count++] = env_gen_extra("LD_LIBRARY_PATH",
    ((cgi_ld_library_path != NULL) ? cgi_ld_library_path : DEFAULT_LD_LIBRARY_PATH),
    0);

#define DEFAULT_LD_LIBRARY_PATH "/the/original/library/path:/my/custom/library/path"

/* NOTE NOTE NOTE:
    If you (the reader) someday modify this chunk of code to
    handle more "common" CGI environment variables, then bump the
    value COMMON_CGI_COUNT in defines.h UP

    Also, in the case of document_root and server_admin, two variables
    that may or may not be defined depending on the way the server
    is configured, we check for null values and use an empty
    string to denote a NULL value to the environment, as per the
    specification. The quote for which follows:

    "In all cases, a missing environment variable is
    equivalent to a zero-length (NULL) value, and vice versa."
    */

#ifdef USE_NCSA_CGI_ENV
#define COMMON_CGI_COUNT 8
#else
#define COMMON_CGI_COUNT 6
#endif

#ifdef USE_NCSA_CGI_ENV
#define COMMON_CGI_COUNT 9
#else
#define COMMON_CGI_COUNT 7
#endif

void create_common_env(void)
{
    int i;
    common_cgi_env = calloc((COMMON_CGI_COUNT + 1),sizeof(char *));
    common_cgi_env_count = 0;

    if (common_cgi_env == NULL) {

/* ...........blahblah.........
 * ...........blahblah.........
 * ...........blahblah.........
 */
    }

}

env_gen_extra("PATH",((cgi_path != NULL) ? cgi_path : DEFAULT_PATH), 0);

/*
 * Name: env_gen_extra
 *       (and via a not-so-tricky #define, env_gen)
 * This routine calls malloc: please free the memory when you are done
 */
static char *env_gen_extra(const char *key, const char *value,
                           unsigned int extra)
{
    char *result;
    unsigned int key_len, value_len;

    if (value == NULL)          /* ServerAdmin may not be defined, eg */
        value = "";
    key_len = strlen(key);
    value_len = strlen(value);
    /* leave room for '=' sign and null terminator */
    result = malloc(extra + key_len + value_len + 2);
    if (result) {
        memcpy(result + extra, key, key_len);
        *(result + extra + key_len) = '=';
        memcpy(result + extra + key_len + 1, value, value_len);
        *(result + extra + key_len + value_len + 1) = '\0';
    } else {
        log_error_time();
        perror("malloc");
        log_error_time();
        fprintf(stderr, "tried to allocate (key=value) extra=%u: %s=%s\n",
                extra, key, value);
    }
    return result;
}