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

Comparing deliantra/server/server/plugins.c (file contents):
Revision 1.2 by root, Tue Feb 7 23:29:55 2006 UTC vs.
Revision 1.9 by root, Fri Mar 17 02:35:08 2006 UTC

1/* 1/*
2 * static char *rcsid_plugins_c = 2 * static char *rcsid_plugins_c =
3 * "$Id: plugins.c,v 1.2 2006/02/07 23:29:55 root Exp $"; 3 * "$Id: plugins.c,v 1.9 2006/03/17 02:35:08 root Exp $";
4 */ 4 */
5 5
6/*****************************************************************************/ 6/*****************************************************************************/
7/* CrossFire, A Multiplayer game for X-windows */ 7/* CrossFire, A Multiplayer game for X-windows */
8/* */ 8/* */
127 127
128/*****************************************************************************/ 128/*****************************************************************************/
129/* NEW PLUGIN STUFF STARTS HERE */ 129/* NEW PLUGIN STUFF STARTS HERE */
130/*****************************************************************************/ 130/*****************************************************************************/
131 131
132static void plugin_load_original_map(mapstruct *map)
133{
134 execute_global_event (EVENT_MAPLOAD, map);
135}
136
137static void plugin_load_temporary_map(mapstruct *map)
138{
139 execute_global_event (EVENT_MAPIN, map);
140}
141
142static void plugin_clean_temporary_map(mapstruct *map)
143{
144 execute_global_event (EVENT_MAPCLEAN, map);
145}
146
132static void plugin_object_free(object *ob) 147static void plugin_object_free(object *ob)
133{ 148{
134 execute_global_event (EVENT_FREE_OB, ob); 149 execute_global_event (EVENT_FREE_OB, ob);
135} 150}
136 151
217 crossfire_plugin* plugin; 232 crossfire_plugin* plugin;
218 int rv = 0; 233 int rv = 0;
219 for (tmp = op->inv; tmp != NULL; tmp = next) { 234 for (tmp = op->inv; tmp != NULL; tmp = next) {
220 next = tmp->below; 235 next = tmp->below;
221 if (tmp->type == EVENT_CONNECTOR && tmp->subtype == eventcode) { 236 if (tmp->type == EVENT_CONNECTOR && tmp->subtype == eventcode) {
237#if 0
222 LOG(llevDebug, "********** EVENT HANDLER **********\n"); 238 LOG(llevDebug, "********** EVENT HANDLER **********\n");
223 LOG(llevDebug, " - Who am I :%s\n", op->name); 239 LOG(llevDebug, " - Who am I :%s\n", op->name);
224 if (activator != NULL) 240 if (activator != NULL)
225 LOG(llevDebug, " - Activator :%s\n", activator->name); 241 LOG(llevDebug, " - Activator :%s\n", activator->name);
226 if (third != NULL) 242 if (third != NULL)
230 LOG(llevDebug, " - Event plugin :%s\n", tmp->title); 246 LOG(llevDebug, " - Event plugin :%s\n", tmp->title);
231 if (tmp->slaying != NULL) 247 if (tmp->slaying != NULL)
232 LOG(llevDebug, " - Event hook :%s\n", tmp->slaying); 248 LOG(llevDebug, " - Event hook :%s\n", tmp->slaying);
233 if (tmp->name != NULL) 249 if (tmp->name != NULL)
234 LOG(llevDebug, " - Event options :%s\n", tmp->name); 250 LOG(llevDebug, " - Event options :%s\n", tmp->name);
251#endif
235 252
236 if (tmp->title == NULL) { 253 if (tmp->title == NULL) {
237 object *env = object_get_env_recursive(tmp); 254 object *env = object_get_env_recursive(tmp);
238 LOG(llevError, "Event object without title at %d/%d in map %s\n", env->x, env->y, env->map->name); 255 LOG(llevError, "Event object without title at %d/%d in map %s\n", env->x, env->y, env->map->name);
239 send_removed_object(tmp); 256 send_removed_object(tmp);
247 free_object(tmp); 264 free_object(tmp);
248 } else { 265 } else {
249 plugin = plugins_find_plugin(tmp->title); 266 plugin = plugins_find_plugin(tmp->title);
250 if (plugin == NULL) { 267 if (plugin == NULL) {
251 object *env = object_get_env_recursive(tmp); 268 object *env = object_get_env_recursive(tmp);
252 LOG(llevError, "The requested plugin doesn't exit: %s at %d/%d in map %s\n", tmp->title, env->x, env->y, env->map->name); 269 LOG(llevError, "The requested plugin doesn't exist: %s at %d/%d in map %s\n", tmp->title, env->x, env->y, env->map->name);
253 send_removed_object(tmp); 270 send_removed_object(tmp);
254 remove_ob(tmp); 271 remove_ob(tmp);
255 free_object(tmp); 272 free_object(tmp);
256 } else { 273 } else {
257 int rvt = 0; 274 int rvt = 0;
269int execute_global_event(int eventcode, ...) 286int execute_global_event(int eventcode, ...)
270{ 287{
271 va_list args; 288 va_list args;
272 object* op; 289 object* op;
273 object* op2; 290 object* op2;
291 mapstruct *map;
274 player* pl; 292 player* pl;
275 char* buf; 293 char* buf;
276 int i, rt; 294 int i, rt;
277 crossfire_plugin* cp; 295 crossfire_plugin* cp;
278 if (plugins_list == NULL) 296 if (plugins_list == NULL)
287 case EVENT_TELL: 305 case EVENT_TELL:
288 /* no additional arguments */ 306 /* no additional arguments */
289 for (cp = plugins_list; cp != NULL; cp = cp->next) { 307 for (cp = plugins_list; cp != NULL; cp = cp->next) {
290 if (cp->gevent[eventcode] != NULL) 308 if (cp->gevent[eventcode] != NULL)
291 cp->gevent[eventcode](&rt, eventcode); 309 cp->gevent[eventcode](&rt, eventcode);
310 }
311 break;
312
313 case EVENT_PLAYER_LOAD:
314 case EVENT_PLAYER_SAVE:
315 /* object, filename */
316 op = va_arg(args, object*);
317 buf = va_arg(args, char*);
318 for (cp = plugins_list; cp != NULL; cp = cp->next) {
319 if (cp->gevent[eventcode] != NULL)
320 cp->gevent[eventcode](&rt, eventcode, op, buf);
321 }
322 break;
323
324 case EVENT_MAPLOAD:
325 case EVENT_MAPOUT:
326 case EVENT_MAPIN:
327 case EVENT_MAPCLEAN:
328 /* map argument */
329 map = va_arg(args, mapstruct*);
330 for (cp = plugins_list; cp != NULL; cp = cp->next) {
331 if (cp->gevent[eventcode] != NULL)
332 cp->gevent[eventcode](&rt, eventcode, map);
292 } 333 }
293 break; 334 break;
294 335
295 case EVENT_REMOVE: 336 case EVENT_REMOVE:
296 case EVENT_MAPENTER: 337 case EVENT_MAPENTER:
390 f_plug_postinit closefunc; 431 f_plug_postinit closefunc;
391 int i; 432 int i;
392 crossfire_plugin* cp; 433 crossfire_plugin* cp;
393 crossfire_plugin* ccp; 434 crossfire_plugin* ccp;
394 435
436 load_original_map_callback = plugin_load_original_map;
437 load_temporary_map_callback = plugin_load_temporary_map;
438 clean_temporary_map_callback = plugin_clean_temporary_map;
395 object_free_callback = plugin_object_free; 439 object_free_callback = plugin_object_free;
396 440
397 /* Open the plugin lib and load the required functions */ 441 /* Open the plugin lib and load the required functions */
398 ptr = plugins_dlopen(libfile); 442 ptr = plugins_dlopen(libfile);
399 if (ptr == NULL) { 443 if (ptr == NULL) {
1362 rv = op->map; 1406 rv = op->map;
1363 *type = CFAPI_PMAP; 1407 *type = CFAPI_PMAP;
1364 break; 1408 break;
1365 1409
1366 case CFAPI_OBJECT_PROP_COUNT: 1410 case CFAPI_OBJECT_PROP_COUNT:
1367 rv = &op->count; 1411 ri = op->count; rv = &ri;
1368 *type = CFAPI_INT; 1412 *type = CFAPI_INT;
1369 break; 1413 break;
1370 1414
1371 case CFAPI_OBJECT_PROP_REFCOUNT: 1415 case CFAPI_OBJECT_PROP_REFCOUNT:
1372 rv = &op->refcount; 1416 ri = op->refcount; rv = &ri;
1373 *type = CFAPI_INT; 1417 *type = CFAPI_INT;
1374 break; 1418 break;
1375 1419
1376 case CFAPI_OBJECT_PROP_NAME: 1420 case CFAPI_OBJECT_PROP_NAME:
1377 rv = query_name(op); 1421 rv = query_name(op);
1436 rv = &op->speed_left; 1480 rv = &op->speed_left;
1437 *type = CFAPI_DOUBLE; 1481 *type = CFAPI_DOUBLE;
1438 break; 1482 break;
1439 1483
1440 case CFAPI_OBJECT_PROP_NROF: 1484 case CFAPI_OBJECT_PROP_NROF:
1441 rv = &op->nrof; 1485 ri = op->nrof; rv = &ri;
1442 *type = CFAPI_INT; 1486 *type = CFAPI_INT;
1443 break; 1487 break;
1444 1488
1445 case CFAPI_OBJECT_PROP_DIRECTION: 1489 case CFAPI_OBJECT_PROP_DIRECTION:
1446 rv = &op->direction; 1490 ri = op->direction; rv = &ri;
1447 *type = CFAPI_INT; 1491 *type = CFAPI_INT;
1448 break; 1492 break;
1449 1493
1450 case CFAPI_OBJECT_PROP_FACING: 1494 case CFAPI_OBJECT_PROP_FACING:
1451 rv = &op->facing; 1495 ri = op->facing; rv = &ri;
1452 *type = CFAPI_INT; 1496 *type = CFAPI_INT;
1453 break; 1497 break;
1454 1498
1455 case CFAPI_OBJECT_PROP_TYPE: 1499 case CFAPI_OBJECT_PROP_TYPE:
1456 rv = &op->type; 1500 ri = op->type; rv = &ri;
1457 *type = CFAPI_INT; 1501 *type = CFAPI_INT;
1458 break; 1502 break;
1459 1503
1460 case CFAPI_OBJECT_PROP_SUBTYPE: 1504 case CFAPI_OBJECT_PROP_SUBTYPE:
1461 rv = &op->subtype; 1505 ri = op->subtype; rv = &ri;
1462 *type = CFAPI_INT; 1506 *type = CFAPI_INT;
1463 break; 1507 break;
1464 1508
1465 case CFAPI_OBJECT_PROP_CLIENT_TYPE: 1509 case CFAPI_OBJECT_PROP_CLIENT_TYPE:
1466 rv = &op->client_type; 1510 ri = op->client_type; rv = &ri;
1467 *type = CFAPI_INT; 1511 *type = CFAPI_INT;
1468 break; 1512 break;
1469 1513
1470 case CFAPI_OBJECT_PROP_RESIST: 1514 case CFAPI_OBJECT_PROP_RESIST:
1471 { 1515 {
1472 int idx; 1516 int idx;
1473 idx = va_arg(args, int); 1517 idx = va_arg(args, int);
1474 rv = &op->resist[idx]; 1518 ri = op->resist[idx]; rv = &ri;
1475 } 1519 }
1476 *type = CFAPI_INT; 1520 *type = CFAPI_INT;
1477 break; 1521 break;
1478 1522
1479 case CFAPI_OBJECT_PROP_ATTACK_TYPE: 1523 case CFAPI_OBJECT_PROP_ATTACK_TYPE:
1480 rv = &op->attacktype; 1524 ri = op->attacktype; rv = &ri;
1481 *type = CFAPI_INT; 1525 *type = CFAPI_INT;
1482 break; 1526 break;
1483 1527
1484 case CFAPI_OBJECT_PROP_PATH_ATTUNED: 1528 case CFAPI_OBJECT_PROP_PATH_ATTUNED:
1485 rv = &op->path_attuned; 1529 ri = op->path_attuned; rv = &ri;
1486 *type = CFAPI_INT; 1530 *type = CFAPI_INT;
1487 break; 1531 break;
1488 1532
1489 case CFAPI_OBJECT_PROP_PATH_REPELLED: 1533 case CFAPI_OBJECT_PROP_PATH_REPELLED:
1490 rv = &op->path_repelled; 1534 ri = op->path_repelled; rv = &ri;
1491 *type = CFAPI_INT; 1535 *type = CFAPI_INT;
1492 break; 1536 break;
1493 1537
1494 case CFAPI_OBJECT_PROP_PATH_DENIED: 1538 case CFAPI_OBJECT_PROP_PATH_DENIED:
1495 rv = &op->path_denied; 1539 ri = op->path_denied; rv = &ri;
1496 *type = CFAPI_INT; 1540 *type = CFAPI_INT;
1497 break; 1541 break;
1498 1542
1499 case CFAPI_OBJECT_PROP_MATERIAL: 1543 case CFAPI_OBJECT_PROP_MATERIAL:
1500 rv = &op->material; 1544 ri = op->material; rv = &ri;
1501 *type = CFAPI_INT; 1545 *type = CFAPI_INT;
1502 break; 1546 break;
1503 1547
1504 case CFAPI_OBJECT_PROP_MATERIAL_NAME: 1548 case CFAPI_OBJECT_PROP_MATERIAL_NAME:
1505 rv = (char*)op->materialname; 1549 rv = (char*)op->materialname;
1506 *type = CFAPI_STRING; 1550 *type = CFAPI_STRING;
1507 break; 1551 break;
1508 1552
1509 case CFAPI_OBJECT_PROP_MAGIC: 1553 case CFAPI_OBJECT_PROP_MAGIC:
1510 rv = &op->magic; 1554 ri = op->magic; rv = &ri;
1511 *type = CFAPI_INT; 1555 *type = CFAPI_INT;
1512 break; 1556 break;
1513 1557
1514 case CFAPI_OBJECT_PROP_VALUE: 1558 case CFAPI_OBJECT_PROP_VALUE:
1515 rv = &op->value; 1559 ri = op->value; rv = &ri;
1516 *type = CFAPI_INT; 1560 *type = CFAPI_INT;
1517 break; 1561 break;
1518 1562
1519 case CFAPI_OBJECT_PROP_LEVEL: 1563 case CFAPI_OBJECT_PROP_LEVEL:
1520 rv = &op->level; 1564 ri = op->level; rv = &ri;
1521 *type = CFAPI_INT; 1565 *type = CFAPI_INT;
1522 break; 1566 break;
1523 1567
1524 case CFAPI_OBJECT_PROP_LAST_HEAL: 1568 case CFAPI_OBJECT_PROP_LAST_HEAL:
1525 rv = &op->last_heal; 1569 ri = op->last_heal; rv = &ri;
1526 *type = CFAPI_INT; 1570 *type = CFAPI_INT;
1527 break; 1571 break;
1528 1572
1529 case CFAPI_OBJECT_PROP_LAST_SP: 1573 case CFAPI_OBJECT_PROP_LAST_SP:
1530 rv = &op->last_sp; 1574 ri = op->last_sp; rv = &ri;
1531 *type = CFAPI_INT; 1575 *type = CFAPI_INT;
1532 break; 1576 break;
1533 1577
1534 case CFAPI_OBJECT_PROP_LAST_GRACE: 1578 case CFAPI_OBJECT_PROP_LAST_GRACE:
1535 rv = &op->last_grace; 1579 ri = op->last_grace; rv = &ri;
1536 *type = CFAPI_INT; 1580 *type = CFAPI_INT;
1537 break; 1581 break;
1538 1582
1539 case CFAPI_OBJECT_PROP_LAST_EAT: 1583 case CFAPI_OBJECT_PROP_LAST_EAT:
1540 rv = &op->last_eat; 1584 ri = op->last_eat; rv = &ri;
1541 *type = CFAPI_INT; 1585 *type = CFAPI_INT;
1542 break; 1586 break;
1543 1587
1544 case CFAPI_OBJECT_PROP_INVISIBLE_TIME: 1588 case CFAPI_OBJECT_PROP_INVISIBLE_TIME:
1545 rv = &op->invisible; 1589 ri = op->invisible; rv = &ri;
1546 *type = CFAPI_INT; 1590 *type = CFAPI_INT;
1547 break; 1591 break;
1548 1592
1549 case CFAPI_OBJECT_PROP_PICK_UP: 1593 case CFAPI_OBJECT_PROP_PICK_UP:
1550 rv = &op->pick_up; 1594 ri = op->pick_up; rv = &ri;
1551 *type = CFAPI_INT; 1595 *type = CFAPI_INT;
1552 break; 1596 break;
1553 1597
1554 case CFAPI_OBJECT_PROP_ITEM_POWER: 1598 case CFAPI_OBJECT_PROP_ITEM_POWER:
1555 rv = &op->item_power; 1599 ri = op->item_power; rv = &ri;
1556 *type = CFAPI_INT; 1600 *type = CFAPI_INT;
1557 break; 1601 break;
1558 1602
1559 case CFAPI_OBJECT_PROP_GEN_SP_ARMOUR: 1603 case CFAPI_OBJECT_PROP_GEN_SP_ARMOUR:
1560 rv = &op->gen_sp_armour; 1604 ri = op->gen_sp_armour; rv = &ri;
1561 *type = CFAPI_INT; 1605 *type = CFAPI_INT;
1562 break; 1606 break;
1563 1607
1564 case CFAPI_OBJECT_PROP_WEIGHT: 1608 case CFAPI_OBJECT_PROP_WEIGHT:
1565 rv = &op->weight; 1609 ri = op->weight; rv = &ri;
1566 *type = CFAPI_INT; 1610 *type = CFAPI_INT;
1567 break; 1611 break;
1568 1612
1569 case CFAPI_OBJECT_PROP_WEIGHT_LIMIT: 1613 case CFAPI_OBJECT_PROP_WEIGHT_LIMIT:
1570 rv = &op->weight_limit; 1614 ri = op->weight_limit; rv = &ri;
1571 *type = CFAPI_INT; 1615 *type = CFAPI_INT;
1572 break; 1616 break;
1573 1617
1574 case CFAPI_OBJECT_PROP_CARRYING: 1618 case CFAPI_OBJECT_PROP_CARRYING:
1575 rv = &op->carrying; 1619 ri = op->carrying; rv = &ri;
1576 *type = CFAPI_INT; 1620 *type = CFAPI_INT;
1577 break; 1621 break;
1578 1622
1579 case CFAPI_OBJECT_PROP_GLOW_RADIUS: 1623 case CFAPI_OBJECT_PROP_GLOW_RADIUS:
1580 rv = &op->glow_radius; 1624 ri = op->glow_radius; rv = &ri;
1581 *type = CFAPI_INT; 1625 *type = CFAPI_INT;
1582 break; 1626 break;
1583 1627
1584 case CFAPI_OBJECT_PROP_PERM_EXP: 1628 case CFAPI_OBJECT_PROP_PERM_EXP:
1585 rv = &op->perm_exp; 1629 rv = &op->perm_exp;
1600 rv = op->attacked_by; 1644 rv = op->attacked_by;
1601 *type = CFAPI_POBJECT; 1645 *type = CFAPI_POBJECT;
1602 break; 1646 break;
1603 1647
1604 case CFAPI_OBJECT_PROP_RUN_AWAY: 1648 case CFAPI_OBJECT_PROP_RUN_AWAY:
1605 rv = &op->run_away; 1649 ri = op->run_away; rv = &ri;
1606 *type = CFAPI_INT; 1650 *type = CFAPI_INT;
1607 break; 1651 break;
1608 1652
1609 case CFAPI_OBJECT_PROP_CHOSEN_SKILL: 1653 case CFAPI_OBJECT_PROP_CHOSEN_SKILL:
1610 rv = op->chosen_skill; 1654 rv = op->chosen_skill;
1611 *type = CFAPI_POBJECT; 1655 *type = CFAPI_POBJECT;
1612 break; 1656 break;
1613 1657
1614 case CFAPI_OBJECT_PROP_HIDDEN: 1658 case CFAPI_OBJECT_PROP_HIDDEN:
1615 rv = &op->hide; 1659 ri = op->hide; rv = &ri;
1616 *type = CFAPI_INT; 1660 *type = CFAPI_INT;
1617 break; 1661 break;
1618 1662
1619 case CFAPI_OBJECT_PROP_MOVE_STATUS: 1663 case CFAPI_OBJECT_PROP_MOVE_STATUS:
1620 rv = &op->move_status; 1664 ri = op->move_status; rv = &ri;
1621 *type = CFAPI_INT; 1665 *type = CFAPI_INT;
1622 break; 1666 break;
1623 1667
1624 case CFAPI_OBJECT_PROP_MOVE_TYPE: 1668 case CFAPI_OBJECT_PROP_MOVE_TYPE:
1625 rv = &op->attack_movement; 1669 ri = op->attack_movement; rv = &ri;
1626 *type = CFAPI_INT; 1670 *type = CFAPI_INT;
1627 break; 1671 break;
1628 1672
1629 case CFAPI_OBJECT_PROP_SPELL_ITEM: 1673 case CFAPI_OBJECT_PROP_SPELL_ITEM:
1630 rv = op->spellitem; 1674 rv = op->spellitem;
1650 rv = (char*)op->custom_name; 1694 rv = (char*)op->custom_name;
1651 *type = CFAPI_STRING; 1695 *type = CFAPI_STRING;
1652 break; 1696 break;
1653 1697
1654 case CFAPI_OBJECT_PROP_ANIM_SPEED: 1698 case CFAPI_OBJECT_PROP_ANIM_SPEED:
1655 rv = &op->anim_speed; 1699 ri = op->anim_speed; rv = &ri;
1656 *type = CFAPI_INT; 1700 *type = CFAPI_INT;
1657 break; 1701 break;
1658 1702
1659 case CFAPI_OBJECT_PROP_FRIENDLY: 1703 case CFAPI_OBJECT_PROP_FRIENDLY:
1660 ri = is_friendly(op); 1704 ri = is_friendly(op);
1681 rv = &ri; 1725 rv = &ri;
1682 *type = CFAPI_INT; 1726 *type = CFAPI_INT;
1683 break; 1727 break;
1684 1728
1685 case CFAPI_OBJECT_PROP_LUCK: 1729 case CFAPI_OBJECT_PROP_LUCK:
1686 rv = &op->stats.luck; 1730 ri = op->stats.luck; rv = &ri;
1687 *type = CFAPI_INT; 1731 *type = CFAPI_INT;
1688 break; 1732 break;
1689 1733
1690 case CFAPI_OBJECT_PROP_EXP: 1734 case CFAPI_OBJECT_PROP_EXP:
1691 rv = &op->stats.exp; 1735 rv = &op->stats.exp;
1728 *type = CFAPI_POBJECT; 1772 *type = CFAPI_POBJECT;
1729 break; 1773 break;
1730 1774
1731 case CFAPI_OBJECT_PROP_CHEATER: 1775 case CFAPI_OBJECT_PROP_CHEATER:
1732 ri = (QUERY_FLAG(op, FLAG_WAS_WIZ)); 1776 ri = (QUERY_FLAG(op, FLAG_WAS_WIZ));
1777 rv = &ri;
1733 *type = CFAPI_INT; 1778 *type = CFAPI_INT;
1734 break; 1779 break;
1735 1780
1736 case CFAPI_OBJECT_PROP_MERGEABLE: 1781 case CFAPI_OBJECT_PROP_MERGEABLE:
1737 { 1782 {

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines