VMCFClass.h

Go to the documentation of this file.

/* **********************************************************
 * Copyright 2007 VMware, Inc.  All rights reserved. -- VMware Confidential
 * **********************************************************/

#undef VMCF_EXTERN
#if defined(VMCF_IMPL)
#   if defined(_WIN32)
#      define VMCF_EXTERN __declspec(dllexport)
#   elif defined(GCC_EXPLICIT_EXPORT)
#      define VMCF_EXTERN __attribute__((visibility("default")))
#   else
#      define VMCF_EXTERN
#   endif
#else
#   define VMCF_EXTERN extern
#endif


#ifndef _VMCF_CLASS_H_
#define _VMCF_CLASS_H_

/*
 * The following macros (inside the INTERNAL section) are intended for internal
 * use only. They mostly handle the needed macro redirection to resolve all
 * the names passed as macro arguments.
 */


#define __VMCF_PROTO_ALLOC(klass)                         \
void                                                      \
klass ## Impl_alloc(klass self,                           \
                    size_t extraInstanceDataSize,         \
                    CORBA_string name,                    \
                    void *server,                         \
                    VMCFCore_CFObject parent,             \
                    CORBA_Environment *env)

#define _VMCF_PROTO_ALLOC(klass) __VMCF_PROTO_ALLOC(klass)


#define VMCF_PROTO_ALLOC(klass) _VMCF_PROTO_ALLOC(klass)


/* Finalizer helper macros. */

#define __VMCF_PROTO_FINI(klass)                          \
void                                                      \
klass ## Impl_finalize(void *instData)

#define _VMCF_PROTO_FINI(klass) __VMCF_PROTO_FINI(klass)

#define VMCF_PROTO_FINI(klass) _VMCF_PROTO_FINI(klass)


/* getSubinstanceData helper macros. */

#define __VMCF_PROTO_SUBINST(klass)                       \
void *                                                    \
klass ## Impl_getSubinstanceData(void *instData)

#define _VMCF_PROTO_SUBINST(klass) __VMCF_PROTO_SUBINST(klass)


#define VMCF_PROTO_SUBINST(klass) _VMCF_PROTO_SUBINST(klass)


/* Constructor helper macros. */

#define __VMCF_PROTO_CTOR(klass)                          \
klass                                                     \
klass ## Impl_create(CORBA_string name,                   \
                     void *server,                        \
                     CORBA_boolean bind,                  \
                     VMCFCore_CFObject parent,            \
                     CORBA_Environment *env)

#define _VMCF_PROTO_CTOR(klass) __VMCF_PROTO_CTOR(klass)


#define VMCF_PROTO_CTOR(klass) _VMCF_PROTO_CTOR(klass)


/* Initializer helper macros. */

#define __VMCF_PROTO_INIT(klass, args) void klass ## Impl_init args

#define _VMCF_PROTO_INIT(klass, args) __VMCF_PROTO_INIT(klass, args)


#include <stdio.h>
#include <string.h>

#define _ILU_CORBA_OBJECT  "ilu--corba-native-object:"

/* Instance type helper macros. */

#define __VMCF_INSTANCE_TYPE(klass) klass ## Instance

#define _VMCF_INSTANCE_TYPE(klass) __VMCF_INSTANCE_TYPE(klass)

/* Helper macros for chaining calls. */

#define __VMCF_CHAIN_TO_SUPER(prefix, super, function, args) \
   prefix ## super ## function args

#define _VMCF_CHAIN_TO_SUPER(prefix, super, function, args) \
   __VMCF_CHAIN_TO_SUPER(prefix, super, function, args)

#define VMCF_CHAIN_TO_SUPER(prefix, function, args) \
   _VMCF_CHAIN_TO_SUPER(prefix, VMCF_SUPERCLASS, function, args)


/* Chaining macros for the base CFObject interface methods. */

#define __VMCF_DEFINE_CHAINED_GET_NAME(klass)                   \
CORBA_string                                                    \
server_ ## klass ## __get_name(klass self,                      \
                               CORBA_Environment *env)          \
{                                                               \
   return VMCF_CHAIN_TO_SUPER_SERVER(_get_name, (self, env));   \
}

#define _VMCF_DEFINE_CHAINED_GET_NAME(klass) \
   __VMCF_DEFINE_CHAINED_GET_NAME(klass)


#define __VMCF_DEFINE_CHAINED_PROBE(klass)           \
void                                                 \
server_ ## klass ## _probe(klass self,               \
                           CORBA_Environment *env)   \
{                                                    \
   VMCF_CHAIN_TO_SUPER_SERVER(probe, (self, env));   \
}

#define _VMCF_DEFINE_CHAINED_PROBE(klass) \
   __VMCF_DEFINE_CHAINED_PROBE(klass)


/* Definition of auto-generated functions (create/alloc/subinstance). */

#define __VMCF_DEFINE_CTOR_BODY(module, klass)                            \
{                                                                         \
   CORBA_string corbalocName = NULL;                                      \
   klass self;                                                            \
                                                                          \
   VMCF_ASSERT_ARG(server, env, return NULL);                             \
                                                                          \
   module ## __InitializeServer();                                        \
   klass ##  __SetDefaultClassFinalization(klass ## Impl_finalize);       \
                                                                          \
   if (bind) {                                                            \
      size_t len;                                                         \
      VMCF_ASSERT_ARG(name != NULL, env, return NULL);                    \
      len = strlen(_ILU_CORBA_OBJECT) + strlen(name) + 1;                 \
      corbalocName = CORBA_string_alloc((CORBA_unsigned_long)len);        \
      VMCF_ASSERT_ALLOC(corbalocName, env, return NULL);                  \
      snprintf(corbalocName, len, _ILU_CORBA_OBJECT "%s", name);          \
   }                                                                      \
                                                                          \
   self = klass ## __CreateTrue(corbalocName,                             \
                                (ILU_C_Server)server,                     \
                                NULL);                                    \
   CORBA_free(corbalocName);                                              \
   VMCF_ASSERT_ALLOC(self, env, return NULL);                             \
   klass ## Impl_alloc(self, 0, (name), (server), (parent), env);         \
   return self;                                                           \
}

