situation in prod at 22.12.2009

startup.script_common

@@ -0,0 +1,43 @@
+# This is the common part of all startup scripts
+# It is included by all generated scripts
+
+# The following variables should be set before:
+# * IOC      the system name of the ioc
+# * INSTBASE where to boot from
+# * SLSBASE  alias for INSTBASE
+# * EPICS    the epics release (e.g "R3.13.9")
+# * ARCH     the vxWorks architecture (e.g. "T1-ppc604")
+
+# Accept SLSBASE or INSTBASE
+PBASE=0
+symFindByName(sysSymTbl,"INSTBASE",&PBASE,0)
+symFindByName(sysSymTbl,"SLSBASE",&PBASE,0)
+SLSBASE=*PBASE
+INSTBASE=*PBASE
+
+STRINGBUFFER=malloc(256)
+
+# set the prompt
+sprintf (STRINGBUFFER, "%s (startup.script aborted) > ", IOC)
+shellPromptSet (STRINGBUFFER)
+
+# create some path variables
+HOME=malloc(80)
+sprintf (HOME, "/ioc/%s", IOC)
+
+CFG=malloc(80)
+sprintf (CFG, "%s/cfg", HOME)
+
+STREAM_PROTOCOL_DIR=malloc(80)
+sprintf (STREAM_PROTOCOL_DIR, "%s/cfg", HOME)
+
+LIB=malloc(80)
+sprintf (LIB, "%s/iocBoot/%s/%s", INSTBASE, EPICS, ARCH)
+
+TEMPLATES=malloc(80)
+sprintf (TEMPLATES, "%s/iocBoot/templates", INSTBASE)
+
+#Load EPICS version dependent script
+sprintf (STRINGBUFFER, "%s/iocBoot/startup/%s", INSTBASE, EPICS)
+ioGlobalStdSet (0, open (STRINGBUFFER, 0, 0))
+#startup script contiues at <INSTBASE>/iocBoot/startup/<EPICS>