1 | /* |
1 | /* |
2 | * This file is part of Deliantra, the Roguelike Realtime MMORPG. |
2 | * This file is part of Deliantra, the Roguelike Realtime MMORPG. |
3 | * |
3 | * |
4 | * Copyright (©) 2005,2006,2007,2008,2009 Marc Alexander Lehmann / Robin Redeker / the Deliantra team |
4 | * Copyright (©) 2005,2006,2007,2008,2009,2010 Marc Alexander Lehmann / Robin Redeker / the Deliantra team |
5 | * Copyright (©) 2001,2007 Mark Wedel & Crossfire Development Team |
5 | * Copyright (©) 2001,2007 Mark Wedel & Crossfire Development Team |
6 | * Copyright (©) 1992,2007 Frank Tore Johansen |
6 | * Copyright (©) 1992,2007 Frank Tore Johansen |
7 | * |
7 | * |
8 | * Deliantra is free software: you can redistribute it and/or modify it under |
8 | * Deliantra is free software: you can redistribute it and/or modify it under |
9 | * the terms of the Affero GNU General Public License as published by the |
9 | * the terms of the Affero GNU General Public License as published by the |
… | |
… | |
93 | |
93 | |
94 | struct UUID |
94 | struct UUID |
95 | { |
95 | { |
96 | uint64 seq; |
96 | uint64 seq; |
97 | |
97 | |
|
|
98 | enum { MAX_LEN = 3 + 16 + 1 + 1 }; // <1. + hex + > + \0 |
|
|
99 | |
98 | static UUID cur; // last uuid generated |
100 | static UUID cur; // last uuid generated |
99 | static void init (); |
101 | static void init (); |
100 | static UUID gen (); |
102 | static UUID gen (); |
101 | |
103 | |
102 | UUID () { } |
104 | UUID () { } |
103 | UUID (uint64 seq) : seq(seq) { } |
105 | UUID (uint64 seq) : seq(seq) { } |
104 | operator uint64() { return seq; } |
106 | operator uint64() { return seq; } |
105 | void operator =(uint64 seq) { this->seq = seq; } |
107 | void operator =(uint64 seq) { this->seq = seq; } |
106 | |
108 | |
107 | typedef char BUF [32]; |
|
|
108 | |
|
|
109 | bool parse (const char *s) |
109 | bool parse (const char *s); |
110 | { |
110 | char *append (char *buf) const; |
111 | return sscanf (s, "<1.%" SCNx64 ">", &seq) == 1; |
|
|
112 | } |
|
|
113 | |
|
|
114 | const char *c_str (char *buf, int len) const |
|
|
115 | { |
|
|
116 | snprintf (buf, len, "<1.%" PRIx64 ">", seq); |
|
|
117 | |
|
|
118 | return buf; |
|
|
119 | } |
|
|
120 | |
|
|
121 | const char *c_str () const |
111 | char *c_str () const; |
122 | { |
|
|
123 | static BUF buf; |
|
|
124 | |
|
|
125 | return c_str (buf, sizeof (buf)); |
|
|
126 | } |
|
|
127 | }; |
112 | }; |
128 | |
113 | |
129 | //+GPL |
114 | //+GPL |
130 | |
115 | |
131 | /* Definition for WILL_APPLY values. Replaces having harcoded values |
116 | /* Definition for WILL_APPLY values. Replaces having harcoded values |
… | |
… | |
139 | #define WILL_APPLY_DOOR 0x08 |
124 | #define WILL_APPLY_DOOR 0x08 |
140 | #define WILL_APPLY_FOOD 0x10 |
125 | #define WILL_APPLY_FOOD 0x10 |
141 | |
126 | |
142 | struct body_slot |
127 | struct body_slot |
143 | { |
128 | { |
|
|
129 | signed char used:4; /* Calculated value based on items equipped */ |
144 | signed char info:4; /* body info as loaded from the file */ |
130 | signed char info:4; /* body info as loaded from the file */ |
145 | signed char used:4; /* Calculated value based on items equipped */ |
|
|
146 | }; |
131 | }; |
147 | |
132 | |
148 | typedef struct oblnk |
133 | typedef struct oblnk |
149 | { /* Used to link together several objects */ |
134 | { /* Used to link together several objects */ |
150 | object_ptr ob; |
135 | object_ptr ob; |
… | |
… | |
180 | flags_t flag; /* various flags */ |
165 | flags_t flag; /* various flags */ |
181 | #if FOR_PERL |
166 | #if FOR_PERL |
182 | bool ACC (RW, flag[NUM_FLAGS]); |
167 | bool ACC (RW, flag[NUM_FLAGS]); |
183 | #endif |
168 | #endif |
184 | |
169 | |
185 | shstr ACC (RW, materialname); /* specific material name */ |
170 | materialtype_t *material; // What material this object consists of //TODO, make perl-accessible |
186 | shstr ACC (RW, skill); /* Name of the skill this object uses/grants */ |
171 | shstr ACC (RW, skill); /* Name of the skill this object uses/grants */ |
187 | // materialtype_t *ACC (RW, material); /* What material this object consists of */ |
|
|
188 | object_ptr ACC (RW, owner); /* Pointer to the object which controls this one */ |
172 | object_ptr ACC (RW, owner); /* Pointer to the object which controls this one */ |
189 | object_ptr ACC (RW, enemy); /* Monster/player to follow even if not closest */ |
173 | object_ptr ACC (RW, enemy); /* Monster/player to follow even if not closest */ |
190 | object_ptr ACC (RW, attacked_by); /* This object start to attack us! only player & monster */ |
174 | object_ptr ACC (RW, attacked_by); /* This object start to attack us! only player & monster */ |
191 | object_ptr ACC (RW, chosen_skill); /* the skill chosen to use */ |
175 | object_ptr ACC (RW, chosen_skill); /* the skill chosen to use */ |
192 | object_ptr ACC (RW, spellitem); /* Spell ability monster is choosing to use */ |
176 | object_ptr ACC (RW, spellitem); /* Spell ability monster is choosing to use */ |
… | |
… | |
227 | uint8 ACC (RW, pick_up); /* See crossfire.doc */ |
211 | uint8 ACC (RW, pick_up); /* See crossfire.doc */ |
228 | sint8 ACC (RW, gen_sp_armour);/* sp regen penalty this object has (was last_heal) */ |
212 | sint8 ACC (RW, gen_sp_armour);/* sp regen penalty this object has (was last_heal) */ |
229 | sint8 ACC (RW, glow_radius); /* indicates the glow radius of the object */ |
213 | sint8 ACC (RW, glow_radius); /* indicates the glow radius of the object */ |
230 | uint8 ACC (RW, weapontype); /* type of weapon */ |
214 | uint8 ACC (RW, weapontype); /* type of weapon */ |
231 | |
215 | |
|
|
216 | body_slot slot [NUM_BODY_LOCATIONS]; |
|
|
217 | |
232 | faceidx ACC (RW, face); /* the graphical face */ |
218 | faceidx ACC (RW, face); /* the graphical face */ |
233 | |
219 | |
234 | faceidx ACC (RW, sound); /* the sound face */ |
220 | faceidx ACC (RW, sound); /* the sound face */ |
235 | faceidx ACC (RW, sound_destroy); /* played on destroy */ |
221 | faceidx ACC (RW, sound_destroy); /* played on destroy */ |
236 | |
|
|
237 | body_slot slot [NUM_BODY_LOCATIONS]; |
|
|
238 | |
222 | |
239 | sint32 ACC (RW, weight); /* Attributes of the object */ |
223 | sint32 ACC (RW, weight); /* Attributes of the object */ |
240 | sint32 ACC (RW, weight_limit);/* Weight-limit of object */ |
224 | sint32 ACC (RW, weight_limit);/* Weight-limit of object */ |
241 | |
225 | |
242 | sint32 ACC (RW, carrying); /* How much weight this object contains, must be 0 if nrof == 0 */ |
226 | sint32 ACC (RW, carrying); /* How much weight this object contains, must be 0 if nrof == 0 */ |
… | |
… | |
301 | shstr ACC (RW, lore); /* Obscure information about this object, */ |
285 | shstr ACC (RW, lore); /* Obscure information about this object, */ |
302 | /* To get put into books and the like. */ |
286 | /* To get put into books and the like. */ |
303 | shstr ACC (RW, custom_name); /* Custom name assigned by player */ |
287 | shstr ACC (RW, custom_name); /* Custom name assigned by player */ |
304 | }; |
288 | }; |
305 | |
289 | |
306 | const char *query_weight (const object *op); |
290 | const_utf8_string query_weight (const object *op); |
307 | const char *query_short_name (const object *op); |
291 | const_utf8_string query_short_name (const object *op); |
308 | const char *query_name (const object *op); |
292 | const_utf8_string query_name (const object *op); |
309 | const char *query_base_name (const object *op, int plural); |
293 | const_utf8_string query_base_name (const object *op, int plural); |
310 | |
294 | |
311 | struct object : zero_initialised, object_copy |
295 | struct object : zero_initialised, object_copy |
312 | { |
296 | { |
313 | // These variables are not changed by ->copy_to |
297 | // These variables are not changed by ->copy_to |
314 | maptile *ACC (RW, map); /* Pointer to the map in which this object is present */ |
298 | maptile *ACC (RW, map); /* Pointer to the map in which this object is present */ |
… | |
… | |
395 | |
379 | |
396 | // recursively destroy all objects in inventory, optionally dropping them to the ground instead |
380 | // recursively destroy all objects in inventory, optionally dropping them to the ground instead |
397 | MTH void destroy_inv (bool drop_to_ground = false); |
381 | MTH void destroy_inv (bool drop_to_ground = false); |
398 | MTH object *insert (object *item); // insert into inventory |
382 | MTH object *insert (object *item); // insert into inventory |
399 | MTH void play_sound (faceidx sound) const; |
383 | MTH void play_sound (faceidx sound) const; |
400 | MTH void say_msg (const char *msg) const; |
384 | MTH void say_msg (const_utf8_string msg) const; |
401 | |
385 | |
402 | void do_remove (); |
386 | void do_remove (); |
403 | MTH void remove () |
387 | MTH void remove () |
404 | { |
388 | { |
405 | if (!flag [FLAG_REMOVED]) |
389 | if (!flag [FLAG_REMOVED]) |
… | |
… | |
484 | MTH void drain_stat (); |
468 | MTH void drain_stat (); |
485 | MTH void drain_specific_stat (int deplete_stats); |
469 | MTH void drain_specific_stat (int deplete_stats); |
486 | MTH void change_luck (int value); |
470 | MTH void change_luck (int value); |
487 | |
471 | |
488 | // info must hold 256 * 3 bytes currently |
472 | // info must hold 256 * 3 bytes currently |
489 | const char *debug_desc (char *info) const; |
473 | const_utf8_string debug_desc (char *info) const; |
490 | MTH const char *debug_desc () const; // uses at least 3 round-robin buffers |
474 | MTH const_utf8_string debug_desc () const; // uses at least 3 round-robin buffers |
491 | const char *flag_desc (char *desc, int len) const; |
475 | const_utf8_string flag_desc (char *desc, int len) const; |
492 | |
476 | |
493 | MTH bool decrease (sint32 nr = 1); // returns true if anything is left |
477 | MTH bool decrease (sint32 nr = 1); // returns true if anything is left |
494 | MTH object *split (sint32 nr = 1); // return 0 on failure |
478 | MTH object *split (sint32 nr = 1); // return 0 on failure |
495 | |
479 | |
496 | MTH int number_of () const |
480 | MTH int number_of () const |
… | |
… | |
504 | } |
488 | } |
505 | |
489 | |
506 | MTH void update_weight (); |
490 | MTH void update_weight (); |
507 | |
491 | |
508 | // return the dominant material of this item, always return something |
492 | // return the dominant material of this item, always return something |
509 | const materialtype_t *dominant_material () const; |
493 | const materialtype_t *dominant_material () const |
|
|
494 | { |
|
|
495 | return material; |
|
|
496 | } |
510 | |
497 | |
511 | // return the volume of this object in cm³ |
498 | // return the volume of this object in cm³ |
512 | MTH uint64 volume () const |
499 | MTH uint64 volume () const |
513 | { |
500 | { |
514 | return (uint64)total_weight () |
501 | return (uint64)total_weight () |
515 | * 1000 |
502 | * 1024 // 1000 actually |
516 | * (type == CONTAINER ? 1000 : 1) |
503 | * (type == CONTAINER ? 128 : 1) |
517 | / dominant_material ()->density; |
504 | / dominant_material ()->density; // ugh, division |
518 | } |
505 | } |
519 | |
506 | |
520 | MTH bool is_arch () const { return this == (const object *)(const archetype *)arch; } |
507 | MTH bool is_arch () const { return this == (const object *)(const archetype *)arch; } |
521 | |
508 | |
522 | MTH bool is_wiz () const { return flag [FLAG_WIZ]; } |
509 | MTH bool is_wiz () const { return flag [FLAG_WIZ]; } |
… | |
… | |
531 | MTH bool is_arrow () const { return type == ARROW |
518 | MTH bool is_arrow () const { return type == ARROW |
532 | || (type == SPELL_EFFECT |
519 | || (type == SPELL_EFFECT |
533 | && (subtype == SP_BULLET || subtype == SP_MAGIC_MISSILE)); } |
520 | && (subtype == SP_BULLET || subtype == SP_MAGIC_MISSILE)); } |
534 | MTH bool is_range () const { return type == BOW || type == ROD || type == WAND || type == HORN; } |
521 | MTH bool is_range () const { return type == BOW || type == ROD || type == WAND || type == HORN; } |
535 | |
522 | |
|
|
523 | MTH bool is_dragon () const; |
|
|
524 | |
536 | MTH bool has_active_speed () const { return fabs (speed) >= MIN_ACTIVE_SPEED; } |
525 | MTH bool has_active_speed () const { return speed >= MIN_ACTIVE_SPEED; } |
537 | |
526 | |
538 | // temporary: wether the object can be saved in a map file |
527 | // temporary: wether the object can be saved in a map file |
539 | // contr => is a player |
528 | // contr => is a player |
540 | // head => only save head of a multitile object |
529 | // head => only save head of a multitile object |
541 | // owner => can not reference owner yet |
530 | // owner => can not reference owner yet |
… | |
… | |
629 | MTH std::string long_desc (object *who = 0); // query_name . " " . describe |
618 | MTH std::string long_desc (object *who = 0); // query_name . " " . describe |
630 | MTH std::string describe_monster (object *who = 0); |
619 | MTH std::string describe_monster (object *who = 0); |
631 | MTH std::string describe_item (object *who = 0); |
620 | MTH std::string describe_item (object *who = 0); |
632 | MTH std::string describe (object *who = 0); // long description, without name |
621 | MTH std::string describe (object *who = 0); // long description, without name |
633 | |
622 | |
634 | MTH const char *query_weight () { return ::query_weight (this); } |
623 | MTH const_utf8_string query_weight () { return ::query_weight (this); } |
635 | MTH const char *query_name () { return ::query_name (this); } |
624 | MTH const_utf8_string query_name () { return ::query_name (this); } |
636 | MTH const char *query_short_name () { return ::query_short_name (this); } |
625 | MTH const_utf8_string query_short_name () { return ::query_short_name (this); } |
637 | MTH const char *query_base_name (bool plural) { return ::query_base_name (this, plural); } |
626 | MTH const_utf8_string query_base_name (bool plural) { return ::query_base_name (this, plural); } |
638 | |
627 | |
639 | // If this object has no extra parts but should have them, |
628 | // If this object has no extra parts but should have them, |
640 | // add them, effectively expanding heads into multipart |
629 | // add them, effectively expanding heads into multipart |
641 | // objects. This method only works on objects not inserted |
630 | // objects. This method only works on objects not inserted |
642 | // anywhere. |
631 | // anywhere. |
… | |
… | |
659 | // set the given flag on all objects in the inventory recursively |
648 | // set the given flag on all objects in the inventory recursively |
660 | MTH void set_flag_inv (int flag, int value = 1); |
649 | MTH void set_flag_inv (int flag, int value = 1); |
661 | |
650 | |
662 | void enter_exit (object *exit);//Perl |
651 | void enter_exit (object *exit);//Perl |
663 | MTH void enter_map (maptile *newmap, int x, int y); |
652 | MTH void enter_map (maptile *newmap, int x, int y); |
664 | void player_goto (const char *path, int x, int y); // only for players |
653 | void player_goto (const_utf8_string path, int x, int y); // only for players |
665 | |
654 | |
666 | // returns the mapspace this object is in |
655 | // returns the mapspace this object is in |
667 | mapspace &ms () const; |
656 | mapspace &ms () const; |
668 | |
657 | |
669 | // fully recursive iterator |
658 | // fully recursive iterator |
… | |
… | |
720 | return weight + carrying; |
709 | return weight + carrying; |
721 | } |
710 | } |
722 | |
711 | |
723 | MTH struct region *region () const; |
712 | MTH struct region *region () const; |
724 | |
713 | |
725 | void statusmsg (const char *msg, int color = NDI_BLACK); |
714 | void statusmsg (const_utf8_string msg, int color = NDI_BLACK); |
726 | void failmsg (const char *msg, int color = NDI_RED); |
715 | void failmsg (const_utf8_string msg, int color = NDI_RED); |
727 | |
716 | |
728 | const char *query_inventory (object *who = 0, const char *indent = ""); |
717 | const_utf8_string query_inventory (object *who = 0, const_utf8_string indent = ""); |
729 | |
718 | |
730 | MTH const_octet_string ref () const; // creates and returns a consistent persistent object reference |
719 | MTH const_octet_string ref () const; // creates and returns a consistent persistent object reference |
731 | static object *deref (const_octet_string ref); // returns the object from the generated refreence, if possible |
720 | static object *deref (const_octet_string ref); // returns the object from the generated refreence, if possible |
732 | |
721 | |
733 | // make some noise with given item into direction dir, |
722 | // make some noise with given item into direction dir, |
… | |
… | |
746 | * range from 0 through 7. |
735 | * range from 0 through 7. |
747 | */ |
736 | */ |
748 | MTH int anim_frames () const { return anim ().num_animations; } |
737 | MTH int anim_frames () const { return anim ().num_animations; } |
749 | MTH int anim_facings () const { return anim ().facings; } |
738 | MTH int anim_facings () const { return anim ().facings; } |
750 | |
739 | |
751 | MTH char *as_string (); |
740 | MTH utf8_string as_string (); |
752 | |
741 | |
753 | protected: |
742 | protected: |
754 | void link (); |
743 | void link (); |
755 | void unlink (); |
744 | void unlink (); |
756 | |
745 | |
… | |
… | |
781 | return ob; |
770 | return ob; |
782 | } |
771 | } |
783 | |
772 | |
784 | //+GPL |
773 | //+GPL |
785 | |
774 | |
786 | object *find_skill_by_name_fuzzy (object *who, const char *name); |
775 | object *find_skill_by_name_fuzzy (object *who, const_utf8_string name); |
787 | object *find_skill_by_name (object *who, shstr_cmp sh); |
776 | object *find_skill_by_name (object *who, shstr_cmp sh); |
788 | object *find_skill_by_number (object *who, int skillno); |
777 | object *find_skill_by_number (object *who, int skillno); |
789 | |
778 | |
790 | /* |
779 | /* |
791 | * The archetype structure is a set of rules on how to generate and manipulate |
780 | * The archetype structure is a set of rules on how to generate and manipulate |
… | |
… | |
802 | struct archetype : object |
791 | struct archetype : object |
803 | { |
792 | { |
804 | static arch_ptr empty; // the empty_archetype |
793 | static arch_ptr empty; // the empty_archetype |
805 | MTH static void gc (); |
794 | MTH static void gc (); |
806 | |
795 | |
807 | archetype (const char *name); |
796 | archetype (const_utf8_string name); |
808 | ~archetype (); |
797 | ~archetype (); |
809 | void gather_callbacks (AV *&callbacks, event_type event) const; |
798 | void gather_callbacks (AV *&callbacks, event_type event) const; |
810 | |
799 | |
811 | MTH static archetype *find (const_utf8_string name); |
800 | MTH static archetype *find (const_utf8_string name); |
812 | |
801 | |
813 | MTH void link (); |
802 | MTH void link (); |
814 | MTH void unlink (); |
803 | MTH void unlink (); |
815 | |
804 | |
816 | MTH static object *get (const char *name); // (find() || singularity)->instance() |
805 | MTH static object *get (const_utf8_string name); // (find() || singularity)->instance() |
817 | MTH object *instance (); |
806 | MTH object *instance (); |
|
|
807 | |
|
|
808 | MTH void post_load_check (); // do some adjustments after parsing |
818 | |
809 | |
819 | object_vector_index ACC (RW, archid); // index in archvector |
810 | object_vector_index ACC (RW, archid); // index in archvector |
820 | shstr ACC (RW, archname); /* More definite name, like "generate_kobold" */ |
811 | shstr ACC (RW, archname); /* More definite name, like "generate_kobold" */ |
821 | |
812 | |
822 | sint8 ACC (RW, min_x), ACC (RW, min_y); /* extents, compared to the head (min_x, min_y should be zero, but aren't...) */ |
813 | sint8 ACC (RW, max_x); /* extents, compared to the head (min_x, min_y should be zero, but aren't...) */ |
823 | sint8 ACC (RW, max_x), ACC (RW, max_y); |
|
|
824 | |
814 | |
825 | // support for archetype loading |
815 | // support for archetype loading |
826 | static archetype *read (object_thawer &f); |
816 | static archetype *read (object_thawer &f); |
827 | MTH static void commit_load (); // commit any objects loaded, resolves cyclic dependencies and more |
817 | MTH static void commit_load (); // commit any objects loaded, resolves cyclic dependencies and more |
828 | static void postpone_arch_ref (arch_ptr &ref, const_utf8_string other_arch); /* postpone other_arch reference */ |
818 | static void postpone_arch_ref (arch_ptr &ref, const_utf8_string other_arch); /* postpone other_arch reference */ |
829 | }; |
819 | }; |
830 | |
820 | |
831 | // compatbiility, remove once replaced by ->instance |
821 | // returns whether the object is a dragon player, which are often specialcased |
832 | inline object * |
822 | inline bool |
833 | arch_to_object (archetype *at) |
823 | object::is_dragon () const |
834 | { |
824 | { |
835 | return at->instance (); |
825 | return arch->race == shstr_dragon && is_player (); |
836 | } |
826 | } |
837 | |
827 | |
838 | inline void |
828 | inline void |
839 | object_freezer::put (keyword k, archetype *v) |
829 | object_freezer::put (const keyword_string k, archetype *v) |
840 | { |
830 | { |
841 | put (k, v ? &v->archname : (const char *)0); |
831 | if (expect_true (v)) |
|
|
832 | put (k, v->archname); |
|
|
833 | else |
|
|
834 | put (k); |
842 | } |
835 | } |
843 | |
836 | |
844 | typedef object_vector<object, &object::index > objectvec; |
837 | typedef object_vector<object, &object::index > objectvec; |
845 | typedef object_vector<object, &object::active> activevec; |
838 | typedef object_vector<object, &object::active> activevec; |
846 | typedef object_vector<archetype, &archetype::archid> archvec; |
839 | typedef object_vector<archetype, &archetype::archid> archvec; |