#define _VMCF_DEFINE_CTOR_BODY(module, klass) \
   __VMCF_DEFINE_CTOR_BODY(module, klass)

#define VMCF_DEFINE_CTOR           \
   VMCF_PROTO_CTOR(VMCF_THISCLASS) \
   _VMCF_DEFINE_CTOR_BODY(VMCF_THISMODULE, VMCF_THISCLASS)


#define __VMCF_DEFINE_ALLOC_BODY(instType)                                \
{                                                                         \
   instType *inst;                                                        \
   VMCF_CHAIN_TO_SUPER_IMPL(alloc,                                        \
      (self, (extraInstanceDataSize + sizeof *inst),                      \
       name, server, parent, env));                                       \
   if (VMCF_EXCEPTION_RAISED(env)) {                                      \
      return;                                                             \
   }                                                                      \
}

#define _VMCF_DEFINE_ALLOC_BODY(instType) \
   __VMCF_DEFINE_ALLOC_BODY(instType)

#define VMCF_DEFINE_ALLOC          \
  VMCF_PROTO_ALLOC(VMCF_THISCLASS) \
   _VMCF_DEFINE_ALLOC_BODY(VMCF_INSTANCE_TYPE)


#define __VMCF_DEFINE_SUBINST_BODY(instType)                                  \
{                                                                             \
   char *myData;                                                              \
   myData = (char *)VMCF_CHAIN_TO_SUPER_IMPL(getSubinstanceData, (instData)); \
   return myData + sizeof (instType);                                         \
}

#define _VMCF_DEFINE_SUBINST_BODY(instType) \
   __VMCF_DEFINE_SUBINST_BODY(instType)

#define VMCF_DEFINE_SUBINST           \
   VMCF_PROTO_SUBINST(VMCF_THISCLASS) \
   _VMCF_DEFINE_SUBINST_BODY(VMCF_INSTANCE_TYPE)

#define VMCF_DECLARE_CLASS(klass, initArgs)     \
VMCF_EXTERN VMCF_PROTO_ALLOC(klass);            \
                                                \
VMCF_EXTERN VMCF_PROTO_FINI(klass);             \
                                                \
VMCF_EXTERN VMCF_PROTO_SUBINST(klass);          \
                                                \
VMCF_EXTERN VMCF_PROTO_CTOR(klass);             \
                                                \
VMCF_EXTERN _VMCF_PROTO_INIT(klass, initArgs);


#define VMCF_DEFINE_FINI_BEGIN                                       \
VMCF_PROTO_FINI(VMCF_THISCLASS)                                      \
{                                                                    \
   VMCF_INSTANCE_TYPE *inst = VMCF_GET_SUBINSTANCE_DATA((instData)); \
   if (!inst) {                                                      \
      return;                                                        \
   }


#define VMCF_DEFINE_FINI_END                       \
   VMCF_CHAIN_TO_SUPER_IMPL(finalize, (instData)); \
}


#define VMCF_PROTO_INIT(args) _VMCF_PROTO_INIT(VMCF_THISCLASS, args)


#define VMCF_INIT_EPILOGUE(self, activate, env) {           \
   if (self) {                                              \
      if (VMCF_EXCEPTION_RAISED((env))) {                   \
         CORBA_Environment _lenv = { CORBA_NO_EXCEPTION };  \
         CORBA_Object_release((self), &_lenv);              \
         CORBA_exception_free(&_lenv);                      \
      } else if (activate) {                                \
         ilu_ActivateObject(self->iluco_ko);                \
      }                                                     \
   }                                                        \
}


#define VMCF_INSTANCE_TYPE _VMCF_INSTANCE_TYPE(VMCF_THISCLASS)


#define VMCF_CHAIN_TO_SUPER_SERVER(function, args) \
   VMCF_CHAIN_TO_SUPER(server_, _ ## function, args)


#define VMCF_CHAIN_TO_SUPER_IMPL(function, args) \
   VMCF_CHAIN_TO_SUPER(, Impl_ ## function, args)


#define VMCF_USER_DATA(self) (((ILU_C_Object *)(self))->instanceData)


#define VMCF_GET_SUBINSTANCE_DATA(data) \
   VMCF_CHAIN_TO_SUPER_IMPL(getSubinstanceData, (data))


#define VMCF_GET_SELF_DATA(self) \
   VMCF_GET_SUBINSTANCE_DATA(VMCF_USER_DATA(self))


#define VMCF_DEFINE_CHAINED_GET_NAME \
   _VMCF_DEFINE_CHAINED_GET_NAME(VMCF_THISCLASS)


#define VMCF_DEFINE_CHAINED_PROBE \
   _VMCF_DEFINE_CHAINED_PROBE(VMCF_THISCLASS)


#define VMCF_DEFINE_CLASS \
   VMCF_DEFINE_CTOR       \
   VMCF_DEFINE_ALLOC      \
   VMCF_DEFINE_SUBINST


#endif /* _VMCF_CLASS_H_*/

---