Update version numbers for release

Merge pull request #73 from epics-base/pvdbcr_changes
more work on special; all pvdbcr* redone
2021-07-02 15:49:24 -05:00 · 2021-04-14 11:20:46 -04:00 · 2021-04-14 10:26:30 -04:00 · 2021-04-12 12:19:35 -04:00 · 2021-04-12 09:30:50 -04:00 · 2021-04-08 07:03:56 -04:00
75 changed files with 1917 additions and 1405 deletions
--- a/2
+++ b/2
@@ -38,7 +38,7 @@ PROJECT_NAME           = pvDatabaseCPP
 # could be handy for archiving the generated documentation or if some version
 # control system is used.

-PROJECT_NUMBER         = 4.5.1
+PROJECT_NUMBER         = 4.6.0

 # Using the PROJECT_BRIEF tag one can provide an optional one line description
 # for a project that appears at the top of each page and should give viewer a
--- a/configure/CONFIG_PVDATABASE_VERSION
+++ b/configure/CONFIG_PVDATABASE_VERSION
@@ -1,8 +1,8 @@
 # Version number for the PV Database API and shared library

 EPICS_PVDATABASE_MAJOR_VERSION = 4
-EPICS_PVDATABASE_MINOR_VERSION = 5
-EPICS_PVDATABASE_MAINTENANCE_VERSION = 1
+EPICS_PVDATABASE_MINOR_VERSION = 6
+EPICS_PVDATABASE_MAINTENANCE_VERSION = 0

 # Development flag, set to zero for release versions

--- a/documentation/RELEASE_NOTES.md
+++ b/documentation/RELEASE_NOTES.md
@@ -2,6 +2,24 @@

 This document summarizes the changes to the module between releases.

+## Release 4.6.0 (EPICS 7.0.6, Jul 2021)
+
+* Access Security is now supported.
+* <b>special</b> has been revised and extended.
+* addRecord, removeRecord, processRecord, and traceRecord are replaced by pvdbcr versions.
+* <b>support</b> is DEPRECATED
+
+## Release 4.5.3 (EPICS 7.0.5, Feb 2021)
+
+* The previously deprecated destroy methods have been removed.
+  Any application code that was previously calling these can just remove
+  those calls.
+
+## Release 4.5.2 (EPICS 7.0.3.2, May 2020)
+
+* plugin support is new
+* fixed issues #53 and #52
+
 ## Release 4.5.1 (EPICS 7.0.3.1, Nov 2019)

 * addRecord is new.
--- a/documentation/TODO.md
+++ b/documentation/TODO.md
@@ -1,8 +0,0 @@
-TODO
-===========
-
-
-create more regression tests
----------------
-
-Currently only some simple tests exist. Most of the testing has been via the examples
--- a/documentation/pvDatabaseCPP.html
+++ b/documentation/pvDatabaseCPP.html
@@ -4,72 +4,66 @@
 <html xmlns="http://www.w3.org/1999/xhtml">
 <head>
  <meta http-equiv="content-type" content="text/html; charset=iso-8859-1" />
-  <title>pvDatabaseCPP</title>
+  <title>EPICS pvDatabaseCPP</title>
  <link rel="stylesheet" type="text/css"
-  href="http://epics-pvdata.sourceforge.net/base.css" />
+  href="https://mrkraimer.github.io/website/css/base.css" />
  <link rel="stylesheet" type="text/css"
-  href="http://epics-pvdata.sourceforge.net/epicsv4.css" />
+  href="https://mrkraimer.github.io/website/css/epicsv4.css" />
  <style type="text/css">
-  /*<![CDATA[*/
+/*<![CDATA[*/
     .about { margin-left: 3em; margin-right: 3em; font-size: .83em}
     table { margin-left: auto; margin-right: auto }
     .diagram { text-align: center; margin: 2.5em 0 }
-     span.opt { color: grey }
-     span.nterm { font-style:italic }
-     span.term { font-family:courier }
-     span.user { font-family:courier }
-     span.user:before { content:"<" }
-     span.user:after { content:">" }
-     .nonnorm { font-style:italic }
-     p.ed { color: #AA0000 }
-     span.ed { color: #AA0000 }
-     p.ed.priv { display: inline; }
-     span.ed.priv { display: inline; }
-  /*]]>*/</style>
-  <!-- Script that generates the Table of Contents -->
-  <script type="text/javascript"
-  src="http://epics-pvdata.sourceforge.net/script/tocgen.js">
- </script>
+     body { margin-right: 10% }
+/*]]>*/</style>
+
+ <!-- Script that generates the Table of Contents -->
+  <script type="text/javascript" src="https://mrkraimer.github.io/website/css/tocgen.js"></script>
+
 </head>

 <body>

 <div class="head">
-<h1>pvDatabaseCPP</h1>
-<h2 class="nocount">Release ? - TBD</h2>
-Latest update 2019.09.11.
-
+<h1>EPICS pvDatabaseCPP</h1>
+<h2 class="nocount">Release 4.6.0 - March 2021</h2>

 <h2 class="nocount">Abstract</h2>

-<p>This document describes pvDatabaseCPP,
-which is a framework for implementing a network accessible database of smart memory resident
+<p><b>pvDatabase</b> is a framework for implementing a network accessible database of smart memory resident
 records. Network access is via pvAccess. The data in each record is a top level PVStructure as defined by
 pvData. The framework includes a complete implementation of ChannelProvider as defined by pvAccess.
 The framework can be extended in order to create record instances that implements services.
 The minimum that an extension must provide is a top level PVStructure and a process method.
 </p>
+
  <!-- last para of Abstract is boilerplate reference to EPICS -->
      <p>For more information about EPICS generally, please refer to the home page of the <a
       href="http://www.aps.anl.gov/epics/">Experimental Physics and Industrial
      Control System</a>.</p>


-</div>
-
-<div id="toc">
-  <h2 class="nocount">Table of Contents</h2>
-</div>
+</div> <!-- head -->

 <div id="contents" class="contents">
 <hr />
-
 <h2>Overview</h2>
 <p>
+Documentation for pvDatabaseCPP is available at:
+<a
+href="https://mrkraimer.github.io/website/developerGuide/pvDatabase/pvDatabaseCPP.html">
+pvDatabase
+</a>
+</p>
+<p>
 pvDatabaseCPP is one of the components of
-EPICS Version 7
+<a href="https://epics-controls.org/resources-and-support/base/epics-7/">
+EPICS-7
+</a>
 </p>
 <p>This document is only a guide to help locate code and documentation related to pvDatabaseCPP
+</p>
+<p>
 It is intended for developers that want to use pvDatabaseCPP.
 </p>
 <h2>Developer Guide</h2>
@@ -79,204 +73,28 @@ href="https://mrkraimer.github.io/website/developerGuide/developerGuide.html">
 developerGuide
 </a>
 </p>
-<p>This guide discusses all the components that are part of an <b>EPICS V4</b> release.
+<p>This guide provides an overview of  the components that are part of an <b>EPICS V4</b> release.
 Some understanding of the components and how they are related is necessary in order to
 develop code that uses pvDatabaseCPP.
-In particular read everything related to pvDatabase.
-</p>
-<p>pvDatabase has plugin support, which is implemented in <b>pvCopy</b>.
-<b>pvCopy</b> was originally implemented in <b>pvDataCPP</b>,
-but pvDatabaseCPP now implements its own version and adds plugin support.
-</p>
-<p>
-See
-<a
-href="https://mrkraimer.github.io/website/pvRequest/pvRequest.html">
-pvRequest
-</a>
-for details.
-</p>
-<p>The developerGuide discusses code in a way that applies to both CPP and C++.
-For the descriptions of the CPP specific code consult the following sections.
+In particular read everything related to pvaClient.
 </p>

 <h2>doxygen</h2>
 <p>doxygen documentation is available at
 <a
-href="./html/index.html">doxgen</a>
+href="./html/index.html">doxygen</a>
 </p>

-<h2>pvDatabaseCPP</h2>
-<h3>include/pv</h3>
-<p>The header files that describe the various components implemented by pvDatabase.
-</p>
-<dl>
-   <dt>pvDatabase.h</dt>
-   <dd>
-    This describes PVRecord and PVDatabase.
-   </dd>
-   <dt>channelProviderLocal.h </dt>
-   <dd>
-    This describes a channel provider for PVDatabase
-   </dd>
-   <dt>pvSupport.h</dt>
-   <dd>
-    This is the base class for support attached to a field of a record.
-   </dd>
-   <dt>controlSupport.h</dt>
-   <dd>
-    This is support that implements control limits.
-   </dd>
-   <dt>scalarAlarmSupport.h</dt>
-   <dd>
-     This is support for a alarm limits for a scalar numeric field.
-   </dd>
-   <dt>processRecord.h</dt>
-   <dd>
-   This is a PVRecord that periodical processes a set of PVRecords in the local PVDatabase.
-   </dd>
-   <dt>addRecord.h</dt>
-   <dd>
-    This is a PVRecord that adds a new PVRecord to the local PVDatabase.
-   </dd>
-   <dt>removeRecord.h</dt>
-   <dd>
-    This is a PVRecord that removes a PVRecord in the local PVDatabase.
-   </dd>
-   <dt>traceRecord.h</dt>
-   <dd>
-    This is a PVRecord that sets the trace value for another PVRecord in the local PVDatabase.
-   </dd>
-   <dt>pvStructureCopy.h</dt>
-   <dd>
-    This is a facility that allows a client to access a subfield of the fields in a PVRecord.
-    It also provides record and field options an plugin support.
-   </dd>
-   <dt>pvPlugin.h</dt>
-   <dd>
-    This is the base class for a plugin attached to a record or field of PVRecord.
-   </dd>
-   <dt>pvArrayPlugin.h</dt>
-   <dd>
-     A plugin for accessing a subset of the elements in an array field.
-   </dd>
-   <dt>pvDeadbandPlugin.h</dt>
-   <dd>
-    A deadband plugin for monitors.
-   </dd>
-   <dt>pvTimestampPlugin.h</dt>
-   <dd>
-    A plugin for timeStamp.
-   </dd>
-</dl>
-<h3>src/database</h3>
-<p>This has the code that implements pvDatabase and pvRecord.</p>
-<h3>src/pvAccess</h3>
-<p>This has the code for the channel provider for pvDatabase.
-</p>
-<h3>src/support</h3>
-<p>This has the pvSupport code.</p>
-<h3>src/special</h3>
-<p>
-This has the code for processRecord, addRecord, removeRecord, and traceRecord.
-</p>
-<h3>src/copy</h3>
-<p>This has the code for pvStructureCopy and all the plugin support.
-</p> 
 <h2>exampleCPP</h2>
-<p>Example code is available as part of this release.
+<p>Example code is available at
 <a
 href="https://github.com/epics-base/exampleCPP">
 exampleCPP
 </a>
 </p>
-<p>In particular look at the example code mentioned in the following sub-sections.
+<p>In particular look at database, exampleLink, and helloPutGet.
 </p>

-<h3>database</h3>
-<p>This has many examples of how to create both soft records and records that implement
-other functionality.</p>
-<dl>
-   <dt>exampleDatabase.cpp</dt>
-     <dd>
-      This shows how to create soft records of each pvData type.<br />
-      In addition shows how to create instances of the following two records.
-     </dd>
-   <dt>exampleHelloRecord.cpp</dt>
-     <dd>
-       This is a simple "hello world" that is intentended to be used via a channelPutGet request.
-     </dd>
-   <dt>exampleHelloRPC.cpp</dt>
-     <dd>
-       This is a simple "hello world" that is intentended to be used via a channelRPC request.
-     </dd>
-   <dt>exampleDatabaseMain.cpp</dt>
-     <dd>
-      This shows how to create a standalone IOC.
-     </dd>
-   <dt>ioc and iocBoot</dt>
-     <dd>
-      This has code and examples to create a V3 IOC which also has a PVDatabase.
-     </dd>
-</dl>
-<h3>exampleLink</h3>
-<p>This shows how to implement a record that has a link to another record</p>
-<dl>
-  <dt>exampleMonitorLinkRecord</dt>
-     <dd>
-      This creates a monitor link to another record.
-     </dd>
-  <dt>exampleGetLinkRecord</dt>
-     <dd>
-      This creates a get link to another record.
-     </dd>
-  <dt>examplePutLinkRecord</dt>
-     <dd>
-      This creates a put link to another record.
-     </dd>
-</dl>
-
-<h3>support</h3>
-<p>This creates records that have the following features:</p>
-<dl>
-   <dt>value</dt>
-   <dd>
-    Each record has a value field the is a numeric scalar field.
-    In addition each has the following fields:
-    alarm,timeStamp,control,scalarAlarm, and display.
-   </dd>
-   <dt>support</dt>
-   <dd>
-     Each record uses the control and scalarAlarm support provided by pvDatabaseCPP.
-   </dd>
-</dl>
-<p>
-It also creates records that can be used by clients to show example of the plugin support.
-</p>
-
-<h2>iocshell commands</h2>
-<p>Shell commands are made available via the standard DBD include mechanism
-provided by iocCore.
-The following provide EPICS V4 shell commands:</p>
-<pre>
-pvAccessCPP
-qsrv
-pvDatabaseCPP
-</pre>
-
-<p>pvDatabaseCPP provides the following iocshell command.</p>
-<dl>
-   <dt>registerChannelProviderLocal</dt>
-     <dd>Including <b>registerChannelProviderLocal.dbd</b> as a dbd file automatically starts provider local
-      and also creates the pvdbl shell command.
-     </dd>
-   <dt>pvdbl</dt>
-      <dd>Provides a list of all the pvRecords in database <b>master</b>
-      </dd>
-</dl>
-<p>In addition any code that implements a PVRecord must implement an ioc command.
-Look at the examples in <b>exampleCPP/support</b> to see how to implement shell commands.</p>
-
-</div>
+</div> <!-- class="contents" -->
 </body>
 </html>
--- a/example/createdestroy/Makefile
+++ b/example/createdestroy/Makefile
@@ -0,0 +1,25 @@
+TOP=../..
+include $(TOP)/configure/CONFIG
+#----------------------------------------
+#  ADD MACRO DEFINITIONS AFTER THIS LINE
+#=============================
+
+#=============================
+# Build the application
+
+TESTPROD_HOST = createdestroy
+
+createdestroy_SRCS += createdestroy.cpp
+
+# Add all the support libraries needed by this application
+#pvatest_LIBS += xxx
+
+# Finally link to the EPICS Base libraries
+createdestroy_LIBS += pvDatabase pvAccess pvData
+createdestroy_LIBS += $(EPICS_BASE_IOC_LIBS)
+
+#===========================
+
+include $(TOP)/configure/RULES
+#----------------------------------------
+#  ADD RULES AFTER THIS LINE
--- a/example/createdestroy/README.md
+++ b/example/createdestroy/README.md
@@ -0,0 +1,20 @@
+# pvDatabaseCPP/example/createdestroy
+
+This is an example that:
+
+1) Gets the master PVDatabase
+2) Create ChannelProviderLocal
+3) Creates a ServerContext
+
+Then it executes a forever loop that:
+
+1) creates a pvRecord and adds it to the pvDatabase.
+2) creates a pvac::ClientProvider
+3) creates a pvac::ClientChannel
+4) creates a monitor on the channel
+5) runs a loop 10 times that: does a put to the channel, and then gets the data for any outstanding monitors
+6) removes the pvRecord from the pvDatabase
+
+It also has options to set trace level for the pvRecord and to periodically pause by asking for input.
+
+
--- a/example/createdestroy/createdestroy.cpp
+++ b/example/createdestroy/createdestroy.cpp
@@ -0,0 +1,179 @@
+/******************************************************************************
+* This is modeled after a test program created by Bertrand Bauvir from the ITER Organization
+******************************************************************************/
+#include <iostream>
+#include <epicsGetopt.h>
+
+#include <pv/pvData.h>
+#include <pv/pvDatabase.h>
+#include <pv/serverContext.h>
+#include <pv/channelProviderLocal.h>
+#include <pva/client.h>
+#include <epicsEvent.h>
+
+// Local header files
+
+// Constants
+
+#define DEFAULT_RECORD_NAME "examplechannel"
+
+using std::tr1::static_pointer_cast;
+
+class Record : public ::epics::pvDatabase::PVRecord
+{
+public:
+    std::shared_ptr<::epics::pvData::PVStructure> __pv;
+    static std::shared_ptr<Record> create (std::string const & name, std::shared_ptr<::epics::pvData::PVStructure> const & pvstruct);
+    Record (std::string const & name, std::shared_ptr<epics::pvData::PVStructure> const & pvstruct)
+      : epics::pvDatabase::PVRecord(name, pvstruct) { __pv = pvstruct; };
+    virtual void process (void);
+};
+
+std::shared_ptr<Record> Record::create (std::string const & name, std::shared_ptr<::epics::pvData::PVStructure> const & pvstruct)
+{
+  std::shared_ptr<Record> pvrecord (new Record (name, pvstruct));
+  // Need to be explicitly called .. not part of the base constructor
+  if(!pvrecord->init()) pvrecord.reset();
+  return pvrecord;
+}
+
+void Record::process (void)
+{
+  PVRecord::process();
+  std::string name = this->getRecordName();
+  std::cout << this->getRecordName()
+            << " process\n";
+}
+
+class MyMonitor
+{
+private:
+    std::tr1::shared_ptr<::pvac::MonitorSync> monitor;
+    MyMonitor(std::tr1::shared_ptr<::pvac::ClientChannel> const &channel)
+    {
+         monitor = std::tr1::shared_ptr<::pvac::MonitorSync>(new ::pvac::MonitorSync(channel->monitor()));
+    }
+public:
+    static std::tr1::shared_ptr<MyMonitor> create(std::tr1::shared_ptr<::pvac::ClientChannel> const &channel)
+    {
+         return std::tr1::shared_ptr<MyMonitor>(new MyMonitor(channel));
+    }
+    void getData();
+};
+
+void MyMonitor::getData()
+{
+    while (true) {
+       if(!monitor->wait(.001)) break;
+       switch(monitor->event.event) {
+            case pvac::MonitorEvent::Fail:
+                std::cerr<<monitor->name()<<" : Error : "<<monitor->event.message<<"\n";
+                return;
+            case pvac::MonitorEvent::Cancel:
+                std::cout<<monitor->name()<<" <Cancel>\n";
+                return;
+            case pvac::MonitorEvent::Disconnect:
+                std::cout<<monitor->name()<<" <Disconnect>\n";
+                return;
+            case pvac::MonitorEvent::Data:
+                while(monitor->poll()) {
+                    std::cout<<monitor->name()<<" : "<<monitor->root;
+                }
+                if(monitor->complete()) {
+                   return;
+                }
+        }
+    }
+}
+
+
+int main (int argc, char** argv)
+{
+  int verbose = 0;
+  unsigned loopctr = 0;
+  unsigned pausectr = 0;
+  bool allowExit = false;
+  bool callRecord = false;
+  bool callDatabase = false;
+  int opt;
+  while((opt = getopt(argc, argv, "v:ardh")) != -1) {
+      switch(opt) {
+          case 'v':
+             verbose = std::stoi(optarg);
+             break;
+          case 'a' :
+             allowExit = true;
+             break;
+          case 'r' :
+             callRecord = true;
+             break;
+          case 'd' :
+             callDatabase = true;
+             break;
+          case 'h':
+             std::cout << " -v level -a -r -d -h \n";
+             std::cout << "-r call pvRecord->remove -d call master->removeRecord\n";
+             std::cout << "default\n";
+             std::cout << "-v " << verbose
+                  << " -a  false"
+                  << " -d"
+                  << "\n";
+              return 0;
+          default:
+              std::cerr<<"Unknown argument: "<<opt<<"\n";
+              return -1;
+      }
+  }
+  if(!callRecord && !callDatabase) callDatabase = true;
+  ::epics::pvDatabase::PVDatabasePtr master = epics::pvDatabase::PVDatabase::getMaster();
+  ::epics::pvDatabase::ChannelProviderLocalPtr channelProvider = epics::pvDatabase::getChannelProviderLocal();
+  epics::pvAccess::ServerContext::shared_pointer context
+      = epics::pvAccess::startPVAServer(epics::pvAccess::PVACCESS_ALL_PROVIDERS, 0, true, true);
+  std::string startset("starting set of puts valuectr = ");
+
+  while (true) {
+      loopctr++;
+      std::string name = DEFAULT_RECORD_NAME + std::to_string(loopctr);
+
+      // Create record
+      // Create record structure
+      ::epics::pvData::FieldBuilderPtr builder = epics::pvData::getFieldCreate()->createFieldBuilder();
+      builder->add("value", ::epics::pvData::pvULong);
+      std::shared_ptr<::epics::pvData::PVStructure> pvstruct
+          = ::epics::pvData::getPVDataCreate()->createPVStructure(builder->createStructure());
+      std::shared_ptr<Record> pvrecord = Record::create(std::string(name), pvstruct);
+      master->addRecord(pvrecord);
+      pvrecord->setTraceLevel(verbose);
+      // Start PVA (local) client
+      std::tr1::shared_ptr<::pvac::ClientProvider> provider
+          = std::tr1::shared_ptr<::pvac::ClientProvider>(new ::pvac::ClientProvider ("pva"));
+      std::tr1::shared_ptr<::pvac::ClientChannel> channel
+          = std::tr1::shared_ptr<::pvac::ClientChannel>(new ::pvac::ClientChannel (provider->connect(name)));
+      std::tr1::shared_ptr<MyMonitor> mymonitor = MyMonitor::create(channel);
+      unsigned valuectr = loopctr;
+      std::cout << startset << loopctr << "\n";
+      for (int ind=0; ind<100; ind++) {
+          channel->put().set("value",valuectr++).exec();
+          mymonitor->getData();
+      }
+      pausectr++;
+      if(allowExit && pausectr>10) {
+          pausectr = 0;
+          std::cout << "Type exit to stop: \n";
+          int c = std::cin.peek();  // peek character
+          if ( c == EOF ) continue;
+          std::string str;
+          std::getline(std::cin,str);
+          if(str.compare("exit")==0) break;
+      }
+      if(callRecord) {
+std::cout << "callRecord\n";
+          pvrecord->remove();
+      }
+      if(callDatabase) {
+std::cout << "callDatabase\n";
+          master->removeRecord(pvrecord);
+      }
+  }
+  return (0);
+}
--- a/src/Makefile
+++ b/src/Makefile
@@ -3,15 +3,8 @@
 TOP = ..
 include $(TOP)/configure/CONFIG

-# needed for Windows
-LIB_SYS_LIBS_WIN32 += netapi32 ws2_32
-
 PVDATABASE_SRC = $(TOP)/src

-LIBRARY += pvDatabase
-
-# shared library ABI version.
-SHRLIB_VERSION ?= $(EPICS_PVDATABASE_MAJOR_VERSION).$(EPICS_PVDATABASE_MINOR_VERSION).$(EPICS_PVDATABASE_MAINTENANCE_VERSION)

 INC += pv/pvPlugin.h
 INC += pv/pvStructureCopy.h
@@ -23,23 +16,32 @@ INC += pv/pvDatabase.h

 INC += pv/channelProviderLocal.h

-INC += pv/traceRecord.h
-INC += pv/removeRecord.h
-INC += pv/addRecord.h
-INC += pv/processRecord.h
-
 INC += pv/pvSupport.h
 INC += pv/controlSupport.h
 INC += pv/scalarAlarmSupport.h

