TAO/tests/Bug_2735_Regression/server.cpp

   1 #include "tao/ORB.h"
   2 #include "ace/Get_Opt.h"
   3 #include "ace/Service_Config.h"
   4 #include "ace/Log_Msg.h"
   5
   6 static const ACE_TCHAR* server_strat =
   7   ACE_STATIC_SERVICE_DIRECTIVE ("Server_Strategy_Factory",
   8                                 "-ORBConcurrency thread-per-connection");
   9 static const ACE_TCHAR* foo_strat =
  10   ACE_STATIC_SERVICE_DIRECTIVE ("Foo_Strategy_Factory", "");
  11
  12 enum Factory_Strategy { SERVER_STRATEGY, FOO_STRATEGY };
  13
  14 static Factory_Strategy factory_strategy = SERVER_STRATEGY;
  15
  16 static int
  17 parse_args (int argc, ACE_TCHAR *argv[])
  18 {
  19   ACE_Get_Opt get_opts (argc, argv, ACE_TEXT ("fs"));
  20   int c;
  21
  22   while ((c = get_opts ()) != -1)
  23     switch (c)
  24       {
  25       case 'f':
  26         factory_strategy = FOO_STRATEGY;
  27         break;
  28       case 's':
  29         factory_strategy = SERVER_STRATEGY;
  30         break;
  31       case '?':
  32       default:
  33         ACE_ERROR_RETURN ((LM_ERROR,
  34                            "usage: %s "
  35                            "-f "
  36                            "-s "
  37                            "\n",
  38                            argv [0]),
  39                           -1);
  40       }
  41   return 0;
  42 }
  43
  44
  45 int
  46 ACE_TMAIN (int argc, ACE_TCHAR *argv[])
  47 {
  48   try
  49     {
  50       if (parse_args (argc, argv) == -1)
  51         return -1;
  52
  53       int targc = 3;
  54       const ACE_TCHAR *targv[] =
  55         { ACE_TEXT ("server"), ACE_TEXT ("-ORBSvcConfDirective"), 0, 0 }; // null-terminated!
  56       switch (factory_strategy)
  57         {
  58         case FOO_STRATEGY:
  59           targv[2] = foo_strat;
  60           break;
  61         case SERVER_STRATEGY:
  62           targv[2] = server_strat;
  63           break;
  64         }
  65       CORBA::ORB_var orb = CORBA::ORB_init (targc, const_cast<ACE_TCHAR**> (targv));
  66       orb->destroy ();
  67     }
  68   catch (const CORBA::Exception& ex)
  69     {
  70       ex._tao_print_exception ("Exception caught:");
  71       return 1;
  72     }
  73
  74   return 0;
  75 }