Function tzparse

localtime.c:1631–1811

*/

static bool
tzparse(const char *name, struct state *sp, struct state const *basep)
{
	const char *			stdname;
	const char *			dstname;
	int_fast32_t			stdoffset;
	int_fast32_t			dstoffset;
	register char *			cp;
	ptrdiff_t stdlen, dstlen, charcnt;
	time_t atlo = TIME_T_MIN, leaplo = TIME_T_MIN;

	stdname = name;
	if (*name == '<') {
	  name++;
	  stdname = name;
	  name = getqzname(name, '>');
	  if (*name != '>')
	    return false;
	  stdlen = name - stdname;
	  name++;
	} else {
	  name = getzname(name);
	  stdlen = name - stdname;
	}
	if (! (0 < stdlen && stdlen <= TZNAME_MAXIMUM))
	  return false;
	name = getoffset(name, &stdoffset);
	if (name == NULL)
	  return false;
	charcnt = stdlen + 1;
	if (basep) {
	  if (0 < basep->timecnt)
	    atlo = basep->ats[basep->timecnt - 1];
	  set_leapcount(sp, leapcount(basep));
	  if (0 < leapcount(sp)) {
	    int i;
	    for (i = 0; i < leapcount(sp); i++)
	      set_lsinfo(sp, i, lsinfo(basep, i));
	    leaplo = lsinfo(sp, leapcount(sp) - 1).ls_trans;
	  }
	} else
	  set_leapcount(sp, 0);	/* So, we're off a little.  */
	sp->goback = sp->goahead = false;
	if (*name != '\0') {
		struct rule start, end;
		int year, yearbeg, yearlim, timecnt;
		time_t janfirst;
		int_fast32_t janoffset = 0;

		if (*name == '<') {
			dstname = ++name;
			name = getqzname(name, '>');
			if (*name != '>')
			  return false;
			dstlen = name - dstname;
			name++;
		} else {
			dstname = name;