1*7c478bd9Sstevel@tonic-gate /* 2*7c478bd9Sstevel@tonic-gate * CDDL HEADER START 3*7c478bd9Sstevel@tonic-gate * 4*7c478bd9Sstevel@tonic-gate * The contents of this file are subject to the terms of the 5*7c478bd9Sstevel@tonic-gate * Common Development and Distribution License, Version 1.0 only 6*7c478bd9Sstevel@tonic-gate * (the "License"). You may not use this file except in compliance 7*7c478bd9Sstevel@tonic-gate * with the License. 8*7c478bd9Sstevel@tonic-gate * 9*7c478bd9Sstevel@tonic-gate * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE 10*7c478bd9Sstevel@tonic-gate * or http://www.opensolaris.org/os/licensing. 11*7c478bd9Sstevel@tonic-gate * See the License for the specific language governing permissions 12*7c478bd9Sstevel@tonic-gate * and limitations under the License. 13*7c478bd9Sstevel@tonic-gate * 14*7c478bd9Sstevel@tonic-gate * When distributing Covered Code, include this CDDL HEADER in each 15*7c478bd9Sstevel@tonic-gate * file and include the License file at usr/src/OPENSOLARIS.LICENSE. 16*7c478bd9Sstevel@tonic-gate * If applicable, add the following below this CDDL HEADER, with the 17*7c478bd9Sstevel@tonic-gate * fields enclosed by brackets "[]" replaced with your own identifying 18*7c478bd9Sstevel@tonic-gate * information: Portions Copyright [yyyy] [name of copyright owner] 19*7c478bd9Sstevel@tonic-gate * 20*7c478bd9Sstevel@tonic-gate * CDDL HEADER END 21*7c478bd9Sstevel@tonic-gate */ 22*7c478bd9Sstevel@tonic-gate /* 23*7c478bd9Sstevel@tonic-gate * Copyright (c) 1996, by Sun Microsystems, Inc. 24*7c478bd9Sstevel@tonic-gate * All rights reserved. 25*7c478bd9Sstevel@tonic-gate */ 26*7c478bd9Sstevel@tonic-gate 27*7c478bd9Sstevel@tonic-gate /* 28*7c478bd9Sstevel@tonic-gate * Dummy version of getsyntx() from C/370. 29*7c478bd9Sstevel@tonic-gate * This version simply uses the external variable VARIANTS, and assigns them 30*7c478bd9Sstevel@tonic-gate * to the variant structure. 31*7c478bd9Sstevel@tonic-gate * This is a dummy routine, that would not actually run on any production 32*7c478bd9Sstevel@tonic-gate * system. 33*7c478bd9Sstevel@tonic-gate * 34*7c478bd9Sstevel@tonic-gate * Copyright 1993 by Mortice Kern Systems Inc. All rights reserved. 35*7c478bd9Sstevel@tonic-gate * 36*7c478bd9Sstevel@tonic-gate */ 37*7c478bd9Sstevel@tonic-gate #ifdef M_RCSID 38*7c478bd9Sstevel@tonic-gate #ifndef lint 39*7c478bd9Sstevel@tonic-gate static char const rcsID[] = "$Header: /rd/src/libc/mks/rcs/getsyntx.c 1.4 1995/04/19 23:04:55 ross Exp $"; 40*7c478bd9Sstevel@tonic-gate #endif /* lint */ 41*7c478bd9Sstevel@tonic-gate #endif /* M_RCSID */ 42*7c478bd9Sstevel@tonic-gate 43*7c478bd9Sstevel@tonic-gate #include <mks.h> 44*7c478bd9Sstevel@tonic-gate #include <variant.h> 45*7c478bd9Sstevel@tonic-gate #include <stdlib.h> 46*7c478bd9Sstevel@tonic-gate 47*7c478bd9Sstevel@tonic-gate struct variant * getsyntx(void)48*7c478bd9Sstevel@tonic-gategetsyntx(void) 49*7c478bd9Sstevel@tonic-gate { 50*7c478bd9Sstevel@tonic-gate static struct variant v; 51*7c478bd9Sstevel@tonic-gate static char const var[] = "\\][}{^~!#|$@`"; 52*7c478bd9Sstevel@tonic-gate char const *e; 53*7c478bd9Sstevel@tonic-gate 54*7c478bd9Sstevel@tonic-gate if ((e = __m_getenv("VARIANTS")) == NULL || *e == '\0') 55*7c478bd9Sstevel@tonic-gate e = var; 56*7c478bd9Sstevel@tonic-gate else if (strlen(e) != 13) { 57*7c478bd9Sstevel@tonic-gate m_error("getsyntx: environment variable VARIANTS: must be exactly 13 bytes long"); 58*7c478bd9Sstevel@tonic-gate return NULL; 59*7c478bd9Sstevel@tonic-gate } 60*7c478bd9Sstevel@tonic-gate v.backslash = e[0]; 61*7c478bd9Sstevel@tonic-gate v.right_bracket = e[1]; 62*7c478bd9Sstevel@tonic-gate v.left_bracket = e[2]; 63*7c478bd9Sstevel@tonic-gate v.right_brace = e[3]; 64*7c478bd9Sstevel@tonic-gate v.left_brace = e[4]; 65*7c478bd9Sstevel@tonic-gate v.circumflex = e[5]; 66*7c478bd9Sstevel@tonic-gate v.tilde = e[6]; 67*7c478bd9Sstevel@tonic-gate v.exclamation_mark = e[7]; 68*7c478bd9Sstevel@tonic-gate v.number_sign = e[8]; 69*7c478bd9Sstevel@tonic-gate v.vertical_line = e[9]; 70*7c478bd9Sstevel@tonic-gate v.dollar_sign = e[10]; 71*7c478bd9Sstevel@tonic-gate v.commercial_at = e[11]; 72*7c478bd9Sstevel@tonic-gate v.grave_accent = e[12]; 73*7c478bd9Sstevel@tonic-gate return &v; 74*7c478bd9Sstevel@tonic-gate } 75