/*
 * CDDL HEADER START
 *
 * The contents of this file are subject to the terms of the
 * Common Development and Distribution License, Version 1.0 only
 * (the "License").  You may not use this file except in compliance
 * with the License.
 *
 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
 * or http://www.opensolaris.org/os/licensing.
 * See the License for the specific language governing permissions
 * and limitations under the License.
 *
 * When distributing Covered Code, include this CDDL HEADER in each
 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
 * If applicable, add the following below this CDDL HEADER, with the
 * fields enclosed by brackets "[]" replaced with your own identifying
 * information: Portions Copyright [yyyy] [name of copyright owner]
 *
 * CDDL HEADER END
 *
 * Copyright 1992 Sun Microsystems, Inc.  All rights reserved.
 * Use is subject to license terms.
 */

/*	Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989 AT&T */
/*	  All Rights Reserved   */

/*
 * Portions of this source code were derived from Berkeley
 * under license from the Regents of the University of
 * California.
 */

#include <stdio.h>
#include <stdlib.h>
#include "ypsym.h"

extern void free();
extern char *strdup();

/*
 * Add a name to the list
 */
static listofnames *
newname(str)
char *str;
{
	listofnames *it;
	char *copy;

	if (str == NULL)
		return (NULL);
	copy = strdup(str);
	if (copy == NULL)
		return (NULL);
	it = (listofnames *) malloc(sizeof (listofnames));
	if (it == NULL) {
		free(copy);
		return (NULL);
	}
	it->name = copy;
	it->nextname = NULL;
	return (it);
}

/*
 * Assemble the list of names
 */
listofnames *
names(filename)
char *filename;
{
	listofnames *nameslist;
	listofnames *end;
	listofnames *nname;
	FILE *fyle;
	char line[256];
	char name[256];

	fyle = fopen(filename, "r");
	if (fyle == NULL) {
		return (NULL);
	}
	nameslist = NULL;
	while (fgets(line, sizeof (line), fyle)) {
		if (line[0] == '#') continue;
		if (line[0] == '\0') continue;
		if (line[0] == '\n') continue;
		nname = newname(line);
		if (nname) {
			if (nameslist == NULL) {
					nameslist = nname;
					end = nname;
			} else {
				end->nextname = nname;
				end = nname;
			}
		} else
			fprintf(stderr,
		"file %s bad malloc %s\n", filename, name);
	}
	fclose(fyle);
	return (nameslist);
}

void
free_listofnames(locallist)
listofnames *locallist;
{
	listofnames *next = (listofnames *)NULL;

	for (; locallist; locallist = next) {
		next = locallist->nextname;
		if (locallist->name)
			free(locallist->name);
		free((char *)locallist);
	}
}


#ifdef MAIN
main(argc, argv)
char **argv;
{
	listofnames *list;
	list = names(argv[1]);
#ifdef DEBUG
	print_listofnames(list);
#endif
	free_listofnames(list);
#ifdef DEBUG
	printf("Done\n");
#endif
}
#endif

#ifdef DEBUG
void
print_listofnames(list)
listofnames *list;
{
	if (list == NULL)
		printf("NULL\n");
	for (; list; list = list->nextname)
		printf("%s\n", list->name);
}
#endif