Modules/config.c.in

/* Configurable Python configuration file */

#ifdef USE_STDWIN
#include <stdwin.h>

static int use_stdwin;
#endif

/*ARGSUSED*/
void
initargs(p_argc, p_argv)
	int *p_argc;
	char ***p_argv;
{
#ifdef USE_STDWIN
	extern char *getenv();
	char *display;

	/* Ignore an initial argument of '-s', for backward compatibility */
	if (*p_argc > 1 && strcmp((*p_argv)[1], "-s") == 0) {
		(*p_argv)[1] = (*p_argv)[0];
		(*p_argc)--, (*p_argv)++;
	}

	/* 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);
#endif
}

void
initcalls()
{
	inittime();
	initmath();
	initregexp();
	initposix();

#ifdef USE_AUDIO
	initaudio();
#endif

#ifdef USE_AMOEBA
	initamoeba();
#endif

#ifdef USE_GL
	initgl();
#ifdef USE_PANEL
	initpanel();
#endif
#endif

#ifdef USE_STDWIN
	if (use_stdwin)
		initstdwin();
#endif
}

void
donecalls()
{
#ifdef USE_STDWIN
	if (use_stdwin)
		wdone();
#endif
#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;
}