1 /* $NetBSD: map.c,v 1.11 2006/04/30 23:54:40 christos 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.11 2006/04/30 23:54:40 christos 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 <termios.h> 46 #include "extern.h" 47 48 int baudrate __P((char *)); 49 50 /* Baud rate conditionals for mapping. */ 51 #define GT 0x01 52 #define EQ 0x02 53 #define LT 0x04 54 #define NOT 0x08 55 #define GE (GT | EQ) 56 #define LE (LT | EQ) 57 58 typedef struct map { 59 struct map *next; /* Linked list of maps. */ 60 const char *porttype; /* Port type, or "" for any. */ 61 const char *type; /* Terminal type to select. */ 62 int conditional; /* Baud rate conditionals bitmask. */ 63 int speed; /* Baud rate to compare against. */ 64 } MAP; 65 66 MAP *cur, *maplist; 67 68 /* 69 * Syntax for -m: 70 * [port-type][test baudrate]:terminal-type 71 * The baud rate tests are: >, <, @, =, ! 72 */ 73 void 74 add_mapping(port, arg) 75 const char *port; 76 char *arg; 77 { 78 MAP *mapp; 79 char *copy, *p, *termp; 80 81 copy = strdup(arg); 82 mapp = malloc((u_int)sizeof(MAP)); 83 if (copy == NULL || mapp == NULL) 84 err(1, "malloc"); 85 mapp->next = NULL; 86 if (maplist == NULL) 87 cur = maplist = mapp; 88 else { 89 cur->next = mapp; 90 cur = mapp; 91 } 92 93 mapp->porttype = arg; 94 mapp->conditional = 0; 95 96 arg = strpbrk(arg, "><@=!:"); 97 98 if (arg == NULL) { /* [?]term */ 99 mapp->type = mapp->porttype; 100 mapp->porttype = NULL; 101 goto done; 102 } 103 104 if (arg == mapp->porttype) /* [><@=! baud]:term */ 105 mapp->porttype = termp = NULL; 106 else 107 termp = arg; 108 109 for (;; ++arg) /* Optional conditionals. */ 110 switch(*arg) { 111 case '<': 112 if (mapp->conditional & GT) 113 goto badmopt; 114 mapp->conditional |= LT; 115 break; 116 case '>': 117 if (mapp->conditional & LT) 118 goto badmopt; 119 mapp->conditional |= GT; 120 break; 121 case '@': 122 case '=': /* Not documented. */ 123 mapp->conditional |= EQ; 124 break; 125 case '!': 126 mapp->conditional |= NOT; 127 break; 128 default: 129 goto next; 130 } 131 132 next: if (*arg == ':') { 133 if (mapp->conditional) 134 goto badmopt; 135 ++arg; 136 } else { /* Optional baudrate. */ 137 arg = strchr(p = arg, ':'); 138 if (arg == NULL) 139 goto badmopt; 140 *arg++ = '\0'; 141 mapp->speed = baudrate(p); 142 } 143 144 if (*arg == '\0') /* Non-optional type. */ 145 goto badmopt; 146 147 mapp->type = arg; 148 149 /* Terminate porttype, if specified. */ 150 if (termp != NULL) 151 *termp = '\0'; 152 153 /* If a NOT conditional, reverse the test. */ 154 if (mapp->conditional & NOT) 155 mapp->conditional = ~mapp->conditional & (EQ | GT | LT); 156 157 /* If user specified a port with an option flag, set it. */ 158 done: if (port) { 159 if (mapp->porttype) 160 badmopt: errx(1, "illegal -m option format: %s", copy); 161 mapp->porttype = port; 162 } 163 164 #ifdef MAPDEBUG 165 (void)printf("port: %s\n", mapp->porttype ? mapp->porttype : "ANY"); 166 (void)printf("type: %s\n", mapp->type); 167 (void)printf("conditional: "); 168 p = ""; 169 if (mapp->conditional & GT) { 170 (void)printf("GT"); 171 p = "/"; 172 } 173 if (mapp->conditional & EQ) { 174 (void)printf("%sEQ", p); 175 p = "/"; 176 } 177 if (mapp->conditional & LT) 178 (void)printf("%sLT", p); 179 (void)printf("\nspeed: %d\n", mapp->speed); 180 #endif 181 free(copy); 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 */ 189 const char * 190 mapped(type) 191 const char *type; 192 { 193 MAP *mapp; 194 int match; 195 196 match = 0; 197 for (mapp = maplist; mapp; mapp = mapp->next) 198 if (mapp->porttype == NULL || !strcmp(mapp->porttype, type)) { 199 switch (mapp->conditional) { 200 case 0: /* No test specified. */ 201 match = 1; 202 break; 203 case EQ: 204 match = (ospeed == mapp->speed); 205 break; 206 case GE: 207 match = (ospeed >= mapp->speed); 208 break; 209 case GT: 210 match = (ospeed > mapp->speed); 211 break; 212 case LE: 213 match = (ospeed <= mapp->speed); 214 break; 215 case LT: 216 match = (ospeed < mapp->speed); 217 break; 218 } 219 if (match) 220 return (mapp->type); 221 } 222 /* No match found; return given type. */ 223 return (type); 224 } 225 226 int 227 baudrate(rate) 228 char *rate; 229 { 230 231 /* The baudrate number can be preceded by a 'B', which is ignored. */ 232 if (*rate == 'B') 233 ++rate; 234 235 return (atoi(rate)); 236 } 237