tmtype.c revision 3e14f97f673e8a630f076077de35afdd43dc1587
/***********************************************************************
* *
* This software is part of the ast package *
* Copyright (c) 1985-2010 AT&T Intellectual Property *
* and is licensed under the *
* Common Public License, Version 1.0 *
* by AT&T Intellectual Property *
* *
* A copy of the License is available at *
* http://www.opensource.org/licenses/cpl1.0.txt *
* (with md5 checksum 059e8cd6165cb4c31e351f2b69388fd9) *
* *
* Information and Software Systems Research *
* AT&T Research *
* Florham Park NJ *
* *
* Glenn Fowler <gsf@research.att.com> *
* David Korn <dgk@research.att.com> *
* Phong Vo <kpv@research.att.com> *
* *
***********************************************************************/
#pragma prototyped
/*
* Glenn Fowler
* AT&T Bell Laboratories
*
* time conversion support
*/
#include <ast.h>
#include <tm.h>
/*
* return the tm_data.zone[] time zone entry for type s
*
* if e is non-null then it will point to the first
* unmatched char in s
*
* 0 returned for no match
*/
Tm_zone_t*
tmtype(register const char* s, char** e)
{
register Tm_zone_t* zp;
register char* t;
tmset(tm_info.zone);
zp = tm_info.local;
do
{
if ((t = zp->type) && tmword(s, e, t, NiL, 0)) return(zp);
if (zp == tm_info.local) zp = tm_data.zone;
else zp++;
} while (zp->standard);
return(0);
}