Ejemplo n.º 1
0
int main(void)
{
    /* initialization */
    gnrc_pktbuf_init();
    msg_init_queue(_main_msg_queue, _MAIN_MSG_QUEUE_SIZE);
    netdev2_test_setup(&_dev, NULL);
    netdev2_test_set_isr_cb(&_dev, _dev_isr);
    netdev2_test_set_recv_cb(&_dev, _dev_recv);
    netdev2_test_set_send_cb(&_dev, _dev_send);
    netdev2_test_set_get_cb(&_dev, NETOPT_ADDRESS, _dev_get_addr);
    netdev2_test_set_set_cb(&_dev, NETOPT_ADDRESS, _dev_set_addr);
    gnrc_netdev2_eth_init(&_gnrc_dev, (netdev2_t *)(&_dev));
    _mac_pid = gnrc_netdev2_init(_mac_stack, _MAC_STACKSIZE, _MAC_PRIO,
                                 "gnrc_netdev_eth_test", &_gnrc_dev);
    if (_mac_pid <= KERNEL_PID_UNDEF) {
        puts("Could not start MAC thread\n");
        return 1;
    }

    /* test execution */
    EXECUTE(test_get_addr);
    EXECUTE(test_send);
    EXECUTE(test_receive);
    EXECUTE(test_set_addr);
    puts("ALL TESTS SUCCESSFUL");

    return 0;
}
Ejemplo n.º 2
0
/* 
 * function registered to HOOK_DISPATCHER
 * check the regex (if present) and log packets
 */
static void log_packet(struct packet_object *po)
{
   /* 
    * skip packet sent (spoofed) by us
    * else we will get duplicated hosts with our mac address
    * this is necessary because check_forwarded() is executed
    * in ec_ip.c, but here we are getting even arp packets...
    */
   EXECUTE(EC_GBL_SNIFF->check_forwarded, po);
   if (po->flags & PO_FORWARDED)
      return;

   /*
    * recheck if the packet is compliant with the visualization filters.
    * we need to redo the test, because here we are hooked to ARP and ICMP
    * packets that are before the test in ec_decode.c
    */
   po->flags |= PO_IGNORE;
   EXECUTE(EC_GBL_SNIFF->interesting, po);
   if ( po->flags & PO_IGNORE )
       return;

   /* the regex is set, respect it */
   if (EC_GBL_OPTIONS->regex) {
      if (regexec(EC_GBL_OPTIONS->regex, (const char*)po->DATA.disp_data, 0, NULL, 0) == 0)
         log_write_packet(&fdp, po);
   } else {
      /* if no regex is set, dump all the packets */
      log_write_packet(&fdp, po);
   }
   
}
Ejemplo n.º 3
0
/* 
 * function registered to HOOK_DISPATCHER
 * it is a wrapper to the real one
 */
