253 lines
6.1 KiB
C
253 lines
6.1 KiB
C
/*-
|
|
* Copyright (c) 1991, 1993
|
|
* The Regents of the University of California. All rights reserved.
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without
|
|
* modification, are permitted provided that the following conditions
|
|
* are met:
|
|
* 1. Redistributions of source code must retain the above copyright
|
|
* notice, this list of conditions and the following disclaimer.
|
|
* 2. Redistributions in binary form must reproduce the above copyright
|
|
* notice, this list of conditions and the following disclaimer in the
|
|
* documentation and/or other materials provided with the distribution.
|
|
* 3. All advertising materials mentioning features or use of this software
|
|
* must display the following acknowledgement:
|
|
* This product includes software developed by the University of
|
|
* California, Berkeley and its contributors.
|
|
* 4. Neither the name of the University nor the names of its contributors
|
|
* may be used to endorse or promote products derived from this software
|
|
* without specific prior written permission.
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
|
|
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
|
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
|
* ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
|
|
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
|
|
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
|
|
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
|
|
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
|
|
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
|
|
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
|
|
* SUCH DAMAGE.
|
|
*/
|
|
|
|
#ifndef lint
|
|
static char sccsid[] = "@(#)map.c 8.1 (Berkeley) 6/9/93";
|
|
#endif /* not lint */
|
|
|
|
#include <sys/types.h>
|
|
#include <termios.h>
|
|
#include <errno.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include "extern.h"
|
|
|
|
extern speed_t Ospeed;
|
|
speed_t baudrate __P((char *));
|
|
|
|
/* Baud rate conditionals for mapping. */
|
|
#define GT 0x01
|
|
#define EQ 0x02
|
|
#define LT 0x04
|
|
#define NOT 0x08
|
|
#define GE (GT | EQ)
|
|
#define LE (LT | EQ)
|
|
|
|
typedef struct map {
|
|
struct map *next; /* Linked list of maps. */
|
|
char *porttype; /* Port type, or "" for any. */
|
|
char *type; /* Terminal type to select. */
|
|
int conditional; /* Baud rate conditionals bitmask. */
|
|
speed_t speed; /* Baud rate to compare against. */
|
|
} MAP;
|
|
|
|
MAP *cur, *maplist;
|
|
|
|
/*
|
|
* Syntax for -m:
|
|
* [port-type][test baudrate]:terminal-type
|
|
* The baud rate tests are: >, <, @, =, !
|
|
*/
|
|
void
|
|
add_mapping(port, arg)
|
|
char *port, *arg;
|
|
{
|
|
MAP *mapp;
|
|
char *copy, *p, *termp;
|
|
|
|
copy = strdup(arg);
|
|
mapp = malloc((u_int)sizeof(MAP));
|
|
if (copy == NULL || mapp == NULL)
|
|
err("%s", strerror(errno));
|
|
mapp->next = NULL;
|
|
if (maplist == NULL)
|
|
cur = maplist = mapp;
|
|
else {
|
|
cur->next = mapp;
|
|
cur = mapp;
|
|
}
|
|
|
|
mapp->porttype = arg;
|
|
mapp->conditional = 0;
|
|
|
|
arg = strpbrk(arg, "><@=!:");
|
|
|
|
if (arg == NULL) { /* [?]term */
|
|
mapp->type = mapp->porttype;
|
|
mapp->porttype = NULL;
|
|
goto done;
|
|
}
|
|
|
|
if (arg == mapp->porttype) /* [><@=! baud]:term */
|
|
termp = mapp->porttype = NULL;
|
|
else
|
|
termp = arg;
|
|
|
|
for (;; ++arg) /* Optional conditionals. */
|
|
switch(*arg) {
|
|
case '<':
|
|
if (mapp->conditional & GT)
|
|
goto badmopt;
|
|
mapp->conditional |= LT;
|
|
break;
|
|
case '>':
|
|
if (mapp->conditional & LT)
|
|
goto badmopt;
|
|
mapp->conditional |= GT;
|
|
break;
|
|
case '@':
|
|
case '=': /* Not documented. */
|
|
mapp->conditional |= EQ;
|
|
break;
|
|
case '!':
|
|
mapp->conditional |= NOT;
|
|
break;
|
|
default:
|
|
goto next;
|
|
}
|
|
|
|
next: if (*arg == ':') {
|
|
if (mapp->conditional)
|
|
goto badmopt;
|
|
++arg;
|
|
} else { /* Optional baudrate. */
|
|
arg = index(p = arg, ':');
|
|
if (arg == NULL)
|
|
goto badmopt;
|
|
*arg++ = '\0';
|
|
mapp->speed = baudrate(p);
|
|
}
|
|
|
|
if (*arg == NULL) /* Non-optional type. */
|
|
goto badmopt;
|
|
|
|
mapp->type = arg;
|
|
|
|
/* Terminate porttype, if specified. */
|
|
if (termp != NULL)
|
|
*termp = '\0';
|
|
|
|
/* If a NOT conditional, reverse the test. */
|
|
if (mapp->conditional & NOT)
|
|
mapp->conditional = ~mapp->conditional & (EQ | GT | LT);
|
|
|
|
/* If user specified a port with an option flag, set it. */
|
|
done: if (port) {
|
|
if (mapp->porttype)
|
|
badmopt: err("illegal -m option format: %s", copy);
|
|
mapp->porttype = port;
|
|
}
|
|
|
|
#ifdef MAPDEBUG
|
|
(void)printf("port: %s\n", mapp->porttype ? mapp->porttype : "ANY");
|
|
(void)printf("type: %s\n", mapp->type);
|
|
(void)printf("conditional: ");
|
|
p = "";
|
|
if (mapp->conditional & GT) {
|
|
(void)printf("GT");
|
|
p = "/";
|
|
}
|
|
if (mapp->conditional & EQ) {
|
|
(void)printf("%sEQ", p);
|
|
p = "/";
|
|
}
|
|
if (mapp->conditional & LT)
|
|
(void)printf("%sLT", p);
|
|
(void)printf("\nspeed: %d\n", mapp->speed);
|
|
#endif
|
|
}
|
|
|
|
/*
|
|
* Return the type of terminal to use for a port of type 'type', as specified
|
|
* by the first applicable mapping in 'map'. If no mappings apply, return
|
|
* 'type'.
|
|
*/
|
|
char *
|
|
mapped(type)
|
|
char *type;
|
|
{
|
|
MAP *mapp;
|
|
int match;
|
|
|
|
for (mapp = maplist; mapp; mapp = mapp->next)
|
|
if (mapp->porttype == NULL || !strcmp(mapp->porttype, type)) {
|
|
switch (mapp->conditional) {
|
|
case 0: /* No test specified. */
|
|
match = 1;
|
|
break;
|
|
case EQ:
|
|
match = (Ospeed == mapp->speed);
|
|
break;
|
|
case GE:
|
|
match = (Ospeed >= mapp->speed);
|
|
break;
|
|
case GT:
|
|
match = (Ospeed > mapp->speed);
|
|
break;
|
|
case LE:
|
|
match = (Ospeed <= mapp->speed);
|
|
break;
|
|
case LT:
|
|
match = (Ospeed < mapp->speed);
|
|
break;
|
|
}
|
|
if (match)
|
|
return (mapp->type);
|
|
}
|
|
/* No match found; return given type. */
|
|
return (type);
|
|
}
|
|
|
|
typedef struct speeds {
|
|
char *string;
|
|
speed_t speed;
|
|
} SPEEDS;
|
|
|
|
SPEEDS speeds[] = {
|
|
"0", B0,
|
|
"134.5", B134,
|
|
"exta", B19200,
|
|
"extb", B38400,
|
|
NULL
|
|
};
|
|
|
|
speed_t
|
|
baudrate(rate)
|
|
char *rate;
|
|
{
|
|
SPEEDS *sp;
|
|
speed_t speed;
|
|
|
|
/* The baudrate number can be preceded by a 'B', which is ignored. */
|
|
if (*rate == 'B')
|
|
++rate;
|
|
|
|
for (sp = speeds; sp->string; ++sp)
|
|
if (!strcasecmp(rate, sp->string))
|
|
return (sp->speed);
|
|
speed = atol(rate);
|
|
if (speed == 0)
|
|
err("unknown baud rate %s", rate);
|
|
return speed;
|
|
}
|