linse/sics
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Add SICS_Site, SICS_Version and SICS_Revision

Browse Source 
r3735 | dcl | 2012-09-17 17:09:48 +1000 (Mon, 17 Sep 2012) | 1 line
This commit is contained in:
Douglas Clowes
2012-09-17 17:09:48 +10:00
parent 6b482b29ec
commit 68edac83fc
2 changed files with 25 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
site_ansto/instrument/config/nexus/nxscripts_common_1.tcl
View File

@@ -1300,11 +1300,15 @@ foreach expt $::nexus::exports {
# objects name. It is useful for making links to datasets. # objects name. It is useful for making links to datasets.
# dim0 = vertical axis on detector # dim0 = vertical axis on detector
# dim1 = horizontal axis on detector # dim1 = horizontal axis on detector
set tmpstr [string map {"$" ""} {$Name: not supported by cvs2svn $}] ::utility::mkVar sics_site Text manager sics_site true entry true true
set nx_content_release_tag [lindex $tmpstr [expr [llength $tmpstr] - 1]] sics_site [SplitReply [SICS_Site]]
sics_site lock
::utility::mkVar sics_release Text manager sics_release true entry true true ::utility::mkVar sics_release Text manager sics_release true entry true true
sics_release $nx_content_release_tag sics_release [SplitReply [SICS_Version]]
sics_release lock sics_release lock
::utility::mkVar sics_revision Text manager sics_revision true entry true true
sics_revision [SplitReply [SICS_Revision]]
sics_revision lock
set tmpstr [string map {"$" ""} {$Revision: 1.51.2.14 $}] set tmpstr [string map {"$" ""} {$Revision: 1.51.2.14 $}]
set nx_content_revision_num [lindex $tmpstr [expr [llength $tmpstr] - 1]] set nx_content_revision_num [lindex $tmpstr [expr [llength $tmpstr] - 1]]

18
site_ansto/site_ansto.c
View File

@@ -69,6 +69,22 @@ extern void AddTCPMBProtocol ();
extern void AddLFGenProtocol(); extern void AddLFGenProtocol();
extern int ANSTO_MakeHistMemory(SConnection *pCon, SicsInterp *pSics, void *pData, int argc, char *argv[]); extern int ANSTO_MakeHistMemory(SConnection *pCon, SicsInterp *pSics, void *pData, int argc, char *argv[]);
int SICS_Site(SConnection *pCon, SicsInterp *pSics, void *pData, int argc, char *argv[])
{
char line[132];
snprintf(line, 132, "SICS_Site = ANSTO");
SCWrite(pCon, line, eValue);
return OKOK;
};
int SICS_Version(SConnection *pCon, SicsInterp *pSics, void *pData, int argc, char *argv[])
{
char line[132];
snprintf(line, 132, "SICS_Version = BRANCH-2.5");
SCWrite(pCon, line, eValue);
return OKOK;
};
int SICS_Revision(SConnection *pCon, SicsInterp *pSics, void *pData, int argc, char *argv[]) int SICS_Revision(SConnection *pCon, SicsInterp *pSics, void *pData, int argc, char *argv[])
{ {
char line[132]; char line[132];
@@ -125,6 +141,8 @@ static void AddCommands(SicsInterp *pInter)
AddCommand(pInter,"MakeLSSMonitor",LSSFactory,NULL,NULL); AddCommand(pInter,"MakeLSSMonitor",LSSFactory,NULL,NULL);
AddCommand(pInter,"MakeActionObject",ActionObjectFactory,NULL,NULL); AddCommand(pInter,"MakeActionObject",ActionObjectFactory,NULL,NULL);
AddCommand(pInter,"ANSTO_MakeHM",ANSTO_MakeHistMemory,NULL,NULL); AddCommand(pInter,"ANSTO_MakeHM",ANSTO_MakeHistMemory,NULL,NULL);
AddCommand(pInter,"SICS_Site",SICS_Site,NULL,NULL);
AddCommand(pInter,"SICS_Version",SICS_Version,NULL,NULL);
AddCommand(pInter,"SICS_Revision",SICS_Revision,NULL,NULL); AddCommand(pInter,"SICS_Revision",SICS_Revision,NULL,NULL);
} }
/*---------------------------------------------------------------------*/ /*---------------------------------------------------------------------*/