static void log_info(struct packet_object *po)
{
   /* 
    * skip packet sent (spoofed) by us
    * else we will get duplicated hosts with our mac address
    * this is necessary because check_forwarded() is executed
    * in ec_ip.c, but here we are getting even arp packets...
    */
   EXECUTE(EC_GBL_SNIFF->check_forwarded, po);
   if (po->flags & PO_FORWARDED)
      return;

   /*
    * recheck if the packet is compliant with the visualization filters.
    * we need to redo the test, because here we are hooked to ARP and ICMP
    * packets that are before the test in ec_decode.c
    */
   po->flags |= PO_IGNORE;
   EXECUTE(EC_GBL_SNIFF->interesting, po);
   if ( po->flags & PO_IGNORE )
       return;

   /* if all the tests are ok, write it to the disk */
   if (po->L4.proto == NL_TYPE_ICMP || po->L3.proto == htons(LL_TYPE_ARP))
      log_write_info_arp_icmp(&fdi, po);      
   else
      log_write_info(&fdi, po);
}
Ejemplo n.º 4
0
void daemon_interface(void)
{
   DEBUG_MSG("daemon_interface");
   
   /* check if the plugin exists */
   if (GBL_OPTIONS->plugin && search_plugin(GBL_OPTIONS->plugin) != ESUCCESS)
      FATAL_ERROR("%s plugin can not be found !", GBL_OPTIONS->plugin);
   
   /* build the list of active hosts */
   build_hosts_list();

   /* start the mitm attack */
   mitm_start();
   
   /* initialize the sniffing method */
   EXECUTE(GBL_SNIFF->start);
   
   /* if we have to activate a plugin */
   if (GBL_OPTIONS->plugin && plugin_init(GBL_OPTIONS->plugin) != PLUGIN_RUNNING)
      /* end the interface */
      return;

   /* discard the messages */
   LOOP {
      CANCELLATION_POINT();
      sleep(1); 
      ui_msg_flush(MSG_ALL);
   }
   /* NOT REACHED */   
}
Ejemplo n.º 5
0
static void curses_start_sniffing(void)
{
   DEBUG_MSG("curses_start_sniffing");
   
   /* start the sniffing method */
   EXECUTE(GBL_SNIFF->start);
}
Ejemplo n.º 6
0
static void curses_stop_sniffing(void)
{
   DEBUG_MSG("curses_stop_sniffing");
   
   /* terminate the sniffing engine */
   EXECUTE(GBL_SNIFF->cleanup);
}
Ejemplo n.º 7
0
int csSelPoint_Volume( char *action, double *lo, double *hi )
{
   static LWCommandCode ccode;
   ModData *md = getModData();
   DynaValue argv[ 4 ];

   assert( md->edit == NULL );

   argv[ 0 ].type = DY_STRING;
   argv[ 0 ].str.buf = action;
   argv[ 0 ].str.bufLen = 0;

   argv[ 1 ].type = DY_STRING;
   argv[ 1 ].str.buf = "VOLUME";
   argv[ 1 ].str.bufLen = 0;

   argv[ 2 ].type = DY_VFLOAT;
   argv[ 2 ].fvec.val[ 0 ] = lo[ 0 ];
   argv[ 2 ].fvec.val[ 1 ] = lo[ 1 ];
   argv[ 2 ].fvec.val[ 2 ] = lo[ 2 ];

   argv[ 3 ].type = DY_VFLOAT;
   argv[ 3 ].fvec.val[ 0 ] = hi[ 0 ];
   argv[ 3 ].fvec.val[ 1 ] = hi[ 1 ];
   argv[ 3 ].fvec.val[ 2 ] = hi[ 2 ];

   LOOKUP( "SEL_POINT" );
   EXECUTE( 4, argv );
   return OK;
}
Ejemplo n.º 8
0
int csSelPolygon_Nonplanar( char *action, double limit )
{
   static LWCommandCode ccode;
   ModData *md = getModData();
   DynaValue argv[ 3 ];

   assert( md->edit == NULL );

   argv[ 0 ].type = DY_STRING;
   argv[ 0 ].str.buf = action;
   argv[ 0 ].str.bufLen = 0;

   argv[ 1 ].type = DY_STRING;
   argv[ 1 ].str.buf = "NONPLANAR";
   argv[ 1 ].str.bufLen = 0;

   if ( limit >= 0.0 ) {
      argv[ 2 ].type = DY_FLOAT;
      argv[ 2 ].flt.value = limit;
   }
   else argv[ 2 ].type = DY_NULL;

   LOOKUP( "SEL_POLYGON" );
   EXECUTE( 3, argv );
   return OK;
}
Ejemplo n.º 9
0
int csAxisDrill( char *operation, char *axis, char *surface )
{
   static LWCommandCode ccode;
   ModData *md = getModData();
   DynaValue argv[ 3 ];

   assert( md->edit == NULL );

   argv[ 0 ].type = DY_STRING;
   argv[ 0 ].str.buf = operation;
   argv[ 0 ].str.bufLen = 0;

   argv[ 1 ].type = DY_STRING;
   argv[ 1 ].str.buf = axis;
   argv[ 1 ].str.bufLen = 0;

   if ( surface ) {
      argv[ 2 ].type = DY_STRING;
      argv[ 2 ].str.buf = surface;
      argv[ 2 ].str.bufLen = 0;
   }
   else argv[ 2 ].type = DY_NULL;

   LOOKUP( "AXISDRILL" );
   EXECUTE( 3, argv );
   return OK;
}
Ejemplo n.º 10
0
/*
 * the redirect function.
 *
 * redirect all the traffic that goes thru the gateway
 * check the dst mac address and the dst ip address.
 *
 * respect the TARGETs for the redirections
 */
