Jspice3
ivars.c
Go to the documentation of this file.
1 /***************************************************************************
2 JSPICE3 adaptation of Spice3e2 - Copyright (c) Stephen R. Whiteley 1992
3 Copyright 1990 Regents of the University of California. All rights reserved.
4 Authors: UCB CAD Group
5  1992 Stephen R. Whiteley
6 ****************************************************************************/
7 
8 #include "spice.h"
9 #include "misc.h"
10 
11 char *Spice_Path;
12 char *News_File;
14 char *Help_Path;
15 char *Lib_Path;
16 char *Sced_Path;
17 
18 
19 static void
21 
22 char **v;
23 char *e;
24 {
25  char *p;
26  if (v && e && (p = getenv(e)))
27  *v = p;
28 }
29 
30 
31 static void
32 mkvar(p, b, v, e)
33 
34 char **p;
35 char *b;
36 char *v;
37 char *e;
38 {
39  char buffer[256];
40 
41  env_overr(p, e);
42  if (!*p) {
43  sprintf(buffer, "%s%s%s", b, DIR_PATHSEP, v);
44  *p = tmalloc(strlen(buffer) + 1);
45  strcpy(*p, buffer);
46  }
47 }
48 
49 
50 void
52 
53 {
54  env_overr(&Spice_Exec_Dir, "SPICE_EXEC_DIR");
55  env_overr(&Spice_Lib_Dir, "SPICE_LIB_DIR");
56 
57  mkvar(&News_File, Spice_Lib_Dir, "news", "SPICE_NEWS");
58  mkvar(&Default_MFB_Cap, Spice_Lib_Dir, "mfbcap", "SPICE_MFBCAP");
59  mkvar(&Help_Path, Spice_Lib_Dir, "helpdir", "SPICE_HELP");
60  mkvar(&Lib_Path, Spice_Lib_Dir, "scripts", "SPICE_SCRIPTS");
61  mkvar(&Sced_Path, Spice_Lib_Dir, "sced", "SPICE_SCED");
62  mkvar(&Spice_Path, Spice_Exec_Dir, "jspice3", "SPICE_PATH");
63 
64  env_overr(&Spice_Host, "SPICE_HOST");
65  env_overr(&Bug_Addr, "SPICE_BUGADDR");
66  env_overr(&Def_Editor, "SPICE_EDITOR");
67  env_overr(&AsciiRawFile, "SPICE_ASCIIRAWFILE");
68 }
char * Spice_Path
Definition: ivars.c:11
char * strcpy()
char * Help_Path
Definition: ivars.c:14
char * Spice_Exec_Dir
static double e
Definition: vectors.c:17
FILE * p
Definition: proc2mod.c:48
static void mkvar(char **p, char *b, char *v, char *e)
Definition: ivars.c:32
Definition: cddefs.h:215
char * Default_MFB_Cap
Definition: ivars.c:13
char * getenv(char *c)
Definition: libfuncs.c:106
char * Spice_Lib_Dir
static void env_overr(char **v, char *e)
Definition: ivars.c:20
char * tmalloc()
void ivars()
Definition: ivars.c:51
char * Def_Editor
int AsciiRawFile
char * Bug_Addr
char * News_File
Definition: ivars.c:12
char * Spice_Host
char * Sced_Path
Definition: ivars.c:16
char * Lib_Path
Definition: ivars.c:15