root/trunk/src/renetcolSender.c @ 6

/*
 * File: renetcolSender.c
 * 
 * Authors: ANDREU François-Xavier 
 *
 * Copyright (C) 2005 GIP RENATER 
 */

/*  This file is part of renetcol. 
 *
 *  renetcol is free software; you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License as published by
 *  the Free Software Foundation; either version 2 of the License, or
 *  (at your option) any later version.
 *
 *  renetcol is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU General Public License for more details.
 *
 *  You should have received a copy of the GNU General Public License
 *  along with renetcol; if not, write to the Free Software
 *  Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
 */

#include "renetcolSender.h"

key_t myKey = 0;
int myQueue = 0;
msgType myMsg;
long type;
RulesPtr rulesListPtr;
char *rulesFileName;

int i=0;
int j=0;
unsigned char *myText;
unsigned char buffer2[2];
unsigned char buffer4[4];
unsigned short nb=0;
unsigned short typeMsg = 0;
RulesPtr tmp = NULL;

/* 
 * Main
 * ----
 */
int 
main (int argc, char *argv[])
{
  int s=0;
  unsigned short rulesID = 0;

  if ( argc != 4) {
    fprintf (stderr,
             "%s: Usage: %s <key> <msg type> <rules file>\n exp: %s colnetv9 1 rules.txt\n", 
             argv[0], argv[0], argv[0]);
    exit(1);
  }

  openlog(argv[0], LOG_PID, LOG_USER);
  rulesFileName = (char *) malloc((strlen(argv[3])+1) * sizeof(char));
  strcpy (rulesFileName, argv[3]);
  rulesListPtr = NULL;
  rulesListPtr = getRules(rulesListPtr, rulesFileName);
  /* we delete rules which are not type socket */
  tmp = rulesListPtr;
  for ( ; tmp->next; tmp=tmp->next) {
    if (tmp->type != 2) {
      rulesListPtr = delRule(tmp, rulesListPtr);
    }
  }
  tmp = NULL;
  printRule(rulesListPtr);

  /* get IPC messages queue */
  if ((myKey = ftok(argv[1], 0))== -1){
    perror("ftok");
    exit(1);
  }
  if ((myQueue = msgget(myKey, 0)) == -1){
    perror("msgget");
    exit(1);
  }
  if (sscanf (argv[2], "%ld", &type) != 1){
    fprintf(stderr, "Invalid type\n");
    exit(1);
  }
  while (1) {
    i=0;
    myText = msgRcv(myQueue, &myMsg, type);
    buffer2[0]= *(myText+i); i++;
    buffer2[1]= *(myText+i); i++;
    typeMsg = *((unsigned short *)&buffer2);
    if (1==typeMsg){
      /* we send the template definition to all the known destination */
      tmp = rulesListPtr;
      for ( ; tmp; tmp=tmp->next) {
        s = sendMessage(tmp->host->sockId, myText, sizeof(myMsg.text),
                        tmp->host->hostAddressPtr);
      }
    } else if (11==*((unsigned short*)&buffer2)){ 
      buffer2[0]= *(myText+i); i++;
      buffer2[1]= *(myText+i); i++;
      rulesID = *((unsigned short *)&buffer2);
      /* here we send the flow to the correct remote client */
      tmp = rulesListPtr;
      for ( ; tmp; tmp=tmp->next) { /* FIXME while */
        if (tmp->id == rulesID){
          s = sendMessage(tmp->host->sockId, myText, sizeof(myMsg.text),
                          tmp->host->hostAddressPtr);
        }
      }
    } else {
      syslog(LOG_INFO, "Msg type undefined ??");
    }
    i=0;
  }
}