work on RAII and memory leaks

test/src/testPVAServer.cpp

@@ -0,0 +1,79 @@
+/*testExampleServerMain.cpp */
+/**
+ * Copyright - See the COPYRIGHT that is included with this distribution.
+ * EPICS pvData is distributed subject to a Software License Agreement found
+ * in file LICENSE that is included with this distribution.
+ */
+/**
+ * @author mrk
+ */
+
+/* Author: Marty Kraimer */
+
+#include <epicsUnitTest.h>
+#include <testMain.h>
+
+#include <cstddef>
+#include <cstdlib>
+#include <cstddef>
+#include <string>
+#include <cstdio>
+#include <memory>
+#include <iostream>
+
+#include <epicsStdio.h>
+#include <epicsMutex.h>
+#include <epicsEvent.h>
+#include <epicsThread.h>
+
+#include <pv/standardField.h>
+#include <pv/standardPVField.h>
+#include <pv/pvData.h>
+#include <pv/pvAccess.h>
+#include <pv/channelProviderLocal.h>
+#include <pv/serverContext.h>
+
+using namespace std;
+using std::tr1::static_pointer_cast;
+using namespace epics::pvData;
+using namespace epics::pvAccess;
+using namespace epics::pvDatabase;
+
+static bool debug = false;
+
+
+void test()
+{
+    PVDatabasePtr master = PVDatabase::getMaster();
+    ChannelProviderLocalPtr channelProvider = getChannelProviderLocal();
+    StandardPVFieldPtr standardPVField = getStandardPVField();
+    string properties;
+    ScalarType scalarType;
+    string recordName;
+    properties = "alarm,timeStamp";
+    scalarType = pvDouble;
+    recordName = "exampleDouble";
+    PVStructurePtr pvStructure;
+    pvStructure = standardPVField->scalar(scalarType,properties);
+    PVRecordPtr pvRecord = PVRecord::create(recordName,pvStructure);
+    master->addRecord(pvRecord);
+    pvRecord = master->findRecord("exampleDouble");
+    {
+        pvRecord->lock();
+        pvRecord->process();
+        pvRecord->unlock();
+    }
+    if(debug) {cout << "processed exampleDouble "  << endl; }
+    ServerContext::shared_pointer ctx =
+        startPVAServer("local",0,true,true);
+    testOk1(ctx.get()!=0);
+    ctx->destroy();
+}
+
+MAIN(testExampleServer)
+{
+    testPlan(1);
+    test();
+    return 0;
+}
+