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

VALID changed to INVALID, ansi c changes

Browse Source
This commit is contained in:
Janet B. Anderson
1992-08-26 14:13:13 +00:00
parent 30d3a1a677
commit 4bb1179f00
46 changed files with 186 additions and 186 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
src/dev/devAiDvx2502.c
View File

@@ -89,7 +89,7 @@ static long init_record(pai)
case (VME_IO) :
break;
default :
recGblRecordError(S_db_badField,pai,
recGblRecordError(S_db_badField,(void *)pai,
"devAiDvx2502 (init_record) Illegal INP field");
return(S_db_badField);
}
@@ -100,7 +100,7 @@ static long init_record(pai)
/* call driver so that it configures card */
pvmeio = (struct vmeio *)&(pai->inp.value);
if(status=dvx_driver(pvmeio->card,pvmeio->signal,&value)) {
recGblRecordError(status,pai,
recGblRecordError(status,(void *)pai,
"devAiDvx2502 (init_record) dvx_driver error");
return(status);
}
@@ -136,11 +136,11 @@ static long read_ai(pai)
*((unsigned short*)(&pai->rval))=value;
if(status==0 || status==-2) pai->rval = value;
if(status==-1) {
recGblSetSevr(pai,READ_ALARM,VALID_ALARM);
recGblSetSevr(pai,READ_ALARM,INVALID_ALARM);
status=2; /*don't convert*/
}else if(status==-2) {
status=0;
recGblSetSevr(pai,HW_LIMIT_ALARM,VALID_ALARM);
recGblSetSevr(pai,HW_LIMIT_ALARM,INVALID_ALARM);
}
return(status);
}

10
src/dev/devAiSoft.c
View File

