/*
 * |-----------------------------------------------------------|
 * | Copyright (c) 1991, 1990 MIPS Computer Systems, Inc.      |
 * | All Rights Reserved                                       |
 * |-----------------------------------------------------------|
 * |          Restricted Rights Legend                         |
 * | Use, duplication, or disclosure by the Government is      |
 * | subject to restrictions as set forth in                   |
 * | subparagraph (c)(1)(ii) of the Rights in Technical        |
 * | Data and Computer Software Clause of DFARS 252.227-7013.  |
 * |         MIPS Computer Systems, Inc.                       |
 * |         950 DeGuigne Avenue                               |
 * |         Sunnyvale, California 94088-3650, USA             |
 * |-----------------------------------------------------------|
 */
#ident	"$Header: _set_tab.c,v 1.2.2.1 92/06/24 14:01:06 marker Exp $"

/*	Copyright (c) 1988 AT&T	*/
/*	  All Rights Reserved  	*/

/*	THIS IS UNPUBLISHED PROPRIETARY SOURCE CODE OF AT&T	*/
/*	The copyright notice above does not evidence any   	*/
/*	actual or intended publication of such source code.	*/


/*
* _set_tab - set _ctype[], _numeric[] to requested locale-based info.
*/
#include "_locale.h"
#include <string.h>
#include <fcntl.h>

int
_set_tab(loc, cat)
char *loc;
int cat;
{
	unsigned char my_ctype[SZ_TOTAL];
	static char name[2][11] = { "LC_CTYPE", "LC_NUMERIC" };
	static unsigned char *tab[2] = { _ctype, _numeric };
	int size;
	register int fd, ret;

	size = (cat ? SZ_NUMERIC : SZ_TOTAL);
	if ((fd = open(_fullocale(loc, name[cat]), O_RDONLY)) == -1
	   || read(fd, (char *)my_ctype, size) != size) 
		ret = -1;
	else
	{
		(void)memcpy(tab[cat], my_ctype, size);
		ret = 0;
	}
	(void)close(fd);
	return ret;
}
