summaryrefslogtreecommitdiffstats
path: root/Modules/config.c.in
blob: 60f2cf2e11a370100197086cfc78a58455009465 (plain)
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
84
85
86
/* Configuration containing EVERYTHING */

/* At CWI, this implies stdwin, audio, Amoeba and the NASA Panel Library */
#define USE_AUDIO
#define USE_AMOEBA
#define USE_PANEL

static int use_stdwin;

/*ARGSUSED*/
void
initargs(p_argc, p_argv)
	int *p_argc;
	char ***p_argv;
{
	extern char *getenv();
	char *display;
	
	/* Assume we have to initialize stdwin if either of the following
	   conditions holds:
	   - the environment variable $DISPLAY is set
	   - there is an argument "-display" somewhere
	*/
	
	display = getenv("DISPLAY");
	if (display != 0)
		use_stdwin = 1;
	else {
		int i;
		/* Scan through the arguments looking for "-display" */
		for (i = 1; i < *p_argc; i++) {
			if (strcmp((*p_argv)[i], "-display") == 0) {
				use_stdwin = 1;
				break;
			}
		}
	}
	
	if (use_stdwin)
		winitargs(p_argc, p_argv);
}

void
initcalls()
{
	inittime();
	initmath();
	initposix();
#ifdef USE_AUDIO
	initaudio();
#endif
#ifdef USE_AMOEBA
	initamoeba();
#endif
	initgl();
#ifdef USE_PANEL
	initpanel();
#endif
	if (use_stdwin)
		initstdwin();
}

void
donecalls()
{
	if (use_stdwin)
		wdone();
#ifdef USE_AUDIO
	asa_done();
#endif
}

#ifndef PYTHONPATH
#define PYTHONPATH ".:/usr/local/lib/python"
#endif

extern char *getenv();

char *
getpythonpath()
{
	char *path = getenv("PYTHONPATH");
	if (path == 0)
		path = PYTHONPATH;
	return path;
}