src/forb/src/tests/hello_remote.c

   1 /**************************************************************************/
   2 /* ---------------------------------------------------------------------- */
   3 /* Copyright (C) 2006 - 2008 FRESCOR consortium partners:                 */
   4 /*                                                                        */
   5 /*   Universidad de Cantabria,              SPAIN                         */
   6 /*   University of York,                    UK                            */
   7 /*   Scuola Superiore Sant'Anna,            ITALY                         */
   8 /*   Kaiserslautern University,             GERMANY                       */
   9 /*   Univ. Politécnica  Valencia,           SPAIN                        */
  10 /*   Czech Technical University in Prague,  CZECH REPUBLIC                */
  11 /*   ENEA                                   SWEDEN                        */
  12 /*   Thales Communication S.A.              FRANCE                        */
  13 /*   Visual Tools S.A.                      SPAIN                         */
  14 /*   Rapita Systems Ltd                     UK                            */
  15 /*   Evidence                               ITALY                         */
  16 /*                                                                        */
  17 /*   See http://www.frescor.org for a link to partners' websites          */
  18 /*                                                                        */
  19 /*          FRESCOR project (FP6/2005/IST/5-034026) is funded             */
  20 /*       in part by the European Union Sixth Framework Programme          */
  21 /*       The European Union is not liable of any use that may be          */
  22 /*       made of this code.                                               */
  23 /*                                                                        */
  24 /*                                                                        */
  25 /*  This file is part of FORB (Frescor Object Request Broker)             */
  26 /*                                                                        */
  27 /* FORB is free software; you can redistribute it and/or modify it        */
  28 /* under terms of the GNU General Public License as published by the      */
  29 /* Free Software Foundation; either version 2, or (at your option) any    */
  30 /* later version.  FORB is distributed in the hope that it will be        */
  31 /* useful, but WITHOUT ANY WARRANTY; without even the implied warranty    */
  32 /* of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU    */
  33 /* General Public License for more details. You should have received a    */
  34 /* copy of the GNU General Public License along with FORB; see file       */
  35 /* COPYING. If not, write to the Free Software Foundation, 675 Mass Ave,  */
  36 /* Cambridge, MA 02139, USA.                                              */
  37 /*                                                                        */
  38 /* As a special exception, including FORB header files in a file,         */
  39 /* instantiating FORB generics or templates, or linking other files       */
  40 /* with FORB objects to produce an executable application, does not       */
  41 /* by itself cause the resulting executable application to be covered     */
  42 /* by the GNU General Public License. This exception does not             */
  43 /* however invalidate any other reasons why the executable file might be  */
  44 /* covered by the GNU Public License.                                     */
  45 /**************************************************************************/
  46
  47 /**
  48  * @file   hello_remote.c
  49  * @author Michal Sojka <sojkam1@fel.cvut.cz>
  50  * @date   Thu Sep 25 16:05:27 2008
  51  *
  52  * @brief  Test of remote invocation.
  53  *
  54  * In this test, two FORBs are created, one for running the server of
  55  * hello interface and the second for running the client code. Since
  56  * the client and server are registered in different FORBs, remote
  57  * communication is used even if the two FORBs share the same
  58  * memory. This way we can easily test remote communication without
  59  * writing separate applications for client and server.
  60  */
  61
  62 #include <hello.h>
  63 #include "hello_impl.h"
  64 #include <forb.h>
  65 #include <error.h>
  66 #include <fosa.h>
  67 #include <forb/executor.h>
  68
  69 int argc_g;
  70 char **argv_g;
  71
  72 void *server_thread(void *arg)
  73 {
  74         hello hobj = arg;
  75
  76         forb_execute_object(hobj);
  77         return NULL;
  78 }
  79
  80 char *start_server()
  81 {
  82         forb_orb orb;
  83         hello hobj;
  84
  85         fosa_thread_id_t tid;
  86         struct forb_init_attr attr = {
  87                 .orb_id = "hello_remote_server"
  88         };
  89
  90         orb = forb_init(&argc_g, &argv_g, &attr);
  91         if (!orb) {
  92                 error(1, errno, "Cannot initialize FORB for server");
  93         }
  94         hobj = hello_impl_initialize(orb);
  95         fosa_thread_create(&tid, NULL, server_thread, hobj);
  96
  97         return forb_object_to_string(hobj);
  98 }
  99
 100
 101
 102 void client(void *arg)
 103 {
 104         forb_orb orb;
 105         hello hobj;
 106         struct forb_env env;
 107         char *objref = arg;
 108         struct forb_init_attr attr = {
 109                 .orb_id = "hello_remote_client"
 110         };
 111
 112         orb = forb_init(&argc_g, &argv_g, &attr);
 113         if (!orb) {
 114                 error(1, errno, "Cannot initialize FORB for server");
 115         }
 116
 117         hobj = forb_string_to_object(orb, objref);
 118         if (!hobj) {
 119                 error(1, 0, "Cannot create object reference from the string (%s)\n", objref);
 120         }
 121
 122         hello_message(hobj, "Hello world!", &env);
 123         if (forb_exception_occurred(&env)) {
 124                 error(1, 0, "FORB exception %d", env.major);
 125         }
 126
 127 }
 128
 129 int main(int argc, char *argv[])
 130 {
 131
 132         char *objref_str;
 133
 134         argc_g = argc;
 135         argv_g = argv;
 136
 137         objref_str = start_server();
 138
 139         client(objref_str);
 140
 141         return 0;
 142 }