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