ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/server/plugins/cfperl/cfperl.xs
(Generate patch)

Comparing deliantra/server/plugins/cfperl/cfperl.xs (file contents):
Revision 1.52 by root, Tue May 9 17:48:28 2006 UTC vs.
Revision 1.53 by root, Sun Jun 11 15:02:16 2006 UTC

… …
427 registerGlobalEvent (NULL, EVENT_MUZZLE, PLUGIN_NAME, globalEventListener); 427 registerGlobalEvent (NULL, EVENT_MUZZLE, PLUGIN_NAME, globalEventListener);
428 registerGlobalEvent (NULL, EVENT_KICK, PLUGIN_NAME, globalEventListener); 428 registerGlobalEvent (NULL, EVENT_KICK, PLUGIN_NAME, globalEventListener);
429 registerGlobalEvent (NULL, EVENT_FREE_OB, PLUGIN_NAME, globalEventListener); 429 registerGlobalEvent (NULL, EVENT_FREE_OB, PLUGIN_NAME, globalEventListener);
430 registerGlobalEvent (NULL, EVENT_PLAYER_LOAD, PLUGIN_NAME, globalEventListener); 430 registerGlobalEvent (NULL, EVENT_PLAYER_LOAD, PLUGIN_NAME, globalEventListener);
431 registerGlobalEvent (NULL, EVENT_PLAYER_SAVE, PLUGIN_NAME, globalEventListener); 431 registerGlobalEvent (NULL, EVENT_PLAYER_SAVE, PLUGIN_NAME, globalEventListener);
432 registerGlobalEvent (NULL, EVENT_EXTCMD, PLUGIN_NAME, globalEventListener);
432 433
433 char *argv[] = { 434 char *argv[] = {
434 "", 435 "",
435 "-e" 436 "-e"
436 "BEGIN {" 437 "BEGIN {"
… …
540 case EVENT_SHOUT: 541 case EVENT_SHOUT:
541 case EVENT_MUZZLE: 542 case EVENT_MUZZLE:
542 case EVENT_KICK: 543 case EVENT_KICK:
543 PUSH_OB; 544 PUSH_OB;
544 PUSH_PV; 545 PUSH_PV;
546 break;
547
548 case EVENT_EXTCMD:
549 PUSH_PL;
550 {
551 char *buf = va_arg (args, char *);
552 int len = va_arg (args, int);
553 PUSHs (sv_2mortal (newSVpvn (buf, len)));
554 }
545 break; 555 break;
546 556
547 case EVENT_CLOCK: 557 case EVENT_CLOCK:
548 clean_obj_cache (); 558 clean_obj_cache ();
549 break; 559 break;
… …
1163 const_event (REMOVE) 1173 const_event (REMOVE)
1164 const_event (SHOUT) 1174 const_event (SHOUT)
1165 const_event (TELL) 1175 const_event (TELL)
1166 const_event (MUZZLE) 1176 const_event (MUZZLE)
1167 const_event (KICK) 1177 const_event (KICK)
1178 const_event (EXTCMD)
1168 //const_event (FREE_OB) 1179 //const_event (FREE_OB)
1169 }; 1180 };
1170 1181
1171 AV *av = get_av ("cf::EVENT", 1); 1182 AV *av = get_av ("cf::EVENT", 1);
1172 1183
… …
1633player *next (player *pl) 1644player *next (player *pl)
1634 CODE: 1645 CODE:
1635 RETVAL = pl->next; 1646 RETVAL = pl->next;
1636 OUTPUT: RETVAL 1647 OUTPUT: RETVAL
1637 1648
1649void
1650send (player *pl, SV *packet)
1651 CODE:
1652{
1653 STRLEN len;
1654 char *buf = SvPVbyte (packet, len);
1655
1656 Write_String_To_Socket (&pl->socket, buf, len);
1657}
1658
1638int 1659int
1639listening (player *pl, int new_value = -1) 1660listening (player *pl, int new_value = -1)
1640 CODE: 1661 CODE:
1641 RETVAL = pl->listening; 1662 RETVAL = pl->listening;
1642 if (new_value >= 0) 1663 if (new_value >= 0)

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines