Move all under modules/database

2018-06-19 11:31:13 +02:00
parent e613d685fd
commit 568c405165
562 changed files with 0 additions and 101 deletions
@@ -0,0 +1,49 @@
+/*************************************************************************\
+* Copyright (c) 2012 UChicago Argonne LLC, as Operator of Argonne
+*     National Laboratory.
+* Copyright (c) 2002 The Regents of the University of California, as
+*     Operator of Los Alamos National Laboratory.
+* EPICS BASE is distributed subject to a Software License Agreement found
+* in file LICENSE that is included with this distribution.
+\*************************************************************************/
+/* devMbboDirectSoftCallback.c */
+/*
+ * Original Author: Marty Kraimer
+ * Date: 04NOV2003
+ */
+
+#include <stdio.h>
+
+#include "alarm.h"
+#include "dbAccess.h"
+#include "recGbl.h"
+#include "devSup.h"
+#include "mbboDirectRecord.h"
+#include "epicsExport.h"
+
+static long write_mbbo(mbboDirectRecord *prec)
+{
+    struct link *plink = &prec->out;
+    long status;
+
+    if (prec->pact)
+        return 0;
+
+    status = dbPutLinkAsync(plink, DBR_USHORT, &prec->val, 1);
+    if (!status)
+        prec->pact = TRUE;
+    else if (status == S_db_noLSET)
+        status = dbPutLink(plink, DBR_USHORT, &prec->val, 1);
+
+    return status;
+}
+
+/* Create the dset for devMbboSoft */
+struct {
+    dset common;
+    DEVSUPFUN write;
+} devMbboDirectSoftCallback = {
+    {5, NULL, NULL, NULL, NULL},
+    write_mbbo
+};
+epicsExportAddress(dset, devMbboDirectSoftCallback);