Initial import of the CDE 2.1.30 sources from the Open Group.

cde/programs/dtinfo/DtMmdb/oliasdb/c_api_test.C

@@ -0,0 +1,280 @@
+// $XConsortium: c_api_test.cc /main/4 1996/06/11 17:28:13 cde-hal $
+
+#include "oliasdb/DtMmdb.h"
+#include "oliasdb/mmdb.h"
+#include "oliasdb/c_api_common.h"
+#include <stdio.h>
+#include <stdlib.h>
+
+
+void showBookCaseInfo(int i);
+
+int showInfoLibInfo(int i)
+{
+   int n = 0;
+   int j;
+   DtMmdbInfoLibInfo* info = DtMmdbInfoLibGetInfo(i);
+   if ( info ) {
+      if ( info -> path )
+        fprintf(stderr, "infolibInfo: path= %s\n", info -> path);
+      if ( info -> name )
+        fprintf(stderr, "infolibInfo: name= %s\n", info -> name);
+      fprintf(stderr, "infolibInfo: num_bookcases= %d\n", info -> num_bookcases);
+
+      n = info -> num_bookcases;
+
+      DtMmdbInfoLibFreeInfo(info);
+   } else
+      fprintf(stderr, "no infolibInfo\n");
+
+   return n;
+}
+
+void showBookCaseInfo(int i)
+{
+   if ( i <= -1 ) {
+      fprintf(stderr, "bad bookcase descriptor %d\n", i);
+   } else {
+      DtMmdbBookCaseInfo* info = DtMmdbBookCaseGetInfo(i);
+      if ( info ) {
+         if ( info -> name )
+           fprintf(stderr, "	bookcaseInfo: name= %s\n", info -> name);
+         fprintf(stderr, "	bookcaseInfo: num_bookcases= %d\n", info -> num_books);
+         DtMmdbBookCaseFreeInfo(info);
+      } else
+         fprintf(stderr, "no bookcase info\n");
+   }
+}
+
+// automatica test cases 
+
+extern int auto_test(int argc, char** argv, OLIAS_DB& db);
+
+extern "C"
+int auto_test_c_api(int argc, char** argv)
+{
+   OLIAS_DB db;
+   return auto_test(argc, argv, db);
+}
+
+// test cases that require manual inspection
+extern "C"
+int test0(int argc, char** argv)
+{
+   int j = 0;
+   int n = 0;
+   int i = -1;
+   switch ( argc ) {
+     case 4:
+       i = DtMmdbOpenInfoLib(argv[2], argv[3], DtMmdbFalse);
+       n = showInfoLibInfo(i);
+       for ( j=0; j<n; j++ )
+          showBookCaseInfo(DtMmdbGetBookCaseByIndex(i, j));
+       break;
+     case 3:
+       i = DtMmdbOpenInfoLib(argv[2], 0, DtMmdbFalse);
+       showInfoLibInfo(i);
+       n = showInfoLibInfo(i);
+       for ( j=0; j<n; j++ )
+          showBookCaseInfo(DtMmdbGetBookCaseByIndex(i, j));
+       break;
+     default:
+       fprintf(stderr, "bad argment list\n");
+   }
+
+   fprintf(stderr, "infolib desc=%d\n", i);
+   return 0;
+}
+
+extern "C"
+int test1(int argc, char** argv)
+{
+   int j = 0;
+   int n = 0;
+   int i = -1;
+   switch ( argc ) {
+     case 5:
+       i = DtMmdbOpenInfoLib(argv[2], argv[3], DtMmdbFalse);
+       n = showInfoLibInfo(i);
+       for ( j=0; j<n; j++ )
+          showBookCaseInfo(DtMmdbGetBookCaseByLoc(i, argv[4]));
+       break;
+     default:
+       fprintf(stderr, "bad argment list\n");
+   }
+
+   fprintf(stderr, "infolib desc=%d\n", i);
+   return 0;
+}
+
+DtMmdbInfoRequest* newDtMmdbInfoRequestWithLoc(int bc_id, char* loc)
+{
+   DtMmdbInfoRequest* x = 
+ 	(DtMmdbInfoRequest*) malloc(sizeof(DtMmdbInfoRequest));
+
+   
+   x -> bookcase_descriptor = bc_id ;
+   x -> locator_ptr = loc;
+   return x;
+}
+
+DtMmdbInfoRequest* newDtMmdbInfoRequestWithPrimaryOid(int bc_id, char* oid_str)
+{
+   DtMmdbInfoRequest* x = 
+ 	(DtMmdbInfoRequest*) malloc(sizeof(DtMmdbInfoRequest));
+
+   
+   x -> bookcase_descriptor = bc_id ;
+   x -> primary_oid = newDtMmdbHandle(oid_t(oid_str, true, false));
+   return x;
+}
+
+char* DtMmdbHandleToString(DtMmdbHandle* x)
+{
+   static char buf[100];
+   if ( x -> oid_ptr) {
+      oid_t *z = (oid_t*)(x -> oid_ptr);
+      sprintf(buf, "%d.%d", z -> ccode(), z -> icode());
+   } else
+     buf[0] = 0;
+
+   return buf;
+}
+
+void showSection(DtMmdbInfoRequest* req)
+{
+   if ( req == 0 ) return ;
+
+    const char* str = DtMmdbSectionGetLongTitle(req, 0);
+    if (str) {
+    fprintf(stderr, "        SectionInfo: LongTitle=%s\n", str);
+    }
+
+    str = DtMmdbSectionGetShortTitle(req, 0);
+    if (str) {
+    fprintf(stderr, "        SectionInfo: ShortTitle=%s\n", str);
+    }
+
+    str = DtMmdbSectionGetData(req, 0);
+    if (str) {
+    fprintf(stderr, "        SectionInfo: data=%s\n", str);
+    }
+
+    int size = DtMmdbSectionGetDataSize(req);
+    fprintf(stderr, "        SectionInfo: dataSize=%d\n", size);
+
+
+    str = DtMmdbSectionGetTocLoc(req);
+    if (str) {
+    fprintf(stderr, "        SectionInfo: TocLoc=%s\n", str);
+    }
+
+    DtMmdbHandle* id = DtMmdbSectionGetBookId(req);
+    if (id) {
+    fprintf(stderr, "        SectionInfo: BookId=%s\n", DtMmdbHandleToString(id));
+    }
+
+    id = DtMmdbSectionGetStyleSheetId(req);
+    if (id) {
+    fprintf(stderr, "        SectionInfo: StyleSheetId=%s\n", DtMmdbHandleToString(id));
+    }
+}
+
+void showTOC(DtMmdbInfoRequest* req)
+{
+   if ( req == 0 ) return ;
+
+   DtMmdbHandle* id = DtMmdbTocGetParentId(req);
+   if (id) 
+      fprintf(stderr, "        TOC: parentId=%s\n", DtMmdbHandleToString(id));
+   
+
+   unsigned int ct = 0;
+   DtMmdbHandle** ids = DtMmdbTocGetChildIds(req, &ct);
+   if ( ids ) {
+     fprintf(stderr, "ct=%d\n", ct);
+     for ( int i=0; i<ct; i++ )
+        fprintf(stderr, "        TOC: childid[%d]=%s\n", i, DtMmdbHandleToString(ids[i]));
+   }
+
+   int i = DtMmdbTocGetNumOfChildren(req);
+   fprintf(stderr, "        TOC: NumOfChildren=%d\n", i);
+}
+
+extern "C"
+int test2(int argc, char** argv)
+{
+   int j = 0;
+   int n = 0;
+   int i = -1;
+   const char* str;
+   switch ( argc ) {
+     case 5:
+      {
+       i = DtMmdbOpenInfoLib(argv[2], argv[3], DtMmdbFalse);
+       j = DtMmdbGetBookCaseByLoc(i, argv[4]);
+
+       DtMmdbInfoRequest* req = newDtMmdbInfoRequestWithLoc(j, argv[4]);
+       showSection(req);
+       break;
+      }
+     default:
+       fprintf(stderr, "invalid arguments\n");
+   }
+
+   fprintf(stderr, "infolib desc=%d\n", i);
+   return 0;
+}
+
+extern "C"
+int test3(int argc, char** argv)
+{
+   int j = 0;
+   int n = 0;
+   int i = -1;
+   const char* str;
+   switch ( argc ) {
+     case 5:
+      {
+       i = DtMmdbOpenInfoLib(argv[2], argv[3], DtMmdbFalse);
+       j = DtMmdbGetBookCaseByName(i, argv[3]);
+
+       DtMmdbInfoRequest* req = newDtMmdbInfoRequestWithPrimaryOid(j, argv[4]);
+       showSection(req);
+       break;
+      }
+      default:
+       fprintf(stderr, "invalid arguments\n");
+   }
+
+   fprintf(stderr, "infolib desc=%d\n", i);
+   return 0;
+}
+
+extern "C"
+int test4(int argc, char** argv)
+{
+   int j = 0;
+   int i = 0;
+   const char* str;
+   switch ( argc ) {
+     case 5:
+      {
+       i = DtMmdbOpenInfoLib(argv[2], argv[3], DtMmdbFalse);
+       j = DtMmdbGetBookCaseByName(i, argv[3]);
+
+       DtMmdbInfoRequest* req = newDtMmdbInfoRequestWithPrimaryOid(j, argv[4]);
+       showTOC(req);
+       break;
+      }
+      default:
+       fprintf(stderr, "invalid arguments\n");
+   }
+
+   fprintf(stderr, "infolib desc=%d\n", i);
+   return 0;
+}
+
+
+
+