Home | History | Annotate | Line # | Download | only in tset
      1 /*	$NetBSD: map.c,v 1.13 2011/09/06 18:34:12 joerg Exp $	*/
      2 
      3 /*-
      4  * Copyright (c) 1991, 1993
      5  *	The Regents of the University of California.  All rights reserved.
      6  *
      7  * Redistribution and use in source and binary forms, with or without
      8  * modification, are permitted provided that the following conditions
      9  * are met:
     10  * 1. Redistributions of source code must retain the above copyright
     11  *    notice, this list of conditions and the following disclaimer.
     12  * 2. Redistributions in binary form must reproduce the above copyright
     13  *    notice, this list of conditions and the following disclaimer in the
     14  *    documentation and/or other materials provided with the distribution.
     15  * 3. Neither the name of the University nor the names of its contributors
     16  *    may be used to endorse or promote products derived from this software
     17  *    without specific prior written permission.
     18  *
     19  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     20  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     21  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     22  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     23  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     24  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     25  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     26  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     27  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     28  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     29  * SUCH DAMAGE.
     30  */
     31 
     32 #include <sys/cdefs.h>
     33 #ifndef lint
     34 #if 0
     35 static char sccsid[] = "@(#)map.c	8.1 (Berkeley) 6/9/93";
     36 #endif
     37 __RCSID("$NetBSD: map.c,v 1.13 2011/09/06 18:34:12 joerg Exp $");
     38 #endif /* not lint */
     39 
     40 #include <sys/types.h>
     41 #include <err.h>
     42 #include <errno.h>
     43 #include <stdlib.h>
     44 #include <string.h>
     45 #include <term.h>
     46 #include <termios.h>
     47 #include "extern.h"
     48 
     49 static int	baudrate(char *);
     50 
     51 /* Baud rate conditionals for mapping. */
     52 #define	GT		0x01
     53 #define	EQ		0x02
     54 #define	LT		0x04
     55 #define	NOT		0x08
     56 #define	GE		(GT | EQ)
     57 #define	LE		(LT | EQ)
     58 
     59 typedef struct map {
     60 	struct map *next;	/* Linked list of maps. */
     61 	const char *porttype;	/* Port type, or "" for any. */
     62 	const char *type;	/* Terminal type to select. */
     63 	int conditional;	/* Baud rate conditionals bitmask. */
     64 	int speed;		/* Baud rate to compare against. */
     65 } MAP;
     66 
     67 static MAP *cur, *maplist;
     68 
     69 /*
     70  * Syntax for -m:
     71  * [port-type][test baudrate]:terminal-type
     72  * The baud rate tests are: >, <, @, =, !
     73  */
     74 void
     75 add_mapping(const char *port, char *arg)
     76 {
     77 	MAP *mapp;
     78 	char *copy, *p, *termp;
     79 
     80 	copy = strdup(arg);
     81 	mapp = malloc((u_int)sizeof(MAP));
     82 	if (copy == NULL || mapp == NULL)
     83 		err(1, "malloc");
     84 	mapp->next = NULL;
     85 	if (maplist == NULL)
     86 		cur = maplist = mapp;
     87 	else {
     88 		cur->next = mapp;
     89 		cur =  mapp;
     90 	}
     91 
     92 	mapp->porttype = arg;
     93 	mapp->conditional = 0;
     94 
     95 	arg = strpbrk(arg, "><@=!:");
     96 
     97 	if (arg == NULL) {			/* [?]term */
     98 		mapp->type = mapp->porttype;
     99 		mapp->porttype = NULL;
    100 		goto done;
    101 	}
    102 
    103 	if (arg == mapp->porttype)		/* [><@=! baud]:term */
    104 		mapp->porttype = termp = NULL;
    105 	else
    106 		termp = arg;
    107 
    108 	for (;; ++arg)				/* Optional conditionals. */
    109 		switch(*arg) {
    110 		case '<':
    111 			if (mapp->conditional & GT)
    112 				goto badmopt;
    113 			mapp->conditional |= LT;
    114 			break;
    115 		case '>':
    116 			if (mapp->conditional & LT)
    117 				goto badmopt;
    118 			mapp->conditional |= GT;
    119 			break;
    120 		case '@':
    121 		case '=':			/* Not documented. */
    122 			mapp->conditional |= EQ;
    123 			break;
    124 		case '!':
    125 			mapp->conditional |= NOT;
    126 			break;
    127 		default:
    128 			goto next;
    129 		}
    130 
    131 next:	if (*arg == ':') {
    132 		if (mapp->conditional)
    133 			goto badmopt;
    134 		++arg;
    135 	} else {				/* Optional baudrate. */
    136 		arg = strchr(p = arg, ':');
    137 		if (arg == NULL)
    138 			goto badmopt;
    139 		*arg++ = '\0';
    140 		mapp->speed = baudrate(p);
    141 	}
    142 
    143 	if (*arg == '\0')			/* Non-optional type. */
    144 		goto badmopt;
    145 
    146 	mapp->type = arg;
    147 
    148 	/* Terminate porttype, if specified. */
    149 	if (termp != NULL)
    150 		*termp = '\0';
    151 
    152 	/* If a NOT conditional, reverse the test. */
    153 	if (mapp->conditional & NOT)
    154 		mapp->conditional = ~mapp->conditional & (EQ | GT | LT);
    155 
    156 	/* If user specified a port with an option flag, set it. */
    157 done:	if (port) {
    158 		if (mapp->porttype)
    159 badmopt:		errx(1, "illegal -m option format: %s", copy);
    160 		mapp->porttype = port;
    161 	}
    162 
    163 #ifdef MAPDEBUG
    164 	(void)printf("port: %s\n", mapp->porttype ? mapp->porttype : "ANY");
    165 	(void)printf("type: %s\n", mapp->type);
    166 	(void)printf("conditional: ");
    167 	p = "";
    168 	if (mapp->conditional & GT) {
    169 		(void)printf("GT");
    170 		p = "/";
    171 	}
    172 	if (mapp->conditional & EQ) {
    173 		(void)printf("%sEQ", p);
    174 		p = "/";
    175 	}
    176 	if (mapp->conditional & LT)
    177 		(void)printf("%sLT", p);
    178 	(void)printf("\nspeed: %d\n", mapp->speed);
    179 #endif
    180 	free(copy);
    181 }
    182 
    183 /*
    184  * Return the type of terminal to use for a port of type 'type', as specified
    185  * by the first applicable mapping in 'map'.  If no mappings apply, return
    186  * 'type'.
    187  */
    188 const char *
    189 mapped(const char *type)
    190 {
    191 	MAP *mapp;
    192 	int match;
    193 
    194 	match = 0;
    195 	for (mapp = maplist; mapp; mapp = mapp->next)
    196 		if (mapp->porttype == NULL || !strcmp(mapp->porttype, type)) {
    197 			switch (mapp->conditional) {
    198 			case 0:			/* No test specified. */
    199 				match = 1;
    200 				break;
    201 			case EQ:
    202 				match = (ospeed == mapp->speed);
    203 				break;
    204 			case GE:
    205 				match = (ospeed >= mapp->speed);
    206 				break;
    207 			case GT:
    208 				match = (ospeed > mapp->speed);
    209 				break;
    210 			case LE:
    211 				match = (ospeed <= mapp->speed);
    212 				break;
    213 			case LT:
    214 				match = (ospeed < mapp->speed);
    215 				break;
    216 			}
    217 			if (match)
    218 				return (mapp->type);
    219 		}
    220 	/* No match found; return given type. */
    221 	return (type);
    222 }
    223 
    224 static int
    225 baudrate(char *rate)
    226 {
    227 
    228 	/* The baudrate number can be preceded by a 'B', which is ignored. */
    229 	if (*rate == 'B')
    230 		++rate;
    231 
    232 	return (atoi(rate));
    233 }
    234