ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/server/include/preprocess
(Generate patch)

Comparing deliantra/server/include/preprocess (file contents):
Revision 1.4 by root, Sun Sep 3 22:45:56 2006 UTC vs.
Revision 1.27 by root, Mon May 7 04:21:11 2007 UTC

1#!/opt/bin/perl 1#!/opt/bin/perl
2
3my %ARG = @ARGV;
2 4
3use List::Util; 5use List::Util;
4 6
5# todo: gather dynamically 7# todo: gather dynamically
6my @kw = qw( 8my @kw = qw(
… …
8 walk_on 10 walk_on
9 walk_off 11 walk_off
10 fly_on 12 fly_on
11 fly_off 13 fly_off
12 flying 14 flying
15
16 attack_skill
17 ranged_skill
13 18
14 ac 19 ac
15 activate_on_push 20 activate_on_push
16 activate_on_release 21 activate_on_release
17 alive 22 alive
… …
37 body_shoulder 42 body_shoulder
38 body_foot 43 body_foot
39 body_hand 44 body_hand
40 body_wrist 45 body_wrist
41 body_waist 46 body_waist
47 body_shield
48 body_combat
42 can_apply 49 can_apply
43 can_cast_spell 50 can_cast_spell
44 can_roll 51 can_roll
45 can_see_in_dark 52 can_see_in_dark
46 can_use_armour 53 can_use_armour
… …
66 cursed 73 cursed
67 custom_name 74 custom_name
68 dam 75 dam
69 dam_modifier 76 dam_modifier
70 damned 77 damned
78 destroy_on_death
71 dex 79 dex
72 direction 80 direction
73 duration 81 duration
74 duration_modifier 82 duration_modifier
75 editable 83 editable
… …
86 gen_sp_armour 94 gen_sp_armour
87 generator 95 generator
88 glow_radius 96 glow_radius
89 grace 97 grace
90 has_ready_bow 98 has_ready_bow
91 has_ready_horn
92 has_ready_rod
93 has_ready_scroll 99 has_ready_scroll
94 has_ready_skill 100 has_ready_skill
95 has_ready_wand
96 has_ready_weapon 101 has_ready_weapon
102 has_ready_range
97 hitback 103 hitback
98 hp 104 hp
99 identified 105 identified
100 immune 106 immune
107 inherit
101 int 108 int
102 inv_locked 109 inv_locked
103 invisible 110 invisible
104 is_animated 111 is_animated
105 is_blind 112 is_blind
106 is_buildable 113 is_buildable
107 is_cauldron 114 is_cauldron
115 is_dust
108 is_floor 116 is_floor
109 is_hilly 117 is_hilly
110 is_lightable 118 is_lightable
111 is_thrown 119 is_thrown
112 is_turnable 120 is_turnable
… …
153 no_pick 161 no_pick
154 no_skill_ident 162 no_skill_ident
155 no_steal 163 no_steal
156 no_strength 164 no_strength
157 nrof 165 nrof
166 obj_original
158 object 167 object
159 oid 168 oid
160 one_hit 169 one_hit
161 only_attack 170 only_attack
162 other_arch 171 other_arch
… …
164 path_attuned 173 path_attuned
165 path_denied 174 path_denied
166 path_repelled 175 path_repelled
167 perm_exp 176 perm_exp
168 pick_up 177 pick_up
178 player_sold
169 pow 179 pow
180 precious
170 protected 181 protected
171 race 182 race
172 random_move 183 random_move
173 random_movement 184 random_movement
174 randomitems 185 randomitems
… …
223 str 234 str
224 subtype 235 subtype
225 tear_down 236 tear_down
226 title 237 title
227 tooltype 238 tooltype
228 treasure 239 treasure_env
229 type 240 type
230 unaggressive 241 unaggressive
231 undead 242 undead
232 unique 243 unique
233 unpaid 244 unpaid
234 use_content_on_gen 245 use_content_on_gen
246 uuid
235 value 247 value
236 vulnerable 248 vulnerable
237 was_wiz 249 was_wiz
238 wc 250 wc
239 weapontype 251 weapontype
… …
242 wis 254 wis
243 wiz 255 wiz
244 x 256 x
245 xrays 257 xrays
246 y 258 y
259
260 maplore
261 endmaplore
262 enter_x
263 enter_y
264 width
265 height
266 reset_timeout
267 reset_time
268 swap_time
269 difficulty
270 darkness
271 fixed_resettime
272 per_player
273 per_party
274 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 lev_array
315 endplst
316
317 visibility
318 magicmap
319
320 match
321 parent
322 longname
323 jail_map
324 jail_x
325 jail_y
326 fallback
327 nomore
328
329 chance
330 mods
331 diff
332 saves
333 description
334 density
335 damage
336
337 anim
338 mina
339 facings
340 player
341
342 allowed
343 keycode
344 trans
345 yield
346 ingred
347 cauldron
348
349 Str
350 Dex
351 Con
352 Wis
353 Cha
354 Int
355 Pow
356
357 treasure
358 treasureone
359 list
360 change_name
361 change_title
362 change_slaying
363 yes
364 no
247); 365);
248 366
249open GPERF, "|-", "gperf -m50 >kw_hash.h" 367open GPERF, "|-", "exec $ARG{GPERF} -m50 >kw_hash.h"
250 or die "gperf: $!"; 368 or die "$ARGV{GPERF}: $!";
251 369
252print GPERF <<EOF; 370print GPERF <<EOF;
253%language=C++ 371%language=C++
254%enum 372%enum
255%define class-name kw_lex 373%define class-name kw_lex
256%define lookup-function-name match 374%define lookup-function-name match
257%struct-type 375%struct-type
258%compare-strncmp 376%compare-strncmp
259%ignore-case
260%delimiters=, 377%delimiters=,
261struct keyword_idx { const char *name; enum keyword index; }; 378struct keyword_idx { const char *name; enum keyword index; };
262%% 379%%
263EOF 380EOF
264 381
… …
280print GPERF "};\n"; 397print GPERF "};\n";
281 398
282printf GPERF "\nextern const unsigned char keyword_len [] = { 5, 7, %s };\n\n", 399printf GPERF "\nextern const unsigned char keyword_len [] = { 5, 7, %s };\n\n",
283 join ", ", map length, @kw; 400 join ", ", map length, @kw;
284 401
402close GPERF
403 or die "$ARG{GPERF}: failed to run";
404
285open KW, ">", "keyword.h"; 405open KW, ">", "keyword.h";
286 406
287print KW <<EOF; 407print KW <<EOF;
288#ifndef KW_H__ 408#ifndef KW_H__
289#define KW_H__ 409#define KW_H__
290 410
291enum keyword { 411enum keyword {
292 KW_EOF, KW_ERROR, 412 KW_NULL = 0,
413 KW_EOF = 0,
414 KW_ERROR,
293EOF 415EOF
294 416
295for (@kw) { 417for (@kw) {
296 printf KW " %s,\n", "KW_$_", 418 printf KW " %s,\n", "KW_$_",
297} 419}

Diff Legend

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