Add basic support and tests for a JSON link address type

2016-04-27 20:47:17 -05:00
parent 778aa18c00
commit 13294f80cc
7 changed files with 75 additions and 19 deletions
--- a/src/tools/DBD/Device.pm
+++ b/src/tools/DBD/Device.pm
@@ -5,6 +5,7 @@ use DBD::Base;
 my %link_types = (
    CONSTANT  => qr/$RXnum/o,
    PV_LINK   => qr/$RXname \s+ [.NPCAMS ]*/ox,
+    JSON_STR  => qr/\{ .* \}/ox,
    VME_IO    => qr/\# (?: \s* [CS] \s* $RXintx)* \s* (?: @ .*)?/ox,
    CAMAC_IO  => qr/\# (?: \s* [BCNAF] \s* $RXintx)* \s* (?: @ .*)?/ox,
    RF_IO     => qr/\# (?: \s* [RMDE] \s* $RXintx)*/ox,