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.49 by pippijn, Mon May 1 12:56:18 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
… …
1490 1501
1491void cf_object_update (object *op, int flags) 1502void cf_object_update (object *op, int flags)
1492 1503
1493void cf_object_pickup (object *op, object *what) 1504void cf_object_pickup (object *op, object *what)
1494 1505
1495char *cf_object_get_key (object *op, char *keyname)
1496 ALIAS: key = 0
1497
1498void cf_object_set_key (object *op, char *keyname, char *value)
1499
1500object *cf_create_object_by_name (const char *name) 1506object *cf_create_object_by_name (const char *name)
1501 1507
1502void change_exp (object *op, double exp, const char *skill_name = 0, int flag = 0) 1508void change_exp (object *op, double exp, const char *skill_name = 0, int flag = 0)
1503 1509
1504void player_lvl_adj (object *who, object *skill = 0) 1510void player_lvl_adj (object *who, object *skill = 0)
1505 1511
1512int kill_object (object *op, int dam = 0, object *hitter = 0, int type = AT_PHYSICAL)
1506 1513
1507MODULE = cf PACKAGE = cf::object PREFIX = cf_ 1514MODULE = cf PACKAGE = cf::object PREFIX = cf_
1508 1515
1509void cf_fix_object (object *pl) 1516void cf_fix_object (object *pl)
1510 ALIAS: fix = 0 1517 ALIAS: fix = 0
… …
1606 1613
1607void cf_player_set_party (object *op, partylist *party) 1614void cf_player_set_party (object *op, partylist *party)
1608 1615
1609void change_skill (object *op, double exp, char *skill_name = 0, int flag = 0) 1616void change_skill (object *op, double exp, char *skill_name = 0, int flag = 0)
1610 1617
1618void kill_player (object *op)
1619
1611MODULE = cf PACKAGE = cf::object::map PREFIX = cf_ 1620MODULE = cf PACKAGE = cf::object::map PREFIX = cf_
1612 1621
1613MODULE = cf PACKAGE = cf::player PREFIX = cf_player_ 1622MODULE = cf PACKAGE = cf::player PREFIX = cf_player_
1614 1623
1615player *cf_player_find (char *name) 1624player *cf_player_find (char *name)
… …
1634 1643
1635player *next (player *pl) 1644player *next (player *pl)
1636 CODE: 1645 CODE:
1637 RETVAL = pl->next; 1646 RETVAL = pl->next;
1638 OUTPUT: RETVAL 1647 OUTPUT: RETVAL
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
1659int
1660listening (player *pl, int new_value = -1)
1661 CODE:
1662 RETVAL = pl->listening;
1663 if (new_value >= 0)
1664 pl->listening = new_value;
1665 OUTPUT:
1666 RETVAL
1639 1667
1640void get_savebed (player *pl) 1668void get_savebed (player *pl)
1641 ALIAS: 1669 ALIAS:
1642 savebed = 0 1670 savebed = 0
1643 PPCODE: 1671 PPCODE:

Diff Legend

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