static void icmp_redirect(struct packet_object *po)
{
   struct ip_list *i;
   char tmp[MAX_ASCII_ADDR_LEN];

   /* retrieve the gw ip */
   i = LIST_FIRST(&redirected_gw.ips);
   
   /* the packet must be directed to the gateway */
   if (memcmp(po->L2.dst, redirected_gw.mac, MEDIA_ADDR_LEN))
      return;

   /* 
    * if the packet endpoint is the gateway, skip it.
    * we are interested only in packet going THRU the 
    * gateway, not TO the gateway
    */
   if (!ip_addr_cmp(&po->L3.dst, &i->ip))
      return;
  
   /* redirect only the connection that match the TARGETS */ 
   EXECUTE(GBL_SNIFF->interesting, po);
   
   /* the packet is not interesting */
   if ( po->flags & PO_IGNORE )
      return;
   
   USER_MSG("ICMP redirected %s:%d -> ", ip_addr_ntoa(&po->L3.src, tmp), ntohs(po->L4.src));
   USER_MSG("%s:%d\n", ip_addr_ntoa(&po->L3.dst, tmp), ntohs(po->L4.dst));

   /* send the ICMP redirect */
   send_icmp_redir(ICMP_REDIRECT_HOST, &i->ip, &GBL_IFACE->ip, po);
   
}
Ejemplo n.º 11
0
void clean_exit(int errcode)
{
   DEBUG_MSG("clean_exit: %d", errcode);
  
   INSTANT_USER_MSG("\nTerminating %s...\n", GBL_PROGRAM);

#ifdef HAVE_EC_LUA
   /* Cleanup lua */
   ec_lua_fini();
#endif

   /* flush the exit message */
   ui_msg_flush(MSG_ALL);

   /* stop the mitm attack */
   mitm_stop();

   /* terminate the sniffing engine */
   EXECUTE(GBL_SNIFF->cleanup);

   /* kill all the running threads but the current */
   ec_thread_kill_all();

   /* close the UI */
   ui_cleanup();

   /* call all the ATEXIT functions */
   exit(errcode);

}
Ejemplo n.º 12
0
void _ro_SETUP_rc_() // (SETUP)
{
  Push(0x01b8);
  _2_at_(); // 2@
  Push(Pop() | Pop()); // OR
  Push(Pop()==0?1:0); //  0=
  if (Pop() == 0) return;
  Push(0x001b);
  _ro__ex_OLD_rc_(); // (!OLD)
  Push(0x01b8);
  _2_ex__2(); // 2!_2
  _ro_CS_ask__rc_(); // (CS?)
  Push(0x08a0);
  Push(0x001b);
  _ro__ex_SET_rc_(); // (!SET)
  Push(0x001c);
  _ro__ex_OLD_rc_(); // (!OLD)
  Push(0x01bc);
  _2_ex__2(); // 2!_2
  _ro_CS_ask__rc_(); // (CS?)
  Push(0x018e);
  Push(0x001c);
  _ro__ex_SET_rc_(); // (!SET)
  Push(0);
  _ro__ex_OLD_rc_(); // (!OLD)
  Push(0x01c0);
  _2_ex__2(); // 2!_2
  SET0_slash_(); // SET0/
  Push(Read16(pp__i_SETUP_plus_)); // 'SETUP+ @
  if (Read16(regsp) != 0) Push(Read16(regsp)); // ?DUP
  if (Pop() == 0) return;
  EXECUTE(); // EXECUTE
}
Ejemplo n.º 13
0
void ui_cleanup(void)
{
   if (GBL_UI->initialized) {
      DEBUG_MSG("ui_cleanup");
      EXECUTE(GBL_UI->cleanup);
      GBL_UI->initialized = 0;
   }
}
Ejemplo n.º 14
0
void ui_init(void)
{
   DEBUG_MSG("ui_init");

   EXECUTE(GBL_UI->init);

   GBL_UI->initialized = 1;
}
Ejemplo n.º 15
0
CmCError Run(CmCParser *script)
{
  
  //define and initialize parameter table
  void *(paramTable)[PARAM_NUM + 2*CUST_CURVE_NUM];
  int i;
  for(i = 0; i < PARAM_NUM + 2*CUST_CURVE_NUM; i++)
    paramTable[i] = (void *) NULL;
  
  //parse script, setting parameters and
  //running commands along the way...
  int      tokenId, error;
  CmCToken *token;
  while(token = script->GetToken()) { 
    //determine type of token (parameter or command)
    tokenId = Command(token->token_);

    //token is a command, so run it
    if(tokenId != UNKNOWN_COMMAND) {
      error = EXECUTE(tokenId, script, paramTable);
      if(error) {
	if(error == EXE_MISSING_PARAM) {
	  CmCToken *ertok = new CmCToken((char *) PARAM_LIST[findMissing(paramTable, Command(token->token_))],
					 token->lineNumber_);
	  return CmCError(ertok, error);
	} else {
	  return CmCError(token, error);
	}
      }	
    }
    //token is a parameter, so set its value
    else {
      tokenId = Parameter(token->token_);
      if(tokenId != UNKNOWN_PARAMETER) {
	error = SET(tokenId, script, paramTable);
	if(error) return CmCError(token, error);
      //token is custum curve list, so read it
      } else {
	tokenId = CustomCurve(token->token_);
	error = READLIST(tokenId, script, paramTable);
	if(error) return CmCError(token, error);
      }
    }
  }
  
  //done running script...

  //de-allocate parameter table
  DEALLOCATE(paramTable);
  
  //reset script parser
  script->StartOver();
  
  //script has been run succesfully!
  return CmCError((CmCToken *) NULL, NO_ERRORS);

}
Ejemplo n.º 16
0
void ui_start(void)
{
   DEBUG_MSG("ui_start");

   if (GBL_UI->initialized)
      EXECUTE(GBL_UI->start);
   else
      DEBUG_MSG("ui_start called initialized");
}
Ejemplo n.º 17
0
int csMakeText( char *text, int index, char *cornertype, double spacing,
   double scale, char *axis, double *pos )
{
   static LWCommandCode ccode;
   ModData *md = getModData();
   DynaValue argv[ 7 ];

   assert( md->edit == NULL );

   argv[ 0 ].type = DY_STRING;
   argv[ 0 ].str.buf = text;
   argv[ 0 ].str.bufLen = 0;

   argv[ 1 ].type = DY_INTEGER;
   argv[ 1 ].intv.value = index;

   if ( cornertype ) {
      argv[ 2 ].type = DY_STRING;
      argv[ 2 ].str.buf = cornertype;
      argv[ 2 ].str.bufLen = 0;
   }
   else argv[ 2 ].type = DY_NULL;

   if ( spacing != 0.0 ) {
      argv[ 3 ].type = DY_FLOAT;
      argv[ 3 ].flt.value = spacing;
   }
   else argv[ 3 ].type = DY_NULL;

   if ( scale != 0.0 ) {
      argv[ 4 ].type = DY_FLOAT;
      argv[ 4 ].flt.value = scale;
   }
   else argv[ 4 ].type = DY_NULL;

   if ( axis ) {
      argv[ 5 ].type = DY_STRING;
      argv[ 5 ].str.buf = axis;
      argv[ 5 ].str.bufLen = 0;
   }
   else argv[ 5 ].type = DY_NULL;

   if ( pos ) {
      argv[ 6 ].type = DY_VFLOAT;
      argv[ 6 ].fvec.val[ 0 ] = pos[ 0 ];
      argv[ 6 ].fvec.val[ 1 ] = pos[ 1 ];
      argv[ 6 ].fvec.val[ 2 ] = pos[ 2 ];
   }
   else argv[ 6 ].type = DY_NULL;

   LOOKUP( "MAKETEXT" );
   EXECUTE( 7, argv );
   return OK;
}
Ejemplo n.º 18
0
int csInvertHide( void )
{
   static LWCommandCode ccode;
   ModData *md = getModData();

   assert( md->edit == NULL );

   LOOKUP( "INVERT_HIDE" );
   EXECUTE( 0, NULL );
   return OK;
}
Ejemplo n.º 19
0
int csSelUnhide( void )
{
   static LWCommandCode ccode;
   ModData *md = getModData();

   assert( md->edit == NULL );

   LOOKUP( "SEL_UNHIDE" );
   EXECUTE( 0, NULL );
   return OK;
}
Ejemplo n.º 20
0
int csSelInvert( void )
{
   static LWCommandCode ccode;
   ModData *md = getModData();

   assert( md->edit == NULL );

   LOOKUP( "SEL_INVERT" );
   EXECUTE( 0, NULL );
   return OK;
}
Ejemplo n.º 21
0
void _stdcall VFP2C_Destroy_Marshal()
{
	if (ghHeap)
		HeapDestroy(ghHeap);

#ifdef _DEBUG
	FreeDebugAlloc();
#endif

	EXECUTE("CLEAR DLLS 'WriteChar','WritePChar','WriteInt8','WritePInt8','WriteUInt8','WritePUInt8','WriteShort',"
	"'WritePShort','WriteUShort','WritePUShort','WriteInt','WritePInt','WriteUInt','WritePUInt','WritePointer','WritePPointer',"
	"'WriteFloat','WritePFloat','WriteDouble','WritePDouble','ReadInt8','ReadPInt8','ReadUInt8','ReadPUInt8','ReadShort',"
	"'ReadPShort','ReadUShort','ReadPUShort','ReadInt','ReadPInt','ReadFloat','ReadPFloat','ReadDouble','ReadPDouble'");
}
Ejemplo n.º 22
0
int csSmoothScale( double offset )
{
   static LWCommandCode ccode;
   ModData *md = getModData();
   DynaValue argv;

   assert( md->edit == NULL );

   argv.type = DY_FLOAT;
   argv.flt.value = offset;

   LOOKUP( "SMOOTHSCALE" );
   EXECUTE( 1, &argv );
   return OK;
}
Ejemplo n.º 23
0
/*
 * the FATAL_ERROR error handling function
 */