+INC += pv/pvdbcrScalarRecord.h
+INC += pv/pvdbcrScalarArrayRecord.h
+INC += pv/pvdbcrAddRecord.h
+INC += pv/pvdbcrRemoveRecord.h
+INC += pv/pvdbcrProcessRecord.h
+INC += pv/pvdbcrTraceRecord.h

 include $(PVDATABASE_SRC)/copy/Makefile
 include $(PVDATABASE_SRC)/database/Makefile
 include $(PVDATABASE_SRC)/pvAccess/Makefile
-include $(PVDATABASE_SRC)/special/Makefile
 include $(PVDATABASE_SRC)/support/Makefile
+include $(PVDATABASE_SRC)/special/Makefile

-pvDatabase_LIBS += $(EPICS_BASE_PVA_CORE_LIBS)
-pvDatabase_LIBS += $(EPICS_BASE_IOC_LIBS)
+LIBRARY += pvDatabase
+pvDatabase_LIBS += pvData
+pvDatabase_LIBS += pvAccess
+LIB_LIBS += Com
+
+# shared library ABI version.
+SHRLIB_VERSION ?= $(EPICS_PVDATABASE_MAJOR_VERSION).$(EPICS_PVDATABASE_MINOR_VERSION).$(EPICS_PVDATABASE_MAINTENANCE_VERSION)
+
+# needed for Windows
+LIB_SYS_LIBS_WIN32 += netapi32 ws2_32

 include $(TOP)/configure/RULES
--- a/src/copy/pvArrayPlugin.cpp
+++ b/src/copy/pvArrayPlugin.cpp
@@ -76,9 +76,19 @@ static vector<string> split(string const & colonSeparatedList) {

 PVArrayFilterPtr PVArrayFilter::create(
     const std::string & requestValue,
-     const PVFieldPtr & master)
+     const PVFieldPtr & masterField)
 {
-    Type type = master->getField()->getType();
+    bool masterIsUnion = false;
+    PVUnionPtr pvUnion;
+    Type type = masterField->getField()->getType();
+    if(type==epics::pvData::union_) {
+        pvUnion = std::tr1::static_pointer_cast<PVUnion>(masterField);
+        PVFieldPtr pvField = pvUnion->get();
+        if(pvField) {
+            masterIsUnion = true;
+            type = pvField->getField()->getType();
+        }
+    }
    if(type!=scalarArray) {
        PVArrayFilterPtr filter = PVArrayFilterPtr();
        return filter;
@@ -112,60 +122,82 @@ PVArrayFilterPtr PVArrayFilter::create(
        PVArrayFilterPtr filter = PVArrayFilterPtr();
        return filter;
    }
+    PVScalarArrayPtr masterArray;
+    if(masterIsUnion) {
+        masterArray = static_pointer_cast<PVScalarArray>(pvUnion->get());
+    } else {
+        masterArray = static_pointer_cast<PVScalarArray>(masterField);
+    }
    PVArrayFilterPtr filter =
         PVArrayFilterPtr(
-             new PVArrayFilter(
-                 start,increment,end,static_pointer_cast<PVScalarArray>(master))); 
+             new PVArrayFilter(start,increment,end,masterField,masterArray));
    return filter;
 }

-PVArrayFilter::PVArrayFilter(long start,long increment,long end,const PVScalarArrayPtr & masterArray)
+PVArrayFilter::PVArrayFilter(
+    long start,long increment,long end,
+    const PVFieldPtr & masterField,
+    const epics::pvData::PVScalarArrayPtr masterArray)
 : start(start),
  increment(increment),
  end(end),
+  masterField(masterField),
  masterArray(masterArray)
 {
 }


-bool PVArrayFilter::filter(const PVFieldPtr & pvCopy,const BitSetPtr & bitSet,bool toCopy)
+bool PVArrayFilter::filter(const PVFieldPtr & pvField,const BitSetPtr & bitSet,bool toCopy)
 {
-    PVScalarArrayPtr copyArray = static_pointer_cast<PVScalarArray>(pvCopy);
+    PVFieldPtr pvCopy = pvField;
+    PVScalarArrayPtr copyArray;
+    bool isUnion = false;
+    Type type = masterField->getField()->getType();
+    if(type==epics::pvData::union_) {
+        isUnion = true;
+        PVUnionPtr pvMasterUnion = std::tr1::static_pointer_cast<PVUnion>(masterField);
+        PVUnionPtr pvCopyUnion = std::tr1::static_pointer_cast<PVUnion>(pvCopy);
+        if(toCopy) pvCopyUnion->copy(*pvMasterUnion);
+        PVFieldPtr pvField = pvCopyUnion->get();
+        copyArray = static_pointer_cast<PVScalarArray>(pvField);
+    } else {
+       copyArray = static_pointer_cast<PVScalarArray>(pvCopy);
+    }
    long len = 0;
    long start = this->start;
    long end = this->end;
    long no_elements = masterArray->getLength();
    if(start<0) {
-    	start = no_elements+start;
-    	if(start<0) start = 0;
+        start = no_elements+start;
+        if(start<0) start = 0;
    }
    if (end < 0) {
-    	end = no_elements + end;
-    	if (end < 0) end = 0;
+        end = no_elements + end;
+        if (end < 0) end = 0;

    }
-    if(toCopy) {	
-    	if (end >= no_elements) end = no_elements - 1;
-    	if (end - start >= 0) len = 1 + (end - start) / increment;
-    	if(len<=0 || start>=no_elements) {
-    		copyArray->setLength(0);
-    		return true;
-    	}
-    	long indfrom = start;
-    	long indto = 0;
-    	copyArray->setCapacity(len);
-    	if(increment==1) {
+    if(toCopy) {
+        if (end >= no_elements) end = no_elements - 1;
+        if (end - start >= 0) len = 1 + (end - start) / increment;
+        if(len<=0 || start>=no_elements) {
+            copyArray->setLength(0);
+            return true;
+        }
+        long indfrom = start;
+        long indto = 0;
+        copyArray->setCapacity(len);
+        if(increment==1) {
            copy(*masterArray,indfrom,1,*copyArray,indto,1,len);
-    	} else {
-    	    for(long i=0; i<len; ++i) {
-    	        copy(*masterArray,indfrom,1,*copyArray,indto,1,1);
-    	        indfrom += increment;
-    	         indto += 1;
-    	    }
-    	}
-    	copyArray->setLength(len);
-    	bitSet->set(pvCopy->getFieldOffset());
-    	return true;
+        } else {
+            for(long i=0; i<len; ++i) {
+                copy(*masterArray,indfrom,1,*copyArray,indto,1,1);
+                indfrom += increment;
+                 indto += 1;
+            }
+        }
+        copyArray->setLength(len);
+        bitSet->set(pvField->getFieldOffset());
+        return true;
    }
    if (end - start >= 0) len = 1 + (end - start) / increment;
    if(len<=0) return true;
@@ -173,21 +205,21 @@ bool PVArrayFilter::filter(const PVFieldPtr & pvCopy,const BitSetPtr & bitSet,bo
    long indfrom = 0;
    long indto = start;
    if(increment==1) {
-    	copy(*copyArray,indfrom,1,*masterArray,indto,1,len);
+        copy(*copyArray,indfrom,1,*masterArray,indto,1,len);
    } else {
-    	for(long i=0; i<len; ++i) {
-    	    copy(*copyArray,indfrom,1,*masterArray,indto,1,1);
-    	    indfrom += 1;
-    	     indto += increment;
-    	}
+        for(long i=0; i<len; ++i) {
+            copy(*copyArray,indfrom,1,*masterArray,indto,1,1);
+            indfrom += 1;
+             indto += increment;
+        }
    }
+    if(isUnion) masterField->postPut();
    return true;
 }

 string PVArrayFilter::getName()
 {
-	return name;
+    return name;
 }

 }}
-
--- a/src/copy/pvCopy.cpp
+++ b/src/copy/pvCopy.cpp
@@ -29,7 +29,7 @@ using std::endl;
 using std::vector;
 using namespace epics::pvData;

