#!../../bin/linux-arm/kstm

## You may have to change kstm to something else

## everywhere it appears in this file

< envPaths

epicsEnvSet EUROTH01_INET 141.14.128.45:4001 

epicsEnvSet EUROTH01_LINK EUROTH_01 

epicsEnvSet EUROTH02_INET 141.14.128.45:4002 

epicsEnvSet EUROTH02_LINK EUROTH_02 

epicsEnvSet MTM_INET 141.14.128.45:4004 

epicsEnvSet MTM_LINK MTM 

epicsEnvSet M1900_INET 141.14.128.45:4003 

epicsEnvSet M1900_LINK M1900 

epicsEnvSet PGC2_MC_INET 141.14.128.45:4005 

epicsEnvSet PGC2_MC_LINK PGC2_MC 

epicsEnvSet PGC2_PC_INET 141.14.128.45:4006 

epicsEnvSet PGC2_PC_LINK PGC2_PC 

cd "${TOP}"

epicsEnvSet "STREAM_PROTOCOL_PATH", "$(TOP)/db"

## Register all support components

dbLoadDatabase("dbd/kstm.dbd",0,0)

kstm_registerRecordDeviceDriver(pdbbase) 

drvAsynIPPortConfigure(${EUROTH01_LINK}, ${EUROTH01_INET}, 0, 0, 0)

drvAsynIPPortConfigure(${EUROTH02_LINK}, ${EUROTH02_INET}, 0, 0, 0)

drvAsynIPPortConfigure(${MTM_LINK}, ${MTM_INET}, 0, 0, 0)

drvAsynIPPortConfigure(${M1900_LINK}, ${M1900_INET}, 0, 0, 0)

drvAsynIPPortConfigure(${PGC2_MC_LINK}, ${PGC2_MC_INET}, 0, 0, 0)

drvAsynIPPortConfigure(${PGC2_PC_LINK}, ${PGC2_PC_INET}, 0, 0, 0)

# Set asyn trace IO format

#define ASYN_TRACEIO_NODATA 0x0000

#define ASYN_TRACEIO_ASCII 0x0001

#define ASYN_TRACEIO_ESCAPE 0x0002

#define ASYN_TRACEIO_HEX 0x0004

#asynSetTraceIOMask ${PGC2_MC_LINK} 0 1

# Set asyn trace masks

# ASYN_TRACE_ERROR    0x0001

# ASYN_TRACEIO_DEVICE 0x0002

# ASYN_TRACEIO_FILTER 0x0004

# ASYN_TRACEIO_DRIVER 0x0008

# ASYN_TRACE_FLOW     0x0010

#asynSetTraceMask ${PGC2_MC_LINK} 0 8

## Load record instances

dbLoadRecords("db/misc.db","P=FHI4KSTM, Q=MISC")

dbLoadTemplate("db/4kStmEuro.sub")

dbLoadRecords("db/mtm.db","PORT=MTM, P=FHI4KSTM, Q=MTM")

dbLoadRecords("db/M1900.db","PORT=M1900, P=FHI4KSTM, Q=M1900")

dbLoadRecords("db/pgc2.db","PORT=PGC2_MC, P=FHI4KSTM, Q=PGC2_MC")

dbLoadRecords("db/pgc2.db","PORT=PGC2_PC, P=FHI4KSTM, Q=PGC2_PC")

iocInit()

## Start any sequence programs

#seq snckstm,"user=heinz"