ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/server/include/genkeywords
Revision: 1.4
Committed: Wed Jul 11 16:55:18 2007 UTC (16 years, 10 months ago) by root
Branch: MAIN
Changes since 1.3: +0 -1 lines
Log Message: 
- make regions attachables
- add attachable->set_key
- support custom values for regions
- convert match to a custom value
- precompile regexes after reload_regions

File Contents

# User Rev Content
1 root 1.1 #!/opt/bin/perl
2    
3     my %ARG = @ARGV;
4    
5     use List::Util;
6    
7     # todo: gather dynamically
8     my @kw = qw(
9     no_pass
10     walk_on
11     walk_off
12     fly_on
13     fly_off
14     flying
15    
16 root 1.3 gender
17 root 1.1 attack_skill
18     ranged_skill
19    
20     ac
21     activate_on_push
22     activate_on_release
23     alive
24     anim_speed
25     animation
26     applied
27     arch
28     armour
29     attach
30     attack_movement
31     attacktype
32     auto_apply
33     been_applied
34     berserk
35     blocksview
36     body_range
37     body_arm
38     body_torso
39     body_head
40     body_neck
41     body_skill
42     body_finger
43     body_shoulder
44     body_foot
45     body_hand
46     body_wrist
47     body_waist
48     body_shield
49     body_combat
50     can_apply
51     can_cast_spell
52     can_roll
53     can_see_in_dark
54     can_use_armour
55     can_use_bow
56     can_use_horn
57     can_use_range
58     can_use_ring
59     can_use_rod
60     can_use_scroll
61     can_use_shield
62     can_use_skill
63     can_use_wand
64     can_use_weapon
65     carrying
66     casting_time
67     cha
68     changing
69     client_type
70     con
71     confused
72     connected
73     container
74     cursed
75     custom_name
76     dam
77     dam_modifier
78     damned
79     destroy_on_death
80     dex
81     direction
82     duration
83     duration_modifier
84     editable
85     editor_folder
86     elevation
87     end
88     endlore
89     endmsg
90     exp
91     expmul
92     face
93     food
94     friendly
95     gen_sp_armour
96     generator
97     glow_radius
98     grace
99     has_ready_bow
100     has_ready_scroll
101     has_ready_skill
102     has_ready_weapon
103     has_ready_range
104     hitback
105     hp
106     identified
107     immune
108     inherit
109     int
110     inv_locked
111     invisible
112     is_animated
113     is_blind
114     is_buildable
115     is_cauldron
116     is_dust
117     is_floor
118     is_hilly
119     is_lightable
120     is_thrown
121     is_turnable
122     is_used_up
123     is_water
124     is_wooded
125     item_power
126     known_cursed
127     known_magical
128     last_eat
129     last_grace
130     last_heal
131     last_sp
132     level
133     lifesave
134     lore
135     luck
136     magic
137     make_invisible
138     material
139     materialname
140     maxgrace
141     maxhp
142     maxsp
143     monster
144     more
145     move_allow
146     move_block
147     move_off
148     move_on
149     move_slow
150     move_slow_penalty
151     move_state
152     move_type
153     msg
154     name
155     name_pl
156     neutral
157     no_attack
158     no_damage
159     no_drop
160     no_fix_player
161     no_magic
162     no_pick
163     no_skill_ident
164     no_steal
165     no_strength
166     nrof
167     obj_original
168     object
169     oid
170     one_hit
171     only_attack
172     other_arch
173     overlay_floor
174     path_attuned
175     path_denied
176     path_repelled
177     perm_exp
178     pick_up
179     player_sold
180     pow
181     precious
182     protected
183     race
184     random_move
185     random_movement
186     randomitems
187     range
188     range_modifier
189     reflect_missile
190     reflect_spell
191     reflecting
192     resist_acid
193     resist_blind
194     resist_cancellation
195     resist_chaos
196     resist_cold
197     resist_confusion
198     resist_counterspell
199     resist_death
200     resist_deplete
201     resist_disease
202     resist_drain
203     resist_electricity
204     resist_fear
205     resist_fire
206     resist_ghosthit
207     resist_godpower
208     resist_holyword
209     resist_internal
210     resist_life_stealing
211     resist_magic
212     resist_paralyze
213     resist_physical
214     resist_poison
215     resist_slow
216     resist_turn_undead
217     resist_weaponmagic
218     run_away
219     scared
220     see_anywhere
221     see_invisible
222     skill
223     slaying
224     sleep
225     slow_move
226     smoothlevel
227     sp
228     speed
229     speed_left
230     splitting
231     stand_still
232     startequip
233     state
234     stealth
235     str
236     subtype
237     tear_down
238     title
239     tooltype
240     treasure_env
241     type
242     unaggressive
243     undead
244     unique
245     unpaid
246     use_content_on_gen
247     uuid
248     value
249     vulnerable
250     wc
251     weapontype
252     weight
253     will_apply
254     wis
255     x
256     xrays
257     y
258    
259     maplore
260     endmaplore
261     enter_x
262     enter_y
263     width
264     height
265     reset_timeout
266     reset_time
267     swap_time
268     difficulty
269     darkness
270     fixed_resettime
271     per_player
272     per_party
273 root 1.2 no_reset
274 root 1.1 region
275     shopitems
276     shopgreed
277     shopmin
278     shopmax
279     shoprace
280     outdoor
281     tile_path_1
282     tile_path_2
283     tile_path_3
284     tile_path_4
285    
286     file_format_version
287    
288     temp
289     pressure
290     humid
291     windspeed
292     winddir
293     sky
294    
295     map
296     savebed_map
297     bed_x
298     bed_y
299     password
300     bowtype
301     petmode
302     gen_hp
303     gen_sp
304     gen_grace
305     listening
306     peaceful
307     digestion
308     pickup
309     outputs_sync
310     outputs_count
311     usekeys
312     unapply
313     weapon_sp
314     weapon_sp_left
315     lev_array
316     endplst
317    
318     visibility
319     magicmap
320    
321     parent
322     longname
323     jail_map
324     jail_x
325     jail_y
326     portal_map
327     portal_x
328     portal_y
329     fallback
330     nomore
331    
332     chance
333     mods
334     diff
335     saves
336     description
337     density
338     damage
339    
340     anim
341     mina
342     facings
343     player
344    
345     allowed
346     keycode
347     trans
348     yield
349     ingred
350     cauldron
351    
352     Str
353     Dex
354     Con
355     Wis
356     Cha
357     Int
358     Pow
359    
360     treasure
361     treasureone
362     list
363     change_name
364     change_title
365     change_slaying
366     yes
367     no
368     );
369    
370     open GPERF, "|-", "exec $ARG{GPERF} -m50 >kw_hash.h"
371     or die "$ARGV{GPERF}: $!";
372    
373     print GPERF <<EOF;
374     %language=C++
375     %enum
376     %define class-name kw_lex
377     %define lookup-function-name match
378     %struct-type
379     %compare-strncmp
380     %delimiters=,
381     struct keyword_idx { const char *name; enum keyword index; };
382     %%
383     EOF
384    
385     for (@kw) {
386     printf GPERF "%s,%s\n", $_, "KW_$_";
387     }
388    
389     print GPERF <<EOF;
390     %%
391     extern const char *const keyword_str [] = {
392     "<EOF>",
393     "<ERROR>",
394     EOF
395    
396     for (@kw) {
397     printf GPERF " \"%s\",\n", $_;
398     }
399    
400     print GPERF "};\n";
401    
402     printf GPERF "\nextern const unsigned char keyword_len [] = { 5, 7, %s };\n\n",
403     join ", ", map length, @kw;
404    
405     close GPERF
406     or die "$ARG{GPERF}: failed to run";
407    
408     open KW, ">", "keyword.h";
409    
410     print KW <<EOF;
411     //
412     // AUTOGENERATED: this is a generated file
413     // edit include/genkeywords instead
414     //
415    
416     #ifndef KW_H__
417     #define KW_H__
418    
419     enum keyword {
420     KW_NULL = 0,
421     KW_EOF = 0,
422     KW_ERROR,
423     EOF
424    
425     for (@kw) {
426     printf KW " %s,\n", "KW_$_",
427     }
428    
429     print KW <<EOF;
430     NUM_KEYWORD,
431     };
432    
433     extern const char *const keyword_str [];
434     extern const unsigned char keyword_len [];
435    
436     EOF
437    
438     printf KW "#define MAX_KEYWORD_LEN %d\n", List::Util::max map length, @kw;
439    
440     print KW <<EOF;
441    
442     #endif
443    
444     EOF
445