void ui_fatal_error(const char *msg)
{
   /* 
    * call the function 
    * make sure that the globals have been alloc'd
    */
   if (GBLS && GBL_UI && GBL_UI->fatal_error && GBL_UI->initialized)
      EXECUTE(GBL_UI->fatal_error, msg);
   /* the interface is not yet initialized */
   else {
      fprintf(stderr, "\n%s\n\n", msg);
      exit(-1);
   }
   
}
Ejemplo n.º 24
0
int csChangeSurface( char *surface )
{
   static LWCommandCode ccode;
   ModData *md = getModData();
   DynaValue argv;

   assert( md->edit == NULL );

   argv.type = DY_STRING;
   argv.str.buf = surface;
   argv.str.bufLen = 0;

   LOOKUP( "CHANGESURFACE" );
   EXECUTE( 1, &argv );
   return OK;
}
Ejemplo n.º 25
0
int csShapeBevel( int npairs, double *insh )
{
   static LWCommandCode ccode;
   ModData *md = getModData();
   DynaValue argv;

   assert( md->edit == NULL );

   argv.type = DY_CUSTOM;
   argv.cust.val[ 0 ] = npairs;
   argv.cust.val[ 1 ] = ( int ) insh;

   LOOKUP( "SHAPEBEVEL" );
   EXECUTE( 1, &argv );
   return OK;
}
Ejemplo n.º 26
0
int csBoolean( char *operation )
{
   static LWCommandCode ccode;
   ModData *md = getModData();
   DynaValue argv;

   assert( md->edit == NULL );

   argv.type = DY_STRING;
   argv.str.buf = operation;
   argv.str.bufLen = 0;

   LOOKUP( "BOOLEAN" );
   EXECUTE( 1, &argv );
   return OK;
}
Ejemplo n.º 27
0
int csSelHide( char *state )
{
   static LWCommandCode ccode;
   ModData *md = getModData();
   DynaValue argv;

   assert( md->edit == NULL );

   argv.type = DY_STRING;
   argv.str.buf = state;
   argv.str.bufLen = 0;

   LOOKUP( "SEL_HIDE" );
   EXECUTE( 1, &argv );
   return OK;
}
Ejemplo n.º 28
0
int csSetDefaultSurface( char *surfname )
{
   static LWCommandCode ccode;
   ModData *md = getModData();
   DynaValue argv;

   assert( md->edit == NULL );

   argv.type = DY_SURFACE;
   argv.str.buf = surfname;
   argv.str.bufLen = 0;

   LOOKUP( "SURFACE" );
   EXECUTE( 1, &argv );
   return OK;
}
Ejemplo n.º 29
0
/*
 * the FATAL_MSG error handling function
 */
