Jspice3
Main Page
Data Structures
Files
File List
Globals
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
;
13
char
*
Default_MFB_Cap
;
14
char
*
Help_Path
;
15
char
*
Lib_Path
;
16
char
*
Sced_Path
;
17
18
19
static
void
20
env_overr
(v,
e
)
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
51
ivars
( )
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
}
Spice_Path
char * Spice_Path
Definition:
ivars.c:11
misc.h
strcpy
char * strcpy()
Help_Path
char * Help_Path
Definition:
ivars.c:14
Spice_Exec_Dir
char * Spice_Exec_Dir
e
static double e
Definition:
vectors.c:17
p
FILE * p
Definition:
proc2mod.c:48
mkvar
static void mkvar(char **p, char *b, char *v, char *e)
Definition:
ivars.c:32
p
Definition:
cddefs.h:215
Default_MFB_Cap
char * Default_MFB_Cap
Definition:
ivars.c:13
getenv
char * getenv(char *c)
Definition:
libfuncs.c:106
Spice_Lib_Dir
char * Spice_Lib_Dir
env_overr
static void env_overr(char **v, char *e)
Definition:
ivars.c:20
tmalloc
char * tmalloc()
ivars
void ivars()
Definition:
ivars.c:51
Def_Editor
char * Def_Editor
AsciiRawFile
int AsciiRawFile
Bug_Addr
char * Bug_Addr
spice.h
News_File
char * News_File
Definition:
ivars.c:12
Spice_Host
char * Spice_Host
Sced_Path
char * Sced_Path
Definition:
ivars.c:16
Lib_Path
char * Lib_Path
Definition:
ivars.c:15
src
lib
misc
ivars.c
Generated by
1.8.11