[BACK]Return to serv1.c CVS log [TXT][DIR] Up to [local] / OpenXM / src / ox_math

Diff for /OpenXM/src/ox_math/serv1.c between version 1.13 and 1.23

version 1.13, 2000/12/03 21:46:52 version 1.23, 2005/07/26 12:52:04
Line 1 
Line 1 
 /* -*- mode: C; coding: euc-japan -*- */  /* -*- mode: C; coding: euc-japan -*- */
 /* $OpenXM: OpenXM/src/ox_math/serv1.c,v 1.12 2000/12/03 15:19:23 ohara Exp $ */  /* $OpenXM: OpenXM/src/ox_math/serv1.c,v 1.22 2003/02/13 01:29:38 ohara Exp $ */
   
 /*  /*
    Copyright (C) Katsuyoshi OHARA, 2000.     Copyright (C) Katsuyoshi OHARA, 2000.
Line 18 
Line 18 
 #include <ox_toolkit.h>  #include <ox_toolkit.h>
 #include "sm.h"  #include "sm.h"
   
 static int send_ox_sync_ball();  
   
 extern OXFILE *stack_oxfp;  extern OXFILE *stack_oxfp;
   
 static int flag_sigusr1 = 0;  static int exchange_ox_sync_ball(OXFILE *oxfp)
 static int flag_sigusr2 = 0;  
   
 /* if in_critical equals to 1 then we do not permit an interrupt. */  
 static int in_critical = 0;  
   
 static int set_critical()  
 {  {
     in_critical = 1;      int tag;
 }          ox_printf("exchanging OX_SYNC_BALL\n");
       send_ox_tag(oxfp, OX_SYNC_BALL);
 static int unset_critical()      while((tag = receive_ox_tag(oxfp)) != OX_SYNC_BALL) {
 {          if (tag == OX_DATA) {
     in_critical = 0;              receive_cmo(oxfp);
 }          }else if (tag == OX_COMMAND) {
               receive_int32(oxfp);
 static int critical_p() {  
     return in_critical;  
 }  
   
 static int already_send_ox_sync_ball = 0;  
   
 /* SM_control_reset_connection */  
 static int handler_reset1()  
 {  
     fprintf(stderr, "signal received.\n");  
     signal(SIGUSR1, handler_reset1);  
     if (!flag_sigusr1) {  
         flag_sigusr1 = 1;  
         if(critical_p()) {  
             send_ox_sync_ball();  
             already_send_ox_sync_ball = 1;  
         }          }
     }      }
 }  }
   
 static int handler_kill()  int shutdown()
 {  {
     oxf_close(stack_oxfp);      oxf_close(stack_oxfp);
     exit(1);      ml_exit();
       exit(0);
 }  }
   
 static int send_ox_sync_ball()  /* (Heisei)15/02/01 */
 {  #define VERSION  "2003/02/01"
     fprintf(stderr, "sending a sync_ball.\n");  
     send_ox_tag(stack_oxfp, OX_SYNC_BALL);  
 }  
   
 static int exchange_ox_syncball()  int main()
 {  {
     int tag;      OXFILE* sv;
   
     while((tag = receive_ox_tag(stack_oxfp)) != OX_SYNC_BALL) {      ox_stderr_init(stderr);
         /* skipping a message. */      ml_init();
         if (tag == OX_DATA) {      mathcap_init(VERSION, "ox_math");
             receive_cmo(stack_oxfp);  
         }else {      sv = oxf_open(3);
             receive_int32(stack_oxfp);      oxf_determine_byteorder_server(sv);
         }      sm(sv);
     }      shutdown();
     fprintf(stderr, "received a sync_ball.\n");  
 }  }
   
 /* a part of stack machine. */  /* a part of stack machine. */
Line 101  int sm_receive_ox()
Line 74  int sm_receive_ox()
         break;          break;
     case OX_COMMAND:      case OX_COMMAND:
         code = receive_sm_command(stack_oxfp);          code = receive_sm_command(stack_oxfp);
         set_critical();  
         sm_run(code);          sm_run(code);
         unset_critical();  
         break;          break;
     default:      default:
         fprintf(stderr, "illeagal message? ox_tag = (%d)\n", tag);          ox_printf("illeagal OX message(%d)\n", tag);
         return 0;  
         break;          break;
     }      }
     return 1;      return 1;
 }  }
   
 int shutdown()  
 {  
     oxf_close(stack_oxfp);  
     ml_exit();  
     exit(0);  
 }  
   
 #define VERSION 0x11121400  
 #define ID_STRING  "2000/11/29"  
   
 int oxf_error(OXFILE *oxfp)  
 {  
     int e = oxfp->error;  
     if (e != 0) {  
         oxfp->error = 0;  
     }  
     return e;  
 }  
   
 int main()  
 {  
     OXFILE* sv;  
   
     ml_init();  
     mathcap_init(VERSION, ID_STRING, "ox_math", NULL, NULL);  
   
     signal(SIGUSR1, handler_reset1);  
     signal(SIGKILL, handler_kill);  
   
     sv = oxf_open(3);  
     oxf_determine_byteorder_server(sv);  
     sm(sv);  
     shutdown();  
 }  
   
 int sm(OXFILE *oxfp)  int sm(OXFILE *oxfp)
 {  {
       int i=0;
       fd_set fdmask;
     stack_oxfp = oxfp;      stack_oxfp = oxfp;
     stack_extend();      stack_extend();
     while(sm_receive_ox()) {      sm_siginit();
         if(flag_sigusr1) {  
             if (!already_send_ox_sync_ball) {      FD_ZERO(&fdmask);
               send_ox_sync_ball();      FD_SET(oxf_fileno(oxfp), &fdmask);
                 already_send_ox_sync_ball = 1;  
             }      for (i=0; ; i++) {
             exchange_ox_syncball();          sm_sigunmask();
             flag_sigusr1 = 0;          ox_printf("phase%d: select\n",i);
             already_send_ox_sync_ball = 0;          if (select(5, &fdmask, NULL, NULL, NULL) > 0) {
               sm_sigmask();
               ox_printf("phase%d: receiving\n",i);
               sm_receive_ox();
         }          }
           sm_sigmask();
           ox_printf("phase%d: clearing(%d)\n",i,sm_state_interrupting());
           if (sm_state_interrupting()) {
               exchange_ox_sync_ball(stack_oxfp);
               sm_state_clear_interrupting();
           }
     }      }
     fprintf(stderr, "SM: socket(%d) is closed.\n", stack_oxfp->fd);      ox_printf("ox_math::socket(%d) is closed.\n", stack_oxfp->fd);
 }  }
Legend:
Removed from v.1.13  
changed lines
  Added in v.1.23
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>