DtMmdb: move to lib directory as a standalone library.

cde/lib/DtMmdb/oliasdb/c_api_toc.C

@@ -0,0 +1,134 @@
+/*
+ * 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_toc.cc /main/4 1996/06/11 17:28:18 cde-hal $
+
+#include "oliasdb/c_api_common.h"
+
+static toc_smart_ptr*
+getTocUsingProid(DtMmdbInfoRequest* request)
+{
+   mtry {
+      info_base* x = getBookCase(request -> bookcase_descriptor);
+      if ( x == 0 ) return 0;
+
+      oid_t * id = getPrimiaryOid(request);
+
+      if ( id == 0 ) return 0;
+
+      return new toc_smart_ptr(x, *id);
+   }
+
+   mcatch (mmdbException &,e)
+   {
+     return 0;
+   } end_try;
+     return 0;
+}
+
+
+DtMmdbHandle*
+DtMmdbTocGetParentId(DtMmdbInfoRequest* request)
+{
+   mtry {
+      toc_smart_ptr* x = getTocUsingProid(request);
+      if ( x == 0 ) return 0;
+
+      DtMmdbHandle *z = 0;
+
+      if ( x -> parent() == ground )
+        z = DtMmdbGroundId;
+      else
+        z = newDtMmdbHandle(x -> parent());
+
+      delete x;
+      return z; 
+   }
+
+   mcatch (mmdbException &,e)
+   {
+     return 0;
+   } end_try;
+     return 0;
+}
+
+DtMmdbHandle**
+DtMmdbTocGetChildIds(
+        DtMmdbInfoRequest* request,
+        unsigned int* list_length
+        )
+{
+   mtry {
+      toc_smart_ptr* x = getTocUsingProid(request);
+      if ( x == 0 ) return 0;
+
+      oid_list_handler* y = x -> children();
+      if ( y == 0 ) return 0;
+
+      int count = (*y) -> count();
+//fprintf(stderr, "count=%d\n", count);
+
+      DtMmdbHandle** z = (DtMmdbHandle**)malloc(sizeof(DtMmdbHandle*) * (count+1));
+
+//fprintf(stderr, "z=%x\n", (void*)z);
+      if ( z == 0 ) return 0;
+    
+      int i;
+      for (i=0; i<count; i++) {
+         z[i] = newDtMmdbHandle(oid_t(OLIAS_NODE_CODE, ((*y) -> operator()(i+1)).icode()));
+      }
+
+      z[i] = 0;
+
+      delete y;
+      delete x;
+
+      if ( list_length ) 
+         *list_length = count;
+
+      return z;
+   }
+
+   mcatch (mmdbException &,e)
+   {
+     return 0;
+   } end_try;
+     return 0;
+}
+
+int DtMmdbTocGetNumOfChildren( DtMmdbInfoRequest* request)
+{
+   mtry {
+      toc_smart_ptr* x = getTocUsingProid(request);
+      if ( x == 0 ) return -1;
+      int y = x -> subtree_size();
+      delete x;
+      return y; 
+   }
+
+   mcatch (mmdbException &,e)
+   {
+     return -1;
+   } end_try;
+     return -1;
+}
+