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

Comparing deliantra/server/include/cfperl.h (file contents):
Revision 1.49 by root, Mon Jan 8 01:19:03 2007 UTC vs.
Revision 1.62 by root, Tue Apr 17 10:06:33 2007 UTC

… …
60 60
61////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// 61//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
62 62
63void cfperl_init (); 63void cfperl_init ();
64void cfperl_main (); 64void cfperl_main ();
65void cfperl_emergency_save ();
66void cfperl_cleanup (int make_core);
65 67
66////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// 68//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
67 69
68// virtual server time, excluding time jumps and lag 70// virtual server time, excluding time jumps and lag
69extern double runtime; 71extern double runtime;
… …
129 131
130 static unordered_vector<attachable *> mortals; 132 static unordered_vector<attachable *> mortals;
131 MTH static void check_mortals (); 133 MTH static void check_mortals ();
132 134
133 enum { 135 enum {
134 F_DESTROYED = 0x01, 136 F_DESTROYED = 0x01,
135 F_BORROWED = 0x02, 137 F_DEBUG_TRACE = 0x02,
136 }; 138 };
137 139
138 // object is delete'd after the refcount reaches 0 140 // object is delete'd after the refcount reaches 0
141 int ACC (RW, flags);
139 mutable int ACC (RW, refcnt); 142 mutable int ACC (RW, refcnt);
140 int ACC (RW, flags);
141 143
142 MTH void refcnt_inc () const { ++refcnt; } 144 MTH void refcnt_inc () const { ++refcnt; }
143 MTH void refcnt_dec () const { --refcnt; } 145 MTH void refcnt_dec () const { --refcnt; }
144 146
145 MTH int refcnt_cnt () const; 147 MTH int refcnt_cnt () const;
… …
164 166
165 HV *self; // CF+ perl self 167 HV *self; // CF+ perl self
166 AV *cb; // CF+ callbacks 168 AV *cb; // CF+ callbacks
167 shstr attach; // generic extension attachment information 169 shstr attach; // generic extension attachment information
168 170
171 void sever_self (); // sever this object from its self, if it has one.
169 void optimise (); // possibly save some memory by destroying unneeded data 172 void optimise (); // possibly save some memory by destroying unneeded data
170 173
171 attachable () 174 attachable ()
172 : flags (0), refcnt (0), self (0), cb (0), attach (0) 175 : flags (0), refcnt (0), self (0), cb (0), attach (0)
173 { 176 {
174 } 177 }
… …
332 335
333 operator bool () { return !!av; } 336 operator bool () { return !!av; }
334}; 337};
335 338
336// compatibility support, should be removed when no longer needed 339// compatibility support, should be removed when no longer needed
337int fprintf (object_freezer &freezer, const char *format, ...); 340void fprintf (object_freezer &freezer, const char *format, ...);
338int fputs (const char *s, object_freezer &freezer); 341void fputs (const char *s, object_freezer &freezer);
339 342
340struct object_thawer 343struct object_thawer
341{ 344{
342 SV *text; // text part 345 SV *text; // text part
343 AV *av; // perl part 346 AV *av; // perl part
347 int linenum;
344 char *line; // current beginning of line 348 char *line; // current beginning of line
345 char *last_keyword, *last_value; 349 keyword kw;
350 char *kw_str, *value;
346 const char *name; 351 const char *name;
347 352
348 operator bool () { return !!text; } 353 operator bool () { return !!text; }
349 354
350 object_thawer (const char *path = 0); 355 object_thawer (const char *path = 0);
351 object_thawer (const char *data, AV *perlav); 356 object_thawer (const char *data, AV *perlav);
352 ~object_thawer (); 357 ~object_thawer ();
353 358
354 void get (attachable *obj, int oid); 359 void get (attachable *obj, int oid);
355 360
356 keyword get_kv (); // also parse value for later use 361 // parse next line
357 void skip_kv (keyword kw); 362 void next ();
363 // skip the current key-value (usually fetch next line, for
364 // multiline-fields, skips untilt he corresponding end-kw
365 void skip ();
358 366
367 //TODO: remove, deprecated
368 keyword get_kv ()
369 {
370 next ();
371 return kw;
372 }
373
359 const char *get_str () { return last_value; } // may be 0 374 char *get_str () { return value; } // may be 0
360 375
361 void get (shstr &sh) const; 376 void get (shstr &sh) const;
362 void get_ornull (shstr &sh) const { sh = last_value; } 377 void get_ornull (shstr &sh) const { sh = value; }
363 void get_ml (keyword kend, shstr &sh); 378 void get_ml (keyword kend, shstr &sh);
364 379
365 sint32 get_sint32 () const; 380 sint32 get_sint32 () const;
366 sint64 get_sint64 () const; 381 sint64 get_sint64 () const;
367 double get_double () const; 382 double get_double () const;
… …
376 void get (uint16 &i) { i = get_sint32 (); } 391 void get (uint16 &i) { i = get_sint32 (); }
377 void get (sint32 &i) { i = get_sint32 (); } 392 void get (sint32 &i) { i = get_sint32 (); }
378 393
379 void get (uint32 &i) { i = get_sint64 (); } 394 void get (uint32 &i) { i = get_sint64 (); }
380 void get (sint64 &i) { i = get_sint64 (); } 395 void get (sint64 &i) { i = get_sint64 (); }
381};
382 396
397 bool parse_error (const char *type = 0, const char *name = 0, bool skip = true);
398};
399
400//TODO: remove
383char *fgets (char *s, int n, object_thawer &thawer); 401char *fgets (char *s, int n, object_thawer &thawer);
384 402
385////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// 403//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
386 404
387struct coroapi { 405struct coroapi {
388 static struct CoroAPI *GCoroAPI; 406 static struct CoroAPI *GCoroAPI;
389 407
390 static int nready () { return CORO_NREADY; } 408 static int nready () { return CORO_NREADY; }
391 static int cede () { return CORO_CEDE ; } 409 static int cede () { return CORO_CEDE ; }
392 410
411 static double (*time)();
412 static double next_cede;
393 static int cede_counter; 413 static int cede_counter;
394 414
415 static void do_cede_every ();
416 static void do_cede_to_tick ();
417 static void do_cede_to_tick_every ();
418
395 static void cede_every (int count) 419 static void cede_every (int count)
396 { 420 {
397 if (++cede_counter >= count) 421 if (++cede_counter >= count)
398 { 422 do_cede_every ();
399 cede_counter = 0;
400
401 if (coroapi::nready ())
402 coroapi::cede ();
403 }
404 } 423 }
424
425 static void cede_to_tick ()
426 {
427 if (time () >= next_cede)
428 do_cede_to_tick ();
429 }
430
431 static void cede_to_tick_every (int count)
432 {
433 if (++cede_counter >= count)
434 cede_to_tick ();
435 }
436
437 static void wait_for_tick ();
438 static void wait_for_tick_begin ();
405}; 439};
406 440
407struct watcher_base 441struct watcher_base
408{ 442{
409 static struct EventAPI *GEventAPI; 443 static struct EventAPI *GEventAPI;

Diff Legend

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