Blame src/lib/libast/vec/vecfile.c

Packit Service a8c26c
/***********************************************************************
Packit Service a8c26c
*                                                                      *
Packit Service a8c26c
*               This software is part of the ast package               *
Packit Service a8c26c
*          Copyright (c) 1985-2012 AT&T Intellectual Property          *
Packit Service a8c26c
*                      and is licensed under the                       *
Packit Service a8c26c
*                 Eclipse Public License, Version 1.0                  *
Packit Service a8c26c
*                    by AT&T Intellectual Property                     *
Packit Service a8c26c
*                                                                      *
Packit Service a8c26c
*                A copy of the License is available at                 *
Packit Service a8c26c
*          http://www.eclipse.org/org/documents/epl-v10.html           *
Packit Service a8c26c
*         (with md5 checksum b35adb5213ca9657e911e9befb180842)         *
Packit Service a8c26c
*                                                                      *
Packit Service a8c26c
*              Information and Software Systems Research               *
Packit Service a8c26c
*                            AT&T Research                             *
Packit Service a8c26c
*                           Florham Park NJ                            *
Packit Service a8c26c
*                                                                      *
Packit Service a8c26c
*                 Glenn Fowler <gsf@research.att.com>                  *
Packit Service a8c26c
*                  David Korn <dgk@research.att.com>                   *
Packit Service a8c26c
*                   Phong Vo <kpv@research.att.com>                    *
Packit Service a8c26c
*                                                                      *
Packit Service a8c26c
***********************************************************************/
Packit Service a8c26c
#pragma prototyped
Packit Service a8c26c
/*
Packit Service a8c26c
 * Glenn Fowler
Packit Service a8c26c
 * AT&T Research
Packit Service a8c26c
 *
Packit Service a8c26c
 * string vector load support
Packit Service a8c26c
 */
Packit Service a8c26c
Packit Service a8c26c
#include <ast.h>
Packit Service a8c26c
#include <ls.h>
Packit Service a8c26c
#include <vecargs.h>
Packit Service a8c26c
Packit Service a8c26c
/*
Packit Service a8c26c
 * load a string vector from lines in file
Packit Service a8c26c
 */
Packit Service a8c26c
Packit Service a8c26c
char**
Packit Service a8c26c
vecfile(const char* file)
Packit Service a8c26c
{
Packit Service a8c26c
	register int	n;
Packit Service a8c26c
	register char*	buf;
Packit Service a8c26c
	register char**	vec;
Packit Service a8c26c
	int		fd;
Packit Service a8c26c
	struct stat	st;
Packit Service a8c26c
Packit Service a8c26c
	vec = 0;
Packit Service a8c26c
	if ((fd = open(file, O_RDONLY|O_cloexec)) >= 0)
Packit Service a8c26c
	{
Packit Service a8c26c
		if (!fstat(fd, &st) && S_ISREG(st.st_mode) && (n = st.st_size) > 0 && (buf = newof(0, char, n + 1, 0)))
Packit Service a8c26c
		{
Packit Service a8c26c
			if (read(fd, buf, n) == n)
Packit Service a8c26c
			{
Packit Service a8c26c
				buf[n] = 0;
Packit Service a8c26c
				vec = vecload(buf);
Packit Service a8c26c
			}
Packit Service a8c26c
			if (!vec) free(buf);
Packit Service a8c26c
		}
Packit Service a8c26c
		close(fd);
Packit Service a8c26c
	}
Packit Service a8c26c
	return(vec);
Packit Service a8c26c
}