epics/pcas
0
0
Fork 0
Code Issues Pull Requests Projects Wiki Activity

support for dbCaPutCallback

Browse Source
This commit is contained in:
Marty Kraimer
2003-12-16 20:05:17 +00:00
parent 1758f60c79
commit fdd78eaf81
10 changed files with 46 additions and 152 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/dev/softDev/devSoSoftCallback.c
+4 -18
View File
@@ -27,7 +27,6 @@
#include "epicsExport.h"
/* Create the dset for devSoSoftCallback */
static long init_record();
static long write_stringout();
struct {
long number;
@@ -40,25 +39,11 @@ struct {
5,
NULL,
NULL,
init_record,
NULL,
NULL,
write_stringout
};
epicsExportAddress(dset,devSoSoftCallback);
static void putCallback(struct link *plink)
{
dbCommon *pdbCommon = (dbCommon *)plink->value.pv_link.precord;
dbScanLock(pdbCommon);
(*pdbCommon->rset->process)(pdbCommon);
dbScanUnlock(pdbCommon);
}
static long init_record(stringoutRecord *pstringout)
{
return 0;
} /* end init_record() */
static long write_stringout(pstringout)
struct stringoutRecord *pstringout;
@@ -68,10 +53,11 @@ static long write_stringout(pstringout)
if(pstringout->pact) return(0);
if(plink->type!=CA_LINK) {
status = dbPutLink(&pstringout->out,DBR_STRING,&pstringout->val,1);
status = dbPutLink(plink,DBR_STRING,&pstringout->val,1);
return(status);
}
status = dbCaPutLinkCallback(plink,DBR_STRING,&pstringout->val,1,putCallback);
status = dbCaPutLinkCallback(plink,DBR_STRING,&pstringout->val,1,
(dbCaCallback)dbCaCallbackProcess,plink);
if(status) {
recGblSetSevr(pstringout,LINK_ALARM,INVALID_ALARM);
return(status);