ca server installation

1996-06-20 00:28:19 +00:00
parent 14f53d7844
commit 4697f951b9
94 changed files with 18021 additions and 0 deletions
@@ -0,0 +1,182 @@
+//
+// fileDescriptorManager.process(delay);
+// (the name of the global symbol has leaked in here)
+//
+
+//
+// Example EPICS CA server
+//
+
+
+#include <exServer.h>
+#include <fdMgr.h>
+
+osiTime exServer::currentTime;
+
+const pvInfo exServer::pvList[] = {
+	pvInfo (1.0e-4, "jane", 10.0f, 0.0f, excasIoSync),
+	pvInfo (2.0, "fred", 10.0f, -10.0f, excasIoSync),
+	pvInfo (1.0e-4, "janet", 10.0f, 0.0f, excasIoAsync),
+	pvInfo (2.0, "freddy", 10.0f, -10.0f, excasIoAsync)
+};
+
+
+//
+// static data for exServer
+//
+gddAppFuncTable<exPV> exServer::ft;
+
+//
+// main()
+//
+int main (int argc, const char **argv)
+{
+	osiTime		delay(1u,0u);
+	exServer	*pCAS;
+
+	pCAS = new exServer(32u,5u,500u);
+	if (!pCAS) {
+		exit(-1);
+	}
+
+	if (argc > 1) {
+		if (strcmp(argv[1],"-d")) {
+			pCAS->setDebugLevel(10u);
+		}
+	}
+
+	while (aitTrue) {
+		//
+		//
+		//
+		fileDescriptorManager.process(delay);
+		exServer::updateCurrentTime();
+	}
+}
+
+void exServer::updateCurrentTime()
+{
+	exServer::currentTime = osiTime::getCurrent();
+}
+
+//
+// exServer::exServer()
+//
+exServer::exServer(unsigned pvMaxNameLength, unsigned pvCountEstimate, 
+	unsigned maxSimultaneousIO) :
+	caServer(pvMaxNameLength, pvCountEstimate, maxSimultaneousIO)
+{
+	exServer::updateCurrentTime();
+	ft.installReadFunc("status",exPV::getStatus);
+	ft.installReadFunc("severity",exPV::getSeverity);
+	ft.installReadFunc("seconds",exPV::getSeconds);
+	ft.installReadFunc("nanoseconds",exPV::getNanoseconds);
+	ft.installReadFunc("precision",exPV::getPrecision);
+	ft.installReadFunc("graphicHigh",exPV::getHighLimit);
+	ft.installReadFunc("graphicLow",exPV::getLowLimit);
+	ft.installReadFunc("controlHigh",exPV::getHighLimit);
+	ft.installReadFunc("controlLow",exPV::getLowLimit);
+	ft.installReadFunc("alarmHigh",exPV::getHighLimit);
+	ft.installReadFunc("alarmLow",exPV::getLowLimit);
+	ft.installReadFunc("alarmHighWarning",exPV::getHighLimit);
+	ft.installReadFunc("alarmLowWarning",exPV::getLowLimit);
+	ft.installReadFunc("units",exPV::getUnits);
+	ft.installReadFunc("value",exPV::getValue);
+}
+
+//
+// exServer::pvExistTest()
+//
+caStatus exServer::pvExistTest(const casCtx &ctxIn, const char *pPVName, 
+				gdd &canonicalPVName)
+{
+	const pvInfo	*pPVI;
+
+	pPVI = exServer::findPV(pPVName);
+	if (pPVI) {
+		if (pPVI->getIOType()==excasIoAsync) {
+			exAsyncExistIO	*pIO;
+			pIO = new exAsyncExistIO(pPVI, ctxIn, canonicalPVName);
+			if (pIO) {
+				return S_casApp_asyncCompletion;
+			}
+			else {
+				return S_casApp_noMemory;
+			}
+		}
+
+		/*
+		 * there are no name aliases in this
+		 * server's PV name syntax
+		 */
+		canonicalPVName.PutRef (&pPVI->getName());
+		return S_casApp_success;
+	}
+
+	return S_casApp_pvNotFound;
+}
+
+//
+// findPV()
+//
+const pvInfo *exServer::findPV(const char *pName)
+{
+	const pvInfo *pPVI;
+	const pvInfo *pPVAfter = 
+		&exServer::pvList[NELEMENTS(exServer::pvList)];
+
+	for (pPVI = exServer::pvList; pPVI < pPVAfter; pPVI++) {
+		if (strcmp (pName, pPVI->getName().String()) == '\0') {
+			return pPVI;
+		}
+	}
+	return NULL;
+}
+
+//
+// exServer::createPV()
+//
+casPV *exServer::createPV (const casCtx &ctxIn, const char *pPVName)
+{
+	const pvInfo	*pInfo;
+
+	pInfo = exServer::findPV(pPVName);
+	if (!pInfo) {
+		return NULL;
+	}
+
+	switch (pInfo->getIOType()){
+	case excasIoSync:
+		return new exSyncPV (ctxIn, *pInfo);
+	case excasIoAsync:
+		return new exAsyncPV (ctxIn, *pInfo);
+	default:
+		return NULL;
+	}
+}
+
+//
+// exServer::createPV()
+//
+void exServer::show (unsigned level)
+{
+	//
+	// server tool specific show code goes here
+	//
+
+	//
+	// print information about ca server libarary
+	// internals
+	//
+	this->caServer::show(level);
+}
+
+//
+// this is a noop that postpones the timer expiration
+// destroy so the exAsyncIO class will hang around until the
+// casAsyncIO::destroy() is called
+//
+void exAsyncIOTimer::destroy()
+{
+}
+