| OLD | NEW |
|---|
| (Empty) |
| 1 /* Convert a string representation of time to a time value. | |
| 2 Copyright (C) 1996, 1997, 1998, 1999, 2000 Free Software Foundation, Inc. | |
| 3 This file is part of the GNU C Library. | |
| 4 Contributed by Ulrich Drepper <drepper@cygnus.com>, 1996. | |
| 5 | |
| 6 The GNU C Library is free software; you can redistribute it and/or | |
| 7 modify it under the terms of the GNU Lesser General Public License as | |
| 8 published by the Free Software Foundation; either version 3 of the | |
| 9 License, or (at your option) any later version. | |
| 10 | |
| 11 The GNU C Library is distributed in the hope that it will be useful, | |
| 12 but WITHOUT ANY WARRANTY; without even the implied warranty of | |
| 13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | |
| 14 Library General Public License for more details. | |
| 15 | |
| 16 You should have received a copy of the GNU Lesser General Public | |
| 17 License along with the GNU C Library; see the file COPYING.LIB. If not, | |
| 18 see <http://www.gnu.org/licenses/>. */ | |
| 19 | |
| 20 /* XXX This version of the implementation is not really complete. | |
| 21 Some of the fields cannot add information alone. But if seeing | |
| 22 some of them in the same format (such as year, week and weekday) | |
| 23 this is enough information for determining the date. */ | |
| 24 | |
| 25 #include "replace.h" | |
| 26 #include "system/locale.h" | |
| 27 #include "system/time.h" | |
| 28 | |
| 29 #ifndef __P | |
| 30 # if defined (__GNUC__) || (defined (__STDC__) && __STDC__) | |
| 31 # define __P(args) args | |
| 32 # else | |
| 33 # define __P(args) () | |
| 34 # endif /* GCC. */ | |
| 35 #endif /* Not __P. */ | |
| 36 | |
| 37 #if ! HAVE_LOCALTIME_R && ! defined localtime_r | |
| 38 # ifdef _LIBC | |
| 39 # define localtime_r __localtime_r | |
| 40 # else | |
| 41 /* Approximate localtime_r as best we can in its absence. */ | |
| 42 # define localtime_r my_localtime_r | |
| 43 static struct tm *localtime_r __P ((const time_t *, struct tm *)); | |
| 44 static struct tm * | |
| 45 localtime_r (t, tp) | |
| 46 const time_t *t; | |
| 47 struct tm *tp; | |
| 48 { | |
| 49 struct tm *l = localtime (t); | |
| 50 if (! l) | |
| 51 return 0; | |
| 52 *tp = *l; | |
| 53 return tp; | |
| 54 } | |
| 55 # endif /* ! _LIBC */ | |
| 56 #endif /* ! HAVE_LOCALTIME_R && ! defined (localtime_r) */ | |
| 57 | |
| 58 | |
| 59 #define match_char(ch1, ch2) if (ch1 != ch2) return NULL | |
| 60 #if defined __GNUC__ && __GNUC__ >= 2 | |
| 61 # define match_string(cs1, s2) \ | |
| 62 ({ size_t len = strlen (cs1); \ | |
| 63 int result = strncasecmp ((cs1), (s2), len) == 0; \ | |
| 64 if (result) (s2) += len; \ | |
| 65 result; }) | |
| 66 #else | |
| 67 /* Oh come on. Get a reasonable compiler. */ | |
| 68 # define match_string(cs1, s2) \ | |
| 69 (strncasecmp ((cs1), (s2), strlen (cs1)) ? 0 : ((s2) += strlen (cs1), 1)) | |
| 70 #endif | |
| 71 /* We intentionally do not use isdigit() for testing because this will | |
| 72 lead to problems with the wide character version. */ | |
| 73 #define get_number(from, to, n) \ | |
| 74 do { \ | |
| 75 int __n = n; \ | |
| 76 val = 0; \ | |
| 77 while (*rp == ' ') \ | |
| 78 ++rp; \ | |
| 79 if (*rp < '0' || *rp > '9') \ | |
| 80 return NULL; \ | |
| 81 do { \ | |
| 82 val *= 10; \ | |
| 83 val += *rp++ - '0'; \ | |
| 84 } while (--__n > 0 && val * 10 <= to && *rp >= '0' && *rp <= '9'); \ | |
| 85 if (val < from || val > to) \ | |
| 86 return NULL; \ | |
| 87 } while (0) | |
| 88 #ifdef _NL_CURRENT | |
| 89 # define get_alt_number(from, to, n) \ | |
| 90 ({ \ | |
| 91 __label__ do_normal; \ | |
| 92 if (*decided != raw) \ | |
| 93 { \ | |
| 94 const char *alts = _NL_CURRENT (LC_TIME, ALT_DIGITS); \ | |
| 95 int __n = n; \ | |
| 96 int any = 0; \ | |
| 97 while (*rp == ' ') \ | |
| 98 ++rp; \ | |
| 99 val = 0; \ | |
| 100 do { \ | |
| 101 val *= 10; \ | |
| 102 while (*alts != '\0') \ | |
| 103 { \ | |
| 104 size_t len = strlen (alts); \ | |
| 105 if (strncasecmp (alts, rp, len) == 0) \ | |
| 106 break; \ | |
| 107 alts += len + 1; \ | |
| 108 ++val; \ | |
| 109 } \ | |
| 110 if (*alts == '\0') \ | |
| 111 { \ | |
| 112 if (*decided == not && ! any) \ | |
| 113 goto do_normal; \ | |
| 114 /* If we haven't read anything it's an error. */ \ | |
| 115 if (! any) \ | |
| 116 return NULL; \ | |
| 117 /* Correct the premature multiplication. */ \ | |
| 118 val /= 10; \ | |
| 119 break; \ | |
| 120 } \ | |
| 121 else \ | |
| 122 *decided = loc; \ | |
| 123 } while (--__n > 0 && val * 10 <= to); \ | |
| 124 if (val < from || val > to) \ | |
| 125 return NULL; \ | |
| 126 } \ | |
| 127 else \ | |
| 128 { \ | |
| 129 do_normal: \ | |
| 130 get_number (from, to, n); \ | |
| 131 } \ | |
| 132 0; \ | |
| 133 }) | |
| 134 #else | |
| 135 # define get_alt_number(from, to, n) \ | |
| 136 /* We don't have the alternate representation. */ \ | |
| 137 get_number(from, to, n) | |
| 138 #endif | |
| 139 #define recursive(new_fmt) \ | |
| 140 (*(new_fmt) != '\0' \ | |
| 141 && (rp = strptime_internal (rp, (new_fmt), tm, decided, era_cnt)) != NULL) | |
| 142 | |
| 143 | |
| 144 #ifdef _LIBC | |
| 145 /* This is defined in locale/C-time.c in the GNU libc. */ | |
| 146 extern const struct locale_data _nl_C_LC_TIME; | |
| 147 extern const unsigned short int __mon_yday[2][13]; | |
| 148 | |
| 149 # define weekday_name (&_nl_C_LC_TIME.values[_NL_ITEM_INDEX (DAY_1)].string) | |
| 150 # define ab_weekday_name \ | |
| 151 (&_nl_C_LC_TIME.values[_NL_ITEM_INDEX (ABDAY_1)].string) | |
| 152 # define month_name (&_nl_C_LC_TIME.values[_NL_ITEM_INDEX (MON_1)].string) | |
| 153 # define ab_month_name (&_nl_C_LC_TIME.values[_NL_ITEM_INDEX (ABMON_1)].string) | |
| 154 # define HERE_D_T_FMT (_nl_C_LC_TIME.values[_NL_ITEM_INDEX (D_T_FMT)].string) | |
| 155 # define HERE_D_FMT (_nl_C_LC_TIME.values[_NL_ITEM_INDEX (D_FMT)].string) | |
| 156 # define HERE_AM_STR (_nl_C_LC_TIME.values[_NL_ITEM_INDEX (AM_STR)].string) | |
| 157 # define HERE_PM_STR (_nl_C_LC_TIME.values[_NL_ITEM_INDEX (PM_STR)].string) | |
| 158 # define HERE_T_FMT_AMPM \ | |
| 159 (_nl_C_LC_TIME.values[_NL_ITEM_INDEX (T_FMT_AMPM)].string) | |
| 160 # define HERE_T_FMT (_nl_C_LC_TIME.values[_NL_ITEM_INDEX (T_FMT)].string) | |
| 161 | |
| 162 # define strncasecmp(s1, s2, n) __strncasecmp (s1, s2, n) | |
| 163 #else | |
| 164 static char const weekday_name[][10] = | |
| 165 { | |
| 166 "Sunday", "Monday", "Tuesday", "Wednesday", | |
| 167 "Thursday", "Friday", "Saturday" | |
| 168 }; | |
| 169 static char const ab_weekday_name[][4] = | |
| 170 { | |
| 171 "Sun", "Mon", "Tue", "Wed", "Thu", "Fri", "Sat" | |
| 172 }; | |
| 173 static char const month_name[][10] = | |
| 174 { | |
| 175 "January", "February", "March", "April", "May", "June", | |
| 176 "July", "August", "September", "October", "November", "December" | |
| 177 }; | |
| 178 static char const ab_month_name[][4] = | |
| 179 { | |
| 180 "Jan", "Feb", "Mar", "Apr", "May", "Jun", | |
| 181 "Jul", "Aug", "Sep", "Oct", "Nov", "Dec" | |
| 182 }; | |
| 183 # define HERE_D_T_FMT "%a %b %e %H:%M:%S %Y" | |
| 184 # define HERE_D_FMT "%m/%d/%y" | |
| 185 # define HERE_AM_STR "AM" | |
| 186 # define HERE_PM_STR "PM" | |
| 187 # define HERE_T_FMT_AMPM "%I:%M:%S %p" | |
| 188 # define HERE_T_FMT "%H:%M:%S" | |
| 189 | |
| 190 static const unsigned short int __mon_yday[2][13] = | |
| 191 { | |
| 192 /* Normal years. */ | |
| 193 { 0, 31, 59, 90, 120, 151, 181, 212, 243, 273, 304, 334, 365 }, | |
| 194 /* Leap years. */ | |
| 195 { 0, 31, 60, 91, 121, 152, 182, 213, 244, 274, 305, 335, 366 } | |
| 196 }; | |
| 197 #endif | |
| 198 | |
| 199 /* Status of lookup: do we use the locale data or the raw data? */ | |
| 200 enum locale_status { not, loc, raw }; | |
| 201 | |
| 202 | |
| 203 #ifndef __isleap | |
| 204 /* Nonzero if YEAR is a leap year (every 4 years, | |
| 205 except every 100th isn't, and every 400th is). */ | |
| 206 # define __isleap(year) \ | |
| 207 ((year) % 4 == 0 && ((year) % 100 != 0 || (year) % 400 == 0)) | |
| 208 #endif | |
| 209 | |
| 210 /* Compute the day of the week. */ | |
| 211 static void | |
| 212 day_of_the_week (struct tm *tm) | |
| 213 { | |
| 214 /* We know that January 1st 1970 was a Thursday (= 4). Compute the | |
| 215 the difference between this data in the one on TM and so determine | |
| 216 the weekday. */ | |
| 217 int corr_year = 1900 + tm->tm_year - (tm->tm_mon < 2); | |
| 218 int wday = (-473 | |
| 219 + (365 * (tm->tm_year - 70)) | |
| 220 + (corr_year / 4) | |
| 221 - ((corr_year / 4) / 25) + ((corr_year / 4) % 25 < 0) | |
| 222 + (((corr_year / 4) / 25) / 4) | |
| 223 + __mon_yday[0][tm->tm_mon] | |
| 224 + tm->tm_mday - 1); | |
| 225 tm->tm_wday = ((wday % 7) + 7) % 7; | |
| 226 } | |
| 227 | |
| 228 /* Compute the day of the year. */ | |
| 229 static void | |
| 230 day_of_the_year (struct tm *tm) | |
| 231 { | |
| 232 tm->tm_yday = (__mon_yday[__isleap (1900 + tm->tm_year)][tm->tm_mon] | |
| 233 + (tm->tm_mday - 1)); | |
| 234 } | |
| 235 | |
| 236 static char * | |
| 237 #ifdef _LIBC | |
| 238 internal_function | |
| 239 #endif | |
| 240 strptime_internal __P ((const char *rp, const char *fmt, struct tm *tm, | |
| 241 enum locale_status *decided, int era_cnt)); | |
| 242 | |
| 243 static char * | |
| 244 #ifdef _LIBC | |
| 245 internal_function | |
| 246 #endif | |
| 247 strptime_internal (rp, fmt, tm, decided, era_cnt) | |
| 248 const char *rp; | |
| 249 const char *fmt; | |
| 250 struct tm *tm; | |
| 251 enum locale_status *decided; | |
| 252 int era_cnt; | |
| 253 { | |
| 254 const char *rp_backup; | |
| 255 int cnt; | |
| 256 size_t val; | |
| 257 int have_I, is_pm; | |
| 258 int century, want_century; | |
| 259 int want_era; | |
| 260 int have_wday, want_xday; | |
| 261 int have_yday; | |
| 262 int have_mon, have_mday; | |
| 263 #ifdef _NL_CURRENT | |
| 264 size_t num_eras; | |
| 265 #endif | |
| 266 struct era_entry *era; | |
| 267 | |
| 268 have_I = is_pm = 0; | |
| 269 century = -1; | |
| 270 want_century = 0; | |
| 271 want_era = 0; | |
| 272 era = NULL; | |
| 273 | |
| 274 have_wday = want_xday = have_yday = have_mon = have_mday = 0; | |
| 275 | |
| 276 while (*fmt != '\0') | |
| 277 { | |
| 278 /* A white space in the format string matches 0 more or white | |
| 279 space in the input string. */ | |
| 280 if (isspace (*fmt)) | |
| 281 { | |
| 282 while (isspace (*rp)) | |
| 283 ++rp; | |
| 284 ++fmt; | |
| 285 continue; | |
| 286 } | |
| 287 | |
| 288 /* Any character but `%' must be matched by the same character | |
| 289 in the iput string. */ | |
| 290 if (*fmt != '%') | |
| 291 { | |
| 292 match_char (*fmt++, *rp++); | |
| 293 continue; | |
| 294 } | |
| 295 | |
| 296 ++fmt; | |
| 297 #ifndef _NL_CURRENT | |
| 298 /* We need this for handling the `E' modifier. */ | |
| 299 start_over: | |
| 300 #endif | |
| 301 | |
| 302 /* Make back up of current processing pointer. */ | |
| 303 rp_backup = rp; | |
| 304 | |
| 305 switch (*fmt++) | |
| 306 { | |
| 307 case '%': | |
| 308 /* Match the `%' character itself. */ | |
| 309 match_char ('%', *rp++); | |
| 310 break; | |
| 311 case 'a': | |
| 312 case 'A': | |
| 313 /* Match day of week. */ | |
| 314 for (cnt = 0; cnt < 7; ++cnt) | |
| 315 { | |
| 316 #ifdef _NL_CURRENT | |
| 317 if (*decided !=raw) | |
| 318 { | |
| 319 if (match_string (_NL_CURRENT (LC_TIME, DAY_1 + cnt), rp)) | |
| 320 { | |
| 321 if (*decided == not | |
| 322 && strcmp (_NL_CURRENT (LC_TIME, DAY_1 + cnt), | |
| 323 weekday_name[cnt])) | |
| 324 *decided = loc; | |
| 325 break; | |
| 326 } | |
| 327 if (match_string (_NL_CURRENT (LC_TIME, ABDAY_1 + cnt), rp)) | |
| 328 { | |
| 329 if (*decided == not | |
| 330 && strcmp (_NL_CURRENT (LC_TIME, ABDAY_1 + cnt), | |
| 331 ab_weekday_name[cnt])) | |
| 332 *decided = loc; | |
| 333 break; | |
| 334 } | |
| 335 } | |
| 336 #endif | |
| 337 if (*decided != loc | |
| 338 && (match_string (weekday_name[cnt], rp) | |
| 339 || match_string (ab_weekday_name[cnt], rp))) | |
| 340 { | |
| 341 *decided = raw; | |
| 342 break; | |
| 343 } | |
| 344 } | |
| 345 if (cnt == 7) | |
| 346 /* Does not match a weekday name. */ | |
| 347 return NULL; | |
| 348 tm->tm_wday = cnt; | |
| 349 have_wday = 1; | |
| 350 break; | |
| 351 case 'b': | |
| 352 case 'B': | |
| 353 case 'h': | |
| 354 /* Match month name. */ | |
| 355 for (cnt = 0; cnt < 12; ++cnt) | |
| 356 { | |
| 357 #ifdef _NL_CURRENT | |
| 358 if (*decided !=raw) | |
| 359 { | |
| 360 if (match_string (_NL_CURRENT (LC_TIME, MON_1 + cnt), rp)) | |
| 361 { | |
| 362 if (*decided == not | |
| 363 && strcmp (_NL_CURRENT (LC_TIME, MON_1 + cnt), | |
| 364 month_name[cnt])) | |
| 365 *decided = loc; | |
| 366 break; | |
| 367 } | |
| 368 if (match_string (_NL_CURRENT (LC_TIME, ABMON_1 + cnt), rp)) | |
| 369 { | |
| 370 if (*decided == not | |
| 371 && strcmp (_NL_CURRENT (LC_TIME, ABMON_1 + cnt), | |
| 372 ab_month_name[cnt])) | |
| 373 *decided = loc; | |
| 374 break; | |
| 375 } | |
| 376 } | |
| 377 #endif | |
| 378 if (match_string (month_name[cnt], rp) | |
| 379 || match_string (ab_month_name[cnt], rp)) | |
| 380 { | |
| 381 *decided = raw; | |
| 382 break; | |
| 383 } | |
| 384 } | |
| 385 if (cnt == 12) | |
| 386 /* Does not match a month name. */ | |
| 387 return NULL; | |
| 388 tm->tm_mon = cnt; | |
| 389 want_xday = 1; | |
| 390 break; | |
| 391 case 'c': | |
| 392 /* Match locale's date and time format. */ | |
| 393 #ifdef _NL_CURRENT | |
| 394 if (*decided != raw) | |
| 395 { | |
| 396 if (!recursive (_NL_CURRENT (LC_TIME, D_T_FMT))) | |
| 397 { | |
| 398 if (*decided == loc) | |
| 399 return NULL; | |
| 400 else | |
| 401 rp = rp_backup; | |
| 402 } | |
| 403 else | |
| 404 { | |
| 405 if (*decided == not && | |
| 406 strcmp (_NL_CURRENT (LC_TIME, D_T_FMT), HERE_D_T_FMT)) | |
| 407 *decided = loc; | |
| 408 want_xday = 1; | |
| 409 break; | |
| 410 } | |
| 411 *decided = raw; | |
| 412 } | |
| 413 #endif | |
| 414 if (!recursive (HERE_D_T_FMT)) | |
| 415 return NULL; | |
| 416 want_xday = 1; | |
| 417 break; | |
| 418 case 'C': | |
| 419 /* Match century number. */ | |
| 420 #ifdef _NL_CURRENT | |
| 421 match_century: | |
| 422 #endif | |
| 423 get_number (0, 99, 2); | |
| 424 century = val; | |
| 425 want_xday = 1; | |
| 426 break; | |
| 427 case 'd': | |
| 428 case 'e': | |
| 429 /* Match day of month. */ | |
| 430 get_number (1, 31, 2); | |
| 431 tm->tm_mday = val; | |
| 432 have_mday = 1; | |
| 433 want_xday = 1; | |
| 434 break; | |
| 435 case 'F': | |
| 436 if (!recursive ("%Y-%m-%d")) | |
| 437 return NULL; | |
| 438 want_xday = 1; | |
| 439 break; | |
| 440 case 'x': | |
| 441 #ifdef _NL_CURRENT | |
| 442 if (*decided != raw) | |
| 443 { | |
| 444 if (!recursive (_NL_CURRENT (LC_TIME, D_FMT))) | |
| 445 { | |
| 446 if (*decided == loc) | |
| 447 return NULL; | |
| 448 else | |
| 449 rp = rp_backup; | |
| 450 } | |
| 451 else | |
| 452 { | |
| 453 if (*decided == not | |
| 454 && strcmp (_NL_CURRENT (LC_TIME, D_FMT), HERE_D_FMT)) | |
| 455 *decided = loc; | |
| 456 want_xday = 1; | |
| 457 break; | |
| 458 } | |
| 459 *decided = raw; | |
| 460 } | |
| 461 #endif | |
| 462 /* Fall through. */ | |
| 463 case 'D': | |
| 464 /* Match standard day format. */ | |
| 465 if (!recursive (HERE_D_FMT)) | |
| 466 return NULL; | |
| 467 want_xday = 1; | |
| 468 break; | |
| 469 case 'k': | |
| 470 case 'H': | |
| 471 /* Match hour in 24-hour clock. */ | |
| 472 get_number (0, 23, 2); | |
| 473 tm->tm_hour = val; | |
| 474 have_I = 0; | |
| 475 break; | |
| 476 case 'I': | |
| 477 /* Match hour in 12-hour clock. */ | |
| 478 get_number (1, 12, 2); | |
| 479 tm->tm_hour = val % 12; | |
| 480 have_I = 1; | |
| 481 break; | |
| 482 case 'j': | |
| 483 /* Match day number of year. */ | |
| 484 get_number (1, 366, 3); | |
| 485 tm->tm_yday = val - 1; | |
| 486 have_yday = 1; | |
| 487 break; | |
| 488 case 'm': | |
| 489 /* Match number of month. */ | |
| 490 get_number (1, 12, 2); | |
| 491 tm->tm_mon = val - 1; | |
| 492 have_mon = 1; | |
| 493 want_xday = 1; | |
| 494 break; | |
| 495 case 'M': | |
| 496 /* Match minute. */ | |
| 497 get_number (0, 59, 2); | |
| 498 tm->tm_min = val; | |
| 499 break; | |
| 500 case 'n': | |
| 501 case 't': | |
| 502 /* Match any white space. */ | |
| 503 while (isspace (*rp)) | |
| 504 ++rp; | |
| 505 break; | |
| 506 case 'p': | |
| 507 /* Match locale's equivalent of AM/PM. */ | |
| 508 #ifdef _NL_CURRENT | |
| 509 if (*decided != raw) | |
| 510 { | |
| 511 if (match_string (_NL_CURRENT (LC_TIME, AM_STR), rp)) | |
| 512 { | |
| 513 if (strcmp (_NL_CURRENT (LC_TIME, AM_STR), HERE_AM_STR)) | |
| 514 *decided = loc; | |
| 515 break; | |
| 516 } | |
| 517 if (match_string (_NL_CURRENT (LC_TIME, PM_STR), rp)) | |
| 518 { | |
| 519 if (strcmp (_NL_CURRENT (LC_TIME, PM_STR), HERE_PM_STR)) | |
| 520 *decided = loc; | |
| 521 is_pm = 1; | |
| 522 break; | |
| 523 } | |
| 524 *decided = raw; | |
| 525 } | |
| 526 #endif | |
| 527 if (!match_string (HERE_AM_STR, rp)) { | |
| 528 if (match_string (HERE_PM_STR, rp)) { | |
| 529 is_pm = 1; | |
| 530 } else { | |
| 531 return NULL; | |
| 532 } | |
| 533 } | |
| 534 break; | |
| 535 case 'r': | |
| 536 #ifdef _NL_CURRENT | |
| 537 if (*decided != raw) | |
| 538 { | |
| 539 if (!recursive (_NL_CURRENT (LC_TIME, T_FMT_AMPM))) | |
| 540 { | |
| 541 if (*decided == loc) | |
| 542 return NULL; | |
| 543 else | |
| 544 rp = rp_backup; | |
| 545 } | |
| 546 else | |
| 547 { | |
| 548 if (*decided == not && | |
| 549 strcmp (_NL_CURRENT (LC_TIME, T_FMT_AMPM), | |
| 550 HERE_T_FMT_AMPM)) | |
| 551 *decided = loc; | |
| 552 break; | |
| 553 } | |
| 554 *decided = raw; | |
| 555 } | |
| 556 #endif | |
| 557 if (!recursive (HERE_T_FMT_AMPM)) | |
| 558 return NULL; | |
| 559 break; | |
| 560 case 'R': | |
| 561 if (!recursive ("%H:%M")) | |
| 562 return NULL; | |
| 563 break; | |
| 564 case 's': | |
| 565 { | |
| 566 /* The number of seconds may be very high so we cannot use | |
| 567 the `get_number' macro. Instead read the number | |
| 568 character for character and construct the result while | |
| 569 doing this. */ | |
| 570 time_t secs = 0; | |
| 571 if (*rp < '0' || *rp > '9') | |
| 572 /* We need at least one digit. */ | |
| 573 return NULL; | |
| 574 | |
| 575 do | |
| 576 { | |
| 577 secs *= 10; | |
| 578 secs += *rp++ - '0'; | |
| 579 } | |
| 580 while (*rp >= '0' && *rp <= '9'); | |
| 581 | |
| 582 if (localtime_r (&secs, tm) == NULL) | |
| 583 /* Error in function. */ | |
| 584 return NULL; | |
| 585 } | |
| 586 break; | |
| 587 case 'S': | |
| 588 get_number (0, 61, 2); | |
| 589 tm->tm_sec = val; | |
| 590 break; | |
| 591 case 'X': | |
| 592 #ifdef _NL_CURRENT | |
| 593 if (*decided != raw) | |
| 594 { | |
| 595 if (!recursive (_NL_CURRENT (LC_TIME, T_FMT))) | |
| 596 { | |
| 597 if (*decided == loc) | |
| 598 return NULL; | |
| 599 else | |
| 600 rp = rp_backup; | |
| 601 } | |
| 602 else | |
| 603 { | |
| 604 if (strcmp (_NL_CURRENT (LC_TIME, T_FMT), HERE_T_FMT)) | |
| 605 *decided = loc; | |
| 606 break; | |
| 607 } | |
| 608 *decided = raw; | |
| 609 } | |
| 610 #endif | |
| 611 /* Fall through. */ | |
| 612 case 'T': | |
| 613 if (!recursive (HERE_T_FMT)) | |
| 614 return NULL; | |
| 615 break; | |
| 616 case 'u': | |
| 617 get_number (1, 7, 1); | |
| 618 tm->tm_wday = val % 7; | |
| 619 have_wday = 1; | |
| 620 break; | |
| 621 case 'g': | |
| 622 get_number (0, 99, 2); | |
| 623 /* XXX This cannot determine any field in TM. */ | |
| 624 break; | |
| 625 case 'G': | |
| 626 if (*rp < '0' || *rp > '9') | |
| 627 return NULL; | |
| 628 /* XXX Ignore the number since we would need some more | |
| 629 information to compute a real date. */ | |
| 630 do | |
| 631 ++rp; | |
| 632 while (*rp >= '0' && *rp <= '9'); | |
| 633 break; | |
| 634 case 'U': | |
| 635 case 'V': | |
| 636 case 'W': | |
| 637 get_number (0, 53, 2); | |
| 638 /* XXX This cannot determine any field in TM without some | |
| 639 information. */ | |
| 640 break; | |
| 641 case 'w': | |
| 642 /* Match number of weekday. */ | |
| 643 get_number (0, 6, 1); | |
| 644 tm->tm_wday = val; | |
| 645 have_wday = 1; | |
| 646 break; | |
| 647 case 'y': | |
| 648 #ifdef _NL_CURRENT | |
| 649 match_year_in_century: | |
| 650 #endif | |
| 651 /* Match year within century. */ | |
| 652 get_number (0, 99, 2); | |
| 653 /* The "Year 2000: The Millennium Rollover" paper suggests that | |
| 654 values in the range 69-99 refer to the twentieth century. */ | |
| 655 tm->tm_year = val >= 69 ? val : val + 100; | |
| 656 /* Indicate that we want to use the century, if specified. */ | |
| 657 want_century = 1; | |
| 658 want_xday = 1; | |
| 659 break; | |
| 660 case 'Y': | |
| 661 /* Match year including century number. */ | |
| 662 get_number (0, 9999, 4); | |
| 663 tm->tm_year = val - 1900; | |
| 664 want_century = 0; | |
| 665 want_xday = 1; | |
| 666 break; | |
| 667 case 'Z': | |
| 668 /* XXX How to handle this? */ | |
| 669 break; | |
| 670 case 'E': | |
| 671 #ifdef _NL_CURRENT | |
| 672 switch (*fmt++) | |
| 673 { | |
| 674 case 'c': | |
| 675 /* Match locale's alternate date and time format. */ | |
| 676 if (*decided != raw) | |
| 677 { | |
| 678 const char *fmt = _NL_CURRENT (LC_TIME, ERA_D_T_FMT); | |
| 679 | |
| 680 if (*fmt == '\0') | |
| 681 fmt = _NL_CURRENT (LC_TIME, D_T_FMT); | |
| 682 | |
| 683 if (!recursive (fmt)) | |
| 684 { | |
| 685 if (*decided == loc) | |
| 686 return NULL; | |
| 687 else | |
| 688 rp = rp_backup; | |
| 689 } | |
| 690 else | |
| 691 { | |
| 692 if (strcmp (fmt, HERE_D_T_FMT)) | |
| 693 *decided = loc; | |
| 694 want_xday = 1; | |
| 695 break; | |
| 696 } | |
| 697 *decided = raw; | |
| 698 } | |
| 699 /* The C locale has no era information, so use the | |
| 700 normal representation. */ | |
| 701 if (!recursive (HERE_D_T_FMT)) | |
| 702 return NULL; | |
| 703 want_xday = 1; | |
| 704 break; | |
| 705 case 'C': | |
| 706 if (*decided != raw) | |
| 707 { | |
| 708 if (era_cnt >= 0) | |
| 709 { | |
| 710 era = _nl_select_era_entry (era_cnt); | |
| 711 if (match_string (era->era_name, rp)) | |
| 712 { | |
| 713 *decided = loc; | |
| 714 break; | |
| 715 } | |
| 716 else | |
| 717 return NULL; | |
| 718 } | |
| 719 else | |
| 720 { | |
| 721 num_eras = _NL_CURRENT_WORD (LC_TIME, | |
| 722 _NL_TIME_ERA_NUM_ENTRIES); | |
| 723 for (era_cnt = 0; era_cnt < (int) num_eras; | |
| 724 ++era_cnt, rp = rp_backup) | |
| 725 { | |
| 726 era = _nl_select_era_entry (era_cnt); | |
| 727 if (match_string (era->era_name, rp)) | |
| 728 { | |
| 729 *decided = loc; | |
| 730 break; | |
| 731 } | |
| 732 } | |
| 733 if (era_cnt == (int) num_eras) | |
| 734 { | |
| 735 era_cnt = -1; | |
| 736 if (*decided == loc) | |
| 737 return NULL; | |
| 738 } | |
| 739 else | |
| 740 break; | |
| 741 } | |
| 742 | |
| 743 *decided = raw; | |
| 744 } | |
| 745 /* The C locale has no era information, so use the | |
| 746 normal representation. */ | |
| 747 goto match_century; | |
| 748 case 'y': | |
| 749 if (*decided == raw) | |
| 750 goto match_year_in_century; | |
| 751 | |
| 752 get_number(0, 9999, 4); | |
| 753 tm->tm_year = val; | |
| 754 want_era = 1; | |
| 755 want_xday = 1; | |
| 756 break; | |
| 757 case 'Y': | |
| 758 if (*decided != raw) | |
| 759 { | |
| 760 num_eras = _NL_CURRENT_WORD (LC_TIME, | |
| 761 _NL_TIME_ERA_NUM_ENTRIES); | |
| 762 for (era_cnt = 0; era_cnt < (int) num_eras; | |
| 763 ++era_cnt, rp = rp_backup) | |
| 764 { | |
| 765 era = _nl_select_era_entry (era_cnt); | |
| 766 if (recursive (era->era_format)) | |
| 767 break; | |
| 768 } | |
| 769 if (era_cnt == (int) num_eras) | |
| 770 { | |
| 771 era_cnt = -1; | |
| 772 if (*decided == loc) | |
| 773 return NULL; | |
| 774 else | |
| 775 rp = rp_backup; | |
| 776 } | |
| 777 else | |
| 778 { | |
| 779 *decided = loc; | |
| 780 era_cnt = -1; | |
| 781 break; | |
| 782 } | |
| 783 | |
| 784 *decided = raw; | |
| 785 } | |
| 786 get_number (0, 9999, 4); | |
| 787 tm->tm_year = val - 1900; | |
| 788 want_century = 0; | |
| 789 want_xday = 1; | |
| 790 break; | |
| 791 case 'x': | |
| 792 if (*decided != raw) | |
| 793 { | |
| 794 const char *fmt = _NL_CURRENT (LC_TIME, ERA_D_FMT); | |
| 795 | |
| 796 if (*fmt == '\0') | |
| 797 fmt = _NL_CURRENT (LC_TIME, D_FMT); | |
| 798 | |
| 799 if (!recursive (fmt)) | |
| 800 { | |
| 801 if (*decided == loc) | |
| 802 return NULL; | |
| 803 else | |
| 804 rp = rp_backup; | |
| 805 } | |
| 806 else | |
| 807 { | |
| 808 if (strcmp (fmt, HERE_D_FMT)) | |
| 809 *decided = loc; | |
| 810 break; | |
| 811 } | |
| 812 *decided = raw; | |
| 813 } | |
| 814 if (!recursive (HERE_D_FMT)) | |
| 815 return NULL; | |
| 816 break; | |
| 817 case 'X': | |
| 818 if (*decided != raw) | |
| 819 { | |
| 820 const char *fmt = _NL_CURRENT (LC_TIME, ERA_T_FMT); | |
| 821 | |
| 822 if (*fmt == '\0') | |
| 823 fmt = _NL_CURRENT (LC_TIME, T_FMT); | |
| 824 | |
| 825 if (!recursive (fmt)) | |
| 826 { | |
| 827 if (*decided == loc) | |
| 828 return NULL; | |
| 829 else | |
| 830 rp = rp_backup; | |
| 831 } | |
| 832 else | |
| 833 { | |
| 834 if (strcmp (fmt, HERE_T_FMT)) | |
| 835 *decided = loc; | |
| 836 break; | |
| 837 } | |
| 838 *decided = raw; | |
| 839 } | |
| 840 if (!recursive (HERE_T_FMT)) | |
| 841 return NULL; | |
| 842 break; | |
| 843 default: | |
| 844 return NULL; | |
| 845 } | |
| 846 break; | |
| 847 #else | |
| 848 /* We have no information about the era format. Just use | |
| 849 the normal format. */ | |
| 850 if (*fmt != 'c' && *fmt != 'C' && *fmt != 'y' && *fmt != 'Y' | |
| 851 && *fmt != 'x' && *fmt != 'X') | |
| 852 /* This is an illegal format. */ | |
| 853 return NULL; | |
| 854 | |
| 855 goto start_over; | |
| 856 #endif | |
| 857 case 'O': | |
| 858 switch (*fmt++) | |
| 859 { | |
| 860 case 'd': | |
| 861 case 'e': | |
| 862 /* Match day of month using alternate numeric symbols. */ | |
| 863 get_alt_number (1, 31, 2); | |
| 864 tm->tm_mday = val; | |
| 865 have_mday = 1; | |
| 866 want_xday = 1; | |
| 867 break; | |
| 868 case 'H': | |
| 869 /* Match hour in 24-hour clock using alternate numeric | |
| 870 symbols. */ | |
| 871 get_alt_number (0, 23, 2); | |
| 872 tm->tm_hour = val; | |
| 873 have_I = 0; | |
| 874 break; | |
| 875 case 'I': | |
| 876 /* Match hour in 12-hour clock using alternate numeric | |
| 877 symbols. */ | |
| 878 get_alt_number (1, 12, 2); | |
| 879 tm->tm_hour = val - 1; | |
| 880 have_I = 1; | |
| 881 break; | |
| 882 case 'm': | |
| 883 /* Match month using alternate numeric symbols. */ | |
| 884 get_alt_number (1, 12, 2); | |
| 885 tm->tm_mon = val - 1; | |
| 886 have_mon = 1; | |
| 887 want_xday = 1; | |
| 888 break; | |
| 889 case 'M': | |
| 890 /* Match minutes using alternate numeric symbols. */ | |
| 891 get_alt_number (0, 59, 2); | |
| 892 tm->tm_min = val; | |
| 893 break; | |
| 894 case 'S': | |
| 895 /* Match seconds using alternate numeric symbols. */ | |
| 896 get_alt_number (0, 61, 2); | |
| 897 tm->tm_sec = val; | |
| 898 break; | |
| 899 case 'U': | |
| 900 case 'V': | |
| 901 case 'W': | |
| 902 get_alt_number (0, 53, 2); | |
| 903 /* XXX This cannot determine any field in TM without | |
| 904 further information. */ | |
| 905 break; | |
| 906 case 'w': | |
| 907 /* Match number of weekday using alternate numeric symbols. */ | |
| 908 get_alt_number (0, 6, 1); | |
| 909 tm->tm_wday = val; | |
| 910 have_wday = 1; | |
| 911 break; | |
| 912 case 'y': | |
| 913 /* Match year within century using alternate numeric symbols. */ | |
| 914 get_alt_number (0, 99, 2); | |
| 915 tm->tm_year = val >= 69 ? val : val + 100; | |
| 916 want_xday = 1; | |
| 917 break; | |
| 918 default: | |
| 919 return NULL; | |
| 920 } | |
| 921 break; | |
| 922 default: | |
| 923 return NULL; | |
| 924 } | |
| 925 } | |
| 926 | |
| 927 if (have_I && is_pm) | |
| 928 tm->tm_hour += 12; | |
| 929 | |
| 930 if (century != -1) | |
| 931 { | |
| 932 if (want_century) | |
| 933 tm->tm_year = tm->tm_year % 100 + (century - 19) * 100; | |
| 934 else | |
| 935 /* Only the century, but not the year. Strange, but so be it. */ | |
| 936 tm->tm_year = (century - 19) * 100; | |
| 937 } | |
| 938 | |
| 939 #ifdef _NL_CURRENT | |
| 940 if (era_cnt != -1) | |
| 941 { | |
| 942 era = _nl_select_era_entry(era_cnt); | |
| 943 if (want_era) | |
| 944 tm->tm_year = (era->start_date[0] | |
| 945 + ((tm->tm_year - era->offset) | |
| 946 * era->absolute_direction)); | |
| 947 else | |
| 948 /* Era start year assumed. */ | |
| 949 tm->tm_year = era->start_date[0]; | |
| 950 } | |
| 951 else | |
| 952 #endif | |
| 953 if (want_era) | |
| 954 return NULL; | |
| 955 | |
| 956 if (want_xday && !have_wday) | |
| 957 { | |
| 958 if ( !(have_mon && have_mday) && have_yday) | |
| 959 { | |
| 960 /* We don't have tm_mon and/or tm_mday, compute them. */ | |
| 961 int t_mon = 0; | |
| 962 while (__mon_yday[__isleap(1900 + tm->tm_year)][t_mon] <= tm->tm_yday) | |
| 963 t_mon++; | |
| 964 if (!have_mon) | |
| 965 tm->tm_mon = t_mon - 1; | |
| 966 if (!have_mday) | |
| 967 tm->tm_mday = | |
| 968 (tm->tm_yday | |
| 969 - __mon_yday[__isleap(1900 + tm->tm_year)][t_mon - 1] + 1); | |
| 970 } | |
| 971 day_of_the_week (tm); | |
| 972 } | |
| 973 if (want_xday && !have_yday) | |
| 974 day_of_the_year (tm); | |
| 975 | |
| 976 return discard_const_p(char, rp); | |
| 977 } | |
| 978 | |
| 979 | |
| 980 char *rep_strptime(const char *buf, const char *format, struct tm *tm) | |
| 981 { | |
| 982 enum locale_status decided; | |
| 983 | |
| 984 #ifdef _NL_CURRENT | |
| 985 decided = not; | |
| 986 #else | |
| 987 decided = raw; | |
| 988 #endif | |
| 989 return strptime_internal (buf, format, tm, &decided, -1); | |
| 990 } | |
| OLD | NEW |
|---|
Chromium Code Reviews
Issue 2282793002:
Remove unused third_party/talloc (Closed)
