118   char *tzenv;  in _tzset_unlocked()  local
126   if ((tzenv = getenv ("TZ")) == NULL)  in _tzset_unlocked()
146   if (*tzenv == ':')  in _tzset_unlocked()
147     ++tzenv;    in _tzset_unlocked()
150   if (*tzenv == '<')  in _tzset_unlocked()
152       ++tzenv;  in _tzset_unlocked()
155       if (sscanf (tzenv, "%11[-+0-9A-Za-z]%n", __tzname_std, &n) <= 0  in _tzset_unlocked()
156 		|| n < TZNAME_MIN || TZNAME_MAX < n || '>' != tzenv[n])  in _tzset_unlocked()
159       ++tzenv;	/* bump for close quote '>' */  in _tzset_unlocked()
164       if (sscanf (tzenv, "%11[A-Za-z]%n", __tzname_std, &n) <= 0  in _tzset_unlocked()
169   tzenv += n;  in _tzset_unlocked()
172   if (*tzenv == '-')  in _tzset_unlocked()
175       ++tzenv;  in _tzset_unlocked()
177   else if (*tzenv == '+')  in _tzset_unlocked()
178     ++tzenv;  in _tzset_unlocked()
183   if (sscanf (tzenv, "%hu%n:%hu%n:%hu%n", &hh, &n, &mm, &n, &ss, &n) < 1)  in _tzset_unlocked()
187   tzenv += n;  in _tzset_unlocked()
190   if (*tzenv == '<')  in _tzset_unlocked()
192       ++tzenv;  in _tzset_unlocked()
195       if (sscanf (tzenv, "%11[-+0-9A-Za-z]%n", __tzname_dst, &n) <= 0 && tzenv[0] == '>')  in _tzset_unlocked()
203       else if (n < TZNAME_MIN || TZNAME_MAX < n || '>' != tzenv[n])  in _tzset_unlocked()
208       ++tzenv;	/* bump for close quote '>' */  in _tzset_unlocked()
213       if (sscanf (tzenv, "%11[A-Za-z]%n", __tzname_dst, &n) <= 0)  in _tzset_unlocked()
227   tzenv += n;  in _tzset_unlocked()
231   if (*tzenv == '-')  in _tzset_unlocked()
234       ++tzenv;  in _tzset_unlocked()
236   else if (*tzenv == '+')  in _tzset_unlocked()
237     ++tzenv;  in _tzset_unlocked()
244   if (sscanf (tzenv, "%hu%n:%hu%n:%hu%n", &hh, &n, &mm, &n, &ss, &n) <= 0)  in _tzset_unlocked()
249   tzenv += n;  in _tzset_unlocked()
253       if (*tzenv == ',')  in _tzset_unlocked()
254         ++tzenv;  in _tzset_unlocked()
256       if (*tzenv == 'M')  in _tzset_unlocked()
258 	  if (sscanf (tzenv, "M%hu%n.%hu%n.%hu%n", &m, &n, &w, &n, &d, &n) != 3 ||  in _tzset_unlocked()
267 	  tzenv += n;  in _tzset_unlocked()
272 	  if (*tzenv == 'J')  in _tzset_unlocked()
275 	      ++tzenv;  in _tzset_unlocked()
280 	  d = strtoul (tzenv, &end, 10);  in _tzset_unlocked()
285 	  if (end == tzenv)  in _tzset_unlocked()
308 	  tzenv = end;  in _tzset_unlocked()
317       if (*tzenv == '/')  in _tzset_unlocked()
318 	if (sscanf (tzenv, "/%hu%n:%hu%n:%hu%n", &hh, &n, &mm, &n, &ss, &n) <= 0)  in _tzset_unlocked()
328       tzenv += n;  in _tzset_unlocked()