Adding pecl-isis tests

1 files changed, 25 insertions, 0 deletions

diff --git a/test.php b/test.php
index fd19749..294edca 100644
--- a/test.php
+++ b/test.php
@@ -179,5 +179,30 @@ include('contrib/spyc/spyc.php');
     //print_r(array_flip($fdt_anu10));
     echo '</pre>';
   } // end else could contact server
+
+?>
+
+<h3>Testing pecl-isis</h3>
+<?php
+
+  //$db = isis_open('db/anu10/anu10');
+  $db = isis_open('db/tupi/tupi');
+  print_r(isis_last_mfn($db));
+
+  echo '<table>';
+
+  $result = isis_search('$', $db);
+  while ($record = isis_fetch_flat_array($result) ) {
+    print (" <tr><td colspan=\"2\">MFN: $record[mfn]</td></tr>\n");
+    for ($i=0; $i<count($record)-1; ++$i) { //-1 porque el mfn es +1
+      list ($tag, $value) = $record[$i];
+      print (" <tr>\n".
+        " <td>$tag</td>\n".
+        " <td>".htmlspecialchars($value)."</td>\n".
+        " </tr>\n");
+    }
+  }
+
+  echo '</table>';
 ?>
 </body></html>