File: opal_installdirs_env.c

package info (click to toggle)
openmpi 1.6.5-9.1%2Bdeb8u1
  • links: PTS, VCS
  • area: main
  • in suites: jessie
  • size: 91,628 kB
  • ctags: 44,305
  • sloc: ansic: 408,966; cpp: 44,454; sh: 27,828; makefile: 10,486; asm: 3,882; python: 1,239; lex: 805; perl: 549; csh: 253; fortran: 232; f90: 126; tcl: 12
file content (83 lines) | stat: -rw-r--r-- 2,488 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
/*
 * Copyright (c) 2006-2007 Los Alamos National Security, LLC.  All rights
 *                         reserved. 
 * Copyright (c) 2007      Cisco Systems, Inc.  All rights reserved.
 * $COPYRIGHT$
 * 
 * Additional copyrights may follow
 * 
 * $HEADER$
 */

#include "opal_config.h"

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

#include "opal/constants.h"
#include "opal/mca/installdirs/installdirs.h"

static int installdirs_env_open(void);


opal_installdirs_base_component_t mca_installdirs_env_component = {
    /* First, the mca_component_t struct containing meta information
       about the component itself */
    {
        OPAL_INSTALLDIRS_BASE_VERSION_2_0_0,

        /* Component name and version */
        "env",
        OPAL_MAJOR_VERSION,
        OPAL_MINOR_VERSION,
        OPAL_RELEASE_VERSION,

        /* Component open and close functions */
        installdirs_env_open,
        NULL
    },
    {
        /* This component is checkpointable */
        MCA_BASE_METADATA_PARAM_CHECKPOINT
    },

    /* Next the opal_install_dirs_t install_dirs_data information */
    {
        NULL,
    },
};


#define SET_FIELD(field, envname)                                         \
    do {                                                                  \
        char *tmp = getenv(envname);                                      \
         if (NULL != tmp && 0 == strlen(tmp)) {                           \
             tmp = NULL;                                                  \
         }                                                                \
         mca_installdirs_env_component.install_dirs_data.field = tmp;     \
    } while (0)


static int
installdirs_env_open(void)
{
    SET_FIELD(prefix, "OPAL_PREFIX");
    SET_FIELD(exec_prefix, "OPAL_EXEC_PREFIX");
    SET_FIELD(bindir, "OPAL_BINDIR");
    SET_FIELD(sbindir, "OPAL_SBINDIR");
    SET_FIELD(libexecdir, "OPAL_LIBEXECDIR");
    SET_FIELD(datarootdir, "OPAL_DATAROOTDIR");
    SET_FIELD(datadir, "OPAL_DATADIR");
    SET_FIELD(sysconfdir, "OPAL_SYSCONFDIR");
    SET_FIELD(sharedstatedir, "OPAL_SHAREDSTATEDIR");
    SET_FIELD(localstatedir, "OPAL_LOCALSTATEDIR");
    SET_FIELD(libdir, "OPAL_LIBDIR");
    SET_FIELD(includedir, "OPAL_INCLUDEDIR");
    SET_FIELD(infodir, "OPAL_INFODIR");
    SET_FIELD(mandir, "OPAL_MANDIR");
    SET_FIELD(pkgdatadir, "OPAL_PKGDATADIR");
    SET_FIELD(pkglibdir, "OPAL_PKGLIBDIR");
    SET_FIELD(pkgincludedir, "OPAL_PKGINCLUDEDIR");

    return OPAL_SUCCESS;
}