@@ -93,7 +93,7 @@ static long init_record(pai)
case (DB_LINK) :
break;
default :
recGblRecordError(S_db_badField,pai,
recGblRecordError(S_db_badField,(void *)pai,
"devAiSoft (init_record) Illegal INP field");
return(S_db_badField);
}
@@ -117,21 +117,21 @@ static long read_ai(pai)
status = dbGetLink(&(pai->inp.value.db_link),(struct dbCommon *)pai,DBR_DOUBLE,
&(pai->val),&options,&nRequest);
if(status!=0) {
recGblSetSevr(pai,LINK_ALARM,VALID_ALARM);
recGblSetSevr(pai,LINK_ALARM,INVALID_ALARM);
} else pai->udf = FALSE;
break;
case (CA_LINK) :
if (dbCaGetLink(&(pai->inp)))
{
recGblSetSevr(pai,LINK_ALARM,VALID_ALARM);
recGblSetSevr(pai,LINK_ALARM,INVALID_ALARM);
}
else
pai->udf = FALSE;
break;
default :
if(recGblSetSevr(pai,SOFT_ALARM,VALID_ALARM)){
if(recGblSetSevr(pai,SOFT_ALARM,INVALID_ALARM)){
if(pai->stat!=SOFT_ALARM) {
recGblRecordError(S_db_badField,pai,
recGblRecordError(S_db_badField,(void *)pai,
"devAiSoft (read_ai) Illegal INP field");
}
}

10
src/dev/devAiSoftRaw.c
View File

@@ -95,7 +95,7 @@ static long init_record(pai)
case (CA_LINK) :
break;
default :
recGblRecordError(S_db_badField,pai,
recGblRecordError(S_db_badField,(void *)pai,
"devAiSoftRaw (init_record) Illegal INP field");
return(S_db_badField);
}
@@ -117,22 +117,22 @@ static long read_ai(pai)
status = dbGetLink(&(pai->inp.value.db_link),(struct dbCommon *)pai,DBR_LONG,
&(pai->rval),&options,&nRequest);
if(status!=0) {
recGblSetSevr(pai,LINK_ALARM,VALID_ALARM);
recGblSetSevr(pai,LINK_ALARM,INVALID_ALARM);
}
break;
case (CA_LINK) :
if (dbCaGetLink(&(pai->inp)))
{
recGblSetSevr(pai,LINK_ALARM,VALID_ALARM);
recGblSetSevr(pai,LINK_ALARM,INVALID_ALARM);
}
else
pai->udf = FALSE;
break;
default :
if(recGblSetSevr(pai,SOFT_ALARM,VALID_ALARM)){
if(recGblSetSevr(pai,SOFT_ALARM,INVALID_ALARM)){
if(pai->stat!=SOFT_ALARM) {
recGblRecordError(S_db_badField,pai,
recGblRecordError(S_db_badField,(void *)pai,
"devAiSoftRaw (read_ai) Illegal INP field");
}
}

6
src/dev/devAiTestAsyn.c
View File

@@ -111,7 +111,7 @@ static long init_record(pai)
pai->udf = FALSE;
break;
default :
recGblRecordError(S_db_badField,pai,
recGblRecordError(S_db_badField,(void *)pai,
"devAiTestAsyn (init_record) Illegal INP field");
return(S_db_badField);
}
@@ -140,9 +140,9 @@ static long read_ai(pai)
return(0);
}
default :
if(recGblSetSevr(pai,SOFT_ALARM,VALID_ALARM)){
if(recGblSetSevr(pai,SOFT_ALARM,INVALID_ALARM)){
if(pai->stat!=SOFT_ALARM) {
recGblRecordError(S_db_badField,pai,
recGblRecordError(S_db_badField,(void *)pai,
"devAiTestAsyn (read_ai) Illegal INP field");
}
}

8
src/dev/devAiXy566Di.c
View File

@@ -85,7 +85,7 @@ static long init_record(pai)
case (VME_IO) :
break;
default :
recGblRecordError(S_db_badField,pai,
recGblRecordError(S_db_badField,(void *)pai,
"devAiXy566Di (init_record) Illegal INP field");
return(S_db_badField);
}
@@ -96,7 +96,7 @@ static long init_record(pai)
/* call driver so that it configures card */
pvmeio = (struct vmeio *)&(pai->inp.value);
if(status=ai_xy566_driver(pvmeio->card,pvmeio->signal,XY566DI,&value)) {
recGblRecordError(status,pai,
recGblRecordError(status,(void *)pai,
"devAiXy566Di (init_record) ai_xy566_driver error");
return(status);
}
@@ -115,11 +115,11 @@ static long read_ai(pai)
status=ai_xy566_driver(pvmeio->card,pvmeio->signal,XY566DI,&value);
if(status==-1) {
status = 2; /* don't convert*/
recGblSetSevr(pai,READ_ALARM,VALID_ALARM);
recGblSetSevr(pai,READ_ALARM,INVALID_ALARM);
return(status);
}else if(status==-2) {
status=0;
recGblSetSevr(pai,HW_LIMIT_ALARM,VALID_ALARM);
recGblSetSevr(pai,HW_LIMIT_ALARM,INVALID_ALARM);
}
if(status!=0) return(status);
pai->rval = value;

8
src/dev/devAiXy566DiL.c
View File

@@ -87,7 +87,7 @@ static long init_record(pai)
case (VME_IO) :
break;
default :
recGblRecordError(S_db_badField,pai,
recGblRecordError(S_db_badField,(void *)pai,
"devAiXy566DiL (init_record) Illegal INP field");
return(S_db_badField);
}
@@ -98,7 +98,7 @@ static long init_record(pai)
/* call driver so that it configures card */
pvmeio = (struct vmeio *)&(pai->inp.value);
if(status=ai_xy566_driver(pvmeio->card,pvmeio->signal,XY566DIL,&value)) {
recGblRecordError(status,pai,
recGblRecordError(status,(void *)pai,
"devAiXy566DiL (init_record) ai_xy566_driver error");
return(status);
}
@@ -132,11 +132,11 @@ static long read_ai(pai)
status=ai_xy566_driver(pvmeio->card,pvmeio->signal,XY566DIL,&value);
if(status==-1) {
status = 2; /*don't convert*/
recGblSetSevr(pai,READ_ALARM,VALID_ALARM);
recGblSetSevr(pai,READ_ALARM,INVALID_ALARM);
return(status);
}else if(status==-2) {
status=0;
recGblSetSevr(pai,HW_LIMIT_ALARM,VALID_ALARM);
recGblSetSevr(pai,HW_LIMIT_ALARM,INVALID_ALARM);
}
if(status!=0) return(status);
pai->rval = value;

8
src/dev/devAiXy566Se.c
View File

@@ -84,7 +84,7 @@ static long init_record(pai)
case (VME_IO) :
break;
default :
recGblRecordError(S_db_badField,pai,
recGblRecordError(S_db_badField,(void *)pai,
"devAiXy566Se (init_record) Illegal INP field");
return(S_db_badField);
}
@@ -95,7 +95,7 @@ static long init_record(pai)
/* call driver so that it configures card */
pvmeio = (struct vmeio *)&(pai->inp.value);
if(status=ai_xy566_driver(pvmeio->card,pvmeio->signal,XY566SE,&value)) {
recGblRecordError(status,pai,
recGblRecordError(status,(void *)pai,
"devAiXy566Se (init_record) ai_xy566_driver error");
return(status);
}
@@ -114,11 +114,11 @@ static long read_ai(pai)
status=ai_xy566_driver(pvmeio->card,pvmeio->signal,XY566SE,&value);
if(status==-1) {
status = 2; /*don't convert*/
recGblSetSevr(pai,READ_ALARM,VALID_ALARM);
recGblSetSevr(pai,READ_ALARM,INVALID_ALARM);
return(status);
}else if(status==-2) {
status=0;
recGblSetSevr(pai,HW_LIMIT_ALARM,VALID_ALARM);
recGblSetSevr(pai,HW_LIMIT_ALARM,INVALID_ALARM);
}
if(status!=0) return(status);
pai->rval = value & 0xfff;

6
src/dev/devAoSoft.c
View File

@@ -108,7 +108,7 @@ long nrequest;
status = dbPutLink(&pao->out.value.db_link,(struct dbCommon *)pao,DBR_DOUBLE,
&pao->oval,1L);
if(status!=0) {
recGblSetSevr(pao,LINK_ALARM,VALID_ALARM);
recGblSetSevr(pao,LINK_ALARM,INVALID_ALARM);
}
break;
case (CA_LINK) :
@@ -117,9 +117,9 @@ long nrequest;
status = dbCaPutLink(&(pao->out), &options, &nrequest);
break;
default :
if(recGblSetSevr(pao,SOFT_ALARM,VALID_ALARM)){
if(recGblSetSevr(pao,SOFT_ALARM,INVALID_ALARM)){
if(pao->stat!=SOFT_ALARM) {
recGblRecordError(S_db_badField,pao,
recGblRecordError(S_db_badField,(void *)pao,
"devAoSoft (write_ao) Illegal OUT field");
}
}

6
src/dev/devAoSoftRaw.c
View File

@@ -104,7 +104,7 @@ static long write_ao(pao)
status = dbPutLink(&pao->out.value.db_link,(struct dbCommon *)pao,DBR_LONG,
&pao->rval,1L);
if(status!=0) {
recGblSetSevr(pao,LINK_ALARM,VALID_ALARM);
recGblSetSevr(pao,LINK_ALARM,INVALID_ALARM);
}
break;
case (CA_LINK) :
@@ -113,9 +113,9 @@ static long write_ao(pao)
status = dbCaPutLink(&(pao->out), &options, &nrequest);
break;
default :
if(recGblSetSevr(pao,SOFT_ALARM,VALID_ALARM)){
if(recGblSetSevr(pao,SOFT_ALARM,INVALID_ALARM)){
if(pao->stat!=SOFT_ALARM) {
recGblRecordError(S_db_badField,pao,
recGblRecordError(S_db_badField,(void *)pao,
"devAoSoftRaw (write_ao) Illegal OUT field");
}
}

6
src/dev/devAoTestAsyn.c
View File

@@ -112,7 +112,7 @@ static long init_record(pao)
pcallback->wd_id = wdCreate();
break;
default :
recGblRecordError(S_db_badField,pao,
recGblRecordError(S_db_badField,(void *)pao,
"devAoTestAsyn (init_record) Illegal OUT field");
return(S_db_badField);
}
@@ -141,9 +141,9 @@ static long write_ao(pao)
return(0);
}
default :
if(recGblSetSevr(pao,SOFT_ALARM,VALID_ALARM)){
if(recGblSetSevr(pao,SOFT_ALARM,INVALID_ALARM)){
if(pao->stat!=SOFT_ALARM) {
recGblRecordError(S_db_badField,pao,
recGblRecordError(S_db_badField,(void *)pao,
"devAoTestAsyn (read_ao) Illegal OUT field");
}
}

6
src/dev/devAoVmiVme4100.c
View File

@@ -87,7 +87,7 @@ static long init_record(pao)
case (VME_IO) :
break;
default :
recGblRecordError(S_db_badField,pao,
recGblRecordError(S_db_badField,(void *)pao,
"devAoVmiVme4100 (init_record) Illegal OUT field");
return(S_db_badField);
}
@@ -113,10 +113,10 @@ static long write_ao(pao)
status = vmi4100_driver(pvmeio->card,pvmeio->signal,&value,&rbvalue);
if(status==0 || status==-2) pao->rbv = rbvalue;
if(status==-1) {
recGblSetSevr(pao,WRITE_ALARM,VALID_ALARM);
recGblSetSevr(pao,WRITE_ALARM,INVALID_ALARM);
}else if(status==-2) {
status=0;
recGblSetSevr(pao,HW_LIMIT_ALARM,VALID_ALARM);
recGblSetSevr(pao,HW_LIMIT_ALARM,INVALID_ALARM);
}
return(status);
}

4
src/dev/devBiMpv910.c
View File

@@ -82,7 +82,7 @@ static long init_record(pbi)
pbi->mask <<= pvmeio->signal;
break;
default :
recGblRecordError(S_db_badField,pbi,
recGblRecordError(S_db_badField,(void *)pbi,
"devBiMpv910 (init_record) Illegal INP field");
return(S_db_badField);
}
@@ -103,7 +103,7 @@ static long read_bi(pbi)
pbi->rval = value;
return(0);
} else {
recGblSetSevr(pbi,READ_ALARM,VALID_ALARM);
recGblSetSevr(pbi,READ_ALARM,INVALID_ALARM);
return(2);
}
}

10
src/dev/devBiSoft.c
View File

@@ -92,7 +92,7 @@ static long init_record(pbi)
case (CA_LINK) :
break;
default :
recGblRecordError(S_db_badField,pbi,
recGblRecordError(S_db_badField,(void *)pbi,
"devBiSoft (init_record) Illegal INP field");
return(S_db_badField);
}
@@ -114,21 +114,21 @@ static long read_bi(pbi)
status = dbGetLink(&(pbi->inp.value.db_link),(struct dbCommon *)pbi,DBR_USHORT,
&pbi->val,&options,&nRequest);
if(status!=0) {
recGblSetSevr(pbi,LINK_ALARM,VALID_ALARM);
recGblSetSevr(pbi,LINK_ALARM,INVALID_ALARM);
} else pbi->udf = FALSE;
break;
case (CA_LINK) :
if (dbCaGetLink(&(pbi->inp)))
{
recGblSetSevr(pbi,LINK_ALARM,VALID_ALARM);
recGblSetSevr(pbi,LINK_ALARM,INVALID_ALARM);
}
else
pbi->udf = FALSE;
break;
default :
if(recGblSetSevr(pbi,SOFT_ALARM,VALID_ALARM)){
if(recGblSetSevr(pbi,SOFT_ALARM,INVALID_ALARM)){
if(pbi->stat!=SOFT_ALARM) {
recGblRecordError(S_db_badField,pbi,
recGblRecordError(S_db_badField,(void *)pbi,
"devBiSoft (read_bi) Illegal INP field");
}
}

10
src/dev/devBiSoftRaw.c
View File

@@ -92,7 +92,7 @@ static long init_record(pbi)
case (CA_LINK) :
break;
default :
recGblRecordError(S_db_badField,pbi,
recGblRecordError(S_db_badField,(void *)pbi,
"devBiSoftRaw (init_record) Illegal INP field");
return(S_db_badField);
}
@@ -114,21 +114,21 @@ static long read_bi(pbi)
status = dbGetLink(&(pbi->inp.value.db_link),(struct dbCommon *)pbi,DBR_ULONG,
&pbi->rval,&options,&nRequest);
if(status!=0) {
recGblSetSevr(pbi,LINK_ALARM,VALID_ALARM);
recGblSetSevr(pbi,LINK_ALARM,INVALID_ALARM);
}
break;
case (CA_LINK) :
if (dbCaGetLink(&(pbi->inp)))
{
recGblSetSevr(pbi,LINK_ALARM,VALID_ALARM);
recGblSetSevr(pbi,LINK_ALARM,INVALID_ALARM);
}
else
pbi->udf = FALSE;
break;
default :
if(recGblSetSevr(pbi,SOFT_ALARM,VALID_ALARM)){
if(recGblSetSevr(pbi,SOFT_ALARM,INVALID_ALARM)){
if(pbi->stat!=SOFT_ALARM) {
recGblRecordError(S_db_badField,pbi,
recGblRecordError(S_db_badField,(void *)pbi,
"devBiSoftRaw (read_bi) Illegal INP field");
}
}

6
src/dev/devBiTestAsyn.c
View File

@@ -113,7 +113,7 @@ static long init_record(pbi)
pbi->udf = FALSE;
break;
default :
recGblRecordError(S_db_badField,pbi,
recGblRecordError(S_db_badField,(void *)pbi,
"devBiTestAsyn (init_record) Illegal INP field");
return(S_db_badField);
}
@@ -142,9 +142,9 @@ static long read_bi(pbi)
return(0);
}
default :
if(recGblSetSevr(pbi,SOFT_ALARM,VALID_ALARM)){
if(recGblSetSevr(pbi,SOFT_ALARM,INVALID_ALARM)){
if(pbi->stat!=SOFT_ALARM) {
recGblRecordError(S_db_badField,pbi,
recGblRecordError(S_db_badField,(void *)pbi,
"devBiTestAsyn (read_bi) Illegal INP field");
}
}

4
src/dev/devBiXVme210.c
View File

@@ -82,7 +82,7 @@ static long init_record(pbi)
pbi->mask <<= pvmeio->signal;
break;
default :
recGblRecordError(S_db_badField,pbi,
recGblRecordError(S_db_badField,(void *)pbi,
"devBiXVme210 (init_record) Illegal INP field");
return(S_db_badField);
}
@@ -103,7 +103,7 @@ static long read_bi(pbi)
pbi->rval = value;
return(0);
} else {
recGblSetSevr(pbi,READ_ALARM,VALID_ALARM);
recGblSetSevr(pbi,READ_ALARM,INVALID_ALARM);
return(2);
}
return(status);

4
src/dev/devBoMpv902.c
View File

@@ -88,7 +88,7 @@ static long init_record(pbo)
break;
default :
status = S_db_badField;
recGblRecordError(status,pbo,
recGblRecordError(status,(void *)pbo,
"devBoMpv902 (init_record) Illegal OUT field");
}
return(status);
@@ -104,7 +104,7 @@ static long write_bo(pbo)
pvmeio = (struct vmeio *)&(pbo->out.value);
status = bb902_driver(pvmeio->card,pbo->rval,pbo->mask);
if(status!=0) {
recGblSetSevr(pbo,WRITE_ALARM,VALID_ALARM);
recGblSetSevr(pbo,WRITE_ALARM,INVALID_ALARM);
}
return(status);
}

6
src/dev/devBoSoft.c
View File

@@ -101,7 +101,7 @@ static long write_bo(pbo)
case (DB_LINK) :
status = dbPutLink(&pbo->out.value.db_link,(struct dbCommon *)pbo,DBR_USHORT,&pbo->val,1L);
if(status!=0) {
recGblSetSevr(pbo,LINK_ALARM,VALID_ALARM);
recGblSetSevr(pbo,LINK_ALARM,INVALID_ALARM);
}
break;
case (CA_LINK) :
@@ -110,9 +110,9 @@ static long write_bo(pbo)
status = dbCaPutLink(&(pbo->out), &options, &nrequest);
break;
default :
if(recGblSetSevr(pbo,SOFT_ALARM,VALID_ALARM)){
if(recGblSetSevr(pbo,SOFT_ALARM,INVALID_ALARM)){
if(pbo->stat!=SOFT_ALARM) {
recGblRecordError(S_db_badField,pbo,
recGblRecordError(S_db_badField,(void *)pbo,
"devBoSoft (write_bo) Illegal OUT field");
}
}

6
src/dev/devBoSoftRaw.c
View File

@@ -100,7 +100,7 @@ static long write_bo(pbo)
status = dbPutLink(&pbo->out.value.db_link,(struct dbCommon *)pbo,DBR_ULONG,
&pbo->rval,1L);
if(status!=0) {
recGblSetSevr(pbo,LINK_ALARM,VALID_ALARM);
recGblSetSevr(pbo,LINK_ALARM,INVALID_ALARM);
}
break;
case (CA_LINK) :
@@ -109,9 +109,9 @@ static long write_bo(pbo)
status = dbCaPutLink(&(pbo->out), &options, &nrequest);
break;
default :
if(recGblSetSevr(pbo,SOFT_ALARM,VALID_ALARM)){
if(recGblSetSevr(pbo,SOFT_ALARM,INVALID_ALARM)){
if(pbo->stat!=SOFT_ALARM) {
recGblRecordError(S_db_badField,pbo,
recGblRecordError(S_db_badField,(void *)pbo,
"devBoSoftRaw (write_bo) Illegal OUT field");
}
}

6
src/dev/devBoTestAsyn.c
View File

@@ -112,7 +112,7 @@ static long init_record(pbo)
pcallback->wd_id = wdCreate();
break;
default :
recGblRecordError(S_db_badField,pbo,
recGblRecordError(S_db_badField,(void *)pbo,
"devBoTestAsyn (init_record) Illegal OUT field");
return(S_db_badField);
}
@@ -141,9 +141,9 @@ static long write_bo(pbo)
return(0);
}
default :
if(recGblSetSevr(pbo,SOFT_ALARM,VALID_ALARM)){
if(recGblSetSevr(pbo,SOFT_ALARM,INVALID_ALARM)){
if(pbo->stat!=SOFT_ALARM) {
recGblRecordError(S_db_badField,pbo,
recGblRecordError(S_db_badField,(void *)pbo,
"devBoTestAsyn (read_bo) Illegal OUT field");
}
}

4
src/dev/devBoXVme220.c
View File

@@ -88,7 +88,7 @@ static long init_record(pbo)
break;
default :
status = S_db_badField;
recGblRecordError(status,pbo,
recGblRecordError(status,(void *)pbo,
"devBoXVme220 (init_record) Illegal OUT field");
}
return(status);
@@ -104,7 +104,7 @@ static long write_bo(pbo)
pvmeio = (struct vmeio *)&(pbo->out.value);
status = xy220_driver(pvmeio->card,pbo->rval,pbo->mask);
if(status!=0) {
recGblSetSevr(pbo,WRITE_ALARM,VALID_ALARM);
recGblSetSevr(pbo,WRITE_ALARM,INVALID_ALARM);
}
return(status);
}

10
src/dev/devEventSoft.c
View File

@@ -91,7 +91,7 @@ static long init_record(pevent)
case (CA_LINK) :
break;
default :
recGblRecordError(S_db_badField,pevent,
recGblRecordError(S_db_badField,(void *)pevent,
"devEventSoft (init_record) Illegal INP field");
return(S_db_badField);
}
@@ -113,21 +113,21 @@ static long read_event(pevent)
status = dbGetLink(&(pevent->inp.value.db_link),(struct dbCommon *)pevent,DBR_USHORT,
&pevent->val,&options,&nRequest);
if(status!=0) {
recGblSetSevr(pevent,LINK_ALARM,VALID_ALARM);
recGblSetSevr(pevent,LINK_ALARM,INVALID_ALARM);
} else pevent->udf = FALSE;
break;
case (CA_LINK) :
if (dbCaGetLink(&(pevent->inp)))
{
recGblSetSevr(pevent,LINK_ALARM,VALID_ALARM);
recGblSetSevr(pevent,LINK_ALARM,INVALID_ALARM);
}
else
pevent->udf = FALSE;
break;
default :
if(recGblSetSevr(pevent,SOFT_ALARM,VALID_ALARM)){
if(recGblSetSevr(pevent,SOFT_ALARM,INVALID_ALARM)){
if(pevent->stat!=SOFT_ALARM) {
recGblRecordError(S_db_badField,pevent,
recGblRecordError(S_db_badField,(void *)pevent,
"devEventSoft (read_event) Illegal INP field");
}
}

12
src/dev/devHistogramSoft.c
View File

@@ -87,7 +87,7 @@ static long init_record(phistogram)
case (CA_LINK) :
break;
default :
recGblRecordError(S_db_badField,phistogram,
recGblRecordError(S_db_badField,(void *)phistogram,
"devHistogramSoft (init_record) Illegal SVL field");
return(S_db_badField);
}
@@ -109,8 +109,8 @@ static long read_histogram(phistogram)
status = dbGetLink(&(phistogram->svl.value.db_link),(struct dbCommon *)phistogram,DBR_DOUBLE,
&(phistogram->sgnl),&options,&nRequest);
if(status!=0) {
if(phistogram->nsev<VALID_ALARM) {
phistogram->nsev = VALID_ALARM;
if(phistogram->nsev<INVALID_ALARM) {
phistogram->nsev = INVALID_ALARM;
phistogram->nsta = LINK_ALARM;
}
}
@@ -118,11 +118,11 @@ static long read_histogram(phistogram)
case (CA_LINK) :
break;
default :
if(phistogram->nsev<VALID_ALARM) {
phistogram->nsev = VALID_ALARM;
if(phistogram->nsev<INVALID_ALARM) {
phistogram->nsev = INVALID_ALARM;
phistogram->nsta = SOFT_ALARM;
if(phistogram->stat!=SOFT_ALARM) {
recGblRecordError(S_db_badField,phistogram,
recGblRecordError(S_db_badField,(void *)phistogram,
"devHistogramSoft (read_histogram) Illegal SVL field");
}
}

6
src/dev/devHistogramTestAsyn.c
View File

@@ -109,7 +109,7 @@ static long init_record(phistogram)
phistogram->sgnl = phistogram->svl.value.value;
break;
default :
recGblRecordError(S_db_badField,phistogram,
recGblRecordError(S_db_badField,(void *)phistogram,
"devHistogramTestAsyn (init_record) Illegal SVL field");
return(S_db_badField);
}
@@ -138,9 +138,9 @@ static long read_histogram(phistogram)
return(0);
}
default :
if(recGblSetSevr(phistogram,SOFT_ALARM,VALID_ALARM)){
if(recGblSetSevr(phistogram,SOFT_ALARM,INVALID_ALARM)){
if(phistogram->stat!=SOFT_ALARM) {
recGblRecordError(S_db_badField,phistogram,
recGblRecordError(S_db_badField,(void *)phistogram,
"devHistogramTestAsyn (read_histogram) Illegal SVL field");
}
}

10
src/dev/devLiSoft.c
View File

@@ -89,7 +89,7 @@ static long init_record(plongin)
case (CA_LINK) :
break;
default :
recGblRecordError(S_db_badField,plongin,
recGblRecordError(S_db_badField,(void *)plongin,
"devLiSoft (init_record) Illegal INP field");
return(S_db_badField);
}
@@ -111,21 +111,21 @@ static long read_longin(plongin)
status = dbGetLink(&(plongin->inp.value.db_link),(struct dbCommon *)plongin,DBR_LONG,
&plongin->val,&options,&nRequest);
if(status!=0) {
recGblSetSevr(plongin,LINK_ALARM,VALID_ALARM);
recGblSetSevr(plongin,LINK_ALARM,INVALID_ALARM);
} else plongin->udf = FALSE;
break;
case (CA_LINK) :
if (dbCaGetLink(&(plongin->inp)))
{
recGblSetSevr(plongin,LINK_ALARM,VALID_ALARM);
recGblSetSevr(plongin,LINK_ALARM,INVALID_ALARM);
}
else
plongin->udf = FALSE;
break;
default :
if(recGblSetSevr(plongin,SOFT_ALARM,VALID_ALARM)){
if(recGblSetSevr(plongin,SOFT_ALARM,INVALID_ALARM)){
if(plongin->stat!=SOFT_ALARM) {
recGblRecordError(S_db_badField,plongin,
recGblRecordError(S_db_badField,(void *)plongin,
"devLiSoft (read_longin) Illegal INP field");
}
}

6
src/dev/devLoSoft.c
View File

@@ -98,7 +98,7 @@ static long write_longout(plongout)
status = dbPutLink(&plongout->out.value.db_link,(struct dbCommon *)plongout,DBR_LONG,
&plongout->val,1L);
if(status!=0) {
recGblSetSevr(plongout,LINK_ALARM,VALID_ALARM);
recGblSetSevr(plongout,LINK_ALARM,INVALID_ALARM);
}
break;
case (CA_LINK) :
@@ -107,9 +107,9 @@ static long write_longout(plongout)
status = dbCaPutLink(&(plongout->out), &options, &nrequest);
break;
default :
if(recGblSetSevr(plongout,SOFT_ALARM,VALID_ALARM)){
if(recGblSetSevr(plongout,SOFT_ALARM,INVALID_ALARM)){
if(plongout->stat!=SOFT_ALARM) {
recGblRecordError(S_db_badField,plongout,
recGblRecordError(S_db_badField,(void *)plongout,
"devLoSoft (write_longout) Illegal OUT field");
}
}

4
src/dev/devMbbiMpv910.c
View File

@@ -81,7 +81,7 @@ static long init_record(pmbbi)
pmbbi->mask <<= pmbbi->shft;
break;
default :
recGblRecordError(S_db_badField,pmbbi,
recGblRecordError(S_db_badField,(void *)pmbbi,
"devMbbiMpv910 (init_record) Illegal INP field");
return(S_db_badField);
}
@@ -101,7 +101,7 @@ static long read_mbbi(pmbbi)
if(status==0) {
pmbbi->rval = value;
} else {
recGblSetSevr(pmbbi,READ_ALARM,VALID_ALARM);
recGblSetSevr(pmbbi,READ_ALARM,INVALID_ALARM);
}
return(status);
}

10
src/dev/devMbbiSoft.c
View File

@@ -93,7 +93,7 @@ static long init_record(pmbbi)
case (CA_LINK) :
break;
default :
recGblRecordError(S_db_badField,pmbbi,
recGblRecordError(S_db_badField,(void *)pmbbi,
"devMbbiSoft (init_record) Illegal INP field");
return(S_db_badField);
}
@@ -115,21 +115,21 @@ static long read_mbbi(pmbbi)
status = dbGetLink(&(pmbbi->inp.value.db_link),(struct dbCommon *)pmbbi,DBR_USHORT,
&(pmbbi->val),&options,&nRequest);
if(status!=0) {
recGblSetSevr(pmbbi,LINK_ALARM,VALID_ALARM);
recGblSetSevr(pmbbi,LINK_ALARM,INVALID_ALARM);
} else pmbbi->udf = FALSE;
break;
case (CA_LINK) :
if (dbCaGetLink(&(pmbbi->inp)))
{
recGblSetSevr(pmbbi,LINK_ALARM,VALID_ALARM);
recGblSetSevr(pmbbi,LINK_ALARM,INVALID_ALARM);
}
else
pmbbi->udf = FALSE;
break;
default :
if(recGblSetSevr(pmbbi,SOFT_ALARM,VALID_ALARM)){
if(recGblSetSevr(pmbbi,SOFT_ALARM,INVALID_ALARM)){
if(pmbbi->stat!=SOFT_ALARM) {
recGblRecordError(S_db_badField,pmbbi,
recGblRecordError(S_db_badField,(void *)pmbbi,
"devMbbiSoft (read_mbbi) Illegal INP field");
}
}

10
src/dev/devMbbiSoftRaw.c
View File

@@ -93,7 +93,7 @@ static long init_record(pmbbi)
case (CA_LINK) :
break;
default :
recGblRecordError(S_db_badField,pmbbi,
recGblRecordError(S_db_badField,(void *)pmbbi,
"devMbbiSoftRaw (init_record) Illegal INP field");
return(S_db_badField);
}
@@ -115,21 +115,21 @@ static long read_mbbi(pmbbi)
status = dbGetLink(&(pmbbi->inp.value.db_link),(struct dbCommon *)pmbbi,DBR_ULONG,
&(pmbbi->rval),&options,&nRequest);
if(status!=0) {
recGblSetSevr(pmbbi,LINK_ALARM,VALID_ALARM);
recGblSetSevr(pmbbi,LINK_ALARM,INVALID_ALARM);
}
break;
case (CA_LINK) :
if (dbCaGetLink(&(pmbbi->inp)))
{
recGblSetSevr(pmbbi,LINK_ALARM,VALID_ALARM);
recGblSetSevr(pmbbi,LINK_ALARM,INVALID_ALARM);
}
else
pmbbi->udf = FALSE;
break;
default :
if(recGblSetSevr(pmbbi,SOFT_ALARM,VALID_ALARM)){
if(recGblSetSevr(pmbbi,SOFT_ALARM,INVALID_ALARM)){
if(pmbbi->stat!=SOFT_ALARM) {
recGblRecordError(S_db_badField,pmbbi,
recGblRecordError(S_db_badField,(void *)pmbbi,
"devMbbiSoftRaw (read_mbbi) Illegal INP field");
}
}

6
src/dev/devMbbiTestAsyn.c
View File

@@ -112,7 +112,7 @@ static long init_record(pmbbi)
pmbbi->udf = FALSE;
break;
default :
recGblRecordError(S_db_badField,pmbbi,
recGblRecordError(S_db_badField,(void *)pmbbi,
"devMbbiTestAsyn (init_record) Illegal INP field");
return(S_db_badField);
}
@@ -141,9 +141,9 @@ static long read_mbbi(pmbbi)
return(0);
}
default :
if(recGblSetSevr(pmbbi,SOFT_ALARM,VALID_ALARM)){
if(recGblSetSevr(pmbbi,SOFT_ALARM,INVALID_ALARM)){
if(pmbbi->stat!=SOFT_ALARM) {
recGblRecordError(S_db_badField,pmbbi,
recGblRecordError(S_db_badField,(void *)pmbbi,
"devMbbiTestAsyn (read_mbbi) Illegal INP field");
}
}

4
src/dev/devMbbiXVme210.c
View File

@@ -81,7 +81,7 @@ static long init_record(pmbbi)
pmbbi->mask <<= pmbbi->shft;
break;
default :
recGblRecordError(S_db_badField,pmbbi,
recGblRecordError(S_db_badField,(void *)pmbbi,
"devMbbiXVme210 (init_record) Illegal INP field");
return(S_db_badField);
}
@@ -101,7 +101,7 @@ static long read_mbbi(pmbbi)
if(status==0) {
pmbbi->rval = value;
} else {
recGblSetSevr(pmbbi,READ_ALARM,VALID_ALARM);
recGblSetSevr(pmbbi,READ_ALARM,INVALID_ALARM);
}
return(status);
}

6
src/dev/devMbboMpv902.c
View File

@@ -89,7 +89,7 @@ static long init_record(pmbbo)
break;
default :
status = S_db_badField;
recGblRecordError(status,pmbbo,
recGblRecordError(status,(void *)pmbbo,
"devMbboMpv902 (init_record) Illegal OUT field");
}
return(status);
@@ -109,9 +109,9 @@ static long write_mbbo(pmbbo)
if(status==0) {
status = bb902_read(pvmeio->card,pmbbo->mask,&value);
if(status==0) pmbbo->rbv = value;
else recGblSetSevr(pmbbo,READ_ALARM,VALID_ALARM);
else recGblSetSevr(pmbbo,READ_ALARM,INVALID_ALARM);
} else {
recGblSetSevr(pmbbo,WRITE_ALARM,VALID_ALARM);
recGblSetSevr(pmbbo,WRITE_ALARM,INVALID_ALARM);
}
return(status);
}

6
src/dev/devMbboSoft.c
View File

@@ -104,7 +104,7 @@ static long write_mbbo(pmbbo)
status = dbPutLink(&pmbbo->out.value.db_link,(struct dbCommon *)pmbbo,DBR_USHORT,
&pmbbo->val,1L);
if(status!=0) {
recGblSetSevr(pmbbo,LINK_ALARM,VALID_ALARM);
recGblSetSevr(pmbbo,LINK_ALARM,INVALID_ALARM);
}
break;
case (CA_LINK) :
@@ -113,9 +113,9 @@ static long write_mbbo(pmbbo)
status = dbCaPutLink(&(pmbbo->out), &options, &nrequest);
break;
default :
if(recGblSetSevr(pmbbo,SOFT_ALARM,VALID_ALARM)){
if(recGblSetSevr(pmbbo,SOFT_ALARM,INVALID_ALARM)){
if(pmbbo->stat!=SOFT_ALARM) {
recGblRecordError(S_db_badField,pmbbo,
recGblRecordError(S_db_badField,(void *)pmbbo,
"devMbboSoft (write_mbbo) Illegal OUT field");
}
}

6
src/dev/devMbboSoftRaw.c
View File

@@ -100,7 +100,7 @@ static long write_mbbo(pmbbo)
status = dbPutLink(&pmbbo->out.value.db_link,(struct dbCommon *)pmbbo,DBR_ULONG,
&pmbbo->rval,1L);
if(status!=0) {
recGblSetSevr(pmbbo,LINK_ALARM,VALID_ALARM);
recGblSetSevr(pmbbo,LINK_ALARM,INVALID_ALARM);
}
break;
case (CA_LINK) :
@@ -109,9 +109,9 @@ static long write_mbbo(pmbbo)
status = dbCaPutLink(&(pmbbo->out), &options, &nrequest);
break;
default :
if(recGblSetSevr(pmbbo,SOFT_ALARM,VALID_ALARM)){
if(recGblSetSevr(pmbbo,SOFT_ALARM,INVALID_ALARM)){
if(pmbbo->stat!=SOFT_ALARM) {
recGblRecordError(S_db_badField,pmbbo,
recGblRecordError(S_db_badField,(void *)pmbbo,
"devMbboSoftRaw (write_mbbo) Illegal OUT field");
}
}

6
src/dev/devMbboTestAsyn.c
View File

@@ -112,7 +112,7 @@ static long init_record(pmbbo)
pcallback->wd_id = wdCreate();
break;
default :
recGblRecordError(S_db_badField,pmbbo,
recGblRecordError(S_db_badField,(void *)pmbbo,
"devMbboTestAsyn (init_record) Illegal OUT field");
return(S_db_badField);
}
@@ -141,9 +141,9 @@ static long write_mbbo(pmbbo)
return(0);
}
default :
if(recGblSetSevr(pmbbo,SOFT_ALARM,VALID_ALARM)){
if(recGblSetSevr(pmbbo,SOFT_ALARM,INVALID_ALARM)){
if(pmbbo->stat!=SOFT_ALARM) {
recGblRecordError(S_db_badField,pmbbo,
recGblRecordError(S_db_badField,(void *)pmbbo,
"devMbboTestAsyn (read_mbbo) Illegal OUT field");
}
}

6
src/dev/devMbboXVme220.c
View File

@@ -89,7 +89,7 @@ static long init_record(pmbbo)
break;
default :
status = S_db_badField;
recGblRecordError(status,pmbbo,
recGblRecordError(status,(void *)pmbbo,
"devMbboXVme220 (init_record) Illegal OUT field");
}
return(status);
@@ -108,9 +108,9 @@ static long write_mbbo(pmbbo)
if(status==0) {
status = xy220_read(pvmeio->card,pmbbo->mask,&value);
if(status==0) pmbbo->rbv = value;
else recGblSetSevr(pmbbo,READ_ALARM,VALID_ALARM);
else recGblSetSevr(pmbbo,READ_ALARM,INVALID_ALARM);
} else {
recGblSetSevr(pmbbo,WRITE_ALARM,VALID_ALARM);
recGblSetSevr(pmbbo,WRITE_ALARM,INVALID_ALARM);
}
return(status);
}

56
src/dev/devMz8310.c
View File

@@ -335,36 +335,36 @@ static long init_common(pdbCommon,pout,nchan)
case (VME_IO) :
break;
default :
recGblRecordError(S_dev_badBus,pdbCommon,
recGblRecordError(S_dev_badBus,(void *)pdbCommon,
"devMz8310 (init_record) Illegal OUT Bus Type");
return(S_dev_badBus);
}
card = pvmeio->card;
signal = pvmeio->signal;
if(card>=MAXCARDS){
recGblRecordError(S_dev_badCard,pdbCommon,
recGblRecordError(S_dev_badCard,(void *)pdbCommon,
"devMz8310 (init_record) exceeded maximum supported cards");
return(S_dev_badCard);
}
if(!mz8310_info[card].present){
recGblRecordError(S_dev_badCard,pdbCommon,
recGblRecordError(S_dev_badCard,(void *)pdbCommon,
"devMz8310 (init_record) VME card not found");
return(S_dev_badCard);
}
if(signal >= NCHIP*CHANONCHIP
|| (nchan==2 && (signal==4 || signal==9))) {
recGblRecordError(S_dev_badSignal,pdbCommon,
recGblRecordError(S_dev_badSignal,(void *)pdbCommon,
"devMz8310 (init_record) Illegal SIGNAL field");
return(S_dev_badSignal);
}
chip = (signal>=CHANONCHIP ? 1 : 0);
channel = signal - chip*CHANONCHIP;
if((mz8310_info[card].chan_info[chip][channel].nrec_using +=1)>1)
recGblRecordError(S_dev_Conflict,pdbCommon,
recGblRecordError(S_dev_Conflict,(void *)pdbCommon,
"devMz8310 (init_record) signal already used");
if(nchan==2) {
if((mz8310_info[card].chan_info[chip][channel+1].nrec_using +=1)>1)
recGblRecordError(S_dev_Conflict,pdbCommon,
recGblRecordError(S_dev_Conflict,(void *)pdbCommon,
"devMz8310 (init_record) signal already used");
}
return(0);
@@ -419,17 +419,17 @@ static long get_ioint_info(
card = pvmeio->card;
intvec = pvmeio->signal;
if(card>=MAXCARDS){
recGblRecordError(S_dev_badCard,pr,
recGblRecordError(S_dev_badCard,(void *)pr,
"devMz8310 (get_ioint_info) exceeded maximum supported cards");
return(0);
}
if(intvec>=NUMINTVEC) {
recGblRecordError(S_dev_badSignal,pr,
recGblRecordError(S_dev_badSignal,(void *)pr,
"devMz8310 (get_ioint_info) Illegal SIGNAL field");
return(0);
}
if(!mz8310_info[card].present){
recGblRecordError(S_dev_badCard,pr,
recGblRecordError(S_dev_badCard,(void *)pr,
"devMz8310 (get_ioint_info) card not found");
return(0);
}
@@ -446,12 +446,12 @@ static long get_ioint_info(
vector=MZ8310INTVEC(card,intvec);
if(intConnect(INUM_TO_IVEC(vector),(FUNCPTR)mz8310_int_service,
(int)mz8310_info[card].int_info[intvec].ioscanpvt)!=OK) {
recGblRecordError(0,pr,"devMz8310 (get_ioint_info) intConnect failed");
recGblRecordError(0,(void *)pr,"devMz8310 (get_ioint_info) intConnect failed");
return(0);
}
pvecreg = PVECREG(card,intvec);
if(vxMemProbe(pvecreg,WRITE,sizeof(char),&vector)!=OK) {
recGblRecordError(0,pr,"devMz8310 (get_ioint_info) vxMemProbe failed");
recGblRecordError(0,(void *)pr,"devMz8310 (get_ioint_info) vxMemProbe failed");
return(0);
}
sysIntEnable(mz8310_strap_info[intvec].irq_lev);
@@ -511,14 +511,14 @@ static long cmd_pc(pr)
if(pr->gsrc==INTERNAL && pr->gate!=0) {
unsigned short gate = (unsigned short)pr->gate;
if(gate>5) recGblRecordError(S_db_badField,pr,
if(gate>5) recGblRecordError(S_db_badField,(void *)pr,
"devMz8310 : illegal gate value");
else mode |= gate<<13;
}
/*set count source selection*/
if(pr->clks<0 || pr->clks>15) {
recGblSetSevr(pr,WRITE_ALARM,VALID_ALARM);
recGblRecordError(S_db_badField,pr,
recGblSetSevr(pr,WRITE_ALARM,INVALID_ALARM);
recGblRecordError(S_db_badField,(void *)pr,
"devMz8310 : illegal clks value");
pr->pact=TRUE;
break;
@@ -538,7 +538,7 @@ static long cmd_pc(pr)
break;
default:
recGblSetSevr(pr,WRITE_ALARM,MAJOR_ALARM);
recGblRecordError(S_db_badField,pr,
recGblRecordError(S_db_badField,(void *)pr,
"devMz8310 : illegal command");
break;
}
@@ -571,8 +571,8 @@ static long write_pd(pr)
/* compute hold count and load count */
clockRate = (pr->csrc==INTERNAL ? INT_CLOCK_RATE : pr->clkr);
if(clockRate<=0 || clockRate>MAX_CLOCK_RATE) {
recGblSetSevr(pr,WRITE_ALARM,VALID_ALARM);
recGblRecordError(S_db_badField,pr,
recGblSetSevr(pr,WRITE_ALARM,INVALID_ALARM);
recGblRecordError(S_db_badField,(void *)pr,
"devMz8310 : computed illegal clock rate");
pr->pact=TRUE;
return(0);
@@ -592,8 +592,8 @@ static long write_pd(pr)
}
}
if(loadCount>65536.0 || holdCount>65535.0) {
recGblSetSevr(pr,WRITE_ALARM,VALID_ALARM);
recGblRecordError(S_db_badField,pr,
recGblSetSevr(pr,WRITE_ALARM,INVALID_ALARM);
recGblRecordError(S_db_badField,(void *)pr,
"devMz8310 : computed illegal clock rate");
pr->pact=TRUE;
return(0);
@@ -611,8 +611,8 @@ static long write_pd(pr)
mode |= internalCountSource[clockDiv];
} else {/*external clock. Determine source*/
if(pr->clks<0 || pr->clks>15) {
recGblSetSevr(pr,WRITE_ALARM,VALID_ALARM);
recGblRecordError(S_db_badField,pr,
recGblSetSevr(pr,WRITE_ALARM,INVALID_ALARM);
recGblRecordError(S_db_badField,(void *)pr,
"devMz8310 : illegal clks value");
pr->pact=TRUE;
return(0);
@@ -687,8 +687,8 @@ static long write_pt(pr)
clockRate = (pr->csrc==INTERNAL ? INT_CLOCK_RATE : pr->clkr);
periodInClockUnits = pr->per * clockRate;
if(clockRate<=0 || clockRate>MAX_CLOCK_RATE || periodInClockUnits<=1) {
recGblSetSevr(pr,WRITE_ALARM,VALID_ALARM);
recGblRecordError(S_db_badField,pr,
recGblSetSevr(pr,WRITE_ALARM,INVALID_ALARM);
recGblRecordError(S_db_badField,(void *)pr,
"devMz8310 : computed illegal clock rate");
pr->pact=TRUE;
return(0);
@@ -707,8 +707,8 @@ static long write_pt(pr)
}
}
if(loadCount>65536.0 || holdCount>65535.0) {
recGblSetSevr(pr,WRITE_ALARM,VALID_ALARM);
recGblRecordError(S_db_badField,pr,
recGblSetSevr(pr,WRITE_ALARM,INVALID_ALARM);
recGblRecordError(S_db_badField,(void *)pr,
"devMz8310 : computed illegal clock rate");
pr->pact=TRUE;
return(0);
@@ -723,7 +723,7 @@ static long write_pt(pr)
if(pr->gsrc==INTERNAL && pr->gate!=0) {
unsigned short gate = (unsigned short)pr->gate;
if(gate>5) recGblRecordError(S_db_badField,pr,
if(gate>5) recGblRecordError(S_db_badField,(void *)pr,
"devMz8310 : illegal gate value");
else mode |= gate<<13;
}
@@ -732,8 +732,8 @@ static long write_pt(pr)
mode |= internalCountSource[clockDiv];
} else {/*external clock. Determine source*/
if(pr->clks<0 || pr->clks>15) {
recGblSetSevr(pr,WRITE_ALARM,VALID_ALARM);
recGblRecordError(S_db_badField,pr,
recGblSetSevr(pr,WRITE_ALARM,INVALID_ALARM);
recGblRecordError(S_db_badField,(void *)pr,
"devMz8310 : illegal clks value");
pr->pact=TRUE;
return(0);

6
src/dev/devPtSoft.c
View File

@@ -98,7 +98,7 @@ static long write_pt(ppt)
case (DB_LINK) :
status = dbPutLink(&ppt->out.value.db_link,(struct dbCommon *)ppt,DBR_SHORT,&ppt->val,1L);
if(status!=0) {
recGblSetSevr(ppt,LINK_ALARM,VALID_ALARM);
recGblSetSevr(ppt,LINK_ALARM,INVALID_ALARM);
} else ppt->udf=FALSE;
break;
case (CA_LINK) :
@@ -107,9 +107,9 @@ static long write_pt(ppt)
status = dbCaPutLink(&(ppt->out), &options, &nrequest);
break;
default :
if(recGblSetSevr(ppt,WRITE_ALARM,VALID_ALARM)){
if(recGblSetSevr(ppt,WRITE_ALARM,INVALID_ALARM)){
if(ppt->stat!=SOFT_ALARM) {
recGblRecordError(S_db_badField,ppt,
recGblRecordError(S_db_badField,(void *)ppt,
"devPtSoft (write_pt) Illegal OUT field");
}
}

10
src/dev/devSiSoft.c
View File

@@ -93,7 +93,7 @@ static long init_record(pstringin)
case (CA_LINK) :
break;
default :
recGblRecordError(S_db_badField,pstringin,
recGblRecordError(S_db_badField,(void *)pstringin,
"devSiSoft (init_record) Illegal INP field");
return(S_db_badField);
}
@@ -115,21 +115,21 @@ static long read_stringin(pstringin)
status = dbGetLink(&(pstringin->inp.value.db_link),(struct dbCommon *)pstringin,DBR_STRING,
pstringin->val,&options,&nRequest);
if(status!=0) {
recGblSetSevr(pstringin,LINK_ALARM,VALID_ALARM);
recGblSetSevr(pstringin,LINK_ALARM,INVALID_ALARM);
} else pstringin->udf = FALSE;
break;
case (CA_LINK) :
if (dbCaGetLink(&(pstringin->inp)))
{
recGblSetSevr(pstringin,LINK_ALARM,VALID_ALARM);
recGblSetSevr(pstringin,LINK_ALARM,INVALID_ALARM);
}
else
pstringin->udf = FALSE;
break;
default :
if(recGblSetSevr(pstringin,SOFT_ALARM,VALID_ALARM)){
if(recGblSetSevr(pstringin,SOFT_ALARM,INVALID_ALARM)){
if(pstringin->stat!=SOFT_ALARM) {
recGblRecordError(S_db_badField,pstringin,
recGblRecordError(S_db_badField,(void *)pstringin,
"devSiSoft (read_stringin) Illegal INP field");
}
}

6
src/dev/devSiTestAsyn.c
View File

@@ -113,7 +113,7 @@ static long init_record(pstringin)
}
break;
default :
recGblRecordError(S_db_badField,pstringin,
recGblRecordError(S_db_badField,(void *)pstringin,
"devSiTestAsyn (init_record) Illegal INP field");
return(S_db_badField);
}
@@ -142,9 +142,9 @@ static long read_stringin(pstringin)
return(0);
}
default :
if(recGblSetSevr(pstringin,SOFT_ALARM,VALID_ALARM)){
if(recGblSetSevr(pstringin,SOFT_ALARM,INVALID_ALARM)){
if(pstringin->stat!=SOFT_ALARM) {
recGblRecordError(S_db_badField,pstringin,
recGblRecordError(S_db_badField,(void *)pstringin,
"devSiTestAsyn (read_stringin) Illegal INP field");
}
}

6
src/dev/devSoSoft.c
View File

@@ -98,7 +98,7 @@ static long write_stringout(pstringout)
status = dbPutLink(&pstringout->out.value.db_link,(struct dbCommon *)pstringout,DBR_STRING,
pstringout->val,1L);
if(status!=0) {
recGblSetSevr(pstringout,LINK_ALARM,VALID_ALARM);
recGblSetSevr(pstringout,LINK_ALARM,INVALID_ALARM);
}
break;
case (CA_LINK) :
@@ -107,9 +107,9 @@ static long write_stringout(pstringout)
status = dbCaPutLink(&(pstringout->out), &options, &nrequest);
break;
default :
if(recGblSetSevr(pstringout,SOFT_ALARM,VALID_ALARM)){
if(recGblSetSevr(pstringout,SOFT_ALARM,INVALID_ALARM)){
if(pstringout->stat!=SOFT_ALARM) {
recGblRecordError(S_db_badField,pstringout,
recGblRecordError(S_db_badField,(void *)pstringout,
"devSoSoft (write_stringout) Illegal OUT field");
}
}

6
src/dev/devSoTestAsyn.c
View File

@@ -110,7 +110,7 @@ static long init_record(pstringout)
pcallback->wd_id = wdCreate();
break;
default :
recGblRecordError(S_db_badField,pstringout,
recGblRecordError(S_db_badField,(void *)pstringout,
"devSoTestAsyn (init_record) Illegal OUT field");
return(S_db_badField);
}
@@ -139,9 +139,9 @@ static long write_stringout(pstringout)
return(0);
}
default :
if(recGblSetSevr(pstringout,SOFT_ALARM,VALID_ALARM)){
if(recGblSetSevr(pstringout,SOFT_ALARM,INVALID_ALARM)){
if(pstringout->stat!=SOFT_ALARM) {
recGblRecordError(S_db_badField,pstringout,
recGblRecordError(S_db_badField,(void *)pstringout,
"devSoTestAsyn (read_stringout) Illegal OUT field");
}
}

8
src/dev/devWfJoergerVtr1.c
View File

@@ -106,9 +106,9 @@ static void myCallback(pwf,no_read,pdata)
}
pwf->nord = no_read; /* number of values read */
} else {
recGblRecordError(S_db_badField,pwf,
recGblRecordError(S_db_badField,(void *)pwf,
"read_wf - illegal ftvl");
recGblSetSevr(pwf,READ_ALARM,VALID_ALARM);
recGblSetSevr(pwf,READ_ALARM,INVALID_ALARM);
}
(*prset->process)(pwf);
dbScanUnlock((struct dbCommon *)pwf);
@@ -139,7 +139,7 @@ static long init_record(pwf)
case (VME_IO) :
break;
default :
recGblRecordError(S_db_badField,pwf,
recGblRecordError(S_db_badField,(void *)pwf,
"devWfJoergerVtr1 (init_record) Illegal INP field");
return(S_db_badField);
}
@@ -167,7 +167,7 @@ struct waveformRecord *pwf;
pwf->busy = TRUE;
if(jgvtr1_driver(pvmeio->card,myCallback,pwf)<0){
recGblSetSevr(pwf,READ_ALARM,VALID_ALARM);
recGblSetSevr(pwf,READ_ALARM,INVALID_ALARM);
pwf->busy = FALSE;
return(0);
}

10
src/dev/devWfSoft.c
View File

@@ -90,7 +90,7 @@ static long init_record(pwf)
case (CA_LINK) :
break;
default :
recGblRecordError(S_db_badField,pwf,
recGblRecordError(S_db_badField,(void *)pwf,
"devWfSoft (init_record) Illegal INP field");
return(S_db_badField);
}
@@ -111,22 +111,22 @@ static long read_wf(pwf)
nRequest=pwf->nelm;
if(dbGetLink(&(pwf->inp.value.db_link),(struct dbCommon *)pwf,pwf->ftvl,
pwf->bptr,&options,&nRequest)!=0){
recGblSetSevr(pwf,LINK_ALARM,VALID_ALARM);
recGblSetSevr(pwf,LINK_ALARM,INVALID_ALARM);
}
pwf->nord = nRequest;
break;
case (CA_LINK) :
if (dbCaGetLink(&(pwf->inp)))
{
recGblSetSevr(pwf,LINK_ALARM,VALID_ALARM);
recGblSetSevr(pwf,LINK_ALARM,INVALID_ALARM);
}
else
pwf->udf = FALSE;
break;
default :
if(recGblSetSevr(pwf,SOFT_ALARM,VALID_ALARM)){
if(recGblSetSevr(pwf,SOFT_ALARM,INVALID_ALARM)){
if(pwf->stat!=SOFT_ALARM) {
recGblRecordError(S_db_badField,pwf,
recGblRecordError(S_db_badField,(void *)pwf,
"devWfSoft (read_wf) Illegal INP field");
}
}

6
src/dev/devWfTestAsyn.c
View File

@@ -110,7 +110,7 @@ static long init_record(pwf)
pwf->nord = 0;
break;
default :
recGblRecordError(S_db_badField,pwf,
recGblRecordError(S_db_badField,(void *)pwf,
"devWfTestAsyn (init_record) Illegal INP field");
return(S_db_badField);
}
@@ -139,9 +139,9 @@ static long read_wf(pwf)
return(0);
}
default :
if(recGblSetSevr(pwf,SOFT_ALARM,VALID_ALARM)){
if(recGblSetSevr(pwf,SOFT_ALARM,INVALID_ALARM)){
if(pwf->stat!=SOFT_ALARM) {
recGblRecordError(S_db_badField,pwf,
recGblRecordError(S_db_badField,(void *)pwf,
"devWfTestAsyn (read_wf) Illegal INP field");
}
}

8
src/dev/devWfXy566Sc.c
View File

@@ -89,9 +89,9 @@ static void myCallback(pwf,no_read,pdata)
memcpy(pwf->bptr,pdata,no_read*2);
pwf->nord = no_read; /* number of values read */
} else {
recGblRecordError(S_db_badField,pwf,
recGblRecordError(S_db_badField,(void *)pwf,
"read_wf - illegal ftvl");
recGblSetSevr(pwf,READ_ALARM,VALID_ALARM);
recGblSetSevr(pwf,READ_ALARM,INVALID_ALARM);
}
(*prset->process)(pwf);
dbScanUnlock((struct dbCommon *)pwf);
@@ -106,7 +106,7 @@ static long init_record(pwf)
case (VME_IO) :
break;
default :
recGblRecordError(S_db_badField,pwf,
recGblRecordError(S_db_badField,(void *)pwf,
"devWfXy566Sc (init_record) Illegal INP field");
return(S_db_badField);
}
@@ -135,7 +135,7 @@ struct waveformRecord *pwf;
pwf->busy = TRUE;
if(xy566_driver(pvmeio->card,myCallback,pwf)<0) {
recGblSetSevr(pwf,READ_ALARM,VALID_ALARM);
recGblSetSevr(pwf,READ_ALARM,INVALID_ALARM);
pwf->busy = FALSE;
return(0);
}