Added dbScanFwdLink

This commit is contained in:
Marty Kraimer
1996-11-01 15:53:32 +00:00
parent 6373069d52
commit ecc19506ef
2 changed files with 20 additions and 0 deletions
+19
View File
@@ -463,6 +463,25 @@ long dbScanLink(dbCommon *pfrom, dbCommon *pto)
pfrom->pact = pact;
return(status);
}
void dbScanFwdLink(dbCommon *precord, struct link *plink)
{
struct pv_link *pvlink;
short fwdLinkValue;
if(plink->type==CONSTANT) return;
if(plink->type==DB_LINK) {
DBADDR *paddr = (DBADDR *)plink->value.pv_link.pvt;
dbScanPassive(precord,paddr->precord);
return;
}
if(plink->type!=CA_LINK) return;
pvlink = &plink->value.pv_link;
if(!(pvlink->pvlMask & pvlOptFWD)) return;
fwdLinkValue = 1;
dbCaPutLink(plink,DBR_SHORT,&fwdLinkValue,1);
return;
}
/*
* Process the record.
+1
View File
@@ -274,6 +274,7 @@ long dbGetNelements(struct link *plink,long *nelements);
int dbIsLinkConnected(struct link *plink);
long dbScanLink(struct dbCommon *pfrom, struct dbCommon *pto);
long dbScanPassive(struct dbCommon *pfrom,struct dbCommon *pto);
void dbScanFwdLink(dbCommon *precord, struct link *plink);
long dbProcess(struct dbCommon *precord);
long dbNameToAddr(char *pname,struct dbAddr *);
long dbGetLinkValue(struct link *,short dbrType,