-namespace epics { namespace pvCopy { 
+namespace epics { namespace pvCopy {

 /**
 * Convenience method for implementing dump.
@@ -60,19 +60,19 @@ struct CopyNode {
    PVStructurePtr options;
    vector<PVFilterPtr> pvFilters;
 };
-    
+
 static CopyNodePtr NULLCopyNode;

 typedef std::vector<CopyNodePtr> CopyNodePtrArray;
 typedef std::tr1::shared_ptr<CopyNodePtrArray> CopyNodePtrArrayPtr;
-    
+
 struct CopyStructureNode : public  CopyNode {
    CopyNodePtrArrayPtr nodes;
 };

 PVCopyPtr PVCopy::create(
-    PVStructurePtr const &pvMaster, 
-    PVStructurePtr const &pvRequest, 
+    PVStructurePtr const &pvMaster,
+    PVStructurePtr const &pvRequest,
    string const & structureName)
 {
    PVStructurePtr pvStructure(pvRequest);
@@ -114,7 +114,7 @@ PVStructurePtr PVCopy::createPVStructure()
        cacheInitStructure.reset();
        return save;
    }
-    PVStructurePtr pvStructure = 
+    PVStructurePtr pvStructure =
        getPVDataCreate()->createPVStructure(structure);
    return pvStructure;
 }
@@ -244,7 +244,7 @@ void PVCopy::updateMasterCheckBitSet(
        bitSet->clear(nextSet);
        PVStructurePtr pv = static_pointer_cast<PVStructure>(pvField);
        PVFieldPtrArray pvFieldArray = pv->getPVFields();
-        for(size_t i=0; i>pvFieldArray.size(); ++i) {
+        for(size_t i=0; i<pvFieldArray.size(); ++i) {
            PVFieldPtr pvField = pvFieldArray[i];
            bitSet->set(pvField->getFieldOffset());
        }
@@ -296,7 +296,7 @@ void PVCopy::updateMaster(
        bitSet->clear(nextSet);
    }
 }
- 
+
 PVStructurePtr PVCopy::getOptions(std::size_t fieldOffset)
 {
    if(fieldOffset==0) return headNode->options;
@@ -414,7 +414,7 @@ void PVCopy::updateCopyFromBitSet(
    size_t offset = structureNode->structureOffset;
    size_t nextSet = bitSet->nextSetBit(offset);
    if(nextSet==string::npos) return;
-    if(offset>=pvCopy->getNextFieldOffset()) return;  
+    if(offset>=pvCopy->getNextFieldOffset()) return;
    PVStructurePtr pvCopyStructure = static_pointer_cast<PVStructure>(pvCopy);
    PVFieldPtrArray const & pvCopyFields = pvCopyStructure->getPVFields();
    for(size_t i=0; i<pvCopyFields.size(); ++i) {
@@ -428,11 +428,6 @@ PVCopy::PVCopy(
 {
 }

-void PVCopy::destroy()
-{
-    headNode.reset();
-}
-
 bool PVCopy::init(epics::pvData::PVStructurePtr const &pvRequest)
 {
    PVStructurePtr pvMasterStructure = pvMaster;
@@ -529,9 +524,9 @@ CopyNodePtr PVCopy::createStructureNodes(
    for(size_t i=0; i<number; i++) {
        PVFieldPtr copyPVField = copyPVFields[i];
        string fieldName = copyPVField->getFieldName();
-        PVStructurePtr requestPVStructure = 
+        PVStructurePtr requestPVStructure =
             pvFromRequest->getSubField<PVStructure>(fieldName);
-        PVStructurePtr pvSubFieldOptions = 
+        PVStructurePtr pvSubFieldOptions =
            requestPVStructure->getSubField<PVStructure>("_options");
        PVFieldPtr pvMasterField = pvMasterStructure->getSubField(fieldName);
        if(!pvMasterField) {
@@ -641,14 +636,14 @@ void PVCopy::initPlugin(

 void PVCopy::traverseMasterInitPlugin()
 {
-    traverseMasterInitPlugin(headNode); 
+    traverseMasterInitPlugin(headNode);
 }

 void PVCopy::traverseMasterInitPlugin(CopyNodePtr const & node)
 {
    PVFieldPtr pvField = node->masterPVField;
    PVStructurePtr pvOptions = node->options;
-    if(pvOptions) initPlugin(node,pvOptions,pvField);	
+    if(pvOptions) initPlugin(node,pvOptions,pvField);
    if(!node->isStructure) return;
    CopyStructureNodePtr structureNode = static_pointer_cast<CopyStructureNode>(node);
    CopyNodePtrArrayPtr nodes = structureNode->nodes;
@@ -667,7 +662,7 @@ CopyNodePtr PVCopy::getCopyOffset(
        CopyNodePtr node = (*nodes)[i];
        if(!node->isStructure) {
            size_t off = node->masterPVField->getFieldOffset();
-            size_t nextOffset = node->masterPVField->getNextFieldOffset(); 
+            size_t nextOffset = node->masterPVField->getNextFieldOffset();
            if(offset>= off && offset<nextOffset) return node;
        } else {
            CopyStructureNodePtr subNode =
@@ -710,7 +705,7 @@ void PVCopy::setIgnore(CopyNodePtr const &node) {
         CopyNodePtrArrayPtr nodes = structureNode->nodes;
         for(size_t i=0; i<nodes->size(); ++i) {
            CopyNodePtr node = (*nodes)[i];
-            setIgnore(node);		}
+            setIgnore(node);        }
    } else {
        size_t num = node->masterPVField->getNumberFields();
        if(num>1) {
--- a/src/copy/pvDeadbandPlugin.cpp
+++ b/src/copy/pvDeadbandPlugin.cpp
@@ -82,7 +82,7 @@ PVDeadbandFilterPtr PVDeadbandFilter::create(
    PVDeadbandFilterPtr filter =
         PVDeadbandFilterPtr(
             new PVDeadbandFilter(
-                 absolute,deadband,static_pointer_cast<PVScalar>(master))); 
+                 absolute,deadband,static_pointer_cast<PVScalar>(master)));
    return filter;
 }

@@ -91,7 +91,7 @@ PVDeadbandFilter::PVDeadbandFilter(bool absolute,double deadband,PVScalarPtr con
  deadband(deadband),
  master(master),
  firstTime(true),
-  lastReportedValue(0.0) 
+  lastReportedValue(0.0)
 {
 }

@@ -128,8 +128,7 @@ bool PVDeadbandFilter::filter(const PVFieldPtr & pvCopy,const BitSetPtr & bitSet

 string PVDeadbandFilter::getName()
 {
-	return name;
+    return name;
 }

 }}
-
--- a/src/copy/pvPlugin.cpp
+++ b/src/copy/pvPlugin.cpp
@@ -14,7 +14,7 @@

 using namespace epics::pvData;

-namespace epics { namespace pvCopy{ 
+namespace epics { namespace pvCopy{

 typedef std::map<std::string,PVPluginPtr> PVPluginMap;

@@ -38,4 +38,3 @@ PVPluginPtr PVPluginRegistry::find(const std::string & name)
 }

 }}
-
--- a/src/copy/pvTimestampPlugin.cpp
+++ b/src/copy/pvTimestampPlugin.cpp
@@ -89,7 +89,7 @@ PVTimestampFilter::PVTimestampFilter(bool current,bool copy,PVFieldPtr const & m

 bool PVTimestampFilter::filter(const PVFieldPtr & pvCopy,const BitSetPtr & bitSet,bool toCopy)
 {
-    if(current) {	
+    if(current) {
        timeStamp.getCurrent();
        if(toCopy) {
            if(!pvTimeStamp.attach(pvCopy)) return false;
@@ -100,7 +100,7 @@ bool PVTimestampFilter::filter(const PVFieldPtr & pvCopy,const BitSetPtr & bitSe
        bitSet->set(pvCopy->getFieldOffset());
        return true;
     }
-     if(copy) {	
+     if(copy) {
        if(toCopy) {
            if(!pvTimeStamp.attach(master)) return false;
            pvTimeStamp.get(timeStamp);
@@ -120,8 +120,7 @@ bool PVTimestampFilter::filter(const PVFieldPtr & pvCopy,const BitSetPtr & bitSe

 string PVTimestampFilter::getName()
 {
-	return name;
+    return name;
 }

 }}
-
--- a/src/database/pvDatabase.cpp
+++ b/src/database/pvDatabase.cpp
@@ -44,7 +44,7 @@ PVDatabasePtr PVDatabase::getMaster()
        PVArrayPlugin::create();
        PVTimestampPlugin::create();
        PVDeadbandPlugin::create();
-    }    
+    }
    return pvDatabaseMaster;
 }

@@ -56,14 +56,6 @@ PVDatabase::PVDatabase()
 PVDatabase::~PVDatabase()
 {
    if(DEBUG_LEVEL>0) cout << "PVDatabase::~PVDatabase()\n";
-    size_t len = recordMap.size();
-    shared_vector<string> names(len);
-    PVRecordMap::iterator iter;
-    size_t i = 0;
-    for(iter = recordMap.begin(); iter!=recordMap.end(); ++iter) {
-        names[i++] = (*iter).first;
-    }
-    for(size_t i=0; i<len; ++i) removeRecord(findRecord(names[i]));
 }

 void PVDatabase::lock() {
@@ -100,17 +92,28 @@ bool PVDatabase::addRecord(PVRecordPtr const & record)
    return true;
 }

-bool PVDatabase::removeRecord(PVRecordPtr const & record)
+PVRecordWPtr PVDatabase::removeFromMap(PVRecordPtr const & record)
 {
-    if(record->getTraceLevel()>0) {
-        cout << "PVDatabase::removeRecord " << record->getRecordName() << endl;
-    }
    epicsGuard<epics::pvData::Mutex> guard(mutex);
    string recordName = record->getRecordName();
    PVRecordMap::iterator iter = recordMap.find(recordName);
    if(iter!=recordMap.end())  {
        PVRecordPtr pvRecord = (*iter).second;
        recordMap.erase(iter);
+        return pvRecord->shared_from_this();
+    }
+    return PVRecordWPtr();
+}
+
+bool PVDatabase::removeRecord(PVRecordPtr const & record)
+{
+    if(record->getTraceLevel()>0) {
+        cout << "PVDatabase::removeRecord " << record->getRecordName() << endl;
+    }
+    epicsGuard<epics::pvData::Mutex> guard(mutex);
+    PVRecordWPtr pvRecord = removeFromMap(record);
+    if(pvRecord.use_count()!=0) {
+        pvRecord.lock()->unlistenClients();
        return true;
    }
    return false;
--- a/src/database/pvRecord.cpp
+++ b/src/database/pvRecord.cpp
@@ -37,9 +37,11 @@ namespace epics { namespace pvDatabase {

 PVRecordPtr PVRecord::create(
    string const &recordName,
-    PVStructurePtr const & pvStructure)
+    PVStructurePtr const & pvStructure,
+    int asLevel,
+    const std::string& asGroup)
 {
-    PVRecordPtr pvRecord(new PVRecord(recordName,pvStructure));
+    PVRecordPtr pvRecord(new PVRecord(recordName,pvStructure,asLevel,asGroup));
    if(!pvRecord->init()) {
        pvRecord.reset();
    }
@@ -49,73 +51,29 @@ PVRecordPtr PVRecord::create(

 PVRecord::PVRecord(
    string const & recordName,
-    PVStructurePtr const & pvStructure)
+    PVStructurePtr const & pvStructure,
+    int asLevel_,
+    const std::string& asGroup_)
 : recordName(recordName),
  pvStructure(pvStructure),
  depthGroupPut(0),
  traceLevel(0),
-  isAddListener(false)
+  isAddListener(false),
+  asLevel(asLevel_),
+  asGroup(asGroup_)
 {
 }

-void PVRecord::notifyClients()
-{
-    {
-        epicsGuard<epics::pvData::Mutex> guard(mutex);
-        if(traceLevel>0) {
-            cout << "PVRecord::notifyClients() " << recordName 
-                 << endl;
-        }
-    }
-    pvTimeStamp.detach();
-    for(std::list<PVListenerWPtr>::iterator iter = pvListenerList.begin();
-         iter!=pvListenerList.end();
-         iter++ )
-    {
-        PVListenerPtr listener = iter->lock();
-        if(!listener) continue;
-        if(traceLevel>0) {
-            cout << "PVRecord::notifyClients() calling listener->unlisten " 
-                 << recordName << endl;
-        }
-        listener->unlisten(shared_from_this());
-    }
-    pvListenerList.clear();
-    for (std::list<PVRecordClientWPtr>::iterator iter = clientList.begin();
-         iter!=clientList.end();
-         iter++ )
-    {
-        PVRecordClientPtr client = iter->lock();
-        if(!client) continue;
-        if(traceLevel>0) {
-            cout << "PVRecord::notifyClients() calling client->detach "
-                 << recordName << endl;
-        }
-        client->detach(shared_from_this());
-    }
-    if(traceLevel>0) {
-        cout << "PVRecord::notifyClients() calling clientList.clear() " 
-             << recordName << endl;
-    }
-    clientList.clear();
-    if(traceLevel>0) {
-        cout << "PVRecord::notifyClients() returning " << recordName << endl;
-    }
-}
-
 PVRecord::~PVRecord()
 {
    if(traceLevel>0) {
        cout << "~PVRecord() " << recordName << endl;
    }
-    notifyClients();
 }

-void PVRecord::remove()
+void PVRecord::unlistenClients()
 {
-    PVDatabasePtr pvDatabase(PVDatabase::getMaster());
-    if(pvDatabase) pvDatabase->removeRecord(shared_from_this());
-    pvTimeStamp.detach();     
+    epicsGuard<epics::pvData::Mutex> guard(mutex);
    for(std::list<PVListenerWPtr>::iterator iter = pvListenerList.begin();
         iter!=pvListenerList.end();
         iter++ )
@@ -142,6 +100,19 @@ void PVRecord::remove()
    clientList.clear();
 }

+
+void PVRecord::remove()
+{
+    if(traceLevel>0) {
+            cout << "PVRecord::remove() " << recordName << endl;
+    }
+    unlistenClients();
+    epicsGuard<epics::pvData::Mutex> guard(mutex);
+    PVDatabasePtr pvDatabase(PVDatabase::getMaster());
+    if(pvDatabase) pvDatabase->removeFromMap(shared_from_this());
+    pvTimeStamp.detach();
+}
+
 void PVRecord::initPVRecord()
 {
    PVRecordStructurePtr parent;
@@ -283,7 +254,7 @@ void PVRecord::nextMasterPVField(PVFieldPtr const & pvField)
     PVRecordFieldPtr pvRecordField = findPVRecordField(pvField);
     PVListenerPtr listener = pvListener.lock();
     if(!listener.get()) return;
-     if(isAddListener) {         
+     if(isAddListener) {
         pvRecordField->addListener(listener);
     } else {
         pvRecordField->removeListener(listener);
@@ -412,7 +383,7 @@ bool PVRecordField::addListener(PVListenerPtr const & pvListener)

 void PVRecordField::removeListener(PVListenerPtr const & pvListener)
 {
-    PVRecordPtr pvRecord(this->pvRecord.lock());   
+    PVRecordPtr pvRecord(this->pvRecord.lock());
    if(pvRecord && pvRecord->getTraceLevel()>1) {
         cout << "PVRecordField::removeListener() " << getFullName() << endl;
    }
@@ -454,7 +425,7 @@ void PVRecordField::postSubField()
 {
    callListener();
    if(isStructure) {
-        PVRecordStructurePtr pvrs = 
+        PVRecordStructurePtr pvrs =
            static_pointer_cast<PVRecordStructure>(shared_from_this());
        PVRecordFieldPtrArrayPtr pvRecordFields = pvrs->getPVRecordFields();
        PVRecordFieldPtrArray::iterator iter;
@@ -494,7 +465,7 @@ void PVRecordStructure::init()
    PVRecordStructurePtr self =
        static_pointer_cast<PVRecordStructure>(shared_from_this());
    PVRecordPtr pvRecord = getPVRecord();
-    for(size_t i=0; i<numFields; i++) {    
+    for(size_t i=0; i<numFields; i++) {
        PVFieldPtr pvField = pvFields[i];
        if(pvField->getField()->getType()==structure) {
             PVStructurePtr xxx = static_pointer_cast<PVStructure>(pvField);
--- a/src/pv/addRecord.h
+++ b/src/pv/addRecord.h
@@ -1,63 +0,0 @@
-/* addRecord.h */
-/**
- * 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
- * @date 2013.04.18
- */
-#ifndef ADDRECORD_H
-#define ADDRECORD_H
-
-#include <pv/channelProviderLocal.h>
-
-#include <shareLib.h>
-
-namespace epics { namespace pvDatabase { 
-
-
-class AddRecord;
-typedef std::tr1::shared_ptr<AddRecord> AddRecordPtr;
-
-/**
- * @brief Add another record in the same database.
- *
- * A record to add another record
- * It is meant to be used via a channelPutGet request.
- * The argument has one field: recordName.
- * The result has a field named status.
- */
-class epicsShareClass AddRecord :
-    public PVRecord
-{
-public:
-    POINTER_DEFINITIONS(AddRecord);
-    /**
-     * Factory methods to create AddRecord.
-     * @param recordName The name for the AddRecord.
-     * @return A shared pointer to AddRecord..
-     */
-    static AddRecordPtr create(
-        std::string const & recordName);
-    /**
-     * standard init method required by PVRecord
-     * @return true unless record name already exists.
-     */
-    virtual bool init();
-    /**
-     * @brief Add the record specified by  recordName.
-     */
-    virtual void process();
-private:
-    AddRecord(
-        std::string const & recordName,
-        epics::pvData::PVStructurePtr const & pvStructure);
-    epics::pvData::PVStringPtr pvRecordName;
-    epics::pvData::PVStringPtr pvResult;
-};
-
-}}
-
-#endif  /* ADDRECORD_H */
--- a/src/pv/channelProviderLocal.h
+++ b/src/pv/channelProviderLocal.h
@@ -27,8 +27,9 @@
 #include <pv/pvDatabase.h>

 #include <shareLib.h>
+#include <asLib.h>

-namespace epics { namespace pvDatabase { 
+namespace epics { namespace pvDatabase {

 class ChannelProviderLocal;
 typedef std::tr1::shared_ptr<ChannelProviderLocal> ChannelProviderLocalPtr;
@@ -58,6 +59,19 @@ class epicsShareClass ChannelProviderLocal :
 {
 public:
    POINTER_DEFINITIONS(ChannelProviderLocal);
+    /**
+     * @brief Initialize access security configuration
+     * @param filePath AS definition file path 
+     * @param substitutions macro substitutions
+     * @throws std::runtime_error in case of configuration problem 
+     */
+    static void initAs(const std::string& filePath, const std::string& substitutions="");
+    /**
+     * @brief Is access security active?
+     * @return true is AS is active
+     */
+    static bool isAsActive();
+
    /**
     * @brief Constructor
     */
@@ -66,11 +80,6 @@ public:
     * @brief Destructor
     */
    virtual ~ChannelProviderLocal();
-    /**
-     * @brief DEPRECATED
-     *
-     */
-    virtual void destroy(){};
    /**
     * @brief Returns the channel provider name.
     *
@@ -93,7 +102,7 @@ public:
    virtual epics::pvAccess::ChannelFind::shared_pointer channelFind(
        std::string const &channelName,
        epics::pvAccess::ChannelFindRequester::shared_pointer const & channelFindRequester);
-    /** 
+    /**
     * @brief Calls method channelListRequester::channelListResult.
     *
     * This provides the caller with a list of the record names on the PVDatabase.
@@ -101,7 +110,7 @@ public:
     * @param channelListRequester The client callback.
     * @return shared pointer to ChannelFind.
     * The interface for SyncChannelFind is defined by pvAccessCPP.
-     */ 
+     */
    virtual epics::pvAccess::ChannelFind::shared_pointer channelList(
        epics::pvAccess::ChannelListRequester::shared_pointer const & channelListRequester);
    /**
@@ -163,6 +172,7 @@ private:
    friend class ChannelProviderLocalRun;
 };

+
 /**
 * @brief Channel for accessing a PVRecord.
 *
@@ -186,28 +196,23 @@ public:
        epics::pvAccess::ChannelRequester::shared_pointer const & requester,
        PVRecordPtr const & pvRecord
    );
-    /** 
+    /**
     * @brief Destructor
     */
    virtual ~ChannelLocal();
-    /** 
-     * @brief DEPRECATED
-     *
-     */
-    virtual void destroy() {};
-    /** 
+    /**
     * @brief Detach from the record.
     *
     * This is called when a record is being removed from the database.
     * @param pvRecord The record being removed.
     */
    virtual void detach(PVRecordPtr const &pvRecord);
-    /** 
+    /**
     * @brief Get the requester name.
     * @return returns the name of the channel requester.
     */
    virtual std::string getRequesterName();
-    /** 
+    /**
     * @brief Passes the message to the channel requester.
     * @param message The message.
     * @param messageType The message type.
@@ -215,37 +220,37 @@ public:
    virtual void message(
        std::string const & message,
        epics::pvData::MessageType messageType);
-    /** 
+    /**
     * @brief Get the channel provider
     * @return The provider.
     */
    virtual epics::pvAccess::ChannelProvider::shared_pointer getProvider();
-    /** 
+    /**
     * @brief Get the remote address
     * @return <b>local</b>
     */
    virtual std::string getRemoteAddress();
-    /** 
+    /**
     * Get the connection state.
     * @return Channel::CONNECTED.
     */
    virtual epics::pvAccess::Channel::ConnectionState getConnectionState();
-    /** 
+    /**
     * @brief Get the channel name.
     * @return the record name.
     */
    virtual std::string getChannelName();
-    /** 
+    /**
     * @brief Get the channel requester
     * @return The channel requester.
     */
    virtual epics::pvAccess::ChannelRequester::shared_pointer getChannelRequester();
-    /** 
+    /**
     * @brief Is the channel connected?
     * @return true.
     */
    virtual bool isConnected();
-    /** 
+    /**
     * @brief Get the introspection interface for subField.
     *
     * The introspection interface is given via GetFieldRequester::getDone.
@@ -257,14 +262,14 @@ public:
    virtual void getField(
        epics::pvAccess::GetFieldRequester::shared_pointer const &requester,
        std::string const & subField);
-    /** 
+    /**
     * Get the access rights for the record.
     * This throws an exception because it is assumed that access rights are
     * handled by a higher level.
     */
    virtual epics::pvAccess::AccessRights getAccessRights(
        epics::pvData::PVField::shared_pointer const &pvField);
-    /** 
+    /**
     * @brief Create a channelProcess.
     *
     * @param requester The client callback.
@@ -275,9 +280,9 @@ public:
    virtual epics::pvAccess::ChannelProcess::shared_pointer createChannelProcess(
        epics::pvAccess::ChannelProcessRequester::shared_pointer const &requester,
        epics::pvData::PVStructurePtr const &pvRequest);
-    /** 
+    /**
     * @brief Create a channelGet.
-     * 
+     *
     * @param requester The client callback.
     * @param pvRequest The options specified by the client.
     * @return A shared pointer to the newly created implementation.
@@ -286,7 +291,7 @@ public:
    virtual epics::pvAccess::ChannelGet::shared_pointer createChannelGet(
        epics::pvAccess::ChannelGetRequester::shared_pointer const &requester,
        epics::pvData::PVStructurePtr const &pvRequest);
-    /** 
+    /**
     * @brief Create a channelPut.
     *
     * @param requester The client callback.
@@ -297,9 +302,9 @@ public:
    virtual epics::pvAccess::ChannelPut::shared_pointer createChannelPut(
        epics::pvAccess::ChannelPutRequester::shared_pointer const &requester,
        epics::pvData::PVStructurePtr const &pvRequest);
-    /** 
+    /**
     * @brief Create a channelPutGet.
-     * 
+     *
     * @param requester The client callback.
     * @param pvRequest The options specified by the client.
     * @return A shared pointer to the newly created implementation.
@@ -308,7 +313,7 @@ public:
    virtual epics::pvAccess::ChannelPutGet::shared_pointer createChannelPutGet(
        epics::pvAccess::ChannelPutGetRequester::shared_pointer const &requester,
        epics::pvData::PVStructurePtr const &pvRequest);
-    /** 
+    /**
     * @brief Create a channelRPC.
     *
     * The PVRecord must implement <b>getService</b> or an empty shared pointer is returned.
@@ -319,9 +324,9 @@ public:
    virtual epics::pvAccess::ChannelRPC::shared_pointer createChannelRPC(
        epics::pvAccess::ChannelRPCRequester::shared_pointer const &requester,
        epics::pvData::PVStructurePtr const &pvRequest);
-    /** 
+    /**
     * @brief Create a monitor.
-     * 
+     *
     * @param requester The client callback.
     * @param pvRequest The options specified by the client.
     * @return A shared pointer to the newly created implementation.
@@ -330,9 +335,9 @@ public:
    virtual epics::pvData::Monitor::shared_pointer createMonitor(
        epics::pvData::MonitorRequester::shared_pointer const &requester,
        epics::pvData::PVStructurePtr const &pvRequest);
-    /** 
+    /**
     * @brief Create a channelArray.
-     * 
+     *
     * @param requester The client callback.
     * @param pvRequest The options specified by the client.
     * @return A shared pointer to the newly created implementation.
@@ -341,16 +346,28 @@ public:
    virtual epics::pvAccess::ChannelArray::shared_pointer createChannelArray(
        epics::pvAccess::ChannelArrayRequester::shared_pointer const &requester,
        epics::pvData::PVStructurePtr const &pvRequest);
-    /** 
+    /**
     *  @brief calls printInfo(std::cout);
     */
    virtual void printInfo();
-    /** 
+    /**
     * @brief displays a message
-     * 
+     *
     * @param out the stream on which the message is displayed.
     */
    virtual void printInfo(std::ostream& out);
+    /**
+     * @brief determines if client can write
+     *
+     * @return true if client can write
+     */
+    virtual bool canWrite();
+    /**
+     * @brief determines if client can read
+     *
+     * @return true if client can read
+     */
+    virtual bool canRead();
 protected:
    shared_pointer getPtrSelf()
    {
@@ -361,6 +378,19 @@ private:
    ChannelProviderLocalWPtr provider;
    PVRecordWPtr pvRecord;
    epics::pvData::Mutex mutex;
+
+    // AS-specific variables/methods
+    std::vector<char> toCharArray(const std::string& s);
+    std::vector<char> getAsGroup(const PVRecordPtr& pvRecord);
+    std::vector<char> getAsUser(const epics::pvAccess::ChannelRequester::shared_pointer& requester);
+    std::vector<char> getAsHost(const epics::pvAccess::ChannelRequester::shared_pointer& requester);
+
+    int asLevel;
+    std::vector<char> asGroup;
+    std::vector<char> asUser;
+    std::vector<char> asHost;
+    ASMEMBERPVT asMemberPvt;
+    ASCLIENTPVT asClientPvt;
 };

 }}
--- a/src/pv/controlSupport.h
+++ b/src/pv/controlSupport.h
@@ -16,7 +16,7 @@

 #include <shareLib.h>

-namespace epics { namespace pvDatabase { 
+namespace epics { namespace pvDatabase {

 class ControlSupport;
 typedef std::tr1::shared_ptr<ControlSupport> ControlSupportPtr;
@@ -57,20 +57,20 @@ public:
     * @return Returns true is any fields were modified; otherwise false.
     */
    virtual void reset();
-    /** 
+    /**
     * @brief create a ControlSupport
     *
     * @param pvRecord - The pvRecord to which the support is attached.
     * @return The new ControlSupport
     */
    static ControlSupportPtr create(PVRecordPtr const & pvRecord);
-    /** 
+    /**
     * @brief create a controlSupport required by ControlSupport
     *
     * @param scalarType The type for outputValue.
     * @return The controlField introspection structure.
     */
-    static epics::pvData::StructureConstPtr controlField(epics::pvData::ScalarType scalarType); 
+    static epics::pvData::StructureConstPtr controlField(epics::pvData::ScalarType scalarType);
 private:
    ControlSupport(PVRecordPtr const & pvRecord);
    PVRecordPtr pvRecord;
@@ -87,4 +87,3 @@ private:
 }}

 #endif  /* CONTROLSUPPORT_H */
-
--- a/src/pv/processRecord.h
+++ b/src/pv/processRecord.h
@@ -1,89 +0,0 @@
-/* processRecord.h */
-/**
- * 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
- * @date 2019.06.07
- */
-#ifndef PROCESSRECORD_H
-#define PROCESSRECORD_H
-
-#include <map>
-#include <epicsThread.h>
-#include <pv/event.h>
-#include <pv/channelProviderLocal.h>
-
-#include <shareLib.h>
-
-namespace epics { namespace pvDatabase { 
-
-typedef std::tr1::shared_ptr<epicsThread> EpicsThreadPtr;
-
-class ProcessRecord;
-typedef std::tr1::shared_ptr<ProcessRecord> ProcessRecordPtr;
-
-/**
- * @brief Process another record in the same database.
- *
- * A record to process another record
- * It is meant to be used via a channelPutGet request.
- * The argument has one field: recordName.
- * The result has a field named status.
- */
-class epicsShareClass ProcessRecord :
-    public PVRecord,
-    public epicsThreadRunable
-{
-public:
-    POINTER_DEFINITIONS(ProcessRecord);
-    /**
-     * Factory methods to create ProcessRecord.
-     * @param recordName The name for the ProcessRecord.
-     * @param delay Delay time to wait between process requests.
-     * @return A shared pointer to ProcessRecord.
-     */
-    static ProcessRecordPtr create(
-        std::string const & recordName,double delay);
-    /**
-     * standard init method required by PVRecord
-     * @return true unless record name already exists.
-     */
-    virtual bool init();
-    /**
-     * @brief Process the record specified by  recordName.
-     */
-    virtual void process();
-    /**
-     * @brief The run method for the thread.
-     */
-    virtual void run();
-    /**
-     * @brief Start the thread
-     */
-    void startThread();
-    /**
-     * @brief Stop the thread
-     */
-    void stop();
-private:
-    ProcessRecord(
-        std::string const & recordName,
-        epics::pvData::PVStructurePtr const & pvStructure,double delay);
-    double delay;
-    EpicsThreadPtr thread;
-    epics::pvData::Event runStop;
-    epics::pvData::Event runReturn;
-    PVDatabasePtr pvDatabase;
-    PVRecordMap pvRecordMap;
-    epics::pvData::PVStringPtr pvCommand;
-    epics::pvData::PVStringPtr pvRecordName;
-    epics::pvData::PVStringPtr pvResult;
-    epics::pvData::Mutex mutex;
-};
-
-}}
-
-#endif  /* PROCESSRECORD_H */
--- a/src/pv/pvArrayPlugin.h
+++ b/src/pv/pvArrayPlugin.h
@@ -63,9 +63,13 @@ private:
    long start;
    long increment;
    long end;
+    epics::pvData::PVFieldPtr masterField;
    epics::pvData::PVScalarArrayPtr masterArray;

-    PVArrayFilter(long start,long increment,long end,const epics::pvData::PVScalarArrayPtr & masterArray);
+    PVArrayFilter(
+        long start,long increment,long end,
+        const epics::pvData::PVFieldPtr & masterField,
+        const epics::pvData::PVScalarArrayPtr masterArray);
 public:
    POINTER_DEFINITIONS(PVArrayFilter);
    virtual ~PVArrayFilter();
@@ -95,4 +99,3 @@ public:

 }}
 #endif  /* PVARRAYPLUGIN_H */
-
--- a/src/pv/pvDatabase.h
+++ b/src/pv/pvDatabase.h
@@ -16,7 +16,7 @@

 #include <shareLib.h>

-namespace epics { namespace pvDatabase { 
+namespace epics { namespace pvDatabase {

 class PVRecord;
 typedef std::tr1::shared_ptr<PVRecord> PVRecordPtr;
@@ -59,6 +59,7 @@ class epicsShareClass PVRecord :
 {
 public:
    POINTER_DEFINITIONS(PVRecord);
+    
    /**
     * The Destructor.
     */
@@ -86,14 +87,10 @@ public:
     *  the base class sets the timeStamp to the current time.
     */
    virtual void process();
-    /**
-     *  @brief DEPRECATED
-     */
-    virtual void destroy() {}
    /**
     *  @brief remove record from database.
     *
-     * Remove the PVRecord. Release any resources used and 
+     * Remove the PVRecord. Release any resources used and
     *  get rid of listeners and requesters.
     *  If derived class overrides this then it must call PVRecord::remove()
     *  after it has destroyed any resorces it uses.
@@ -103,7 +100,7 @@ public:
     *  @brief Optional method for derived class.
     *
     * Return a service corresponding to the specified request PVStructure.
-     * @param pvRequest The request PVStructure 
+     * @param pvRequest The request PVStructure
     * @return The corresponding service
     */
    virtual epics::pvAccess::RPCServiceAsync::shared_pointer getService(
@@ -112,15 +109,18 @@ public:
        return epics::pvAccess::RPCServiceAsync::shared_pointer();
    }
    /**
-     * @brief Creates a <b>soft</b> record. 
+     * @brief Creates a <b>soft</b> record.
     *
     * @param recordName The name of the record, which is also the channelName.
     * @param pvStructure The top level structure.
+     * @param asLevel AS level (default: ASL0)
+     * @param asGroup AS group (default: DEFAULT)
     * @return A shared pointer to the newly created record.
     */
    static PVRecordPtr create(
        std::string const & recordName,
-        epics::pvData::PVStructurePtr const & pvStructure);
+        epics::pvData::PVStructurePtr const & pvStructure,
+        int asLevel = 0, const std::string& asGroup = "DEFAULT");
    /**
     * @brief  Get the name of the record.
     *
@@ -236,26 +236,53 @@ public:
     * @param level The level
     */
    void setTraceLevel(int level) {traceLevel = level;}
+    /**
+     * @brief Get the ASlevel 
+     *
+     * @return The level.
+     */
+    int getAsLevel() const {return asLevel;}
+    /**
+     * @brief Get the AS group name 
+     *
+     * @return The name.
+     */
+    std::string getAsGroup() const {return asGroup;}
+    /**
+     * @brief set access security level.
+     * @param level The level
+     */
+    void setAsLevel(int level) {asLevel=level;}
+    /**
+     * @brief set access security group
+     * @param group The group name
+     */
+    void setAsGroup(const std::string& group) {asGroup = group;}
 protected:
    /**
     * @brief Constructor
     * @param recordName The name of the record
     * @param pvStructure The top level PVStructutre
+     * @param asLevel AS level (default: ASL0)
+     * @param asGroup AS group (default: DEFAULT)
     */
    PVRecord(
        std::string const & recordName,
-        epics::pvData::PVStructurePtr const & pvStructure);
+        epics::pvData::PVStructurePtr const & pvStructure,
+        int asLevel = 0, const std::string& asGroup = "DEFAULT");
    /**
     * @brief Initializes the base class.
-     * 
+     *
     * Must be called by derived classes.
     */
    void initPVRecord();
 private:
+    friend class PVDatabase;
+    void unlistenClients();
+
    PVRecordFieldPtr findPVRecordField(
        PVRecordStructurePtr const & pvrs,
        epics::pvData::PVFieldPtr const & pvField);
-    void notifyClients();

    std::string recordName;
    epics::pvData::PVStructurePtr pvStructure;
@@ -271,6 +298,9 @@ private:

    epics::pvData::PVTimeStamp pvTimeStamp;
    epics::pvData::TimeStamp timeStamp;
+
+    int asLevel;
+    std::string asGroup;
 };

 epicsShareFunc std::ostream& operator<<(std::ostream& o, const PVRecord& record);
@@ -499,6 +529,7 @@ public:
    /**
     * @brief Remove a record.
     * @param record The record to remove.
+     *
     * @return <b>true</b> if record was removed.
     */
    bool removeRecord(PVRecordPtr const & record);
@@ -508,6 +539,9 @@ public:
     */
    epics::pvData::PVStringArrayPtr getRecordNames();
 private:
+    friend class PVRecord;
+
+    PVRecordWPtr removeFromMap(PVRecordPtr const & record);
    PVDatabase();
    void lock();
    void unlock();
@@ -519,4 +553,3 @@ private:
 }}

 #endif  /* PVDATABASE_H */
-
--- a/src/pv/pvDeadbandPlugin.h
+++ b/src/pv/pvDeadbandPlugin.h
@@ -66,7 +66,7 @@ private:
    epics::pvData::PVScalarPtr master;
    bool firstTime;
    double lastReportedValue;
-    
+

    PVDeadbandFilter(bool absolute,double deadband,epics::pvData::PVScalarPtr const & master);
 public:
@@ -100,4 +100,3 @@ public:

 }}
 #endif  /* PVDEADBANDPLUGIN_H */
-
--- a/src/pv/pvPlugin.h
+++ b/src/pv/pvPlugin.h
@@ -16,7 +16,7 @@

 #include <shareLib.h>

-namespace epics { namespace pvCopy{ 
+namespace epics { namespace pvCopy{

 class PVPlugin;
 class PVFilter;
@@ -36,7 +36,7 @@ typedef std::map<std::string,PVPluginPtr> PVPluginMap;
 * PVCopy looks for plugins defined in pvRequest and calls the filter when a pvCopy is updated.
 * @author mrk
 * @since 2017.03.17
- * 
+ *
 * Interface for a filter plugin for PVCopy.
 *
 */
--- a/src/pv/pvStructureCopy.h
+++ b/src/pv/pvStructureCopy.h
@@ -18,7 +18,7 @@

 #include <shareLib.h>

-namespace epics { namespace pvCopy{ 
+namespace epics { namespace pvCopy{

 class PVCopyTraverseMasterCallback;
 typedef std::tr1::shared_ptr<PVCopyTraverseMasterCallback> PVCopyTraverseMasterCallbackPtr;
@@ -62,7 +62,7 @@ typedef std::tr1::shared_ptr<CopyStructureNode> CopyStructureNodePtr;
 * Class that manages one or more PVStructures that holds an arbitrary subset of the fields
 * in another PVStructure called master.
 */
-class epicsShareClass PVCopy : 
+class epicsShareClass PVCopy :
    public std::tr1::enable_shared_from_this<PVCopy>
 {
 public:
@@ -79,7 +79,6 @@ public:
        epics::pvData::PVStructurePtr const &pvRequest,
        std::string const & structureName);
    virtual ~PVCopy(){}
-    virtual void destroy();
    /**
     * Get the top-level structure of master
     * @returns The master top-level structure.
@@ -173,12 +172,12 @@ public:
     */
    std::string dump();
 private:
-    
+
    PVCopyPtr getPtrSelf()
    {
        return shared_from_this();
    }
-    
+
    epics::pvData::PVStructurePtr pvMaster;
    epics::pvData::StructureConstPtr structure;
    CopyNodePtr headNode;
--- a/src/pv/pvSupport.h
+++ b/src/pv/pvSupport.h
@@ -20,7 +20,7 @@

 #include <shareLib.h>

-namespace epics { namespace pvDatabase { 
+namespace epics { namespace pvDatabase {

 class PVSupport;
 typedef std::tr1::shared_ptr<PVSupport> PVSupportPtr;
@@ -29,7 +29,7 @@ typedef std::tr1::shared_ptr<PVSupport> PVSupportPtr;
 * @brief Base interface for a PVSupport.
 *
 */
-class epicsShareClass PVSupport 
+class epicsShareClass PVSupport
 {
 public:
    POINTER_DEFINITIONS(PVSupport);
@@ -75,4 +75,3 @@ public:
 }}

 #endif  /* PVSUPPORT_H */
-
--- a/src/pv/pvTimestampPlugin.h
+++ b/src/pv/pvTimestampPlugin.h
@@ -66,7 +66,7 @@ private:
    bool current;
    bool copy;
    epics::pvData::PVFieldPtr master;
-    
+

    PVTimestampFilter(bool current,bool copy,epics::pvData::PVFieldPtr const & pvField);
 public:
@@ -98,4 +98,3 @@ public:

 }}
 #endif  /* PVTIMESTAMPPLUGIN_H */
-
--- a/src/pv/pvdbcrAddRecord.h
+++ b/src/pv/pvdbcrAddRecord.h
@@ -0,0 +1,67 @@
+/**
+ * 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
+ * @date 2021.04.11
+ */
+#ifndef PVDBCRADDARRAY_H
+#define PVDBCRADDARRAY_H
+
+#include <pv/pvDatabase.h>
+#include <pv/pvSupport.h>
+#include <pv/pvStructureCopy.h>
+
+#include <shareLib.h>
+
+namespace epics { namespace pvDatabase {
+
+class PvdbcrAddRecord;
+typedef std::tr1::shared_ptr<PvdbcrAddRecord> PvdbcrAddRecordPtr;
+
+/**
+ * @brief  PvdbcrAddRecord A record that adds a record to the master database.
+ *
+ */
+class epicsShareClass PvdbcrAddRecord :
+     public PVRecord
+{
+private:
+  PvdbcrAddRecord(
+    std::string const & recordName,epics::pvData::PVStructurePtr const & pvStructure,
+    int asLevel,std::string const & asGroup);
+    epics::pvData::PVStringPtr pvRecordName;
+    epics::pvData::PVStringPtr pvResult;
+public:
+    POINTER_DEFINITIONS(PvdbcrAddRecord);
+    /**
+     * The Destructor.
+     */
+    virtual ~PvdbcrAddRecord() {}
+    /**
+     * @brief Create a record.
+     *
+     * @param recordName The record name.
+     * @param asLevel  The access security level.
+     * @param asGroup  The access security group.
+     * @return The PVRecord
+     */
+     static PvdbcrAddRecordPtr create(
+        std::string const & recordName,
+        int asLevel=0,std::string const & asGroup = std::string("DEFAULT"));
+    /**
+     *  @brief a PVRecord method
+     * @return success or failure
+     */
+    virtual bool init();
+    /**
+     *  @brief process method that adds a record to the master database.
+     */
+    virtual void process();
+};
+
+}}
+
+#endif  /* PVDBCRADDARRAY_H */
--- a/src/pv/pvdbcrProcessRecord.h
+++ b/src/pv/pvdbcrProcessRecord.h
@@ -0,0 +1,105 @@
+/**
+ * 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
+ * @date 2021.04.11
+ */
+#ifndef PVDBCRPROCESSARRAY_H
+#define PVDBCRPROCESSARRAY_H
+#include <epicsThread.h>
+#include <epicsGuard.h>
+#include <pv/event.h>
+#include <pv/pvDatabase.h>
+#include <pv/pvSupport.h>
+#include <pv/pvStructureCopy.h>
+
+#include <shareLib.h>
+
+namespace epics { namespace pvDatabase {
+
+typedef std::tr1::shared_ptr<epicsThread> EpicsThreadPtr;
+class PvdbcrProcessRecord;
+typedef std::tr1::shared_ptr<PvdbcrProcessRecord> PvdbcrProcessRecordPtr;
+
+/**
+ * @brief  PvdbcrProcessRecord A record that processes other records in the master database.
+ *
+ */
+class epicsShareClass PvdbcrProcessRecord :
+     public PVRecord,
+     public epicsThreadRunable
+{
+private:
+    PvdbcrProcessRecord(
+        std::string const & recordName,epics::pvData::PVStructurePtr const & pvStructure,
+        double delay,
+        int asLevel,std::string const & asGroup);
+    double delay;
+    EpicsThreadPtr thread;
+    epics::pvData::Event runStop;
+    epics::pvData::Event runReturn;
+    PVDatabasePtr pvDatabase;
+    PVRecordMap pvRecordMap;
+    epics::pvData::PVStringPtr pvCommand;
+    epics::pvData::PVStringPtr pvRecordName;
+    epics::pvData::PVStringPtr pvResult;
+    epics::pvData::Mutex mutex;
+public:
+    POINTER_DEFINITIONS(PvdbcrProcessRecord);
+    /**
+     * The Destructor.
+     */
+    virtual ~PvdbcrProcessRecord() {}
+    /**
+     * @brief Create a record.
+     *
+     * @param recordName The record name.
+     * @param asLevel  The access security level.
+     * @param asGroup  The access security group.
+     * @return The PVRecord
+     */
+     static PvdbcrProcessRecordPtr create(
+        std::string const & recordName,
+        double delay= 1.0,
+        int asLevel=0,std::string const & asGroup = std::string("DEFAULT"));
+    /**
+     * @brief set the delay between prcocessing.
+     *
+     * @param delay in seconds
+     */    
+    void setDelay(double delay);
+     /**
+     * @brief get the delay between prcocessing.
+     *
+     * @return delay in seconds
+     */    
+    double getDelay();    
+    /**
+     *  @brief a PVRecord method
+     * @return success or failure
+     */
+    virtual bool init();
+    /**
+     *  @brief method that processes other records in the master database.
+     */
+    virtual void process();
+    /**
+     *  @brief thread method
+     */
+    virtual void run();
+    /**
+     *  @brief thread method
+     */
+    void startThread();
+    /**
+     *  @brief thread method
+     */
+    void stop();
+};
+
+}}
+
+#endif  /* PVDBCRPROCESSARRAY_H */
--- a/src/pv/pvdbcrRemoveRecord.h
+++ b/src/pv/pvdbcrRemoveRecord.h
@@ -0,0 +1,67 @@
+/**
+ * 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
+ * @date 2021.04.11
+ */
+#ifndef PVDBCRREMOVEARRAY_H
+#define PVDBCRREMOVEARRAY_H
+
+#include <pv/pvDatabase.h>
+#include <pv/pvSupport.h>
+#include <pv/pvStructureCopy.h>
+
+#include <shareLib.h>
+
+namespace epics { namespace pvDatabase {
+
+class PvdbcrRemoveRecord;
+typedef std::tr1::shared_ptr<PvdbcrRemoveRecord> PvdbcrRemoveRecordPtr;
+
+/**
+ * @brief  PvdbcrRemoveRecord A record that removes a record from the master database.
+ *
+ */
+class epicsShareClass PvdbcrRemoveRecord :
+     public PVRecord
+{
+private:
+  PvdbcrRemoveRecord(
+    std::string const & recordName,epics::pvData::PVStructurePtr const & pvStructure,
+    int asLevel,std::string const & asGroup);
+    epics::pvData::PVStringPtr pvRecordName;
+    epics::pvData::PVStringPtr pvResult;
+public:
+    POINTER_DEFINITIONS(PvdbcrRemoveRecord);
+    /**
+     * The Destructor.
+     */
+    virtual ~PvdbcrRemoveRecord() {}
+    /**
+     * @brief Create a record.
+     *
+     * @param recordName The record name.
+     * @param asLevel  The access security level.
+     * @param asGroup  The access security group.
+     * @return The PVRecord
+     */
+     static PvdbcrRemoveRecordPtr create(
+        std::string const & recordName,
+        int asLevel=0,std::string const & asGroup = std::string("DEFAULT"));
+    /**
+     *  @brief a PVRecord method
+     * @return success or failure
+     */
+    virtual bool init();
+    /**
+     *  @brief process method that removes a record from the master database.
+     */
+    virtual void process();
+};
+
+}}
+
+#endif  /* PVDBCRREMOVEARRAY_H */
--- a/src/pv/pvdbcrScalarArrayRecord.h
+++ b/src/pv/pvdbcrScalarArrayRecord.h
@@ -0,0 +1,57 @@
+/**
+ * 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
+ * @date 2021.04.11
+ */
+#ifndef PVDBCRSCALARARRAYRECORD_H
+#define PVDBCRSCALARARRAYRECORD_H
+
+#include <pv/pvDatabase.h>
+#include <pv/pvSupport.h>
+#include <pv/pvStructureCopy.h>
+
+#include <shareLib.h>
+
+namespace epics { namespace pvDatabase {
+
+class PvdbcrScalarArrayRecord;
+typedef std::tr1::shared_ptr<PvdbcrScalarArrayRecord> PvdbcrScalarArrayRecordPtr;
+
+/**
+ * @brief  PvdbcrScalarArrayRecord creates a record with a scalar array value, alarm, and timeStamp.
+ *
+ */
+class epicsShareClass PvdbcrScalarArrayRecord :
+     public PVRecord
+{
+private:
+  PvdbcrScalarArrayRecord(
+    std::string const & recordName,epics::pvData::PVStructurePtr const & pvStructure,
+    int asLevel,std::string const & asGroup);
+public:
+    POINTER_DEFINITIONS(PvdbcrScalarArrayRecord);
+    /**
+     * The Destructor.
+     */
+    virtual ~PvdbcrScalarArrayRecord() {}
+    /**
+     * @brief Create a record.
+     *
+     * @param recordName The record name.
+     * @param scalarType The type for the value field
+     * @param asLevel  The access security level.
+     * @param asGroup  The access security group.
+     * @return The PVRecord
+     */
+     static PvdbcrScalarArrayRecordPtr create(
+        std::string const & recordName,std::string const &  scalarType,
+        int asLevel=0,std::string const & asGroup = std::string("DEFAULT"));
+};
+
+}}
+
+#endif  /* PVDBCRSCALARARRAYRECORD_H */
--- a/src/pv/pvdbcrScalarRecord.h
+++ b/src/pv/pvdbcrScalarRecord.h
@@ -0,0 +1,57 @@
+/**
+ * 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
+ * @date 2021.04.11
+ */
+#ifndef PVDBCRSCALARRECORD_H
+#define PVDBCRSCALARRECORD_H
+
+#include <pv/pvDatabase.h>
+#include <pv/pvSupport.h>
+#include <pv/pvStructureCopy.h>
+
+#include <shareLib.h>
+
+namespace epics { namespace pvDatabase {
+
+class PvdbcrScalarRecord;
+typedef std::tr1::shared_ptr<PvdbcrScalarRecord> PvdbcrScalarRecordPtr;
+
+/**
+ * @brief  PvdbcrScalarRecord creates a record with a scalar value, alarm, and timeStamp.
+ *
+ */
+class epicsShareClass PvdbcrScalarRecord :
+     public PVRecord
+{
+private:
+  PvdbcrScalarRecord(
+    std::string const & recordName,epics::pvData::PVStructurePtr const & pvStructure,
+    int asLevel,std::string const & asGroup);
+public:
+    POINTER_DEFINITIONS(PvdbcrScalarRecord);
+    /**
+     * The Destructor.
+     */
+    virtual ~PvdbcrScalarRecord() {}
+    /**
+     * @brief Create a record.
+     *
+     * @param recordName The record name.
+     * @param scalarType The type for the value field
+     * @param asLevel  The access security level.
+     * @param asGroup  The access security group.
+     * @return The PVRecord
+     */
+     static PvdbcrScalarRecordPtr create(
+        std::string const & recordName,std::string const &  scalarType,
+        int asLevel=0,std::string const & asGroup = std::string("DEFAULT"));
+};
+
+}}
+
+#endif  /* PVDBCRSCALARRECORD_H */
--- a/src/pv/pvdbcrTraceRecord.h
+++ b/src/pv/pvdbcrTraceRecord.h
@@ -0,0 +1,68 @@
+/**
+ * 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
+ * @date 2021.04.11
+ */
+#ifndef PVDBCRTRACEARRAY_H
+#define PVDBCRTRACEARRAY_H
+
+#include <pv/pvDatabase.h>
+#include <pv/pvSupport.h>
+#include <pv/pvStructureCopy.h>
+
+#include <shareLib.h>
+
+namespace epics { namespace pvDatabase {
+
+class PvdbcrTraceRecord;
+typedef std::tr1::shared_ptr<PvdbcrTraceRecord> PvdbcrTraceRecordPtr;
+
+/**
+ * @brief  PvdbcrTraceRecord A record sets trace level for a record in the master database.
+ *
+ */
+class epicsShareClass PvdbcrTraceRecord :
+     public PVRecord
+{
+private:
+  PvdbcrTraceRecord(
+    std::string const & recordName,epics::pvData::PVStructurePtr const & pvStructure,
+    int asLevel,std::string const & asGroup);
+    epics::pvData::PVStringPtr pvRecordName;
+    epics::pvData::PVIntPtr pvLevel;
+    epics::pvData::PVStringPtr pvResult;
+public:
+    POINTER_DEFINITIONS(PvdbcrTraceRecord);
+    /**
+     * The Destructor.
+     */
+    virtual ~PvdbcrTraceRecord() {}
+    /**
+     * @brief Create a record.
+     *
+     * @param recordName The record name.
+     * @param asLevel  The access security level.
+     * @param asGroup  The access security group.
+     * @return The PVRecord
+     */
+     static PvdbcrTraceRecordPtr create(
+        std::string const & recordName,
+        int asLevel=0,std::string const & asGroup = std::string("DEFAULT"));
+    /**
+     *  @brief a PVRecord method
+     * @return success or failure
+     */
+    virtual bool init();
+    /**
+     *  @brief process method that sets trace level for a record in the master database.
+     */
+    virtual void process();
+};
+
+}}
+
+#endif  /* PVDBCRTRACEARRAY_H */
--- a/src/pv/removeRecord.h
+++ b/src/pv/removeRecord.h
@@ -1,63 +0,0 @@
-/* removeRecord.h */
-/**
- * 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
- * @date 2013.04.18
- */
-#ifndef REMOVERECORD_H
-#define REMOVERECORD_H
-
-#include <pv/channelProviderLocal.h>
-
-#include <shareLib.h>
-
-namespace epics { namespace pvDatabase { 
-
-
-class RemoveRecord;
-typedef std::tr1::shared_ptr<RemoveRecord> RemoveRecordPtr;
-
-/**
- * @brief Remove another record in the same database.
- *
- * A record to remove another record
- * It is meant to be used via a channelPutGet request.
- * The argument has one field: recordName.
- * The result has a field named status.
- */
-class epicsShareClass RemoveRecord :
-    public PVRecord
-{
-public:
-    POINTER_DEFINITIONS(RemoveRecord);
-    /**
-     * Factory methods to create RemoveRecord.
-     * @param recordName The name for the RemoveRecord.
-     * @return A shared pointer to RemoveRecord..
-     */
-    static RemoveRecordPtr create(
-        std::string const & recordName);
-    /**
-     * standard init method required by PVRecord
-     * @return true unless record name already exists.
-     */
-    virtual bool init();
-    /**
-     * @brief Remove the record specified by  recordName.
-     */
-    virtual void process();
-private:
-    RemoveRecord(
-        std::string const & recordName,
-        epics::pvData::PVStructurePtr const & pvStructure);
-    epics::pvData::PVStringPtr pvRecordName;
-    epics::pvData::PVStringPtr pvResult;
-};
-
-}}
-
-#endif  /* REMOVERECORD_H */
--- a/src/pv/scalarAlarmSupport.h
+++ b/src/pv/scalarAlarmSupport.h
@@ -19,7 +19,7 @@

 #include <shareLib.h>

-namespace epics { namespace pvDatabase { 
+namespace epics { namespace pvDatabase {

 class ScalarAlarmSupport;
 typedef std::tr1::shared_ptr<ScalarAlarmSupport> ScalarAlarmSupportPtr;
@@ -61,19 +61,19 @@ public:
     *
     */
    virtual void reset();
-    /** 
+    /**
     * @brief create a ScalarAlarm
     *
     * @param pvRecord - The pvRecord to which the support is attached.
     * @return The new ScalarAlarm
     */
    static ScalarAlarmSupportPtr create(PVRecordPtr const & pvRecord);
-    /** 
+    /**
     * @brief create a scalarAlarm required by ScalarAlarm
     *
     * @return The scalarAlarmField introspection structure.
     */
-    static epics::pvData::StructureConstPtr scalarAlarmField(); 
+    static epics::pvData::StructureConstPtr scalarAlarmField();
 private:

    ScalarAlarmSupport(PVRecordPtr const & pvRecord);
@@ -108,4 +108,3 @@ private:
 }}

 #endif  /* SCALARALARMSUPPORT_H */
-
--- a/src/pv/traceRecord.h
+++ b/src/pv/traceRecord.h
@@ -1,66 +0,0 @@
-/* traceRecord.h */
-/**
- * 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
- * @date 2013.04.18
- */
-#ifndef TRACERECORD_H
-#define TRACERECORD_H
-
-#include <pv/channelProviderLocal.h>
-
-#include <shareLib.h>
-
-
-namespace epics { namespace pvDatabase { 
-
-
-class TraceRecord;
-typedef std::tr1::shared_ptr<TraceRecord> TraceRecordPtr;
-
-/**
- * @brief Trace activity of  PVRecord.
- *
- * A record to set the trace value for another record
- * It is meant to be used via a channelPutGet request.
- * The argument has two fields: recordName and  level.
- * The result has a field named status.
- */
-class epicsShareClass TraceRecord :
-    public PVRecord
-{
-public:
-    POINTER_DEFINITIONS(TraceRecord);
-    /**
-     * @brief Factory method to create TraceRecord.
-     *
-     * @param recordName The name for the TraceRecord.
-     * @return A shared pointer to TraceRecord..
-     */
-    static TraceRecordPtr create(
-        std::string const & recordName);
-    /**
-     * standard init method required by PVRecord
-     * @return true unless record name already exists.
-     */
-    virtual bool init();
-    /**
-     * @brief Set the trace level for record specified by  recordName.
-     */
-    virtual void process();
-private:
-    TraceRecord(
-        std::string const & recordName,
-        epics::pvData::PVStructurePtr const & pvStructure);
-    epics::pvData::PVStringPtr pvRecordName;
-    epics::pvData::PVIntPtr pvLevel;
-    epics::pvData::PVStringPtr pvResult;
-};
-
-}}
-
-#endif  /* TRACERECORD_H */
--- a/src/pvAccess/channelLocal.cpp
+++ b/src/pvAccess/channelLocal.cpp
@@ -10,7 +10,9 @@
 */

 #include <sstream>
+#include <vector>

+#include <asLib.h>
 #include <epicsGuard.h>
 #include <epicsThread.h>
 #include <pv/pvData.h>
@@ -23,6 +25,7 @@
 #include <pv/pvaVersionNum.h>
 #include <pv/serverContext.h>
 #include <pv/pvSubArrayCopy.h>
+#include <pv/security.h>

 #define epicsExportSharedSymbols
 #include "pv/pvStructureCopy.h"
@@ -38,7 +41,7 @@ using std::cout;
 using std::endl;
 using std::string;

-namespace epics { namespace pvDatabase { 
+namespace epics { namespace pvDatabase {

 static StructureConstPtr nullStructure;

@@ -68,19 +71,18 @@ static bool getProcess(PVStructurePtr pvRequest,bool processDefault)
        return  pvString->get().compare("true")==0 ? true : false;
    } else if(scalar->getScalarType()==pvBoolean) {
        PVBooleanPtr pvBoolean = static_pointer_cast<PVBoolean>(pvField);
-       	return pvBoolean->get();
+        return pvBoolean->get();
    }
    return processDefault;
 }

 class ChannelProcessLocal :
-    public ChannelProcess,
+    public epics::pvAccess::ChannelProcess,
    public std::tr1::enable_shared_from_this<ChannelProcessLocal>
 {
 public:
    POINTER_DEFINITIONS(ChannelProcessLocal);
    virtual ~ChannelProcessLocal();
-    virtual void destroy() {} // DEPRECATED
    static ChannelProcessLocalPtr create(
        ChannelLocalPtr const &channelLocal,
        ChannelProcessRequester::shared_pointer const & channelProcessRequester,
@@ -102,7 +104,7 @@ private:
        ChannelProcessRequester::shared_pointer const & channelProcessRequester,
        PVRecordPtr const &pvRecord,
        int nProcess)
-    : 
+    :
      channelLocal(channelLocal),
      channelProcessRequester(channelProcessRequester),
      pvRecord(pvRecord),
@@ -132,7 +134,7 @@ ChannelProcessLocalPtr ChannelProcessLocal::create(
        if(pvField) {
            PVStringPtr pvString = pvOptions->getSubField<PVString>("nProcess");
            if(pvString) {
-                int size;
+                int size=0;
                std::stringstream ss;
                ss << pvString->get();
                ss >> size;
@@ -156,10 +158,7 @@ ChannelProcessLocalPtr ChannelProcessLocal::create(

 ChannelProcessLocal::~ChannelProcessLocal()
 {
-    PVRecordPtr pvr(pvRecord.lock());
-    if(pvr && pvr->getTraceLevel()>0) {
-        cout << "~ChannelProcessLocal() " << pvr->getRecordName() << endl;
-    }
+//cout << "~ChannelProcessLocal()\n";
 }

 std::tr1::shared_ptr<Channel> ChannelProcessLocal::getChannel()
@@ -207,13 +206,12 @@ void ChannelProcessLocal::process()
 }

 class ChannelGetLocal :
-    public ChannelGet,
+    public epics::pvAccess::ChannelGet,
    public std::tr1::enable_shared_from_this<ChannelGetLocal>
 {
 public:
    POINTER_DEFINITIONS(ChannelGetLocal);
    virtual ~ChannelGetLocal();
-    virtual void destroy() {} // DEPRECATED
    static ChannelGetLocalPtr create(
        ChannelLocalPtr const &channelLocal,
        ChannelGetRequester::shared_pointer const & channelGetRequester,
@@ -238,7 +236,7 @@ private:
        PVStructurePtr const&pvStructure,
        BitSetPtr const & bitSet,
        PVRecordPtr const &pvRecord)
-    : 
+    :
      firstTime(true),
      callProcess(callProcess),
      channelLocal(channelLocal),
@@ -304,10 +302,7 @@ ChannelGetLocalPtr ChannelGetLocal::create(

 ChannelGetLocal::~ChannelGetLocal()
 {
-    PVRecordPtr pvr(pvRecord.lock());
-    if(pvr && pvr->getTraceLevel()>0) {
-        cout << "~ChannelGetLocal() " << pvr->getRecordName() << endl;
-    }
+//cout << "~ChannelGetLocal()\n";
 }

 std::tr1::shared_ptr<Channel> ChannelGetLocal::getChannel()
@@ -334,6 +329,13 @@ void ChannelGetLocal::get()
 {
    ChannelGetRequester::shared_pointer requester = channelGetRequester.lock();
    if(!requester) return;
+    ChannelLocalPtr channel(channelLocal.lock());
+    if(!channel) throw std::logic_error("channel is deleted");
+    if(!channel->canRead()) {
+        Status status = Status::error("ChannelGet::get is not allowed");
+        requester->getDone(status,getPtrSelf(),PVStructurePtr(),BitSetPtr());
+        return;
+    }
    PVRecordPtr pvr(pvRecord.lock());
    if(!pvr) throw std::logic_error("pvRecord is deleted");
    try {
@@ -381,13 +383,12 @@ void ChannelGetLocal::get()
 }

 class ChannelPutLocal :
-    public ChannelPut,
+    public epics::pvAccess::ChannelPut,
    public std::tr1::enable_shared_from_this<ChannelPutLocal>
 {
 public:
    POINTER_DEFINITIONS(ChannelPutLocal);
    virtual ~ChannelPutLocal();
-    virtual void destroy() {} // DEPRECATED
    static ChannelPutLocalPtr create(
        ChannelLocalPtr const &channelLocal,
        ChannelPutRequester::shared_pointer const & channelPutRequester,
@@ -469,10 +470,7 @@ ChannelPutLocalPtr ChannelPutLocal::create(

 ChannelPutLocal::~ChannelPutLocal()
 {
-    PVRecordPtr pvr(pvRecord.lock());
-    if(pvr && pvr->getTraceLevel()>0) {
-        cout << "~ChannelPutLocal() " << pvr->getRecordName() << endl;
-    }
+//cout << "~ChannelPutLocal()\n";
 }

 std::tr1::shared_ptr<Channel> ChannelPutLocal::getChannel()
@@ -499,6 +497,13 @@ void ChannelPutLocal::get()
 {
    ChannelPutRequester::shared_pointer requester = channelPutRequester.lock();
    if(!requester) return;
+    ChannelLocalPtr channel(channelLocal.lock());
+    if(!channel) throw std::logic_error("channel is deleted");
+    if(!channel->canRead()) {
+        Status status = Status::error("ChannelPut::get is not allowed");
+        requester->getDone(status,getPtrSelf(),PVStructurePtr(),BitSetPtr());
+        return;
+    }
    PVRecordPtr pvr(pvRecord.lock());
    if(!pvr) throw std::logic_error("pvRecord is deleted");
    try {
@@ -529,10 +534,18 @@ void ChannelPutLocal::put(
 {
    ChannelPutRequester::shared_pointer requester = channelPutRequester.lock();
    if(!requester) return;
+    ChannelLocalPtr channel(channelLocal.lock());
+    if(!channel) throw std::logic_error("channel is deleted");
+    if(!channel->canWrite()) {
+        Status status = Status::error("ChannelPut::put is not allowed");
+        requester->putDone(status,getPtrSelf());
+        return;
+    }
+
    PVRecordPtr pvr(pvRecord.lock());
    if(!pvr) throw std::logic_error("pvRecord is deleted");
    try {
-        {   
+        {
            epicsGuard <PVRecord> guard(*pvr);
            pvr->beginGroupPut();
            pvCopy->updateMaster(pvStructure, bitSet);
@@ -543,7 +556,7 @@ void ChannelPutLocal::put(
        }
        requester->putDone(Status::Ok,getPtrSelf());
        if(pvr->getTraceLevel()>1)
-        {   
+        {
            cout << "ChannelPutLocal::put" << endl;
        }
    } catch(std::exception& ex) {
@@ -554,13 +567,12 @@ void ChannelPutLocal::put(


 class ChannelPutGetLocal :
-    public ChannelPutGet,
+    public epics::pvAccess::ChannelPutGet,
    public std::tr1::enable_shared_from_this<ChannelPutGetLocal>
 {
 public:
    POINTER_DEFINITIONS(ChannelPutGetLocal);
    virtual ~ChannelPutGetLocal();
-    virtual void destroy() {} // DEPRECATED
    static ChannelPutGetLocalPtr create(
        ChannelLocalPtr const &channelLocal,
        ChannelPutGetRequester::shared_pointer const & channelPutGetRequester,
@@ -590,7 +602,7 @@ private:
        PVStructurePtr const&pvGetStructure,
        BitSetPtr const & getBitSet,
        PVRecordPtr const &pvRecord)
-    : 
+    :
      callProcess(callProcess),
      channelLocal(channelLocal),
      channelPutGetRequester(channelPutGetRequester),
@@ -662,10 +674,7 @@ ChannelPutGetLocalPtr ChannelPutGetLocal::create(

 ChannelPutGetLocal::~ChannelPutGetLocal()
 {
-    PVRecordPtr pvr(pvRecord.lock());
-    if(pvr && pvr->getTraceLevel()>0) {
-        cout << "~ChannelPutGetLocal() " << pvr->getRecordName() << endl;
-    }
+//cout << "~ChannelPutGetLocal()\n";
 }

 std::tr1::shared_ptr<Channel> ChannelPutGetLocal::getChannel()
@@ -693,6 +702,13 @@ void ChannelPutGetLocal::putGet(
 {
    ChannelPutGetRequester::shared_pointer requester = channelPutGetRequester.lock();
    if(!requester) return;
+    ChannelLocalPtr channel(channelLocal.lock());
+    if(!channel) throw std::logic_error("channel is deleted");
+    if(!channel->canWrite()||!channel->canRead() ) {
+        Status status = Status::error("ChannelPutGet::putGet is not allowed");
+        requester->putGetDone(status,getPtrSelf(),PVStructurePtr(),BitSetPtr());
+        return;
+    }
    PVRecordPtr pvr(pvRecord.lock());
    if(!pvr) throw std::logic_error("pvRecord is deleted");
    try {
@@ -721,6 +737,13 @@ void ChannelPutGetLocal::getPut()
 {
    ChannelPutGetRequester::shared_pointer requester = channelPutGetRequester.lock();
    if(!requester) return;
+    ChannelLocalPtr channel(channelLocal.lock());
+    if(!channel) throw std::logic_error("channel is deleted");
+    if(!channel->canRead()) {
+        Status status = Status::error("ChannelPutGet::getPut is not allowed");
+        requester->getPutDone(status,getPtrSelf(),PVStructurePtr(),BitSetPtr());
+        return;
+    }
    PVRecordPtr pvr(pvRecord.lock());
    if(!pvr) throw std::logic_error("pvRecord is deleted");
    try {
@@ -748,6 +771,13 @@ void ChannelPutGetLocal::getGet()
 {
    ChannelPutGetRequester::shared_pointer requester = channelPutGetRequester.lock();
    if(!requester) return;
+    ChannelLocalPtr channel(channelLocal.lock());
+    if(!channel) throw std::logic_error("channel is deleted");
+    if(!channel->canRead()) {
+        Status status = Status::error("ChannelPutGet::getGet is not allowed");
+        requester->getPutDone(status,getPtrSelf(),PVStructurePtr(),BitSetPtr());
+        return;
+    }
    PVRecordPtr pvr(pvRecord.lock());
    if(!pvr) throw std::logic_error("pvRecord is deleted");
    try {
@@ -772,13 +802,12 @@ void ChannelPutGetLocal::getGet()


 class ChannelRPCLocal :
-    public ChannelRPC,
-    public RPCResponseCallback,
+    public epics::pvAccess::ChannelRPC,
+    public epics::pvAccess::RPCResponseCallback,
    public std::tr1::enable_shared_from_this<ChannelRPCLocal>
 {
 public:
    POINTER_DEFINITIONS(ChannelRPCLocal);
-    virtual void destroy() {} // DEPRECATED
    static ChannelRPCLocalPtr create(
        ChannelLocalPtr const & channelLocal,
        ChannelRPCRequester::shared_pointer const & channelRPCRequester,
@@ -862,10 +891,7 @@ ChannelRPCLocalPtr ChannelRPCLocal::create(

 ChannelRPCLocal::~ChannelRPCLocal()
 {
-    PVRecordPtr pvr(pvRecord.lock());
-    if(pvr && pvr->getTraceLevel()>0) {
-        cout << "~ChannelRPCLocal() " << pvr->getRecordName() << endl;
-    }
+//cout << "~ChannelRPCLocal()\n";
 }

 std::tr1::shared_ptr<Channel> ChannelRPCLocal::getChannel()
@@ -886,7 +912,7 @@ void ChannelRPCLocal::processRequest(
    {
        result = service->request(pvArgument);
    }
-    catch (RPCRequestException& rre)
+    catch (epics::pvAccess::RPCRequestException& rre)
    {
        status = Status(rre.getStatus(), rre.what());
        ok = false;
@@ -902,7 +928,7 @@ void ChannelRPCLocal::processRequest(
        status = Status(Status::STATUSTYPE_FATAL, "Unexpected exception caught while calling RPCService.request(PVStructure).");
        ok = false;
    }
-    
+
    // check null result
    if (ok && !result)
    {
@@ -967,13 +993,12 @@ void ChannelRPCLocal::request(PVStructurePtr const & pvArgument)
 typedef std::tr1::shared_ptr<PVArray> PVArrayPtr;

 class ChannelArrayLocal :
-    public ChannelArray,
+    public epics::pvAccess::ChannelArray,
    public std::tr1::enable_shared_from_this<ChannelArrayLocal>
 {
 public:
    POINTER_DEFINITIONS(ChannelArrayLocal);
    virtual ~ChannelArrayLocal();
-    virtual void destroy() {} // DEPRECATED
    static ChannelArrayLocalPtr create(
        ChannelLocalPtr const &channelLocal,
        ChannelArrayRequester::shared_pointer const & channelArrayRequester,
@@ -1001,7 +1026,7 @@ private:
        PVArrayPtr const &pvArray,
        PVArrayPtr const &pvCopy,
        PVRecordPtr const &pvRecord)
-    : 
+    :
      channelLocal(channelLocal),
      channelArrayRequester(channelArrayRequester),
      pvArray(pvArray),
@@ -1104,10 +1129,7 @@ ChannelArrayLocalPtr ChannelArrayLocal::create(

 ChannelArrayLocal::~ChannelArrayLocal()
 {
-    PVRecordPtr pvr(pvRecord.lock());
-    if(pvr && pvr->getTraceLevel()>0) {
-        cout << "~ChannelArrayLocal() " << pvr->getRecordName() << endl;
-    }
+//cout << "~ChannelArrayLocal()\n";
 }

 std::tr1::shared_ptr<Channel> ChannelArrayLocal::getChannel()
@@ -1246,10 +1268,16 @@ ChannelLocal::ChannelLocal(
    ChannelProviderLocalPtr const & provider,
    ChannelRequester::shared_pointer const & requester,
    PVRecordPtr const & pvRecord)
-:   
+:
    requester(requester),
    provider(provider),
-    pvRecord(pvRecord)
+    pvRecord(pvRecord),
+    asLevel(pvRecord->getAsLevel()),
+    asGroup(getAsGroup(pvRecord)),
+    asUser(getAsUser(requester)),
+    asHost(getAsHost(requester)),
+    asMemberPvt(0),
+    asClientPvt(0)
 {
    if(pvRecord->getTraceLevel()>0) {
         cout << "ChannelLocal::ChannelLocal()"
@@ -1257,15 +1285,91 @@ ChannelLocal::ChannelLocal(
              << " requester exists " << (requester ? "true" : "false")
              << endl;
    }
+    if (pvRecord->getAsGroup().empty() || asAddMember(&asMemberPvt, &asGroup[0]) != 0) {
+        asMemberPvt = 0;
+    } 
+    if (asMemberPvt) {
+        asAddClient(&asClientPvt, asMemberPvt, asLevel, &asUser[0], &asHost[0]);
+    }
 }

+std::vector<char> ChannelLocal::toCharArray(const std::string& s)
+{
+    std::vector<char> v(s.begin(), s.end());
+    v.push_back('\0');
+    return v;
+}
+
+std::vector<char> ChannelLocal::getAsGroup(const PVRecordPtr& pvRecord)
+{
+    return toCharArray(pvRecord->getAsGroup());
+}
+
+std::vector<char> ChannelLocal::getAsUser(const ChannelRequester::shared_pointer& requester)
+{
+    PeerInfo::const_shared_pointer info(requester->getPeerInfo());
+    std::string user;
+    if(info && info->identified) {
+        if(info->authority=="ca") {
+            user = info->account;
+            size_t first = user.find_last_of('/');
+            if(first != std::string::npos) {
+                // prevent CA accounts like "<authority>/<user>"
+                user = user.substr(first+1);
+            }
+        } 
+        else {
+            user = info->authority + "/" + info->account;
+        }
+    } 
+    return toCharArray(user);
+}
+
+std::vector<char> ChannelLocal::getAsHost(const epics::pvAccess::ChannelRequester::shared_pointer& requester)
+{
+    PeerInfo::const_shared_pointer info(requester->getPeerInfo());
+    std::string host;
+    if(info && info->identified) {
+        host= info->peer;
+    } 
+    else {
+        // anonymous
+        host = requester->getRequesterName();
+    }
+
+    // handle form "ip:port"
+    size_t last = host.find_first_of(':');
+    if(last == std::string::npos) {
+        last = host.size();
+    }
+    host.resize(last);
+    return toCharArray(host);
+}
+
+bool ChannelLocal::canWrite() 
+{
+    if(!asActive || (asClientPvt && asCheckPut(asClientPvt))) {
+        return true;
+    }
+    return false;
+}
+
+bool ChannelLocal::canRead()
+{
+    if(!asActive || (asClientPvt && asCheckGet(asClientPvt))) {
+        return true;
+    }
+    return false;
+}
 ChannelLocal::~ChannelLocal()
 {
-    PVRecordPtr pvr(pvRecord.lock());
-    if(!pvr) return;
-    if(pvr->getTraceLevel()>0)
-    {
-        cout << "~ChannelLocal()" << endl;
+    if(asMemberPvt) {
+        asRemoveMember(&asMemberPvt);
+        asMemberPvt = 0;
+    }
+    if(asClientPvt) {
+        asRemoveClient(&asClientPvt);
+        asClientPvt = 0;
    }
 }

@@ -1296,7 +1400,7 @@ string ChannelLocal::getRequesterName()
         << " requester exists " << (requester ? "true" : "false")
         << endl;
    }
-    
+
    if(!requester) return string();
    return requester->getRequesterName();
 }
@@ -1319,7 +1423,7 @@ void ChannelLocal::message(
    string recordName("record deleted");
    if(pvr) recordName = pvr->getRecordName();
    cout << recordName
-         << " message " << message 
+         << " message " << message
         << " messageType " << getMessageTypeName(messageType)
         << endl;
 }
@@ -1362,8 +1466,8 @@ void ChannelLocal::getField(GetFieldRequester::shared_pointer const &requester,
            pvr->getPVRecordStructure()->getPVStructure()->getStructure();
        requester->getDone(Status::Ok,structure);
        return;
-    } 
-    PVFieldPtr pvField = 
+    }
+    PVFieldPtr pvField =
        pvr->getPVRecordStructure()->getPVStructure()->getSubField(subField);
    if(pvField) {
        requester->getDone(Status::Ok,pvField->getField());
@@ -1479,7 +1583,7 @@ ChannelRPC::shared_pointer ChannelLocal::createChannelRPC(
         << endl;
    }

-    ChannelRPCLocalPtr channelRPC = 
+    ChannelRPCLocalPtr channelRPC =
        ChannelRPCLocal::create(
            getPtrSelf(),
            channelRPCRequester,
--- a/src/pvAccess/channelProviderLocal.cpp
+++ b/src/pvAccess/channelProviderLocal.cpp
@@ -10,6 +10,7 @@
 */

 #include <epicsThread.h>
+#include <asLib.h>
 #include <pv/serverContext.h>
 #include <pv/syncChannelFind.h>
 #include <pv/pvTimeStamp.h>
@@ -30,13 +31,13 @@ using std::cout;
 using std::endl;
 using std::string;

-namespace epics { namespace pvDatabase { 
+namespace epics { namespace pvDatabase {

 static string providerName("local");
 static ChannelProviderLocalPtr channelProvider;

 class LocalChannelProviderFactory : public ChannelProviderFactory
-{  
+{
 public:
    POINTER_DEFINITIONS(LocalChannelProviderFactory);
    virtual string getFactoryName() { return providerName;}
@@ -114,7 +115,7 @@ ChannelFind::shared_pointer ChannelProviderLocal::channelFind(
            Status::Ok,
            shared_from_this(),
            true);
-        
+
    } else {
        Status notFoundStatus(Status::STATUSTYPE_ERROR,"pv not found");
        channelFindRequester->channelFindResult(
@@ -176,4 +177,18 @@ Channel::shared_pointer ChannelProviderLocal::createChannel(
    return createChannel(channelName, channelRequester, priority);
 }

+void ChannelProviderLocal::initAs(const std::string& filePath, const std::string& substitutions)
+{
+    int status = asInitFile(filePath.c_str(), substitutions.c_str());
+    if(status) {
+        throw std::runtime_error("Invalid AS configuration.");
+    }
+}
+
+bool ChannelProviderLocal::isAsActive()
+{
+    return asActive;
+}
+
+
 }}
--- a/src/pvAccess/monitorFactory.cpp
+++ b/src/pvAccess/monitorFactory.cpp
@@ -34,7 +34,7 @@ using std::cout;
 using std::endl;
 using std::string;

-namespace epics { namespace pvDatabase { 
+namespace epics { namespace pvDatabase {

 class MonitorLocal;
 typedef std::tr1::shared_ptr<MonitorLocal> MonitorLocalPtr;
@@ -88,7 +88,7 @@ public:
        nextGetUsed = 0;
        nextReleaseUsed = 0;
    }
-    
+
    MonitorElementPtr getFree()
    {
        if(numberFree==0) return MonitorElementPtr();
@@ -98,7 +98,7 @@ public:
        if(nextGetFree>=size) nextGetFree = 0;
        return elements[ind];
    }
-    
+
    void setUsed(MonitorElementPtr const &element)
    {
       if(element!=elements[nextSetUsed++]) {
@@ -107,7 +107,7 @@ public:
        numberUsed++;
        if(nextSetUsed>=size) nextSetUsed = 0;
    }
-    
+
    MonitorElementPtr getUsed()
    {
        if(numberUsed==0) return MonitorElementPtr();
@@ -131,7 +131,7 @@ public:

 typedef std::tr1::shared_ptr<MonitorRequester> MonitorRequesterPtr;

-    
+
 class MonitorLocal :
    public Monitor,
    public PVListener,
@@ -141,7 +141,6 @@ class MonitorLocal :
 public:
    POINTER_DEFINITIONS(MonitorLocal);
    virtual ~MonitorLocal();
-    virtual void destroy() {} // DEPRECATED
    virtual Status start();
    virtual Status stop();
    virtual MonitorElementPtr poll();
@@ -191,10 +190,7 @@ MonitorLocal::MonitorLocal(

 MonitorLocal::~MonitorLocal()
 {
-    if(pvRecord->getTraceLevel()>0)
-    {
-        cout << "MonitorLocal::~MonitorLocal()" << endl;
-    }
+//cout << "MonitorLocal::~MonitorLocal()" << endl;
 }


@@ -294,7 +290,7 @@ void MonitorLocal::dataPut(PVRecordFieldPtr const & pvRecordField)
 {
    if(pvRecord->getTraceLevel()>1)
    {
-        cout << "PVCopyMonitor::dataPut(pvRecordField)" << endl;
+        cout << "MonitorLocal::dataPut(pvRecordField)" << endl;
    }
    if(state!=active) return;
    {
@@ -319,7 +315,7 @@ void MonitorLocal::dataPut(
 {
    if(pvRecord->getTraceLevel()>1)
    {
-        cout << "PVCopyMonitor::dataPut(requested,pvRecordField)" << endl;
+        cout << "MonitorLocal::dataPut(requested,pvRecordField)" << endl;
    }
    if(state!=active) return;
    {
@@ -346,7 +342,7 @@ void MonitorLocal::beginGroupPut(PVRecordPtr const & pvRecord)
 {
    if(pvRecord->getTraceLevel()>1)
    {
-        cout << "PVCopyMonitor::beginGroupPut()" << endl;
+        cout << "MonitorLocal::beginGroupPut()" << endl;
    }
    if(state!=active) return;
    {
@@ -360,7 +356,7 @@ void MonitorLocal::endGroupPut(PVRecordPtr const & pvRecord)
 {
    if(pvRecord->getTraceLevel()>1)
    {
-        cout << "PVCopyMonitor::endGroupPut dataChanged " << dataChanged << endl;
+        cout << "MonitorLocal::endGroupPut dataChanged " << dataChanged << endl;
    }
    if(state!=active) return;
    {
@@ -377,7 +373,7 @@ void MonitorLocal::unlisten(PVRecordPtr const & pvRecord)
 {
    if(pvRecord->getTraceLevel()>1)
    {
-        cout << "PVCopyMonitor::unlisten\n";
+        cout << "MonitorLocal::unlisten\n";
    }
    {
        Lock xx(mutex);
@@ -387,7 +383,7 @@ void MonitorLocal::unlisten(PVRecordPtr const & pvRecord)
    if(requester) {
        if(pvRecord->getTraceLevel()>1)
        {
-            cout << "PVCopyMonitor::unlisten calling requester->unlisten\n";
+            cout << "MonitorLocal::unlisten calling requester->unlisten\n";
        }
        requester->unlisten(getPtrSelf());
    }
--- a/src/pvAccess/registerChannelProviderLocal.cpp
+++ b/src/pvAccess/registerChannelProviderLocal.cpp
@@ -46,7 +46,6 @@ extern "C" void pvdbl(const iocshArgBuf *args)
 static void registerChannelProviderLocal(void)
 {
    static int firstTime = 1;
-cout << "registerChannelProviderLocal firstTime " << (firstTime ? "true" : "false") << endl;
    if (firstTime) {
        firstTime = 0;
        iocshRegister(&pvdblFuncDef, pvdbl);
--- a/src/special/Makefile
+++ b/src/special/Makefile
@@ -2,17 +2,17 @@

 SRC_DIRS += $(PVDATABASE_SRC)/special

-LIBSRCS += traceRecord.cpp
-LIBSRCS += removeRecord.cpp
-LIBSRCS += addRecord.cpp
-LIBSRCS += processRecord.cpp
+DBD += pvdbcrScalarRecord.dbd
+DBD += pvdbcrScalarArrayRecord.dbd
+DBD += pvdbcrAddRecord.dbd
+DBD += pvdbcrRemoveRecord.dbd
+DBD += pvdbcrProcessRecord.dbd
+DBD += pvdbcrTraceRecord.dbd
+DBD += pvdbcrAllRecords.dbd

-DBD += traceRecordRegister.dbd
-DBD += removeRecordRegister.dbd
-DBD += addRecordRegister.dbd
-DBD += processRecordRegister.dbd
-
-LIBSRCS += traceRecordRegister.cpp
-LIBSRCS += removeRecordRegister.cpp
-LIBSRCS += addRecordRegister.cpp
-LIBSRCS += processRecordRegister.cpp
+LIBSRCS += pvdbcrScalarRecord.cpp
+LIBSRCS += pvdbcrScalarArrayRecord.cpp
+LIBSRCS += pvdbcrAddRecord.cpp
+LIBSRCS += pvdbcrRemoveRecord.cpp
+LIBSRCS += pvdbcrProcessRecord.cpp
+LIBSRCS += pvdbcrTraceRecord.cpp
--- a/src/special/addRecordRegister.cpp
+++ b/src/special/addRecordRegister.cpp
@@ -1,62 +0,0 @@
-/*
- * Copyright information and license terms for this software can be
- * found in the file LICENSE that is included with the distribution
- */
-
-/**
- * @author mrk
- * @date 2013.07.24
- */
-
-
-/* Author: Marty Kraimer */
-#include <epicsThread.h>
-#include <iocsh.h>
-#include <pv/event.h>
-#include <pv/pvAccess.h>
-#include <pv/serverContext.h>
-#include <pv/pvData.h>
-#include <pv/pvTimeStamp.h>
-#include <pv/rpcService.h>
-
-// The following must be the last include for code pvDatabase uses
-#include <epicsExport.h>
-#define epicsExportSharedSymbols
-#include "pv/pvStructureCopy.h"
-#include "pv/pvDatabase.h"
-#include "pv/addRecord.h"
-
-using namespace epics::pvData;
-using namespace epics::pvAccess;
-using namespace epics::pvDatabase;
-using namespace std;
-
-static const iocshArg testArg0 = { "recordName", iocshArgString };
-static const iocshArg *testArgs[] = {
-    &testArg0};
-
-static const iocshFuncDef addRecordFuncDef = {"addRecordCreate", 1,testArgs};
-
-static void addRecordCallFunc(const iocshArgBuf *args)
-{
-    char *recordName = args[0].sval;
-    if(!recordName) {
-        throw std::runtime_error("addRecordCreate invalid number of arguments");
-    }
-    AddRecordPtr record = AddRecord::create(recordName);
-    bool result = PVDatabase::getMaster()->addRecord(record);
-    if(!result) cout << "recordname" << " not added" << endl;
-}
-
-static void addRecordRegister(void)
-{
-    static int firstTime = 1;
-    if (firstTime) {
-        firstTime = 0;
-        iocshRegister(&addRecordFuncDef, addRecordCallFunc);
-    }
-}
-
-extern "C" {
-    epicsExportRegistrar(addRecordRegister);
-}
--- a/src/special/addRecordRegister.dbd
+++ b/src/special/addRecordRegister.dbd
@@ -1 +0,0 @@
-registrar("addRecordRegister")
--- a/src/special/processRecordRegister.cpp
+++ b/src/special/processRecordRegister.cpp
@@ -1,67 +0,0 @@
-/*
- * Copyright information and license terms for this software can be
- * found in the file LICENSE that is included with the distribution
- */
-
-/**
- * @author mrk
- * @date 2013.07.24
- */
-
-
-/* Author: Marty Kraimer */
-
-#include <epicsThread.h>
-#include <iocsh.h>
-#include <pv/event.h>
-#include <pv/pvAccess.h>
-#include <pv/serverContext.h>
-#include <pv/pvData.h>
-#include <pv/pvTimeStamp.h>
-#include <pv/rpcService.h>
-
-// The following must be the last include for code pvDatabase uses
-#include <epicsExport.h>
-#define epicsExportSharedSymbols
-#include "pv/pvStructureCopy.h"
-#include "pv/pvDatabase.h"
-#include "pv/processRecord.h"
-
-
-using namespace epics::pvData;
-using namespace epics::pvAccess;
-using namespace epics::pvDatabase;
-using namespace std;
-
-static const iocshArg testArg0 = { "recordName", iocshArgString };
-static const iocshArg testArg1 = { "delay", iocshArgDouble };
-static const iocshArg *testArgs[] = {
-    &testArg0,&testArg1};
-
-static const iocshFuncDef processRecordFuncDef = {"processRecordCreate", 2,testArgs};
-
-static void processRecordCallFunc(const iocshArgBuf *args)
-{
-    char *recordName = args[0].sval;
-    if(!recordName) {
-        throw std::runtime_error("processRecordCreate invalid number of arguments");
-    }
-    double delay = args[1].dval;
-    if(delay<0.0) delay = 1.0;
-    ProcessRecordPtr record = ProcessRecord::create(recordName,delay);
-    bool result = PVDatabase::getMaster()->addRecord(record);
-    if(!result) cout << "recordname" << " not added" << endl;
-}
-
-static void processRecordRegister(void)
-{
-    static int firstTime = 1;
-    if (firstTime) {
-        firstTime = 0;
-        iocshRegister(&processRecordFuncDef, processRecordCallFunc);
-    }
-}
-
-extern "C" {
-    epicsExportRegistrar(processRecordRegister);
-}
--- a/src/special/processRecordRegister.dbd
+++ b/src/special/processRecordRegister.dbd
@@ -1 +0,0 @@
-registrar("processRecordRegister")
--- a/src/special/pvdbcrAddRecord.cpp
+++ b/src/special/pvdbcrAddRecord.cpp
@@ -1,46 +1,36 @@
-/* addRecord.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.
+/*
+ * Copyright information and license terms for this software can be
+ * found in the file LICENSE that is included with the distribution
 */
+
 /**
 * @author mrk
- * @date 2013.04.18
+ * @date 2021.04.07
 */
-
-#include <string>
-#include <cstring>
-#include <stdexcept>
-#include <memory>
-#include <set>
-
-#include <pv/lock.h>
-#include <pv/pvType.h>
-#include <pv/pvData.h>
+#include <iocsh.h>
 #include <pv/standardField.h>
-#include <pv/pvTimeStamp.h>
+#include <pv/standardPVField.h>
 #include <pv/timeStamp.h>
-#include <pv/rpcService.h>
+#include <pv/pvTimeStamp.h>
+#include <pv/alarm.h>
+#include <pv/pvAlarm.h>
 #include <pv/pvAccess.h>
-#include <pv/status.h>
 #include <pv/serverContext.h>
+#include <pv/rpcService.h>

-
+// The following must be the last include for code exampleLink uses
+#include <epicsExport.h>
 #define epicsExportSharedSymbols
-#include "pv/pvStructureCopy.h"
 #include "pv/pvDatabase.h"
-#include "pv/addRecord.h"
-
-using std::tr1::static_pointer_cast;
+#include "pv/pvdbcrAddRecord.h"
 using namespace epics::pvData;
-using namespace epics::pvAccess;
 using namespace std;

-namespace epics { namespace pvDatabase { 
+namespace epics { namespace pvDatabase {

-AddRecordPtr AddRecord::create(
-    std::string const & recordName)
+PvdbcrAddRecordPtr PvdbcrAddRecord::create(
+    std::string const & recordName,
+    int asLevel,std::string const & asGroup)
 {
    FieldCreatePtr fieldCreate = getFieldCreate();
    PVDataCreatePtr pvDataCreate = getPVDataCreate();
@@ -55,20 +45,21 @@ AddRecordPtr AddRecord::create(
            endNested()->
        createStructure();
    PVStructurePtr pvStructure = pvDataCreate->createPVStructure(topStructure);
-    AddRecordPtr pvRecord(
-        new AddRecord(recordName,pvStructure));
+    PvdbcrAddRecordPtr pvRecord(
+        new PvdbcrAddRecord(recordName,pvStructure,asLevel,asGroup));
    if(!pvRecord->init()) pvRecord.reset();
    return pvRecord;
 }

-AddRecord::AddRecord(
+PvdbcrAddRecord::PvdbcrAddRecord(
    std::string const & recordName,
-    epics::pvData::PVStructurePtr const & pvStructure)
-: PVRecord(recordName,pvStructure)
+    PVStructurePtr const & pvStructure,
+    int asLevel,std::string const & asGroup)
+: PVRecord(recordName,pvStructure,asLevel,asGroup)
 {
 }

-bool AddRecord::init()
+bool PvdbcrAddRecord::init()
 {
    initPVRecord();
    PVStructurePtr pvStructure = getPVStructure();
@@ -79,7 +70,7 @@ bool AddRecord::init()
    return true;
 }

-void AddRecord::process()
+void PvdbcrAddRecord::process()
 {
    PVDataCreatePtr pvDataCreate = getPVDataCreate();
    string name = pvRecordName->get();
@@ -102,7 +93,7 @@ void AddRecord::process()
        pvResult->put(name + " union most be a structure");
        return;
    }
-    StructureConstPtr st = static_pointer_cast<const Structure>(pvField->getField());
+    StructureConstPtr st = std::tr1::static_pointer_cast<const Structure>(pvField->getField());
    PVStructurePtr pvStructure = pvDataCreate->createPVStructure(st);
    PVRecordPtr pvRec = PVRecord::create(name,pvStructure);
    bool result = PVDatabase::getMaster()->addRecord(pvRec);
@@ -112,7 +103,45 @@ void AddRecord::process()
        pvResult->put("failure");
    }
 }
-
-
 }}

+static const iocshArg arg0 = { "recordName", iocshArgString };
+static const iocshArg arg1 = { "asLevel", iocshArgInt };
+static const iocshArg arg2 = { "asGroup", iocshArgString };
+static const iocshArg *args[] = {&arg0,&arg1,&arg2};
+
+static const iocshFuncDef pvdbcrAddRecordFuncDef = {"pvdbcrAddRecord", 3,args};
+
+static void pvdbcrAddRecordCallFunc(const iocshArgBuf *args)
+{
+    char *sval = args[0].sval;
+    if(!sval) {
+        throw std::runtime_error("pvdbcrAddRecord recordName not specified");
+    }
+    string recordName = string(sval);
+    int asLevel = args[1].ival;
+    string asGroup("DEFAULT");
+    sval = args[2].sval;
+    if(sval) {
+        asGroup = string(sval);
+    }
+    epics::pvDatabase::PvdbcrAddRecordPtr record = epics::pvDatabase::PvdbcrAddRecord::create(recordName);
+    record->setAsLevel(asLevel);
+    record->setAsGroup(asGroup);
+    epics::pvDatabase::PVDatabasePtr master = epics::pvDatabase::PVDatabase::getMaster();
+    bool result =  master->addRecord(record);
+    if(!result) cout << "recordname " << recordName << " not added" << endl;
+}
+
+static void pvdbcrAddRecord(void)
+{
+    static int firstTime = 1;
+    if (firstTime) {
+        firstTime = 0;
+        iocshRegister(&pvdbcrAddRecordFuncDef, pvdbcrAddRecordCallFunc);
+    }
+}
+
+extern "C" {
+    epicsExportRegistrar(pvdbcrAddRecord);
+}
--- a/src/special/pvdbcrAddRecord.dbd
+++ b/src/special/pvdbcrAddRecord.dbd
@@ -0,0 +1 @@
+registrar("pvdbcrAddRecord")
--- a/src/special/pvdbcrAllRecords.dbd
+++ b/src/special/pvdbcrAllRecords.dbd
@@ -0,0 +1,6 @@
+include "pvdbcrAddRecord.dbd"
+include "pvdbcrRemoveRecord.dbd"
+include "pvdbcrProcessRecord.dbd"
+include "pvdbcrTraceRecord.dbd"
+include "pvdbcrScalarRecord.dbd"
+include "pvdbcrScalarArrayRecord.dbd"
--- a/src/special/pvdbcrProcessRecord.cpp
+++ b/src/special/pvdbcrProcessRecord.cpp
@@ -1,47 +1,39 @@
-/* processRecord.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.
+/*
+ * Copyright information and license terms for this software can be
+ * found in the file LICENSE that is included with the distribution
 */
+
 /**
 * @author mrk
- * @date 2013.04.18
+ * @date 2021.04.07
 */
-#include <map>
 #include <epicsThread.h>
+#include <epicsGuard.h>
 #include <pv/event.h>
-#include <shareLib.h>
-#include <string>
-#include <cstring>
-#include <stdexcept>
-#include <memory>
-#include <set>
-
 #include <pv/lock.h>
-#include <pv/pvType.h>
-#include <pv/pvData.h>
-#include <pv/pvTimeStamp.h>
+#include <iocsh.h>
+#include <pv/standardField.h>
+#include <pv/standardPVField.h>
 #include <pv/timeStamp.h>
-#include <pv/rpcService.h>
+#include <pv/pvTimeStamp.h>
+#include <pv/alarm.h>
+#include <pv/pvAlarm.h>
 #include <pv/pvAccess.h>
-#include <pv/status.h>
 #include <pv/serverContext.h>
+#include <pv/rpcService.h>

+#include <epicsExport.h>
 #define epicsExportSharedSymbols
-#include "pv/pvStructureCopy.h"
 #include "pv/pvDatabase.h"
-#include "pv/processRecord.h"
-
-using std::tr1::static_pointer_cast;
+#include "pv/pvdbcrProcessRecord.h"
 using namespace epics::pvData;
-using namespace epics::pvAccess;
 using namespace std;

-namespace epics { namespace pvDatabase { 
+namespace epics { namespace pvDatabase {

-ProcessRecordPtr ProcessRecord::create(
-    std::string const & recordName,double delay)
+PvdbcrProcessRecordPtr PvdbcrProcessRecord::create(
+    std::string const & recordName,double delay,
+    int asLevel,std::string const & asGroup)
 {
    FieldCreatePtr fieldCreate = getFieldCreate();
    PVDataCreatePtr pvDataCreate = getPVDataCreate();
@@ -55,39 +47,24 @@ ProcessRecordPtr ProcessRecord::create(
            endNested()->
        createStructure();
    PVStructurePtr pvStructure = pvDataCreate->createPVStructure(topStructure);
-    ProcessRecordPtr pvRecord(
-        new ProcessRecord(recordName,pvStructure,delay));
+    PvdbcrProcessRecordPtr pvRecord(
+        new PvdbcrProcessRecord(recordName,pvStructure,delay,asLevel,asGroup));
    if(!pvRecord->init()) pvRecord.reset();
    return pvRecord;
 }

-void ProcessRecord::startThread()
-{
-    thread = EpicsThreadPtr(new epicsThread(
-        *this,
-        "processRecord",
-        epicsThreadGetStackSize(epicsThreadStackSmall),
-        epicsThreadPriorityLow));
-    thread->start();
-}

-void ProcessRecord::stop()
-{
-    runStop.signal();
-    runReturn.wait();
-}
-
-
-ProcessRecord::ProcessRecord(
+PvdbcrProcessRecord::PvdbcrProcessRecord(
    std::string const & recordName,
-    epics::pvData::PVStructurePtr const & pvStructure,double delay)
-: PVRecord(recordName,pvStructure),
+    epics::pvData::PVStructurePtr const & pvStructure,double delay,
+    int asLevel,std::string const & asGroup)
+: PVRecord(recordName,pvStructure,asLevel,asGroup),
  delay(delay),
  pvDatabase(PVDatabase::getMaster())
 {
 }

-bool ProcessRecord::init()
+bool PvdbcrProcessRecord::init()
 {
    initPVRecord();
    PVStructurePtr pvStructure = getPVStructure();
@@ -100,7 +77,27 @@ bool ProcessRecord::init()
    return true;
 }

-void ProcessRecord::process()
+void PvdbcrProcessRecord::setDelay(double delay) {this->delay = delay;}
+
+double PvdbcrProcessRecord::getDelay() {return delay;}
+
+void PvdbcrProcessRecord::startThread()
+{
+    thread = EpicsThreadPtr(new epicsThread(
+        *this,
+        "processRecord",
+        epicsThreadGetStackSize(epicsThreadStackSmall),
+        epicsThreadPriorityLow));
+    thread->start();
+}
+
+void PvdbcrProcessRecord::stop()
+{
+    runStop.signal();
+    runReturn.wait();
+}
+
+void PvdbcrProcessRecord::process()
 {
    string recordName = pvRecordName->get();
    string command = pvCommand->get();
@@ -135,13 +132,13 @@ void ProcessRecord::process()
    }
 }

-void ProcessRecord::run()
+void PvdbcrProcessRecord::run()
 {
    while(true) {
        if(runStop.tryWait()) {
             runReturn.signal();
             return;
-        }    
+        }
        if(delay>0.0) epicsThreadSleep(delay);
        epicsGuard<epics::pvData::Mutex> guard(mutex);
        PVRecordMap::iterator iter;
@@ -161,7 +158,49 @@ void ProcessRecord::run()
        }
    }
 }
-
-
 }}

+static const iocshArg arg0 = { "recordName", iocshArgString };
+static const iocshArg arg1 = { "delay", iocshArgDouble };
+static const iocshArg arg2 = { "asLevel", iocshArgInt };
+static const iocshArg arg3 = { "asGroup", iocshArgString };
+static const iocshArg *args[] = {&arg0,&arg1,&arg2,&arg3};
+
+static const iocshFuncDef pvdbcrProcessRecordFuncDef = {"pvdbcrProcessRecord", 4,args};
+
+static void pvdbcrProcessRecordCallFunc(const iocshArgBuf *args)
+{
+    char *sval = args[0].sval;
+    if(!sval) {
+        throw std::runtime_error("pvdbcrProcessRecord recordName not specified");
+    }
+    string recordName = string(sval);
+    double delay = args[1].dval;
+    if(delay<0.0) delay = 1.0;
+    int asLevel = args[2].ival;
+    string asGroup("DEFAULT");
+    sval = args[3].sval;
+    if(sval) {
+        asGroup = string(sval);
+    }
+    epics::pvDatabase::PvdbcrProcessRecordPtr record
+         = epics::pvDatabase::PvdbcrProcessRecord::create(recordName,delay);
+    record->setAsLevel(asLevel);
+    record->setAsGroup(asGroup);
+    epics::pvDatabase::PVDatabasePtr master = epics::pvDatabase::PVDatabase::getMaster();
+    bool result =  master->addRecord(record);
+    if(!result) cout << "recordname " << recordName << " not added" << endl;
+}
+
+static void pvdbcrProcessRecord(void)
+{
+    static int firstTime = 1;
+    if (firstTime) {
+        firstTime = 0;
+        iocshRegister(&pvdbcrProcessRecordFuncDef, pvdbcrProcessRecordCallFunc);
+    }
+}
+
+extern "C" {
+    epicsExportRegistrar(pvdbcrProcessRecord);
+}
--- a/src/special/pvdbcrProcessRecord.dbd
+++ b/src/special/pvdbcrProcessRecord.dbd
@@ -0,0 +1 @@
+registrar("pvdbcrProcessRecord")
--- a/src/special/pvdbcrRemoveRecord.cpp
+++ b/src/special/pvdbcrRemoveRecord.cpp
@@ -0,0 +1,123 @@
+/*
+ * Copyright information and license terms for this software can be
+ * found in the file LICENSE that is included with the distribution
+ */
+
+/**
+ * @author mrk
+ * @date 2021.04.07
+ */
+#include <iocsh.h>
+#include <pv/standardField.h>
+#include <pv/standardPVField.h>
+#include <pv/timeStamp.h>
+#include <pv/pvTimeStamp.h>
+#include <pv/alarm.h>
+#include <pv/pvAlarm.h>
+#include <pv/pvAccess.h>
+#include <pv/serverContext.h>
+#include <pv/rpcService.h>
+
+#include <epicsExport.h>
+#define epicsExportSharedSymbols
+#include "pv/pvDatabase.h"
+#include "pv/pvdbcrRemoveRecord.h"
+using namespace epics::pvData;
+using namespace std;
+
+namespace epics { namespace pvDatabase {
+
+PvdbcrRemoveRecordPtr PvdbcrRemoveRecord::create(
+    std::string const & recordName,
+    int asLevel,std::string const & asGroup)
+{
+    FieldCreatePtr fieldCreate = getFieldCreate();
+    PVDataCreatePtr pvDataCreate = getPVDataCreate();
+    StructureConstPtr  topStructure = fieldCreate->createFieldBuilder()->
+        addNestedStructure("argument")->
+            add("recordName",pvString)->
+            endNested()->
+        addNestedStructure("result") ->
+            add("status",pvString) ->
+            endNested()->
+        createStructure();
+    PVStructurePtr pvStructure = pvDataCreate->createPVStructure(topStructure);
+    PvdbcrRemoveRecordPtr pvRecord(
+        new PvdbcrRemoveRecord(recordName,pvStructure,
+        asLevel,asGroup));
+    if(!pvRecord->init()) pvRecord.reset();
+    return pvRecord;
+}
+
+PvdbcrRemoveRecord::PvdbcrRemoveRecord(
+    std::string const & recordName,
+    epics::pvData::PVStructurePtr const & pvStructure,
+    int asLevel,std::string const & asGroup)
+: PVRecord(recordName,pvStructure,asLevel,asGroup)
+{
+}
+
+bool PvdbcrRemoveRecord::init()
+{
+    initPVRecord();
+    PVStructurePtr pvStructure = getPVStructure();
+    pvRecordName = pvStructure->getSubField<PVString>("argument.recordName");
+    if(!pvRecordName) return false;
+    pvResult = pvStructure->getSubField<PVString>("result.status");
+    if(!pvResult) return false;
+    return true;
+}
+
+void PvdbcrRemoveRecord::process()
+{
+    string name = pvRecordName->get();
+    PVRecordPtr pvRecord = PVDatabase::getMaster()->findRecord(name);
+    if(!pvRecord) {
+        pvResult->put(name + " not found");
+        return;
+    }
+    pvRecord->remove();
+    pvResult->put("success");
+}
+}}
+
+static const iocshArg arg0 = { "recordName", iocshArgString };
+static const iocshArg arg1 = { "asLevel", iocshArgInt };
+static const iocshArg arg2 = { "asGroup", iocshArgString };
+static const iocshArg *args[] = {&arg0,&arg1,&arg2};
+
+static const iocshFuncDef pvdbcrRemoveRecordFuncDef = {"pvdbcrRemoveRecord", 3,args};
+
+static void pvdbcrRemoveRecordCallFunc(const iocshArgBuf *args)
+{
+    char *sval = args[0].sval;
+    if(!sval) {
+        throw std::runtime_error("pvdbcrRemoveRecord recordName not specified");
+    }
+    string recordName = string(sval);
+    int asLevel = args[1].ival;
+    string asGroup("DEFAULT");
+    sval = args[2].sval;
+    if(sval) {
+        asGroup = string(sval);
+    }
+    epics::pvDatabase::PvdbcrRemoveRecordPtr record = epics::pvDatabase::PvdbcrRemoveRecord::create(recordName);
+    record->setAsLevel(asLevel);
+    record->setAsGroup(asGroup);
+    epics::pvDatabase::PVDatabasePtr master = epics::pvDatabase::PVDatabase::getMaster();
+    bool result =  master->addRecord(record);
+    if(!result) cout << "recordname " << recordName << " not added" << endl;
+}
+
+static void pvdbcrRemoveRecord(void)
+{
+    static int firstTime = 1;
+    if (firstTime) {
+        firstTime = 0;
+        iocshRegister(&pvdbcrRemoveRecordFuncDef, pvdbcrRemoveRecordCallFunc);
+    }
+}
+
+extern "C" {
+    epicsExportRegistrar(pvdbcrRemoveRecord);
+}
--- a/src/special/pvdbcrRemoveRecord.dbd
+++ b/src/special/pvdbcrRemoveRecord.dbd
@@ -0,0 +1 @@
+registrar("pvdbcrRemoveRecord")
--- a/src/special/pvdbcrScalarArrayRecord.cpp
+++ b/src/special/pvdbcrScalarArrayRecord.cpp
@@ -0,0 +1,103 @@
+/*
+ * Copyright information and license terms for this software can be
+ * found in the file LICENSE that is included with the distribution
+ */
+
+/**
+ * @author mrk
+ * @date 2021.04.07
+ */
+#include <iocsh.h>
+#include <pv/standardField.h>
+#include <pv/standardPVField.h>
+#include <pv/timeStamp.h>
+#include <pv/pvTimeStamp.h>
+#include <pv/alarm.h>
+#include <pv/pvAlarm.h>
+#include <pv/pvAccess.h>
+#include <pv/serverContext.h>
+#include <pv/rpcService.h>
+
+// The following must be the last include for code pvDatabase implements
+#include <epicsExport.h>
+#define epicsExportSharedSymbols
+#include "pv/pvDatabase.h"
+#include "pv/pvdbcrScalarArrayRecord.h"
+using namespace epics::pvData;
+using namespace std;
+
+namespace epics { namespace pvDatabase {
+
+PvdbcrScalarArrayRecord::PvdbcrScalarArrayRecord(
+    std::string const & recordName,epics::pvData::PVStructurePtr const & pvStructure,
+    int asLevel,std::string const & asGroup)
+: PVRecord(recordName,pvStructure,asLevel,asGroup)
+{}
+
+PvdbcrScalarArrayRecordPtr PvdbcrScalarArrayRecord::create(
+    std::string const & recordName,std::string const &  scalarType,
+    int asLevel,std::string const & asGroup)
+{
+    ScalarType st = epics::pvData::ScalarTypeFunc::getScalarType(scalarType);
+    FieldCreatePtr fieldCreate = getFieldCreate();
+    StandardFieldPtr standardField = getStandardField();
+    PVDataCreatePtr pvDataCreate = getPVDataCreate();
+    StructureConstPtr top = fieldCreate->createFieldBuilder()->
+        addArray("value",st) ->
+        add("timeStamp",standardField->timeStamp()) ->
+        add("alarm",standardField->alarm()) ->
+        createStructure();
+    PVStructurePtr pvStructure = pvDataCreate->createPVStructure(top);   
+    PvdbcrScalarArrayRecordPtr pvRecord(new PvdbcrScalarArrayRecord(recordName,pvStructure,asLevel,asGroup));
+    pvRecord->initPVRecord();
+    return pvRecord;
+};
+}}
+
+static const iocshArg arg0 = { "recordName", iocshArgString };
+static const iocshArg arg1 = { "scalarType", iocshArgString };
+static const iocshArg arg2 = { "asLevel", iocshArgInt };
+static const iocshArg arg3 = { "asGroup", iocshArgString };
+static const iocshArg *args[] = {&arg0,&arg1,&arg2,&arg3};
+
+static const iocshFuncDef pvdbcrScalarArrayFuncDef = {"pvdbcrScalarArrayRecord", 4,args};
+
+static void pvdbcrScalarArrayCallFunc(const iocshArgBuf *args)
+{
+    char *sval = args[0].sval;
+    if(!sval) {
+        throw std::runtime_error("pvdbcrScalarArrayRecord recordName not specified");
+    }
+    string recordName = string(sval);
+    sval = args[1].sval;
+    if(!sval) {
+        throw std::runtime_error("pvdbcrScalarArrayRecord scalarType not specified");
+    }
+    string scalarType = string(sval);
+    int asLevel = args[2].ival;
+    string asGroup("DEFAULT");
+    sval = args[3].sval;
+    if(sval) {
+        asGroup = string(sval);
+    }
+    epics::pvDatabase::PvdbcrScalarArrayRecordPtr record
+        = epics::pvDatabase::PvdbcrScalarArrayRecord::create(recordName,scalarType);
+    epics::pvDatabase::PVDatabasePtr master = epics::pvDatabase::PVDatabase::getMaster();
+    record->setAsLevel(asLevel);
+    record->setAsGroup(asGroup);
+    bool result =  master->addRecord(record);
+    if(!result) cout << "recordname " << recordName << " not added" << endl;
+}
+
+static void pvdbcrScalarArrayRecord(void)
+{
+    static int firstTime = 1;
+    if (firstTime) {
+        firstTime = 0;
+        iocshRegister(&pvdbcrScalarArrayFuncDef, pvdbcrScalarArrayCallFunc);
+    }
+}
+
+extern "C" {
+    epicsExportRegistrar(pvdbcrScalarArrayRecord);
+}
--- a/src/special/pvdbcrScalarArrayRecord.dbd
+++ b/src/special/pvdbcrScalarArrayRecord.dbd
@@ -0,0 +1 @@
+registrar("pvdbcrScalarArrayRecord")
--- a/src/special/pvdbcrScalarRecord.cpp
+++ b/src/special/pvdbcrScalarRecord.cpp
@@ -0,0 +1,103 @@
+/*
+ * Copyright information and license terms for this software can be
+ * found in the file LICENSE that is included with the distribution
+ */
+
+/**
+ * @author mrk
+ * @date 2021.04.07
+ */
+#include <iocsh.h>
+#include <pv/standardField.h>
+#include <pv/standardPVField.h>
+#include <pv/timeStamp.h>
+#include <pv/pvTimeStamp.h>
+#include <pv/alarm.h>
+#include <pv/pvAlarm.h>
+#include <pv/pvAccess.h>
+#include <pv/serverContext.h>
+#include <pv/rpcService.h>
+
+// The following must be the last include for code pvDatabase implements
+#include <epicsExport.h>
+#define epicsExportSharedSymbols
+#include "pv/pvDatabase.h"
+#include "pv/pvdbcrScalarRecord.h"
+using namespace epics::pvData;
+using namespace std;
+
+namespace epics { namespace pvDatabase {
+
+PvdbcrScalarRecord::PvdbcrScalarRecord(
+    std::string const & recordName,epics::pvData::PVStructurePtr const & pvStructure,
+    int asLevel,std::string const & asGroup)
+: PVRecord(recordName,pvStructure,asLevel,asGroup)
+{}
+
+PvdbcrScalarRecordPtr PvdbcrScalarRecord::create(
+    std::string const & recordName,std::string const &  scalarType,
+    int asLevel,std::string const & asGroup)
+{
+    ScalarType st = epics::pvData::ScalarTypeFunc::getScalarType(scalarType);
+    FieldCreatePtr fieldCreate = getFieldCreate();
+    StandardFieldPtr standardField = getStandardField();
+    PVDataCreatePtr pvDataCreate = getPVDataCreate();
+    StructureConstPtr top = fieldCreate->createFieldBuilder()->
+        add("value",st) ->
+        add("timeStamp",standardField->timeStamp()) ->
+        add("alarm",standardField->alarm()) ->
+        createStructure();
+    PVStructurePtr pvStructure = pvDataCreate->createPVStructure(top);   
+    PvdbcrScalarRecordPtr pvRecord(new PvdbcrScalarRecord(recordName,pvStructure,asLevel,asGroup));
+    pvRecord->initPVRecord();
+    return pvRecord;
+};
+}}
+
+static const iocshArg arg0 = { "recordName", iocshArgString };
+static const iocshArg arg1 = { "scalarType", iocshArgString };
+static const iocshArg arg2 = { "asLevel", iocshArgInt };
+static const iocshArg arg3 = { "asGroup", iocshArgString };
+static const iocshArg *args[] = {&arg0,&arg1,&arg2,&arg3};
+
+static const iocshFuncDef pvdbcrScalarFuncDef = {"pvdbcrScalarRecord", 4,args};
+
+static void pvdbcrScalarCallFunc(const iocshArgBuf *args)
+{
+    char *sval = args[0].sval;
+    if(!sval) {
+        throw std::runtime_error("pvdbcrScalarRecord recordName not specified");
+    }
+    string recordName = string(sval);
+    sval = args[1].sval;
+    if(!sval) {
+        throw std::runtime_error("pvdbcrScalarRecord scalarType not specified");
+    }
+    string scalarType = string(sval);
+    int asLevel = args[2].ival;
+    string asGroup("DEFAULT");
+    sval = args[3].sval;
+    if(sval) {
+        asGroup = string(sval);
+    }
+    epics::pvDatabase::PvdbcrScalarRecordPtr record
+        = epics::pvDatabase::PvdbcrScalarRecord::create(recordName,scalarType);
+    epics::pvDatabase::PVDatabasePtr master = epics::pvDatabase::PVDatabase::getMaster();
+    record->setAsLevel(asLevel);
+    record->setAsGroup(asGroup);
+    bool result =  master->addRecord(record);
+    if(!result) cout << "recordname " << recordName << " not added" << endl;
+}
+
+static void pvdbcrScalarRecord(void)
+{
+    static int firstTime = 1;
+    if (firstTime) {
+        firstTime = 0;
+        iocshRegister(&pvdbcrScalarFuncDef, pvdbcrScalarCallFunc);
+    }
+}
+
+extern "C" {
+    epicsExportRegistrar(pvdbcrScalarRecord);
+}
--- a/src/special/pvdbcrScalarRecord.dbd
+++ b/src/special/pvdbcrScalarRecord.dbd
@@ -0,0 +1 @@
+registrar("pvdbcrScalarRecord")
--- a/src/special/pvdbcrTraceRecord.cpp
+++ b/src/special/pvdbcrTraceRecord.cpp
@@ -0,0 +1,128 @@
+/*
+ * Copyright information and license terms for this software can be
+ * found in the file LICENSE that is included with the distribution
+ */
+
+/**
+ * @author mrk
+ * @date 2021.04.07
+ */
+#include <iocsh.h>
+#include <pv/standardField.h>
+#include <pv/standardPVField.h>
+#include <pv/timeStamp.h>
+#include <pv/pvTimeStamp.h>
+#include <pv/alarm.h>
+#include <pv/pvAlarm.h>
+#include <pv/pvAccess.h>
+#include <pv/serverContext.h>
+#include <pv/rpcService.h>
+
+// The following must be the last include
+#include <epicsExport.h>
+#define epicsExportSharedSymbols
+#include "pv/pvDatabase.h"
+#include "pv/pvdbcrTraceRecord.h"
+using namespace epics::pvData;
+using namespace std;
+
+namespace epics { namespace pvDatabase {
+
+PvdbcrTraceRecordPtr PvdbcrTraceRecord::create(
+    std::string const & recordName,
+    int asLevel,std::string const & asGroup)
+{
+    FieldCreatePtr fieldCreate = getFieldCreate();
+    PVDataCreatePtr pvDataCreate = getPVDataCreate();
+    StructureConstPtr  topStructure = fieldCreate->createFieldBuilder()->
+        addNestedStructure("argument")->
+            add("recordName",pvString)->
+            add("level",pvInt)->
+            endNested()->
+        addNestedStructure("result") ->
+            add("status",pvString) ->
+            endNested()->
+        createStructure();
+    PVStructurePtr pvStructure = pvDataCreate->createPVStructure(topStructure);
+    PvdbcrTraceRecordPtr pvRecord(
+        new PvdbcrTraceRecord(recordName,pvStructure,asLevel,asGroup));
+    if(!pvRecord->init()) pvRecord.reset();
+    return pvRecord;
+}
+
+PvdbcrTraceRecord::PvdbcrTraceRecord(
+    std::string const & recordName,
+    epics::pvData::PVStructurePtr const & pvStructure,
+    int asLevel,std::string const & asGroup)
+: PVRecord(recordName,pvStructure,asLevel,asGroup)
+{
+}
+
+
+bool PvdbcrTraceRecord::init()
+{
+    initPVRecord();
+    PVStructurePtr pvStructure = getPVStructure();
+    pvRecordName = pvStructure->getSubField<PVString>("argument.recordName");
+    if(!pvRecordName) return false;
+    pvLevel = pvStructure->getSubField<PVInt>("argument.level");
+    if(!pvLevel) return false;
+    pvResult = pvStructure->getSubField<PVString>("result.status");
+    if(!pvResult) return false;
+    return true;
+}
+
+void PvdbcrTraceRecord::process()
+{
+    string name = pvRecordName->get();
+    PVRecordPtr pvRecord = PVDatabase::getMaster()->findRecord(name);
+    if(!pvRecord) {
+        pvResult->put(name + " not found");
+        return;
+    }
+    pvRecord->setTraceLevel(pvLevel->get());
+    pvResult->put("success");
+}
+}}
+
+static const iocshArg arg0 = { "recordName", iocshArgString };
+static const iocshArg arg1 = { "asLevel", iocshArgInt };
+static const iocshArg arg2 = { "asGroup", iocshArgString };
+static const iocshArg *args[] = {&arg0,&arg1,&arg2};
+
+static const iocshFuncDef pvdbcrTraceRecordFuncDef = {"pvdbcrTraceRecord", 3,args};
+
+static void pvdbcrTraceRecordCallFunc(const iocshArgBuf *args)
+{
+    char *sval = args[0].sval;
+    if(!sval) {
+        throw std::runtime_error("pvdbcrTraceRecord recordName not specified");
+    }
+    string recordName = string(sval);
+    int asLevel = args[1].ival;
+    string asGroup("DEFAULT");
+    sval = args[2].sval;
+    if(sval) {
+        asGroup = string(sval);
+    }
+    epics::pvDatabase::PvdbcrTraceRecordPtr record
+        = epics::pvDatabase::PvdbcrTraceRecord::create(recordName);
+    record->setAsLevel(asLevel);
+    record->setAsGroup(asGroup);
+    epics::pvDatabase::PVDatabasePtr master = epics::pvDatabase::PVDatabase::getMaster();
+    bool result =  master->addRecord(record);
+    if(!result) cout << "recordname " << recordName << " not added" << endl;
+}
+
+static void pvdbcrTraceRecord(void)
+{
+    static int firstTime = 1;
+    if (firstTime) {
+        firstTime = 0;
+        iocshRegister(&pvdbcrTraceRecordFuncDef, pvdbcrTraceRecordCallFunc);
+    }
+}
+
+extern "C" {
+    epicsExportRegistrar(pvdbcrTraceRecord);
+}
--- a/src/special/pvdbcrTraceRecord.dbd
+++ b/src/special/pvdbcrTraceRecord.dbd
@@ -0,0 +1 @@
+registrar("pvdbcrTraceRecord")
--- a/src/special/removeRecord.cpp
+++ b/src/special/removeRecord.cpp
@@ -1,93 +0,0 @@
-/* removeRecord.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
- * @date 2013.04.18
- */
-
-#include <string>
-#include <cstring>
-#include <stdexcept>
-#include <memory>
-#include <set>
-
-#include <pv/lock.h>
-#include <pv/pvType.h>
-#include <pv/pvData.h>
-#include <pv/pvTimeStamp.h>
-#include <pv/timeStamp.h>
-#include <pv/rpcService.h>
-#include <pv/pvAccess.h>
-#include <pv/status.h>
-#include <pv/serverContext.h>
-
-
-#define epicsExportSharedSymbols
-#include "pv/pvStructureCopy.h"
-#include "pv/pvDatabase.h"
-#include "pv/removeRecord.h"
-
-using std::tr1::static_pointer_cast;
-using namespace epics::pvData;
-using namespace epics::pvAccess;
-using namespace std;
-
-namespace epics { namespace pvDatabase { 
-
-RemoveRecordPtr RemoveRecord::create(
-    std::string const & recordName)
-{
-    FieldCreatePtr fieldCreate = getFieldCreate();
-    PVDataCreatePtr pvDataCreate = getPVDataCreate();
-    StructureConstPtr  topStructure = fieldCreate->createFieldBuilder()->
-        addNestedStructure("argument")->
-            add("recordName",pvString)->
-            endNested()->
-        addNestedStructure("result") ->
-            add("status",pvString) ->
-            endNested()->
-        createStructure();
-    PVStructurePtr pvStructure = pvDataCreate->createPVStructure(topStructure);
-    RemoveRecordPtr pvRecord(
-        new RemoveRecord(recordName,pvStructure));
-    if(!pvRecord->init()) pvRecord.reset();
-    return pvRecord;
-}
-
-RemoveRecord::RemoveRecord(
-    std::string const & recordName,
-    epics::pvData::PVStructurePtr const & pvStructure)
-: PVRecord(recordName,pvStructure)
-{
-}
-
-bool RemoveRecord::init()
-{
-    initPVRecord();
-    PVStructurePtr pvStructure = getPVStructure();
-    pvRecordName = pvStructure->getSubField<PVString>("argument.recordName");
-    if(!pvRecordName) return false;
-    pvResult = pvStructure->getSubField<PVString>("result.status");
-    if(!pvResult) return false;
-    return true;
-}
-
-void RemoveRecord::process()
-{
-    string name = pvRecordName->get();
-    PVRecordPtr pvRecord = PVDatabase::getMaster()->findRecord(name);
-    if(!pvRecord) {
-        pvResult->put(name + " not found");
-        return;
-    }
-    pvRecord->remove();
-    pvResult->put("success");
-}
-
-
-}}
-
--- a/src/special/removeRecordRegister.cpp
+++ b/src/special/removeRecordRegister.cpp
@@ -1,62 +0,0 @@
-/*
- * Copyright information and license terms for this software can be
- * found in the file LICENSE that is included with the distribution
- */
-
-/**
- * @author mrk
- * @date 2013.07.24
- */
-
-
-/* Author: Marty Kraimer */
-#include <epicsThread.h>
-#include <iocsh.h>
-#include <pv/event.h>
-#include <pv/pvAccess.h>
-#include <pv/serverContext.h>
-#include <pv/pvData.h>
-#include <pv/pvTimeStamp.h>
-#include <pv/rpcService.h>
-
-// The following must be the last include for code pvDatabase uses
-#include <epicsExport.h>
-#define epicsExportSharedSymbols
-#include "pv/pvStructureCopy.h"
-#include "pv/pvDatabase.h"
-#include "pv/removeRecord.h"
-
-using namespace epics::pvData;
-using namespace epics::pvAccess;
-using namespace epics::pvDatabase;
-using namespace std;
-
-static const iocshArg testArg0 = { "recordName", iocshArgString };
-static const iocshArg *testArgs[] = {
-    &testArg0};
-
-static const iocshFuncDef removeRecordFuncDef = {"removeRecordCreate", 1,testArgs};
-
-static void removeRecordCallFunc(const iocshArgBuf *args)
-{
-    char *recordName = args[0].sval;
-    if(!recordName) {
-        throw std::runtime_error("removeRecordCreate invalid number of arguments");
-    }
-    RemoveRecordPtr record = RemoveRecord::create(recordName);
-    bool result = PVDatabase::getMaster()->addRecord(record);
-    if(!result) cout << "recordname" << " not added" << endl;
-}
-
-static void removeRecordRegister(void)
-{
-    static int firstTime = 1;
-    if (firstTime) {
-        firstTime = 0;
-        iocshRegister(&removeRecordFuncDef, removeRecordCallFunc);
-    }
-}
-
-extern "C" {
-    epicsExportRegistrar(removeRecordRegister);
-}
--- a/src/special/removeRecordRegister.dbd
+++ b/src/special/removeRecordRegister.dbd
@@ -1 +0,0 @@
-registrar("removeRecordRegister")
--- a/src/special/traceRecord.cpp
+++ b/src/special/traceRecord.cpp
@@ -1,96 +0,0 @@
-/* traceRecord.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
- * @date 2013.04.18
- */
-
-#include <string>
-#include <cstring>
-#include <stdexcept>
-#include <memory>
-#include <set>
-
-#include <pv/lock.h>
-#include <pv/pvType.h>
-#include <pv/pvData.h>
-#include <pv/pvTimeStamp.h>
-#include <pv/timeStamp.h>
-#include <pv/rpcService.h>
-#include <pv/pvAccess.h>
-#include <pv/status.h>
-#include <pv/serverContext.h>
-
-#define epicsExportSharedSymbols
-#include "pv/pvStructureCopy.h"
-#include "pv/channelProviderLocal.h"
-#include "pv/traceRecord.h"
-
-using std::tr1::static_pointer_cast;
-using namespace epics::pvData;
-using namespace epics::pvAccess;
-using namespace std;
-
-namespace epics { namespace pvDatabase { 
-
-TraceRecordPtr TraceRecord::create(
-    std::string const & recordName)
-{
-    FieldCreatePtr fieldCreate = getFieldCreate();
-    PVDataCreatePtr pvDataCreate = getPVDataCreate();
-    StructureConstPtr  topStructure = fieldCreate->createFieldBuilder()->
-        addNestedStructure("argument")->
-            add("recordName",pvString)->
-            add("level",pvInt)->
-            endNested()->
-        addNestedStructure("result") ->
-            add("status",pvString) ->
-            endNested()->
-        createStructure();
-    PVStructurePtr pvStructure = pvDataCreate->createPVStructure(topStructure);
-    TraceRecordPtr pvRecord(
-        new TraceRecord(recordName,pvStructure));
-    if(!pvRecord->init()) pvRecord.reset();
-    return pvRecord;
-}
-
-TraceRecord::TraceRecord(
-    std::string const & recordName,
-    epics::pvData::PVStructurePtr const & pvStructure)
-: PVRecord(recordName,pvStructure)
-{
-}
-
-
-bool TraceRecord::init()
-{
-    initPVRecord();
-    PVStructurePtr pvStructure = getPVStructure();
-    pvRecordName = pvStructure->getSubField<PVString>("argument.recordName");
-    if(!pvRecordName) return false;
-    pvLevel = pvStructure->getSubField<PVInt>("argument.level");
-    if(!pvLevel) return false;
-    pvResult = pvStructure->getSubField<PVString>("result.status");
-    if(!pvResult) return false;
-    return true;
-}
-
-void TraceRecord::process()
-{
-    string name = pvRecordName->get();
-    PVRecordPtr pvRecord = PVDatabase::getMaster()->findRecord(name);
-    if(!pvRecord) {
-        pvResult->put(name + " not found");
-        return;
-    }
-    pvRecord->setTraceLevel(pvLevel->get());
-    pvResult->put("success");
-}
-
-
-}}
-
--- a/src/special/traceRecordRegister.cpp
+++ b/src/special/traceRecordRegister.cpp
@@ -1,63 +0,0 @@
-/*
- * Copyright information and license terms for this software can be
- * found in the file LICENSE that is included with the distribution
- */
-
-/**
- * @author mrk
- * @date 2013.07.24
- */
-
-
-/* Author: Marty Kraimer */
-
-#include <epicsThread.h>
-#include <iocsh.h>
-#include <pv/event.h>
-#include <pv/pvAccess.h>
-#include <pv/serverContext.h>
-#include <pv/pvData.h>
-#include <pv/pvTimeStamp.h>
-#include <pv/rpcService.h>
-
-// The following must be the last include for code pvDatabase uses
-#include <epicsExport.h>
-#define epicsExportSharedSymbols
-#include "pv/pvStructureCopy.h"
-#include "pv/pvDatabase.h"
-#include "pv/traceRecord.h"
-
-using namespace epics::pvData;
-using namespace epics::pvAccess;
-using namespace epics::pvDatabase;
-using namespace std;
-
-static const iocshArg testArg0 = { "recordName", iocshArgString };
-static const iocshArg *testArgs[] = {
-    &testArg0};
-
-static const iocshFuncDef traceRecordFuncDef = {"traceRecordCreate", 1,testArgs};
-
-static void traceRecordCallFunc(const iocshArgBuf *args)
-{
-    char *recordName = args[0].sval;
-    if(!recordName) {
-        throw std::runtime_error("traceRecordCreate invalid number of arguments");
-    }
-    TraceRecordPtr record = TraceRecord::create(recordName);
-    bool result = PVDatabase::getMaster()->addRecord(record);
-    if(!result) cout << "recordname" << " not added" << endl;
-}
-
-static void traceRecordRegister(void)
-{
-    static int firstTime = 1;
-    if (firstTime) {
-        firstTime = 0;
-        iocshRegister(&traceRecordFuncDef, traceRecordCallFunc);
-    }
-}
-
-extern "C" {
-    epicsExportRegistrar(traceRecordRegister);
-}
--- a/src/special/traceRecordRegister.dbd
+++ b/src/special/traceRecordRegister.dbd
@@ -1 +0,0 @@
-registrar("traceRecordRegister")
--- a/src/support/controlSupport.cpp
+++ b/src/support/controlSupport.cpp
@@ -25,11 +25,11 @@ using namespace epics::pvData;
 using namespace epics::pvAccess;
 using namespace std;

-namespace epics { namespace pvDatabase { 
+namespace epics { namespace pvDatabase {

 ControlSupport::~ControlSupport()
 {
-cout << "ControlSupport::~ControlSupport()\n";
+//cout << "ControlSupport::~ControlSupport()\n";
 }

 epics::pvData::StructureConstPtr ControlSupport::controlField(ScalarType scalarType)
@@ -46,6 +46,7 @@ epics::pvData::StructureConstPtr ControlSupport::controlField(ScalarType scalarT

 ControlSupportPtr ControlSupport::create(PVRecordPtr const & pvRecord)
 {
+   cerr << "ControlSupport IS DEPRECATED\n";
   ControlSupportPtr support(new ControlSupport(pvRecord));
   return support;
 }
@@ -135,4 +136,3 @@ void ControlSupport::reset()


 }}
-
--- a/src/support/scalarAlarmSupport.cpp
+++ b/src/support/scalarAlarmSupport.cpp
@@ -26,11 +26,11 @@ using namespace epics::pvData;
 using namespace epics::pvAccess;
 using namespace std;

-namespace epics { namespace pvDatabase { 
+namespace epics { namespace pvDatabase {

 ScalarAlarmSupport::~ScalarAlarmSupport()
 {
-cout << "ScalarAlarmSupport::~ScalarAlarmSupport()\n";
+//cout << "ScalarAlarmSupport::~ScalarAlarmSupport()\n";
 }


@@ -48,6 +48,7 @@ epics::pvData::StructureConstPtr ScalarAlarmSupport::scalarAlarmField()

 ScalarAlarmSupportPtr ScalarAlarmSupport::create(PVRecordPtr const & pvRecord)
 {
+   cerr << "ScalarAlarmSupport IS DEPRECATED\n";
   ScalarAlarmSupportPtr support(new ScalarAlarmSupport(pvRecord));
   return support;
 }
@@ -83,7 +84,7 @@ bool ScalarAlarmSupport::init(
       pvHysteresis = pvScalarAlarm->getSubField<PVDouble>("hysteresis");
    }
    if(!pvScalarAlarm
-       || !pvLowAlarmLimit || !pvLowWarningLimit 
+       || !pvLowAlarmLimit || !pvLowWarningLimit
       || !pvLowWarningLimit || !pvHighAlarmLimit
       || !pvHysteresis)
    {
@@ -216,4 +217,3 @@ void ScalarAlarmSupport::setAlarm(


 }}
-
--- a/test/src/listener.h
+++ b/test/src/listener.h
@@ -26,14 +26,14 @@

 #ifdef listenerEpicsExportSharedSymbols
 #   define epicsExportSharedSymbols
-#	undef listenerEpicsExportSharedSymbols
+#       undef listenerEpicsExportSharedSymbols
 #endif

 #include <shareLib.h>

 //epicsShareFunc epics::pvData::PVStructurePtr createListener();

-namespace epics { namespace pvDatabase { 
+namespace epics { namespace pvDatabase {
 using namespace epics::pvData;
 using namespace std;

@@ -59,7 +59,7 @@ public:
    }
    virtual void dataPut(PVRecordFieldPtr const & pvRecordField)
    {
-        cout << "Listener::dataPut record " << recordName 
+        cout << "Listener::dataPut record " << recordName
        << " pvRecordField " << pvRecordField->getPVField()->getFullName()
        << endl;
    }
@@ -67,7 +67,7 @@ public:
        PVRecordStructurePtr const & requested,
        PVRecordFieldPtr const & pvRecordField)
    {
-        cout << "Listener::dataPut record " << recordName 
+        cout << "Listener::dataPut record " << recordName
        << " requested " << requested->getPVStructure()->getFullName()
        << " pvRecordField " << pvRecordField->getPVField()->getFullName()
        << endl;
@@ -84,7 +84,7 @@ public:
    {
         cout << "Listener::unlisten record " << recordName << endl;
    }
-   
+
 private:
    Listener(PVRecordPtr const & pvRecord)
    : pvCopy(
--- a/test/src/powerSupply.h
+++ b/test/src/powerSupply.h
@@ -25,14 +25,14 @@

 #ifdef powerSupplyEpicsExportSharedSymbols
 #   define epicsExportSharedSymbols
-#	undef powerSupplyEpicsExportSharedSymbols
+#       undef powerSupplyEpicsExportSharedSymbols
 #endif

 #include <shareLib.h>

 //epicsShareFunc epics::pvData::PVStructurePtr createPowerSupply();

-namespace epics { namespace pvDatabase { 
+namespace epics { namespace pvDatabase {

 class PowerSupply;
 typedef std::tr1::shared_ptr<PowerSupply> PowerSupplyPtr;
@@ -46,7 +46,6 @@ public:
        std::string const & recordName,
        epics::pvData::PVStructurePtr const & pvStructure);
    virtual ~PowerSupply();
-    virtual void destroy();
    virtual bool init();
    virtual void process();
    void put(double power,double voltage);
@@ -111,11 +110,6 @@ inline PowerSupply::~PowerSupply()
 {
 }

-inline void PowerSupply::destroy()
-{
-    PVRecord::destroy();
-}
-
 inline bool PowerSupply::init()
 {
    initPVRecord();
--- a/test/src/recordClient.h
+++ b/test/src/recordClient.h
@@ -25,12 +25,12 @@

 #ifdef pvRecordClientEpicsExportSharedSymbols
 #   define epicsExportSharedSymbols
-#	undef pvRecordClientEpicsExportSharedSymbols
+#       undef pvRecordClientEpicsExportSharedSymbols
 #endif

 #include <shareLib.h>

-namespace epics { namespace pvDatabase { 
+namespace epics { namespace pvDatabase {

 class RecordClient;
 typedef std::tr1::shared_ptr<RecordClient> RecordClientPtr;
@@ -59,7 +59,7 @@ public:
         std::cout << "RecordClient::detach record " << pvRecord->getRecordName() << std::endl;
         this->pvRecord.reset();
    }
-   
+
 private:
    RecordClient(PVRecordPtr const & pvRecord)
    : pvRecord(pvRecord)
--- a/test/src/testExampleRecord.cpp
+++ b/test/src/testExampleRecord.cpp
@@ -134,4 +134,3 @@ MAIN(testExampleRecord)
    test();
    return 0;
 }
-
--- a/test/src/testLocalProvider.cpp
+++ b/test/src/testLocalProvider.cpp
@@ -79,4 +79,3 @@ MAIN(testLocalProvider)
    test();
    return 0;
 }
-
--- a/test/src/testPVAServer.cpp
+++ b/test/src/testPVAServer.cpp
@@ -75,4 +75,3 @@ MAIN(testPVAServer)
    test();
    return 0;
 }
-
--- a/test/src/testPVCopy.cpp
+++ b/test/src/testPVCopy.cpp
@@ -273,7 +273,7 @@ static void testPVScalarArray(
        cout << endl;
    }
 }
-    
+
 static void scalarTest()
 {
    if(debug) {cout << endl << endl << "****scalarTest****" << endl;}
@@ -401,4 +401,3 @@ MAIN(testPVCopy)
    powerSupplyTest();
    return 0;
 }
-
--- a/test/src/testPVRecord.cpp
+++ b/test/src/testPVRecord.cpp
@@ -103,4 +103,3 @@ MAIN(testPVRecord)
    powerSupplyTest();
    return 0;
 }
-
--- a/test/src/testPlugin.cpp
+++ b/test/src/testPlugin.cpp
@@ -107,7 +107,7 @@ static void arrayTest()
    uint32 nset = 0;
    size_t n = 10;
    shared_vector<double> values(n);
-    
+
    PVStructurePtr pvRecordStructure(getStandardPVField()->scalarArray(pvDouble,""));
    PVRecordPtr pvRecord(PVRecord::create("doubleArrayRecord",pvRecordStructure));
    PVStructurePtr pvRequest(CreateRequest::create()->createRequest("value[array=1:3]"));
@@ -145,6 +145,73 @@ static void arrayTest()
    testOk1(nset==1);
 }

+static void unionArrayTest()
+{
+    if(debug) {cout << endl << endl << "****unionArrayTest****" << endl;}
+    bool result = false;
+    uint32 nset = 0;
+    size_t n = 10;
+    shared_vector<double> values(n);
+    for(size_t i=0; i<n; i++) values[i] = i + .06;
+    PVDoubleArrayPtr pvDoubleArray =
+        static_pointer_cast<PVDoubleArray>(PVDataCreate::getPVDataCreate()->createPVScalarArray(pvDouble));
+    const shared_vector<const double> yyy(freeze(values));
+    pvDoubleArray->putFrom(yyy);
+
+    StandardFieldPtr standardField = getStandardField();
+    FieldCreatePtr fieldCreate = getFieldCreate();
+    StructureConstPtr top = fieldCreate->createFieldBuilder()->
+        add("value",fieldCreate->createVariantUnion()) ->
+        add("timeStamp", standardField->timeStamp()) ->
+        addNestedStructure("subfield") ->
+           add("value",fieldCreate->createVariantUnion()) ->
+           endNested()->
+        createStructure();
+    PVStructurePtr pvRecordStructure(PVDataCreate::getPVDataCreate()->createPVStructure(top));
+    PVRecordPtr pvRecord(PVRecord::create("unionArrayRecord",pvRecordStructure));
+    PVUnionPtr pvUnion = pvRecord->getPVStructure()->getSubField<PVUnion>("value");
+    pvUnion->set(pvDoubleArray);
+    pvUnion = pvRecord->getPVStructure()->getSubField<PVUnion>("subfield.value");
+    pvUnion->set(pvDoubleArray);
+    if(debug) { cout << "initial\n" << pvRecordStructure << "\n";}
+
+    PVStructurePtr pvRequest(CreateRequest::create()->createRequest("value[array=1:3]"));
+    PVCopyPtr pvCopy(PVCopy::create(pvRecordStructure,pvRequest,""));
+    PVStructurePtr pvStructureCopy(pvCopy->createPVStructure());
+    BitSetPtr bitSet(new BitSet(pvStructureCopy->getNumberFields()));
+    PVDoubleArrayPtr pvValue(pvRecordStructure->getSubField<PVDoubleArray>("value"));
+    result = pvCopy->updateCopySetBitSet(pvStructureCopy,bitSet);
+    nset = bitSet->cardinality();
+    if(debug) {
+        cout << "after get value"
+             << " result " << (result ? "true" : "false")
+             << " nset " << nset
+             << " bitSet " << *bitSet
+             << " pvStructureCopy\n" << pvStructureCopy
+             << "\n";
+    }
+    testOk1(result==true);
+    testOk1(nset==1);
+
+    pvRequest = CreateRequest::create()->createRequest("subfield.value[array=1:3]");
+    pvCopy = PVCopy::create(pvRecordStructure,pvRequest,"");
+    pvStructureCopy = pvCopy->createPVStructure();
+    bitSet = BitSetPtr(new BitSet(pvStructureCopy->getNumberFields()));
+    pvValue = pvRecordStructure->getSubField<PVDoubleArray>("subfield.value");
+    result = pvCopy->updateCopySetBitSet(pvStructureCopy,bitSet);
+    nset = bitSet->cardinality();
+    if(debug) {
+        cout << "after get subfield.value"
+             << " result " << (result ? "true" : "false")
+             << " nset " << nset
+             << " bitSet " << *bitSet
+             << " pvStructureCopy\n" << pvStructureCopy
+             << "\n";
+    }
+    testOk1(result==true);
+    testOk1(nset==1);
+}
+
 static void timeStampTest()
 {
    if(debug) {cout << endl << endl << "****timeStampTest****" << endl;}
@@ -267,12 +334,12 @@ static void ignoreTest()

 MAIN(testPlugin)
 {
-    testPlan(22);
+    testPlan(26);
    PVDatabasePtr pvDatabase(PVDatabase::getMaster());
    deadbandTest();
    arrayTest();
+    unionArrayTest();
    timeStampTest();
    ignoreTest();
    return 0;
 }
-
Author	SHA1	Message	Date
Andrew Johnson	8cac3975cc	Update version numbers for release	2021-07-02 15:49:24 -05:00
Marty Kraimer	219e5eaf94	Merge pull request #73 from epics-base/pvdbcr_changes more work on special; all pvdbcr* redone	2021-04-14 11:20:46 -04:00
mrkraimer	f345651b67	more work on special; all pvdbcr* redone	2021-04-14 10:26:30 -04:00
Marty Kraimer	4895107854	Merge pull request #72 from epics-base/pvdbcr_changes changes were made to all the special code, i.e. all pvdbcr*.	2021-04-12 12:19:35 -04:00
mrkraimer	1c121b3f1e	changes were made to all the special code, i.e. all pvdbcr*. All now have a .h file in src/pv. Each can now be used via an iocshell command or by a PVDatabase application that not part of an ioc database.	2021-04-12 09:30:50 -04:00
Marty Kraimer	d493e52dda	Merge pull request #71 from epics-base/jenkins_problem another attempt to fix jenkins failure	2021-04-08 07:03:56 -04:00
mrkraimer	91d4d2a423	another attempt to fix jenkins failure	2021-04-08 06:11:52 -04:00
Marty Kraimer	d54031a2fb	Merge pull request #70 from epics-base/jenkins_problem another attempt to fix jenkins failure	2021-04-07 11:55:18 -04:00
mrkraimer	1e1d5455a8	another attempt to fix jenkins failure	2021-04-07 11:08:16 -04:00
Marty Kraimer	426af714a1	Merge pull request #69 from epics-base/jenkins_problem another atrempt to fix jenkins failure	2021-04-07 08:45:46 -04:00
mrkraimer	68bbb55370	another atrempt to fix jenkins failure	2021-04-07 07:57:56 -04:00
Marty Kraimer	716ec9857c	Merge pull request #68 from epics-base/jenkins_problem another attempt to fix jenkins_problem	2021-04-03 08:59:19 -04:00
mrkraimer	e91b4b1b66	another attempt to fix jenkins_problem	2021-04-03 07:14:31 -04:00
mrkraimer	2c4e98db8c	another attempt to fix jenkins_problem	2021-04-03 06:30:09 -04:00
Marty Kraimer	d4a13397d7	Merge pull request #67 from epics-base/jenkins_problem another attempt to fix jenkins_problem	2021-04-03 05:52:10 -04:00
mrkraimer	a622f66a94	another attempt to fix jenkins_problem	2021-04-02 18:09:38 -04:00
mrkraimer	81abd5f413	another attempt to fix jenkins_problem	2021-04-02 17:00:51 -04:00
Marty Kraimer	4df01038c3	Merge pull request #66 from epics-base/jenkins_problem another attempt to fix jenkins_problem	2021-04-02 15:31:12 -04:00
mrkraimer	e648cba659	another attempt to fix jenkins_problem	2021-04-02 13:36:32 -04:00
Marty Kraimer	42747b167c	Merge pull request #65 from epics-base/jenkins_problem another attempt to fix jenkins_problem	2021-04-02 11:20:11 -04:00
mrkraimer	0a893a331b	attempt to fix jenkins_problem	2021-04-02 10:06:38 -04:00
Marty Kraimer	e95c959cfd	Merge pull request #64 from epics-base/jenkins_problem attempt to fix jenkins_problem	2021-04-02 08:17:07 -04:00
mrkraimer	e51c29d147	attempt to fix jenkins_problem	2021-04-02 07:00:59 -04:00
Marty Kraimer	fec903fb06	Merge pull request #63 from epics-base/accesss-security Accesss security	2021-04-01 12:15:38 -04:00
mrkraimer	ca066bc088	addRecord,removeRecord,processRecord.traceRecord replaced by pvdbcr versions	2021-04-01 10:20:18 -04:00
mrkraimer	0481a7bf5b	redo addRecord, removeRecord, processRecord, and traceRecord	2021-04-01 08:22:34 -04:00
mrkraimer	17f43b4452	another attempt to get pull request to build	2021-04-01 07:15:26 -04:00
mrkraimer	a1514e5206	another attempt to get pull request to build	2021-04-01 06:15:46 -04:00
mrkraimer	72c2489921	another attempt to get pull request to build	2021-03-31 14:31:06 -04:00
mrkraimer	895698c3cd	another attempt to get pull request to build	2021-03-31 13:05:51 -04:00
mrkraimer	9d10b039fb	another attempt to get pull request to build	2021-03-31 12:25:44 -04:00
mrkraimer	bf82de407e	still more work on includes	2021-03-31 10:57:48 -04:00
mrkraimer	58a603556b	add using std::tr1::static_pointer_cast	2021-03-31 08:32:34 -04:00
mrkraimer	22e849c6f7	remove all references to pvaClient	2021-03-31 07:39:56 -04:00
mrkraimer	2a4d3a15f8	try adding pvaClient to src/Makefile	2021-03-31 05:58:46 -04:00
mrkraimer	7143a8585f	more changes to includes	2021-03-30 18:29:11 -04:00
mrkraimer	2d61b4c0f3	fix include order	2021-03-30 16:04:50 -04:00
mrkraimer	120fa22558	remove nt	2021-03-30 12:58:01 -04:00
mrkraimer	4ed8e6d625	change order of includes	2021-03-30 10:48:22 -04:00
mrkraimer	4718021e39	update documentation	2021-03-30 09:50:23 -04:00
mrkraimer	b1822f5fbd	1) added canRead for access security 2) main documentation moved to https://mrkraimer.github.io/website/developerGuide/pvDatabase/pvDatabaseCPP.html	2021-03-24 14:35:05 -04:00
mrkraimer	333cd44da0	The following were made to all special pvdbcr modules 1) Much cleaner implementation. 2) pvdbSpecialRegister.dbd is new	2021-03-20 10:48:08 -04:00
Andrew Johnson	a514ab7b51	Add missing removal instructions for destroy()	2021-03-15 12:12:15 -05:00
mrkraimer	dafc37b585	The following changes were made: 1) PVRecord now has two new methods: setAsLevel and setAsGroup. 2) The following special records are DEPRECATED: addRecord,processRecord,removeRecord, and traceRecord. They are replaced by pvdbcrAddRecord,pvdbcrProcessRecord,pvdbcrRemoveRecord, and pvdbcrTraceRecord. 3) A new convention is that all special records start with pvdbcr, which means pvDatabase Create Record. 4) pvdbcrAddRecord,pvdbcrProcessRecord,pvdbcrRemoveRecord, and pvdbcrTraceRecord are like what they replace. But they also allow the asLevel to be set when they are created. 5) pvdbcrScalar and pvdbcrScalarArray are new special records. They created records that have fields value, alarm, and timeStamp. value can have any of the allowed scalar types, i.e. boolean,byte,...,string.	2021-03-15 07:04:32 -04:00
Andrew Johnson	2432f85784	Fix for Windows DLL builds	2021-03-12 17:38:51 -06:00
mrkraimer	bd1054f247	Changes were to check for null pointer after calling lock on a weak pointer.	2021-03-06 14:14:39 -05:00
Marty Kraimer	bc70b5f449	Merge pull request #58 from sveseli/master Enable Access Security	2021-03-05 13:11:30 -05:00
Andrew Johnson	93a259cbde	Set next development version after tag	2021-02-28 17:01:22 -06:00
Andrew Johnson	09423edeab	Release version 4.5.3 for EPICS 7.0.5	2021-02-28 16:57:31 -06:00
Sinisa Veseli	ac1de6770e	enable access security for PV Database	2021-02-28 16:31:36 -06:00
Sinisa Veseli	5427311390	initialize PVRecord with access security group/level	2021-02-28 16:28:54 -06:00
Marty Kraimer	b62b047f63	Merge pull request #57 from epics-base/removedestroy remove all destroy methods	2020-07-23 07:58:30 -04:00
mrkraimer	3bc89bfe0e	remove all destroy methods	2020-07-21 10:33:50 -04:00
Andrew Johnson	cb5d9f976a	Set next development version	2020-05-28 16:26:01 -05:00
Andrew Johnson	3f5bfd067f	Update version numbers for release	2020-05-28 16:14:30 -05:00
mrkraimer	85165e6579	get ready for next epics7 release	2020-05-20 14:03:13 -04:00
Marty Kraimer	476a8f1e32	Merge pull request #56 from dirk-zimoch/CleanupWhitespace Cleanup whitespace	2020-05-20 08:47:32 -04:00
Dirk Zimoch	31e883dbbc	removed empty lines at end of file	2020-04-15 18:00:08 +02:00
Dirk Zimoch	57cbf66833	removed spaces at end of line	2020-04-15 17:58:14 +02:00
Dirk Zimoch	7f31332a80	replaced tabs with spaces	2020-04-15 17:54:47 +02:00
Marty Kraimer	12015309d8	Merge pull request #55 from epics-base/arrayfilterforunion Arrayfilterforunion	2020-04-13 06:27:41 -04:00
mrkraimer	1e62844a22	testPlugin found bug: added unionArrayTest	2020-04-12 14:01:22 -04:00
mrkraimer	ad479309b0	fix bitset bug	2020-04-08 11:06:59 -04:00
mrkraimer	2f7c82757f	pvArrayPlugin now supports union scalarArray	2020-04-07 12:53:01 -04:00
Marty Kraimer	634153a28d	Merge pull request #54 from epics-base/issue53 Issue53	2020-02-18 05:39:58 -05:00
Heesterman, Peter J	e664037063	static analysis during the Codathon at Diamond.	2020-02-17 12:06:08 +00:00
mrkraimer	75c16bd423	pvDatabase::removeRecord and pvRecord::remove no longer call eachother directly	2020-02-12 09:13:19 -05:00
mrkraimer	083dffac3c	pvDatabase::removeRecord and pvRecord::remove changes;descructors now have at most a print statement	2020-02-10 06:15:59 -05:00
mrkraimer	42ba054e5f	add createdestroy example	2020-02-07 10:58:55 -05:00
mrkraimer	3173e9aeae	problems with examples	2020-02-07 09:17:08 -05:00
mrkraimer	785d654129	first attempt to fix issue 53; add example	2020-02-07 08:54:18 -05:00
Ralph Lange	22ce4440b7	Fix bug preventing "whole structure" bitset(0) copy (fixes #52) (this should have a test added, but I am not familiar enough with the code)	2020-01-28 15:44:27 +01:00
Andrew Johnson	80baccfd9c	Incr version and set development flag after release	2019-11-01 12:52:23 -05:00