source: trunk/tests/class_c/testnomobject.c

/* ***** BEGIN LICENSE BLOCK *****
 * Version: CDDL 1.0/LGPL 2.1
 *
 * The contents of this file are subject to the COMMON DEVELOPMENT AND
 * DISTRIBUTION LICENSE (CDDL) Version 1.0 (the "License"); you may not use
 * this file except in compliance with the License. You may obtain a copy of
 * the License at http://www.sun.com/cddl/
 *
 * Software distributed under the License is distributed on an "AS IS" basis,
 * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
 * for the specific language governing rights and limitations under the
 * License.
 *
 * The Original Code is "NOM" Netlabs Object Model
 *
 * 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) 2007
 * the Initial Developer. All Rights Reserved.
 *
 * Contributor(s):
 *
 * Alternatively, the contents of this file may be used under the terms of
 * the GNU Lesser General Public License Version 2.1 (the "LGPL"), in which
 * case the provisions of the LGPL are applicable instead of those above. If
 * you wish to allow use of your version of this file only under the terms of
 * the LGPL, and not to allow others to use your version of this file under
 * the terms of the CDDL, indicate your decision by deleting the provisions
 * above and replace them with the notice and other provisions required by the
 * LGPL. If you do not delete the provisions above, a recipient may use your
 * version of this file under the terms of any one of the CDDL or the LGPL.
 *
 * ***** END LICENSE BLOCK ***** */

/*
 * And remember, phase 3 is near...
 */
#ifndef NOM_TestNomObject_IMPLEMENTATION_FILE
#define NOM_TestNomObject_IMPLEMENTATION_FILE
#endif

#if __OS2__
#define INCL_DOS
#include <os2.h>
#endif /* __OS2__ */

#include <nom.h>
#include <nomtk.h>

#include "testnomobject.ih"


NOMDLLEXPORT NOM_Scope CORBA_boolean NOMLINK impl_TestNomObject_test_nomQueryClassName(TestNomObject* nomSelf,
    CORBA_Environment *ev)
{
  /* TestNomObjectData* nomThis = TestNomObjectGetData(nomSelf); */
  CORBA_boolean nomRetval=FALSE;
    
  for(;;)
  {
    if(0!=strcmp(_nomQueryClassName(nomSelf, NULL), "TestNomObject"))
      break;

    if(0!=strcmp(_nomQueryClassName((NOMObject*)_queryClassMgrObject(nomSelf, NULL), NULL), "NOMClassMgr"))
      break;
    
    nomRetval=TRUE;
    break;
  }
  
  return nomRetval;
}


NOMDLLEXPORT NOM_Scope CORBA_boolean NOMLINK impl_TestNomObject_test_nomIsA(TestNomObject* nomSelf,
                                                                            CORBA_Environment *ev)
{
  TestNomObjectData* nomThis = TestNomObjectGetData(nomSelf);
   CORBA_boolean nomRetval=FALSE;

  for(;;)
  {
    /* Because we call the method without a valid class there will be a warning message on the console */
    g_message("In %s: The following warning is expected.", __FUNCTION__);
    if(_nomIsA(nomSelf, NULL, NULL))
      break;

    if(!_nomIsA(nomSelf, _testCaseClass, NULL))
      break;

    if(!_nomIsA(nomSelf, _nomObjectClass, NULL))
      break;

    if(!_nomIsA(nomSelf, _nClass, NULL))
      break;

    nomRetval=TRUE;
    break;
  }
  return nomRetval;
}


NOMDLLEXPORT NOM_Scope CORBA_boolean NOMLINK impl_TestNomObject_test_nomIsInstanceOf(TestNomObject* nomSelf,
                                                                                     CORBA_Environment *ev)
{
  TestNomObjectData* nomThis = TestNomObjectGetData(nomSelf);
  CORBA_boolean nomRetval=FALSE;
  
  for(;;)
  {
    /* Because we call the method without a valid class there will be a warning message on the console */
    g_message("In %s: The following warning is expected.", __FUNCTION__);
    if(_nomIsInstanceOf(nomSelf, NULL, NULL))
      break;

    if(_nomIsInstanceOf(nomSelf, _testCaseClass, NULL))
      break;
    
    if(_nomIsInstanceOf(nomSelf, _nomObjectClass, NULL))
      break;

    if(!_nomIsInstanceOf(nomSelf, _nClass, NULL))
      break;

    nomRetval=TRUE;
    break;
  }
  return nomRetval;
}


NOMDLLEXPORT NOM_Scope CORBA_boolean NOMLINK impl_TestNomObject_test_testDataInit(TestNomObject* nomSelf,
                                                                                  CORBA_Environment *ev)
{
  TestNomObjectData* nomThis = TestNomObjectGetData(nomSelf);
  CORBA_boolean nomRetval=FALSE;
  
  for(;;)
  {
    if(NULL==_nClass)
      break;
    
    if(NULL==_testCaseClass)
      break;

    if(NULL==_nomObjectClass)
      break;
    
    nomRetval=TRUE;
    break;
  }
    
  return nomRetval;
}

NOMDLLEXPORT NOM_Scope void NOMLINK impl_TestNomObject_setUp(TestNomObject* nomSelf,
                                                             CORBA_Environment *ev)
{
  TestNomObjectData* nomThis = TestNomObjectGetData(nomSelf);
  
  /* call parent */
  TestNomObject_setUp_parent(nomSelf, ev);

  _nClass=_nomQueryClass(nomSelf, NULL);

  if(NULL!=_queryClassMgrObject(nomSelf, NULL))
  {
    _testCaseClass=_nomFindClassFromName( _queryClassMgrObject(nomSelf, NULL), "NOMTestCase", 0, 0, NULL);
    _nomObjectClass=_nomFindClassFromName( _queryClassMgrObject(nomSelf, NULL), "NOMObject", 0, 0, NULL);
  }
}

NOMDLLEXPORT NOM_Scope void NOMLINK impl_TestNomObject_tearDown(TestNomObject* nomSelf,
                                                                CORBA_Environment *ev)
{
  TestNomObjectData* nomThis = TestNomObjectGetData(nomSelf);

  _nClass=NULL;
  _testCaseClass=NULL;
  _nomObjectClass=NULL;
  
  /* call parent */
  TestNomObject_tearDown_parent(nomSelf, ev);
}