Skip to content

Commit

Permalink
fixup doc and tests with INT/EXT modifier
Browse files Browse the repository at this point in the history
  • Loading branch information
mdavidsaver committed Nov 26, 2023
1 parent fea37b6 commit b2040f7
Show file tree
Hide file tree
Showing 8 changed files with 21 additions and 21 deletions.
2 changes: 1 addition & 1 deletion modules/database/src/std/rec/aSubRecord.dbd.pod
Original file line number Diff line number Diff line change
Expand Up @@ -2342,7 +2342,7 @@ need a database fragment that might look something like this:
...
field(FTA, "LONG")
field(NOA, "100")
field(INPA, "myWaveform_1 NPP NMS")
field(INPA, "myWaveform_1 NPP NMS EXT")
...
}

Expand Down
4 changes: 2 additions & 2 deletions modules/database/src/template/top/exampleApp/Db/dbExample1.db
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@
record(ai, "$(user):aiExample")
{
field(DESC, "Analog input")
field(INP, "$(user):calcExample.VAL NPP NMS")
field(INP, "$(user):calcExample.VAL NPP NMS EXT")
field(EGUF, "10")
field(EGU, "Counts")
field(HOPR, "10")
Expand All @@ -21,7 +21,7 @@ record(calc, "$(user):calcExample")
field(SCAN,"1 second")
field(FLNK, "$(user):aiExample")
field(CALC, "(A<B)?(A+C):D")
field(INPA, "$(user):calcExample.VAL NPP NMS")
field(INPA, "$(user):calcExample.VAL NPP NMS EXT")
field(INPB, "9")
field(INPC, "1")
field(INPD, "0")
Expand Down
4 changes: 2 additions & 2 deletions modules/database/src/template/top/exampleApp/Db/dbExample2.db
Original file line number Diff line number Diff line change
Expand Up @@ -5,7 +5,7 @@ record(calc, "$(user):calcExample$(no)")
field(SCAN,"$(scan)")
field(FLNK, "$(user):aiExample$(no)")
field(CALC, "(A<B)?(A+C):D")
field(INPA, "$(user):calcExample$(no).VAL NPP NMS")
field(INPA, "$(user):calcExample$(no).VAL NPP NMS EXT")
field(INPB, "9")
field(INPC, "1")
field(INPD, "0")
Expand All @@ -23,7 +23,7 @@ record(calc, "$(user):calcExample$(no)")
record(ai, "$(user):aiExample$(no)")
{
field(DESC, "Analog input No. $(no)")
field(INP, "$(user):calcExample$(no).VAL NPP NMS")
field(INP, "$(user):calcExample$(no).VAL NPP NMS EXT")
field(EGUF, "10")
field(EGU, "Counts")
field(HOPR, "10")
Expand Down
10 changes: 5 additions & 5 deletions modules/database/test/ioc/db/dbPutGetTest.c
Original file line number Diff line number Diff line change
Expand Up @@ -245,21 +245,21 @@ void testLongLink(void)
{
testDiag("testLonkLink()");

testdbGetFieldEqual("lnktest.INP", DBR_STRING, "lnktarget NPP NMS");
testdbGetFieldEqual("lnktest.INP$", DBR_STRING, "lnktarget NPP NMS");
testdbGetFieldEqual("lnktest.INP", DBR_STRING, "lnktarget NPP NMS EXT");
testdbGetFieldEqual("lnktest.INP$", DBR_STRING, "lnktarget NPP NMS EXT");
testDiag("dbGet() w/ nRequest==1 gets only trailing nil");
testdbGetFieldEqual("lnktest.INP$", DBR_CHAR, '\0');
testdbGetArrFieldEqual("lnktest.INP$", DBR_CHAR, 19, 18, "lnktarget NPP NMS");
testdbGetArrFieldEqual("lnktest.INP$", DBR_CHAR, 23, 22, "lnktarget NPP NMS EXT");

testDiag("get w/ truncation");
testdbGetArrFieldEqual("lnktest.INP$", DBR_CHAR, 0, 0, NULL);
testdbGetArrFieldEqual("lnktest.INP$", DBR_CHAR, 1, 1, "");
testdbGetArrFieldEqual("lnktest.INP$", DBR_CHAR, 2, 2, "l");
testdbGetArrFieldEqual("lnktest.INP$", DBR_CHAR, 3, 3, "ln");
testdbGetArrFieldEqual("lnktest.INP$", DBR_CHAR, 17, 17, "lnktarget NPP NM");
testdbGetArrFieldEqual("lnktest.INP$", DBR_CHAR, 18, 18, "lnktarget NPP NMS");
testdbGetArrFieldEqual("lnktest.INP$", DBR_CHAR, 22, 22, "lnktarget NPP NMS EXT");

testdbGetArrFieldEqual("lnktest.INP", DBR_STRING, 2, 1, "lnktarget NPP NMS");
testdbGetArrFieldEqual("lnktest.INP", DBR_STRING, 2, 1, "lnktarget NPP NMS EXT");
}

static
Expand Down
2 changes: 1 addition & 1 deletion modules/database/test/ioc/db/dbPutGetTest.db
Original file line number Diff line number Diff line change
Expand Up @@ -37,7 +37,7 @@ record(x, "recmax") {
record(x, "lnktarget") {}

record(x, "lnktest") {
field(INP, "lnktarget NPP NMS")
field(INP, "lnktarget NPP NMS EXT")
}

record(arr, "arr") {
Expand Down
12 changes: 6 additions & 6 deletions modules/database/test/ioc/db/dbPutLinkTest.c
Original file line number Diff line number Diff line change
Expand Up @@ -279,11 +279,11 @@ void testInitLocal()
testIocInitOk();
eltc(1);

testdbGetFieldEqual("il1src0.INP", DBF_STRING, "no:such:pv NPP NMS");
testdbGetFieldEqual("il1src1.INP", DBF_STRING, "il1tgt NPP NMS");
testdbGetFieldEqual("il1src2.INP", DBF_STRING, "il1tgt NPP NMS");
testdbGetFieldEqual("il1src3.INP", DBF_STRING, "no:such:pv NPP NMS");
testdbGetFieldEqual("il1src4.INP", DBF_STRING, "no:such:pv NPP NMS");
testdbGetFieldEqual("il1src0.INP", DBF_STRING, "no:such:pv NPP NMS EXT");
testdbGetFieldEqual("il1src1.INP", DBF_STRING, "il1tgt NPP NMS EXT");
testdbGetFieldEqual("il1src2.INP", DBF_STRING, "il1tgt NPP NMS INT");
testdbGetFieldEqual("il1src3.INP", DBF_STRING, "no:such:pv NPP NMS EXT");
testdbGetFieldEqual("il1src4.INP", DBF_STRING, "no:such:pv NPP NMS EXT");

testInitLocalLink("il1src0", pvlOptSrcExt, pvlOptSrcAuto);
testInitLocalLink("il1src1", pvlOptSrcInt, pvlOptSrcExt );
Expand Down Expand Up @@ -645,7 +645,7 @@ void testJLink(void)
testdbGetFieldEqual("j1.VAL", DBF_LONG, 1);
testdbGetFieldEqual("j2.INP", DBF_STRING, "{\"z\":{'good':2}}");
testdbGetFieldEqual("j2.VAL", DBF_LONG, 2);
testdbGetFieldEqual("j2.TSEL", DBF_STRING, "j1.TIME NPP NMS");
testdbGetFieldEqual("j2.TSEL", DBF_STRING, "j1.TIME NPP NMS EXT");
testdbGetFieldEqual("j3.VAL", DBF_LONG, 3);

testNumZ(6);
Expand Down
4 changes: 2 additions & 2 deletions modules/database/test/std/rec/linkRetargetLinkTest.c
Original file line number Diff line number Diff line change
Expand Up @@ -44,7 +44,7 @@ static void testRetarget(void)
testMonitorWait(lnkmon);

testdbGetFieldEqual("rec:ai", DBR_DOUBLE, 0.0);
testdbGetFieldEqual("rec:ai.INP", DBR_STRING, "rec:src1 NPP NMS");
testdbGetFieldEqual("rec:ai.INP", DBR_STRING, "rec:src1 NPP NMS EXT");

/* trigger a read from rec:ai.INP */
testdbPutFieldOk("rec:ai.PROC", DBF_LONG, 0);
Expand All @@ -60,7 +60,7 @@ static void testRetarget(void)
testMonitorWait(valmon);

testdbGetFieldEqual("rec:ai", DBR_DOUBLE, 2.0);
testdbGetFieldEqual("rec:ai.INP", DBR_STRING, "rec:src2 CP NMS");
testdbGetFieldEqual("rec:ai.INP", DBR_STRING, "rec:src2 CP NMS EXT");

testMonitorDestroy(lnkmon);
testMonitorDestroy(valmon);
Expand Down
4 changes: 2 additions & 2 deletions modules/database/test/std/rec/regressLinkMS.db
Original file line number Diff line number Diff line change
Expand Up @@ -7,7 +7,7 @@ record(ai, "alarm") {
}

record(calc, "latch") {
field(INPA, "alarm NPP MS")
field(INPB, "latch NPP MS")
field(INPA, "alarm NPP MS EXT")
field(INPB, "latch NPP MS EXT")
field(CALC, "A")
}

0 comments on commit b2040f7

Please sign in to comment.