Annotation of parser3/src/types/pa_vdate.h, revision 1.21
1.1 parser 1: /** @file
2: Parser: @b date parser class decl.
3:
1.7 paf 4: Copyright (c) 2001, 2002 ArtLebedev Group (http://www.artlebedev.com)
1.8 paf 5: Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)
1.1 parser 6: */
7:
8: #ifndef PA_VDATE_H
9: #define PA_VDATE_H
1.11 paf 10:
1.21 ! paf 11: static const char* IDENT_VDATE_H="$Date: 2002/09/02 12:20:57 $";
1.1 parser 12:
13: #include "classes.h"
14: #include "pa_common.h"
15: #include "pa_vstateless_object.h"
16: #include "pa_vint.h"
17:
1.9 paf 18: // defines
19:
20: #define VDATE_TYPE "date"
1.20 paf 21:
1.9 paf 22:
23: // externs
24:
1.1 parser 25: extern Methoded *date_class;
26:
27: /// value of type 'date'. implemented with @c time_t
28: class VDate : public VStateless_object {
29: public: // Value
30:
1.9 paf 31: const char *type() const { return VDATE_TYPE; }
1.10 paf 32: VStateless_class *get_class() { return date_class; }
33:
1.1 parser 34: /// VDate: ftime -> float days
35: Value *as_expr_result(bool return_string_as_is=false) {
36: return NEW VDouble(pool(), as_double());
37: }
38:
39: /// VDate: ftime -> float days
1.21 ! paf 40: double as_double() const { return (double)ftime)/ SECS_PER_DAY; }
1.1 parser 41: /// VDate: 0 or !0
1.4 parser 42: bool as_bool() const { return ftime!=0; }
1.1 parser 43:
44:
1.15 paf 45: /// VDate: method,field
1.17 paf 46: Value *get_element(const String& aname, Value *aself, bool looking_up) {
1.15 paf 47: // $method
1.17 paf 48: if(Value *result=VStateless_object::get_element(aname, aself, looking_up))
1.1 parser 49: return result;
50:
51: // $year month day hour minute second weekday
52: tm *tmOut=localtime(&ftime);
53: int result;
54: if(aname=="year") result=1900+tmOut->tm_year;
55: else if(aname=="month") result=1+tmOut->tm_mon;
56: else if(aname=="day") result=tmOut->tm_mday;
57: else if(aname=="hour") result=tmOut->tm_hour;
58: else if(aname=="minute") result=tmOut->tm_min;
59: else if(aname=="second") result=tmOut->tm_sec;
60: else if(aname=="weekday") result=tmOut->tm_wday;
1.13 paf 61: else if(aname=="yearday") result=tmOut->tm_yday;
62: else if(aname=="daylightsaving") result=tmOut->tm_isdst;
1.18 paf 63: else { bark("%s field not found", 0, &aname); return 0; }
1.1 parser 64: return NEW VInt(pool(), result);
65: }
66:
67: public: // usage
68:
1.10 paf 69: VDate(Pool& apool, time_t adate) : VStateless_object(apool),
1.1 parser 70: ftime(adate) {
71: }
72:
1.19 paf 73: time_t get_time() const { return ftime; }
1.1 parser 74: void set_time(time_t atime) { ftime=atime; }
75:
76: private:
77:
78: time_t ftime;
79:
80: };
81:
82: #endif
E-mail: