|
|
| version 1.79, 2008/02/14 10:46:01 | version 1.89, 2010/10/21 15:06:27 |
|---|---|
| Line 1 | Line 1 |
| /** @file | /** @file |
| Parser: @b date parser class. | Parser: @b date parser class. |
| Copyright (c) 2001-2005 ArtLebedev Group (http://www.artlebedev.com) | Copyright (c) 2001-2009 ArtLebedev Group (http://www.artlebedev.com) |
| Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru) | Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru) |
| */ | */ |
| Line 19 static const char * const IDENT_DATE_C=" | Line 19 static const char * const IDENT_DATE_C=" |
| class MDate: public Methoded { | class MDate: public Methoded { |
| public: // VStateless_class | public: // VStateless_class |
| Value* create_new_value(Pool&, HashStringValue&) { return new VDate(0); } | Value* create_new_value(Pool&) { return new VDate(0); } |
| public: | public: |
| MDate(); | MDate(); |
| public: // Methoded | |
| bool used_directly() { return true; } | |
| }; | }; |
| // global variable | // global variable |
| Line 36 DECLARE_CLASS_VAR(date, new MDate, 0); | Line 34 DECLARE_CLASS_VAR(date, new MDate, 0); |
| class Date_calendar_table_template_columns: public ArrayString { | class Date_calendar_table_template_columns: public ArrayString { |
| public: | public: |
| Date_calendar_table_template_columns(): ArrayString(6+2) { | Date_calendar_table_template_columns(): ArrayString(6+2) { |
| for(int i=0; i<=6; i++) { | for(int i=0; i<=6; i++) |
| char *cname=new(PointerFreeGC) char[1/*strlen("6")*/+1/*terminating 0*/]; | *this+=new String(i, "%d"); // .i column name |
| *this+=new String(cname, sprintf(cname, "%d", i)); // .i column name | |
| } | |
| *this+=new String("week"); | *this+=new String("week"); |
| *this+=new String("year"); | *this+=new String("year"); |
| } | } |
| Line 63 static void _now(Request& r, MethodParam | Line 60 static void _now(Request& r, MethodParam |
| /// shrinked range: 1970/1/1 to 2038/1/1 | /// shrinked range: 1970/1/1 to 2038/1/1 |
| static int to_year(int iyear) { | static int to_year(int iyear) { |
| if(iyear<1970 || iyear>2038) | if(iyear<1970 || iyear>2038) |
| throw Exception(0, | throw Exception(DATE_RANGE_EXCEPTION_TYPE, |
| 0, | 0, |
| "year '%d' is out of valid range", iyear); | "year '%d' is out of valid range", iyear); |
| return iyear; | return iyear; |
| Line 83 static int to_tm_year(int iyear) { | Line 80 static int to_tm_year(int iyear) { |
| // 2002:04:25 [+maybe time] | // 2002:04:25 [+maybe time] |
| /*not static, used in image.C*/ tm cstr_to_time_t(char *cstr) { | /*not static, used in image.C*/ tm cstr_to_time_t(char *cstr) { |
| if( !cstr || !*cstr ) | if( !cstr || !*cstr ) |
| throw Exception(0, | throw Exception(DATE_RANGE_EXCEPTION_TYPE, |
| 0, | 0, |
| "empty string is not valid datetime"); | "empty string is not valid datetime"); |
| Line 127 date_part_set: | Line 124 date_part_set: |
| static void _create(Request& r, MethodParams& params) { | static void _create(Request& r, MethodParams& params) { |
| VDate& vdate=GET_SELF(r, VDate); | VDate& vdate=GET_SELF(r, VDate); |
| if(params.count()==1) { | if(params.count()==1){ |
| // ^create[2002-04-25 18:14:00] | if(const String* sdate=params[0].get_string()){ // ^create[2002-04-25 18:14:00] ^create[18:14:00] |
| // ^create[18:14:00] | |
| if(const String* sdate=params[0].get_string()) | |
| vdate.set_time(cstr_to_time_t(sdate->cstrm())); | vdate.set_time(cstr_to_time_t(sdate->cstrm())); |
| else { // ^create(float days) | } else { // ^create(float days) or ^create[date object] |
| time_t t=(time_t)round(params.as_double(0, "float days must be double", r)*SECS_PER_DAY); | time_t t=(time_t)round(params.as_double(0, "float days must be double", r)*SECS_PER_DAY); |
| if(t<0 || !localtime(&t)) | if(t<0 || !localtime(&t)) |
| throw Exception(0, | throw Exception(DATE_RANGE_EXCEPTION_TYPE, |
| 0, | 0, |
| "invalid datetime"); | "invalid datetime"); |
| vdate.set_time(t); | vdate.set_time(t); |
| Line 157 static void _create(Request& r, MethodPa | Line 152 static void _create(Request& r, MethodPa |
| static void _sql_string(Request& r, MethodParams&) { | static void _sql_string(Request& r, MethodParams&) { |
| VDate& vdate=GET_SELF(r, VDate); | VDate& vdate=GET_SELF(r, VDate); |
| int size=1+ 4+1+2+1+2 +1+ 2+1+2+1+2 +1 +1; | |
| char *buf=new(PointerFreeGC) char[size]; | r.write_assign_lang(*vdate.get_sql_string()); |
| size=strftime(buf, size, "%Y-%m-%d %H:%M:%S", &vdate.get_localtime()); | } |
| r.write_assign_lang(String(buf, size)); | static void _gmt_string(Request& r, MethodParams&) { |
| VDate& vdate=GET_SELF(r, VDate); | |
| r.write_assign_lang(*vdate.get_gmt_string()); | |
| } | } |
| static void _roll(Request& r, MethodParams& params) { | static void _roll(Request& r, MethodParams& params) { |
| Line 201 static void _roll(Request& r, MethodPara | Line 199 static void _roll(Request& r, MethodPara |
| int saved_mon=(tmIn.tm_mon+12*100)%12; // crossing year boundary backwards | int saved_mon=(tmIn.tm_mon+12*100)%12; // crossing year boundary backwards |
| t_changed_date=mktime/*normalizetime*/(&tmIn); | t_changed_date=mktime/*normalizetime*/(&tmIn); |
| if(t_changed_date<0) | if(t_changed_date<0) |
| throw Exception(0, | throw Exception(DATE_RANGE_EXCEPTION_TYPE, |
| 0, | 0, |
| "bad resulting time (rolled out of valid date range)"); | "bad resulting time (rolled out of valid date range)"); |
| if(oday==0 && tmIn.tm_mon!=saved_mon/*but it changed*/) { | if(oday==0 && tmIn.tm_mon!=saved_mon/*but it changed*/) { |
| if(adjust_day <= -3/*31->28 max, so never, but...*/) | if(adjust_day <= -3/*31->28 max, so never, but...*/) |
| throw Exception(0, | throw Exception(DATE_RANGE_EXCEPTION_TYPE, |
| 0, | 0, |
| "bad resulting time (day hole still with %d day adjustment)", adjust_day ); | "bad resulting time (day hole still with %d day adjustment)", adjust_day ); |
| Line 218 static void _roll(Request& r, MethodPara | Line 216 static void _roll(Request& r, MethodPara |
| tm *tmOut=localtime(&t_changed_date); | tm *tmOut=localtime(&t_changed_date); |
| if(!tmOut) | if(!tmOut) |
| throw Exception(0, | throw Exception(DATE_RANGE_EXCEPTION_TYPE, |
| 0, | 0, |
| "bad resulting time (seconds from epoch=%d)", t_changed_date); | "bad resulting time (seconds from epoch=%d)", t_changed_date); |
| Line 238 static void _roll(Request& r, MethodPara | Line 236 static void _roll(Request& r, MethodPara |
| */ | */ |
| if(t_changed_time<0) | if(t_changed_time<0) |
| throw Exception(0, | throw Exception(DATE_RANGE_EXCEPTION_TYPE, |
| 0, | 0, |
| "bad resulting time (after reconstruction)"); | "bad resulting time (after reconstruction)"); |
| Line 261 static Table& fill_month_days(Request& r | Line 259 static Table& fill_month_days(Request& r |
| time_t t=mktime(&tmIn); | time_t t=mktime(&tmIn); |
| if(t<0) | if(t<0) |
| throw Exception(0, | throw Exception(DATE_RANGE_EXCEPTION_TYPE, |
| 0, | 0, |
| "invalid date"); | "invalid date"); |
| tm *tmOut=localtime(&t); | tm *tmOut=localtime(&t); |
| Line 274 static Table& fill_month_days(Request& r | Line 272 static Table& fill_month_days(Request& r |
| for(int _day=1-weekDay1; _day<=monthDays;) { | for(int _day=1-weekDay1; _day<=monthDays;) { |
| Table::element_type row(new ArrayString(7)); | Table::element_type row(new ArrayString(7)); |
| // calculating year week no [1..54] | // calculating year week no [1..54] |
| char *weekno_buf=0; // surely would be assigned to, but to calm down compiler | int weekyear=0; // surely would be assigned to, but to calm down compiler |
| size_t weekno_size=0; // same | int weekno=0; // same |
| int weekyear=0; // same | |
| // 0..6 week days-cells fill with month days | // 0..6 week days-cells fill with month days |
| for(int wday=0; wday<7; wday++, _day++) { | for(int wday=0; wday<7; wday++, _day++) { |
| String* cell=new String; | *row+=(_day>=1 && _day<=monthDays)?new String(_day, "%02d"):new String(); |
| if(_day>=1 && _day<=monthDays) { | |
| char *buf=new(PointerFreeGC) char[2+1]; | |
| cell->append_know_length(buf, sprintf(buf, "%02d", _day), String::L_CLEAN); | |
| } | |
| *row+=cell; | |
| if(wday==(rus?3:4)/*thursday*/) { | if(wday==(rus?3:4)/*thursday*/) { |
| tm tms; | tm tms; |
| Line 295 static Table& fill_month_days(Request& r | Line 287 static Table& fill_month_days(Request& r |
| /*normalize*/mktime(&tms); | /*normalize*/mktime(&tms); |
| weekyear=tms.tm_year+1900; | weekyear=tms.tm_year+1900; |
| weekno=VDate::CalcWeek(tms).week; | |
| const int weekno_buf_size=2+1/*for stupid snprintfs*/ +1; | |
| weekno_buf=new(PointerFreeGC) char[weekno_buf_size]; | |
| VDate::yw week = VDate::CalcWeek(tms); | |
| weekno_size=snprintf(weekno_buf, weekno_buf_size, "%02d", week.week); | |
| } | } |
| } | |
| // appending year week no | |
| *row+=new String(weekno_buf, weekno_size); | |
| // appending year week year | |
| { | |
| char* buf=new(PointerFreeGC) char[4+1]; | |
| *row+=new String(buf, sprintf(buf, "%02d", weekyear)); | |
| } | } |
| // appending week no | |
| *row+=new String(weekno, "%02d"); | |
| // appending week year | |
| *row+=new String(weekyear, "%04d"); | |
| result+=row; | result+=row; |
| } | } |
| Line 338 static Table& fill_week_days(Request& r, | Line 323 static Table& fill_week_days(Request& r, |
| time_t t=mktime(&tmIn); | time_t t=mktime(&tmIn); |
| if(t<0) | if(t<0) |
| throw Exception(0, | throw Exception(DATE_RANGE_EXCEPTION_TYPE, |
| 0, | 0, |
| "invalid date"); | "invalid date"); |
| tm *tmOut=localtime(&t); | tm *tmOut=localtime(&t); |
| int baseWeekDay=tmOut->tm_wday; | int baseWeekDay=tmOut->tm_wday; |
| if(rus) | if(rus) |
| baseWeekDay=baseWeekDay?baseWeekDay-1:6; //sunday last | baseWeekDay=baseWeekDay?baseWeekDay-1:6; //sunday last |
| Line 352 static Table& fill_week_days(Request& r, | Line 337 static Table& fill_week_days(Request& r, |
| for(int curWeekDay=0; curWeekDay<7; curWeekDay++, t+=SECS_PER_DAY) { | for(int curWeekDay=0; curWeekDay<7; curWeekDay++, t+=SECS_PER_DAY) { |
| tm *tmOut=localtime(&t); | tm *tmOut=localtime(&t); |
| Table::element_type row(new ArrayString(4)); | Table::element_type row(new ArrayString(4)); |
| #define WDFILL(size, value) { \ | |
| char *buf=new(PointerFreeGC) char[size+1]; \ | *row+=new String(1900+tmOut->tm_year, "%04d"); |
| *row+=new String(buf, sprintf(buf, "%0"#size"d", value)); \ | *row+=new String(1+tmOut->tm_mon, "%02d"); |
| } | *row+=new String(tmOut->tm_mday, "%02d"); |
| WDFILL(4, 1900+tmOut->tm_year); | *row+=new String(tmOut->tm_wday, "%02d"); |
| WDFILL(2, 1+tmOut->tm_mon); | |
| WDFILL(2, tmOut->tm_mday); | |
| WDFILL(2, tmOut->tm_wday); | |
| result+=row; | result+=row; |
| } | } |
| Line 395 static void _unix_timestamp(Request& r, | Line 378 static void _unix_timestamp(Request& r, |
| r.write_no_lang(*new VInt((int)vdate.get_time())); | r.write_no_lang(*new VInt((int)vdate.get_time())); |
| } else { | } else { |
| if(vdate.get_time()) | if(vdate.get_time()) |
| throw Exception(0, | throw Exception(PARSER_RUNTIME, |
| 0, | 0, |
| "date object already constructed"); | "date object already constructed"); |
| Line 410 static void _last_day(Request& r, Method | Line 393 static void _last_day(Request& r, Method |
| int year; | int year; |
| int month; | int month; |
| if(&r.get_self() == date_class) { | if(&r.get_self() == date_class) { |
| // ^date:lastday(year;month) | if(params.count() != 2) |
| if(params.count() == 2) { | |
| year=to_year(params.as_int(0, "year must be int", r)); | |
| month=to_month(params.as_int(1, "month must be int", r)); | |
| } else | |
| throw Exception(PARSER_RUNTIME, | throw Exception(PARSER_RUNTIME, |
| 0, | 0, |
| "year and month must be defined"); | "year and month must be defined"); |
| // ^date:lastday(year;month) | |
| year=to_year(params.as_int(0, "year must be int", r)); | |
| month=to_month(params.as_int(1, "month must be int", r)); | |
| } else { | } else { |
| // ^date.lastday[] | // ^date.lastday[] |
| tm &tmIn=GET_SELF(r, VDate).get_localtime(); | tm &tmIn=GET_SELF(r, VDate).get_localtime(); |
| year=tmIn.tm_year+1900; | year=tmIn.tm_year+1900; |
| month=tmIn.tm_mon; | month=tmIn.tm_mon; |
| } | } |
| r.write_assign_lang(*new VInt(getMonthDays(year, month))); | r.write_no_lang(*new VInt(getMonthDays(year, month))); |
| } | } |
| Line 442 MDate::MDate(): Methoded("date") { | Line 425 MDate::MDate(): Methoded("date") { |
| // ^date.sql-string[] | // ^date.sql-string[] |
| add_native_method("sql-string", Method::CT_DYNAMIC, _sql_string, 0, 0); | add_native_method("sql-string", Method::CT_DYNAMIC, _sql_string, 0, 0); |
| // ^date.gmt-string[] | |
| add_native_method("gmt-string", Method::CT_DYNAMIC, _gmt_string, 0, 0); | |
| // ^date:lastday(year;month) | // ^date:lastday(year;month) |
| // ^date.lastday[] | // ^date.lastday[] |
| add_native_method("last-day", Method::CT_ANY, _last_day, 0, 2); | add_native_method("last-day", Method::CT_ANY, _last_day, 0, 2); |