new function streamSetLogfile to set debug log file in script or at run-time

streamApp/Makefile

@@ -60,10 +60,6 @@ endif
 
 PROD_LIBS += $(EPICS_BASE_IOC_LIBS)
 
-# Write StreamDevice debug output to this file
-# If unset output goes to stdout
-CPPFLAGS += -DDEBUGFILE=StreamDebug.log
-
 # switch off annoying rset warnings in 3.16+
 CPPFLAGS += -DUSE_TYPED_RSET
 
@@ -74,6 +70,6 @@ clean:
 else
 clean::
 endif
-	$(RM) core* StreamDebug.log
+	$(RM) core* *.log
 
 endif

streamApp/example.cmd

@@ -32,6 +32,9 @@ asynOctetSetOutputEos "terminal",0,"\r\n"
 #load the records
 dbLoadRecords "example.db","PREFIX=DZ"
 
+#log debug output to file
+#streamSetLogfile StreamDebug.log
+
 #lots(!) of debug output before iocInit
 #var streamDebug 1
 

streamApp/regexp.cmd

@@ -8,6 +8,9 @@ drvAsynIPPortConfigure web epics.web.psi.ch:80 0 1
 
 dbLoadRecords regexp.db
 
+#log debug output to file
+#streamSetLogfile StreamDebug.log
+
 iocInit
 #var streamDebug 1
 

streamApp/simple.cmd

@@ -14,7 +14,10 @@ drvAsynIPPortConfigure "L0", "localhost:40000"
 #load the records
 dbLoadRecords "simple.db","P=DZ,BUS=L0 28"
 
+#log debug output to file
+#streamSetLogfile StreamDebug.log
+
 iocInit
 
 #enable debug output
-var streamDebug 1
+#var streamDebug 1

streamApp/streamAppMain.cc

@@ -19,15 +19,9 @@
 
 #include "epicsThread.h"
 #include "iocsh.h"
-#include "devStream.h"
 
 int main(int argc,char *argv[])
 {
-#ifdef DEBUGFILE
-#define STR2(x) #x
-#define STR(x) STR2(x)
-    StreamDebugFile = fopen(STR(DEBUGFILE), "w");
-#endif
     if(argc>=2) {
         iocsh(argv[1]);
         epicsThreadSleep(.2);

streamApp/test.cmd

@@ -8,5 +8,10 @@ epicsEnvSet "STREAM_PROTOCOL_PATH", "."
 drvAsynIPPortConfigure "terminal", "localhost:40000"
 
 dbLoadRecords "test.db","P=TEST"
+
+#log debug output to file
+#streamSetLogfile StreamDebug.log
+
 iocInit
+
 #var streamDebug 1