/*
 * Copyright (c) 1994  Sony Corporation
 *
 * Permission is hereby granted, free of charge, to any person obtaining
 * a copy of this software and associated documentation files (the
 * "Software"), to deal in the Software without restriction, including
 * without limitation the rights to use, copy, modify, merge, publish,
 * distribute, sublicense, and/or sell copies of the Software, and to
 * permit persons to whom the Software is furnished to do so, subject to
 * the following conditions:
 *
 * The above copyright notice and this permission notice shall be
 * included in all copies or substantial portions of the Software.
 *
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
 * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
 * IN NO EVENT SHALL SONY CORPORATION BE LIABLE FOR ANY CLAIM,
 * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR
 * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR
 * THE USE OR OTHER DEALINGS IN THE SOFTWARE.
 *
 * Except as contained in this notice, the name of Sony Corporation
 * shall not be used in advertising or otherwise to promote the sale, use
 * or other dealings in this Software without prior written authorization
 * from Sony Corporation.
 *
 */

#include "sj2.h"
#define LINESIZE 128

#include <string.h>
#include <unistd.h>

static char* getttys();
static char* ttys = "/etc/ttys";

#define NULL 0

nmttyslot(name) char* name;
{
	char *tp, *p;
	int   s, tf;

	tp = name;

	if((p = strrchr(tp, '/')) == NULL)
		p = tp;
	else
		p++;
	if((tf = open(ttys, 0)) < 0)
		return (0);
	s = 0;
	while(tp = getttys(tf)) {
		s++;
		if(strcmp(p, tp) == 0) {
			close(tf);
			return (s);
		}
	}
	close(tf);
	return (0);
}

static char*
    getttys(f)
int f;
{
	static char line[LINESIZE];
	char*	    lp;
top:
	for(lp = line; lp < &line[LINESIZE]; lp++) {
		if(read(f, lp, 1) != 1)
			return (NULL);
		if(*lp == '\n') {
			*lp = '\0';
			break;
		} else if(*lp == ' ' || *lp == '\t') {

			while(1) {
				if(read(f, lp, 1) != 1)
					break;
				if(*lp == '\n')
					break;
			}
			*lp = '\0';
			break;
		}
	}
	lp = line;
	if(*lp == '0' || *lp == '1')
		lp += 2;
	else if(*lp == '#')
		goto top;
	return (lp);
}