void ui_error(const char *fmt, ...)
{
   va_list ap;
   int n;
   size_t size = 50;
   char *msg;

   /* 
    * we hope the message is shorter
    * than 'size', else realloc it
    */
    
   SAFE_CALLOC(msg, size, sizeof(char));

   while (1) {
      /* Try to print in the allocated space. */
      va_start(ap, fmt);
      n = vsnprintf (msg, size, fmt, ap);
      va_end(ap);
      
      /* If that worked, we have finished. */
      if (n > -1 && (size_t)n < size)
         break;
   
      /* Else try again with more space. */
      if (n > -1)    /* glibc 2.1 */
         size = n+1; /* precisely what is needed */
      else           /* glibc 2.0 */
         size *= 2;  /* twice the old size */
      
      SAFE_REALLOC(msg, size);
   }

   /* dump the error in the debug file */
   DEBUG_MSG("%s", msg);
   
   /* call the function */
   if (GBL_UI->error)
      EXECUTE(GBL_UI->error, msg);
   /* the interface is not yet initialized */
   else
      fprintf(stderr, "\n%s\n", msg);
   
   /* free the message */
   SAFE_FREE(msg);
}
Ejemplo n.º 30
0
int csBevel( double inset, double shift )
{
   static LWCommandCode ccode;
   ModData *md = getModData();
   DynaValue argv[ 2 ];

   assert( md->edit == NULL );

   argv[ 0 ].type = DY_DISTANCE;
   argv[ 0 ].flt.value = inset;

   argv[ 1 ].type = DY_DISTANCE;
   argv[ 1 ].flt.value = shift;

   LOOKUP( "BEVEL" );
   EXECUTE( 2, argv );
   return OK;
}