1 files changed, 230 insertions, 0 deletions
diff --git a/xsd2c/obj.c b/xsd2c/obj.c
new file mode 100644
index 0000000..58598de
--- /dev/null
+++ b/xsd2c/obj.c
@@ -0,0 +1,230 @@
+/******************************************************************
+ *  $Id: obj.c,v 1.1 2004/06/02 11:17:03 snowdrop Exp $
+ *
+ * CSOAP Project:  A SOAP client/server library in C
+ * Copyright (C) 2003  Ferhat Ayaz
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+ * Boston, MA  02111-1307, USA.
+ * 
+ * Email: ayaz@jprogrammet.net
+ ******************************************************************/
+#include "obj.h"
+#include "tr.h"
+
+#include <stdio.h>
+#include <string.h>
+
+struct tagObjRegistry
+{
+  HCOMPLEXTYPE head;
+  HCOMPLEXTYPE tail;
+}objRegistry;
+
+
+static HFIELD fieldCreate(const char* name, const char* type, int flag, int mino, int maxo, HCOMPLEXTYPE parentObj);
+static void fieldFree(HFIELD field);
+static void objAddField(HCOMPLEXTYPE obj, HFIELD field);
+static void objFreeComplexType(HCOMPLEXTYPE obj);
+static void objRegistryAddComplexType(HCOMPLEXTYPE obj);
+
+static char *targetNS = NULL;
+
+/* ------------------------------------------------------------------ */
+
+void objInitModule(const char* tns)
+{
+  objRegistry.head = NULL;
+  objRegistry.tail = NULL;
+
+  if (tns != NULL) {
+    targetNS = (char*)malloc(strlen(tns)+1);
+    strcpy(targetNS, tns);
+  } 
+}
+
+void objFreeModule()
+{
+  HCOMPLEXTYPE cur;
+
+  cur = objRegistry.head;
+  while (cur != NULL)
+  {
+    objFreeComplexType(cur);
+    cur = cur->next;
+  }
+
+  free(targetNS);
+}
+
+
+HCOMPLEXTYPE objCreateComplexType(const char* typename)
+{
+  HCOMPLEXTYPE ct;
+  char buf[1054];
+
+  ct = (HCOMPLEXTYPE)malloc(sizeof(struct COMPLEXTYPE));
+  ct->type = (char*)malloc(strlen(typename)+1);
+  strcpy(ct->type, typename);
+  ct->head = ct->tail = NULL;
+  ct->next = NULL;
+  ct->base_type = NULL;
+
+  objRegistryAddComplexType(ct);
+  
+  sprintf(buf, "struct %s*", typename);
+  trRegisterTypeNS(targetNS, typename, buf);
+  sprintf(buf, "struct %s_List*", typename);
+  trRegisterListTypeNS(targetNS, typename, buf);
+  return ct;
+}
+
+HFIELD objAddElement(HCOMPLEXTYPE obj, const char* name, const char* type, int flag, int mino, int maxo)
+{
+  HFIELD field;
+
+  field = fieldCreate(name, type, flag, mino, maxo, obj);
+  objAddField(obj, field);
+
+  return field;
+}
+
+HFIELD objAddAttribute(HCOMPLEXTYPE obj, const char* name, const char* type, int flag)
+{
+  char buffer[1054];
+  HFIELD field;
+
+  sprintf(buffer, "attr_%s", name);
+
+  field = fieldCreate(buffer, type, flag, 1, 1, obj);
+  field->attrName = (char*)malloc(strlen(name)+1);
+  strcpy(field->attrName, name);
+
+  objAddField(obj, field);
+
+  return field;
+}
+
+void objSetBaseType(HCOMPLEXTYPE obj, const char* typename)
+{
+  if (obj->base_type != NULL) free(obj->base_type);
+  obj->base_type = (char*)malloc(strlen(typename)+1);
+  strcpy(obj->base_type, typename);
+}
+
+HCOMPLEXTYPE objRegistryGetComplexType(const char* typename)
+{
+  return NULL;
+}
+
+
+void objRegistryEnumComplexType(CT_ENUM callback)
+{
+  HCOMPLEXTYPE cur;
+
+  cur = objRegistry.head;
+  while (cur != NULL)
+  {
+    if (!callback(cur)) return;
+    cur = cur->next;
+  }
+}
+
+
+/* ========================================================================= */
+
+static
+HFIELD fieldCreate(const char* name, const char* type, int flag, int mino, int maxo, HCOMPLEXTYPE parentObj)
+{
+  HFIELD field;
+
+  field = (HFIELD)malloc(sizeof(struct FIELD));
+  field->name = (char*)malloc(strlen(name)+1);
+  field->type = (char*)malloc(strlen(type)+1);
+  field->flag = flag;
+  field->next = NULL;
+  field->flag = 0;
+  field->minOccurs = mino;
+  field->maxOccurs = maxo;
+  field->parentObj = parentObj;
+  field->attrName = NULL;
+
+  strcpy(field->name, name);
+  strcpy(field->type, type);
+  
+  return field;
+}
+
+
+static 
+void fieldFree(HFIELD field)
+{
+  if (field)
+  {
+    if (field->name) free(field->name);
+    if (field->type) free(field->type);
+    if (field->attrName) free(field->attrName);
+    if (field->next) fieldFree(field->next);
+    
+    free(field);
+  }
+}
+
+
+static 
+void objAddField(HCOMPLEXTYPE obj, HFIELD field)
+{
+  if (obj->tail)
+  {
+    obj->tail->next = field;
+  }
+
+  if (!obj->head)
+  {
+    obj->head = field;
+  }
+
+  obj->tail = field;
+}
+
+
+static 
+void objFreeComplexType(HCOMPLEXTYPE obj)
+{
+  if (obj)
+  {
+    if (obj->type) free(obj->type);
+    if (obj->base_type) free(obj->base_type);
+    if (obj->head) fieldFree(obj->head);
+    
+    free(obj);
+  }
+}
+
+
+static void objRegistryAddComplexType(HCOMPLEXTYPE obj)
+{
+  if (objRegistry.tail)
+  {
+    objRegistry.tail->next = obj;
+  }
+
+  if (!objRegistry.head)
+  {
+    objRegistry.head = obj;
+  }
+
+  objRegistry.tail = obj;
+}