macedon-conv-utils.c

这是一个著名的应用层组播中间件的源码

//Copyright (c) 2004, Charles Killian, Adolfo Rodriguez, Dejan Kostic, Sooraj Bhat, and Amin Vahdat
//All rights reserved.
//
//Redistribution and use in source and binary forms, with or without
//modification, are permitted provided that the following conditions are met:
//
//   * Redistributions of source code must retain the above copyright
//     notice, this list of conditions and the following disclaimer.
//   * Redistributions in binary form must reproduce the above copyright
//     notice, this list of conditions and the following disclaimer in
//     the documentation and/or other materials provided with the
//     distribution.
//   * Neither the names of Duke University nor The University of
//     California, San Diego, nor the names of its contributors
//     may be used to endorse or promote products derived from
//     this software without specific prior written permission.
//
//THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
//AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
//IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
//DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE
//FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
//DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
//SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
//CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
//OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE
//USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.

/* macedon-conv.c */

/*
 * For MACEDON code generation
 *
 * Adolfo Rodriguez
 */

/* includes */
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <time.h>
#include "macedon-conv.h"
#include "macedon-conv-utils.h"

extern FILE *yyin, *yyout;

/* imports */
extern int protocol_done;
extern char *message_str, transition_state_str, 
  transition_stimulus_str;
extern char *protocol_name;
extern FILE *hfile, *cfile, *cfilefuncs;

/* exports */

/* local */

extern node_type *my_node_types;
extern message *my_messages;
extern neighbor_type *my_neighbors;
extern declare *my_periphs;
extern state *my_states;
extern timer *my_timers;

message *lookup_message (char *name)
{
  message *temp;
  
  temp = my_messages;
  while (temp)
    {
      if ( strcmp(temp->message_name, name) == 0)
	return temp;
      temp  = temp->next;
    }

  return 0;
}


timer *lookup_timer(char *name)
{
  timer *tempt;
  
  tempt = my_timers;
  while (tempt && strcmp(tempt->timer_name, name)!=0 )
    {
      tempt = tempt->next;
    }
  
  if (!tempt)
    {
      printf("Could not find timer %s!\n", name);
      exit(91);
    }
  return tempt;
}


char *conv_name_timer(char *name)
{
  char *real_name;
  
  real_name = (char *) malloc (40);
  sprintf(real_name, "timer_%s", name);
  return real_name;
}