test/scripts/2800-lmdb/2800

   1 # lmdb lookup
   2 #
   3 # prep a test database to work with
   4 perl -e 'chdir "DIR/aux-var"; exec "mdb_load -n DIR/aux-var/TESTNUM.mdb";'
   5 VERSION=3
   6 format=print
   7 type=btree
   8 mapsize=10485760
   9 maxreaders=126
  10 HEADER=END
  11  first
  12  data for first
  13  second
  14  A=1 B=2
  15  third
  16  A1:B2:C3
  17 DATA=END
  18 ****
  19 #
  20 #
  21 exim -be
  22 ${lookup{first}lmdb{DIR/aux-var/TESTNUM.mdb}}
  23 ${lookup{first}lmdb{DIR/aux-var/TESTNUM.mdb}{$value}fail}
  24 ${lookup{fail}lmdb{DIR/aux-var/TESTNUM.mdb}{$value}{failure value}}
  25 ${lookup{fail}lmdb{DIR/aux-var/TESTNUM.mdb}{$value}fail}
  26 ${lookup{second}lmdb{DIR/aux-var/TESTNUM.mdb}{$value}fail}
  27 ${extract{A}{${lookup{second}lmdb{DIR/aux-var/TESTNUM.mdb}{$value}fail}}}
  28 ${extract{B}{${lookup{second}lmdb{DIR/aux-var/TESTNUM.mdb}{$value}fail}}}
  29 ${extract{C}{${lookup{second}lmdb{DIR/aux-var/TESTNUM.mdb}{$value}fail}}{$value}fail}
  30 ****