DtMmdb: move to lib directory as a standalone library.

cde/lib/DtMmdb/oliasdb/c_api_book.C

@@ -0,0 +1,222 @@
+/*
+ * CDE - Common Desktop Environment
+ *
+ * Copyright (c) 1993-2012, The Open Group. All rights reserved.
+ *
+ * These libraries and programs are free software; you can
+ * redistribute them and/or modify them under the terms of the GNU
+ * Lesser General Public License as published by the Free Software
+ * Foundation; either version 2 of the License, or (at your option)
+ * any later version.
+ *
+ * These libraries and programs are distributed in the hope that
+ * they will be useful, but WITHOUT ANY WARRANTY; without even the
+ * implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+ * PURPOSE. See the GNU Lesser General Public License for more
+ * details.
+ *
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with these libraries and programs; if not, write
+ * to the Free Software Foundation, Inc., 51 Franklin Street, Fifth
+ * Floor, Boston, MA 02110-1301 USA
+ */
+// $XConsortium: c_api_book.cc /main/4 1996/06/11 17:26:37 cde-hal $
+
+#include "oliasdb/c_api_common.h"
+
+static doc_smart_ptr*
+getDocUsingPrOrSecOrSeq(DtMmdbInfoRequest* request)
+{
+   mtry {
+      info_base* x = getBookCase(request -> bookcase_descriptor);
+      if ( x == 0 ) return 0;
+
+      oid_t * id = getPrimiaryOid(request);
+
+      if ( id ) {
+         return new doc_smart_ptr(x, *id);
+      }
+
+      id = getSecondaryOid(request); // book id
+
+      if ( id ) {
+         return new doc_smart_ptr(*id, x);
+      }
+
+      int seq = getSeqNum(request); // seq number
+
+      if ( seq == -1 ) return 0;
+
+// bookcase is treated 1 based internally. But 0-based externally.
+      return new doc_smart_ptr(x, seq+1);
+   }
+
+   mcatch (mmdbException &,e)
+   {
+     return 0;
+   } end_try;
+     return 0;
+}
+
+DtMmdbHandle*
+DtMmdbBookGetTocObjectId(DtMmdbInfoRequest* request)
+{
+   mtry {
+      doc_smart_ptr* x = getDocUsingPrOrSecOrSeq(request);
+      if ( x == 0 ) return 0;
+
+      DtMmdbHandle *z = newDtMmdbHandle(x -> locator_id());
+
+      delete x;
+      return z;
+   }
+
+   mcatch (mmdbException &,e)
+   {
+     return 0;
+   } end_try;
+     return 0;
+}
+
+const char*
+DtMmdbBookGetShortTitle(DtMmdbInfoRequest* request, unsigned int* length)
+{
+   mtry {
+      doc_smart_ptr* x = getDocUsingPrOrSecOrSeq(request);
+      if ( x == 0 ) return 0;
+
+      const char* z = x -> short_title();
+
+      if ( length ) *length = strlen(z);
+
+      delete x;
+      return z;
+   }
+
+   mcatch (mmdbException &,e)
+   {
+     return 0;
+   } end_try;
+     return 0;
+}
+
+const char*
+DtMmdbBookGetLongTitle(DtMmdbInfoRequest* request, unsigned int* length)
+{
+   mtry {
+      doc_smart_ptr* x = getDocUsingPrOrSecOrSeq(request);
+      if ( x == 0 ) return 0;
+
+      const char* z = x -> long_title();
+
+      if ( length ) *length = strlen(z);
+
+      delete x;
+      return z;
+   }
+
+   mcatch (mmdbException &,e)
+   {
+     return 0;
+   } end_try;
+     return 0;
+}
+
+int DtMmdbBookGetSeqNum(DtMmdbInfoRequest* request)
+{
+   mtry {
+      doc_smart_ptr* x = getDocUsingPrOrSecOrSeq(request);
+      if ( x == 0 ) return 0;
+
+      int z = x -> seq_num();
+
+      delete x;
+      return z;
+   }
+
+   mcatch (mmdbException &,e)
+   {
+     return 0;
+   } end_try;
+     return 0;
+}
+
+const char*
+DtMmdbBookGetSeqLIcense(DtMmdbInfoRequest* request, unsigned int* length)
+{
+    mtry {
+      doc_smart_ptr* x = getDocUsingPrOrSecOrSeq(request);
+      if ( x == 0 ) return 0;
+
+      const char* z = x -> license_terms();
+      if ( length ) 
+        *length = x -> license_terms_size();
+
+      delete x;
+      return z;
+   }
+
+   mcatch (mmdbException &,e)
+   {
+     return 0;
+   } end_try;
+     return 0;
+}
+
+DtMmdbHandle** DtMmdbBookGetTabList(DtMmdbInfoRequest* request, unsigned int* length)
+{
+   mtry {
+      doc_smart_ptr* x = getDocUsingPrOrSecOrSeq(request);
+      if ( x == 0 ) return 0;
+
+      short_list_handler* z = x -> tab_list();
+
+      if ( z == 0 ) return 0;
+
+      int count = (*z) -> count();
+
+      DtMmdbHandle** u = (DtMmdbHandle**)malloc(sizeof(DtMmdbHandle*)* (count+1));
+
+      if ( u == 0 ) return 0;
+         
+      const char* desc = 0;
+      pstring_handler *p = 0;
+
+      int i;
+      for (i=0; i<count; i++) {
+         p = (pstring_handler *)((*z)->get_component (i+1));
+
+// The format is the title, a tab char, then the section oid.
+         desc = (*p)->get();
+
+         while (*desc != '\0' && *desc != '\t') desc++;
+
+         if (*desc != '\t') {
+           free(u);
+           return 0;
+         }
+
+         desc++;
+
+         oid_t w((char*)desc, true, false);
+         u[i] = newDtMmdbHandle(w);
+
+         delete p;
+
+      }
+
+      u[i] = 0;
+
+      if ( length ) *length = count;
+
+      delete z;
+      delete x;
+      return u;
+   }
+
+   mcatch (mmdbException &,e)
+   {
+     return 0;
+   } end_try;
+     return 0;
+}