getsyntx.c revision 7c478bd95313f5f23a4c958a745db2134aa03244
/*
* 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
* 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 (c) 1996, by Sun Microsystems, Inc.
* All rights reserved.
*/
#pragma ident "%Z%%M% %I% %E% SMI"
/*
* Dummy version of getsyntx() from C/370.
* This version simply uses the external variable VARIANTS, and assigns them
* to the variant structure.
* This is a dummy routine, that would not actually run on any production
* system.
*
* Copyright 1993 by Mortice Kern Systems Inc. All rights reserved.
*
*/
#ifdef M_RCSID
#ifndef lint
static char const rcsID[] = "$Header: /rd/src/libc/mks/rcs/getsyntx.c 1.4 1995/04/19 23:04:55 ross Exp $";
#endif /* lint */
#endif /* M_RCSID */
#include <mks.h>
#include <variant.h>
#include <stdlib.h>
struct variant *
getsyntx(void)
{
static struct variant v;
static char const var[] = "\\][}{^~!#|$@`";
char const *e;
e = var;
else if (strlen(e) != 13) {
m_error("getsyntx: environment variable VARIANTS: must be exactly 13 bytes long");
return NULL;
}
v.backslash = e[0];
v.right_bracket = e[1];
v.left_bracket = e[2];
v.right_brace = e[3];
v.left_brace = e[4];
v.circumflex = e[5];
v.tilde = e[6];
v.exclamation_mark = e[7];
v.number_sign = e[8];
v.vertical_line = e[9];
v.dollar_sign = e[10];
v.commercial_at = e[11];
v.grave_accent = e[12];
return &v;
}