/*
 * $Copyright:	$
 * Copyright (c) 1984, 1985, 1986, 1987, 1988, 1989, 1990 
 * Sequent Computer Systems, Inc.   All rights reserved.
 *  
 * This software is furnished under a license and may be used
 * only in accordance with the terms of that license and with the
 * inclusion of the above copyright notice.   This software may not
 * be provided or otherwise made available to, or used by, any
 * other person.  No title to or ownership of the software is
 * hereby transferred."
 *
 */
/*	Copyright (c) 1984 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.	*/

/*
 * Copyright  (c) 1985 AT&T
 *	All Rights Reserved
 */
#ident	"$Header: dispfuncs.c 1.2 89/10/10 $@(#)vm.oh:src/oh/dispfuncs.c	1.4"

#include <stdio.h>
#include "tsys.h"
#include "typetab.h"
#include "partabdefs.h"
#include "var_arrays.h"
#include "terror.h"
#include	"moremacros.h"

#define START_OBJS	20

static char **All_objtypes;
static char **All_displays;

char *
def_display(objtype)
char *objtype;
{
	register int i, size;
	struct opt_entry *opt, *obj_to_parts();

	if (!All_objtypes) {
		All_objtypes = (char **)array_create(sizeof(char *), START_OBJS);
		All_displays = (char **)array_create(sizeof(char *), START_OBJS);
	}
	size = array_len(All_objtypes);
	for (i = 0; i < size; i++)
		if (strcmp(All_objtypes[i], objtype) == 0)
			return(All_displays[i]);

	/* not found, append new */
	All_objtypes = (char **)array_append(All_objtypes, NULL);

	All_objtypes[size] = strsave(objtype);

	if (opt = obj_to_parts(objtype)) {
		All_displays = (char **)array_append(All_displays, NULL);
		All_displays[size] = strsave(opt->objdisp);
	} else {
		All_displays = (char **)array_append(All_displays, NULL);
		All_displays[size] = "Data file";
	}

	return(All_displays[size]);
}

char *
def_objtype(objtype)
char *objtype;
{
	register int i, size;
	struct opt_entry *opt, *obj_to_parts();

	if (!All_objtypes) {
		All_objtypes = (char **)array_create(sizeof(char *), START_OBJS);
		All_displays = (char **)array_create(sizeof(char *), START_OBJS);
	}

	size = array_len(All_objtypes);

	for (i = 0; i < size; i++)
		if (strcmp(All_objtypes[i], objtype) == 0)
			return(All_objtypes[i]);

	/* not found, append new */

	All_objtypes = (char **)array_append(All_objtypes, NULL);
	/* ehr 3
	if (All_objtypes[size])
		free(All_objtypes[size]);
	*/
	All_objtypes[size] = strsave(objtype);

	if (opt = obj_to_parts(objtype)) {
		All_displays = (char **)array_append(All_displays, NULL);
		/* ehr3
		if (All_objtypes[size])
			free(All_objtypes[size]);
		*/
		All_displays[size] = strsave(opt->objdisp);
	} else {
		All_displays = (char **)array_append(All_displays, NULL);
		All_displays[size] = "Data file";
	}

	return(All_objtypes[size]);
}
