Changeset 251 for trunk/nom/class_c/nomobj.c

Timestamp:

Mar 11, 2007, 2:22:39 PM (18 years ago)

Author:

cinc

Message:

Implemented some methods. Bug fixes and documentation.

File:

• trunk/nom/class_c/nomobj.c (modified) (7 diffs)

trunk/nom/class_c/nomobj.c

@@ -16 +16 @@
 * The Initial Developer of the Original Code is
 * netlabs.org: Chris Wohlgemuth <cinc-ml@netlabs.org>.
-* Portions created by the Initial Developer are Copyright (C) 2005-2006
+* Portions created by the Initial Developer are Copyright (C) 2005-2007
 * the Initial Developer. All Rights Reserved.
 *
@@ -32 +32 @@
 *
 * ***** END LICENSE BLOCK ***** */
+/** \file nomobj.idl 
+    
+    Implementation file for the NOM class NOMObject.
+*/
+
 #ifndef NOM_NOMObject_IMPLEMENTATION_FILE
 #define NOM_NOMObject_IMPLEMENTATION_FILE
@@ -49 +54 @@
 
 /**
-
     \brief This function implements the method nomInit() of class NOMObject.
  */
 NOM_Scope void  NOMLINK impl_NOMObject_nomInit(NOMObject *nomSelf, CORBA_Environment *ev)
 {  
-  //nomPrintf("    Entering %s (%x) with nomSelf: 0x%x. nomSelf is: %s.\n",
-  //        __FUNCTION__, impl_NOMObject_nomInit, nomSelf , nomSelf->mtab->nomClassName);
-}
-
-/**
-
+
+}
+
+/**
     \brief This function implements the method nomUnInit() of class NOMObject.
  */
@@ -71 +73 @@
 
 /**
-
     \brief This function implements the method nomGetSize() of class NOMObject.
  */
@@ -87 +88 @@
 
 /**
-
     \brief This function implements the method delete() of class NOMObject.
 
@@ -121 +121 @@
 
 /**
-
     \brief This function implements the method nomGetClass() of class NOMObject.
     It returns a pointer to the class object of this object.
@@ -162 +161 @@
 
 
+NOM_Scope CORBA_boolean NOMLINK impl_NOMObject_nomIsA(NOMObject* nomSelf, const PNOMClass nomClass, CORBA_Environment *ev)
+{
+  /* NOMObjectData* nomThis=NOMObjectGetData(nomSelf); */
+  NOMClassPriv* ncp;
+  nomMethodTabs mtabs; /* List of mtabs */
+
+  if(!nomIsObj(nomClass)){
+    g_warning("%s: class object pointer nomClass does not point to an object.", __FUNCTION__);
+    return FALSE;
+  }
+
+  /* Check if we have the class in our list of classes */
+  ncp=(NOMClassPriv*)nomSelf->mtab->nomClsInfo;
+  mtabs=&ncp->mtabList;
+  while(mtabs)
+    {
+      if(nomClass==mtabs->mtab->nomClassObject)
+          return TRUE;
+
+      mtabs=mtabs->next;
+    }
+  return FALSE;
+}
+
+
+NOM_Scope CORBA_boolean NOMLINK impl_NOMObject_nomIsInstanceOf(NOMObject* nomSelf, const PNOMClass nomClass, CORBA_Environment *ev)
+{
+  /* NOMObjectData* nomThis=NOMObjectGetData(nomSelf); */
+ 
+  if(!nomIsObj(nomClass)){
+    g_warning("%s: class object pointer nomClass does not point to an object.", __FUNCTION__);
+    return FALSE;
+  }
+ 
+  if(nomClass==_nomGetClass(nomSelf, NULLHANDLE))
+    return TRUE;
+  
+  return FALSE;
+}
+
+/**
+   Function which implements the nomGetClassName() method of NOMObject.
+*/
+NOM_Scope CORBA_string NOMLINK impl_NOMObject_nomGetClassName(NOMObject* nomSelf, CORBA_Environment *ev)
+{
+  /* NOMObjectData* nomThis=NOMObjectGetData(nomSelf); */
+  return nomSelf->mtab->nomClassName;
+}