lex.l revision 352280 
1/*-
2 * SPDX-License-Identifier: BSD-2-Clause-FreeBSD
3 *
4 * Copyright (c) 1994-1995 S��ren Schmidt
5 * 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 *    in this position and unchanged.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 *    notice, this list of conditions and the following disclaimer in the
15 *    documentation and/or other materials provided with the distribution.
16 * 3. The name of the author may not be used to endorse or promote products
17 *    derived from this software without specific prior written permission
18 *
19 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
20 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
21 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
22 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
23 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
24 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
25 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
26 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
27 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
28 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
29 *
30 * $FreeBSD: stable/11/usr.sbin/kbdcontrol/lex.l 352280 2019-09-13 07:21:06Z bapt $
31 */
32
33%{
34
35#include "lex.h"
36
37%}
38
39%option noyywrap
40%option nounput
41%option noinput
42
43D	[0-9]
44X	[0-9a-fA-F]
45A	.
46L	[OCNB]
47
48%%
49
50nop		{ return TNOP; }
51lshift 		{ return TLSH; }
52rshift 		{ return TRSH; }
53clock 		{ return TCLK; }
54nlock		{ return TNLK; }
55slock 		{ return TSLK; }
56lalt|alt 	{ return TLALT; }
57btab		{ return TBTAB; }
58lctrl|ctrl 	{ return TLCTR; }
59nscr 		{ return TNEXT; }
60pscr 		{ return TPREV; }
61rctrl 		{ return TRCTR; }
62ralt 		{ return TRALT; }
63alock 		{ return TALK; }
64ashift 		{ return TASH; }
65meta 		{ return TMETA; }
66boot 		{ return TRBT; }
67debug 		{ return TDBG; }
68susp		{ return TSUSP; }
69saver		{ return TSPSC; }
70panic		{ return TPANIC; }
71lshifta|shifta	{ return TLSHA; }
72rshifta		{ return TRSHA; }
73lctrla|ctrla	{ return TLCTRA; }
74rctrla		{ return TRCTRA; }
75lalta|alta	{ return TLALTA; }
76ralta		{ return TRALTA; }
77halt		{ return THALT; }
78pdwn		{ return TPDWN; }
79paste		{ return TPASTE; }
80
81NUL|nul		{ number = 0; return TNUM; }
82SOH|soh		{ number = 1; return TNUM; }
83STX|stx		{ number = 2; return TNUM; }
84ETX|etx		{ number = 3; return TNUM; }
85EOT|eot		{ number = 4; return TNUM; }
86ENQ|enq		{ number = 5; return TNUM; }
87ACK|ack		{ number = 6; return TNUM; }
88BEL|bel		{ number = 7; return TNUM; }
89BS|bs		{ number = 8; return TNUM; }
90HT|ht		{ number = 9; return TNUM; }
91LF|lf|NL|nl	{ number = 10; return TNUM; }
92VT|vt		{ number = 11; return TNUM; }
93FF|ff|NP|np	{ number = 12; return TNUM; }
94CR|cr		{ number = 13; return TNUM; }
95SO|so		{ number = 14; return TNUM; }
96SI|si		{ number = 15; return TNUM; }
97DLE|dle		{ number = 16; return TNUM; }
98DC1|dc1		{ number = 17; return TNUM; }
99DC2|dc2		{ number = 18; return TNUM; }
100DC3|dc3		{ number = 19; return TNUM; }
101DC4|dc4		{ number = 20; return TNUM; }
102NAK|nak		{ number = 21; return TNUM; }
103SYN|syn		{ number = 22; return TNUM; }
104ETB|etb		{ number = 23; return TNUM; }
105CAN|can		{ number = 24; return TNUM; }
106EM|em		{ number = 25; return TNUM; }
107SUB|sub		{ number = 26; return TNUM; }
108ESC|esc		{ number = 27; return TNUM; }
109FS|fs		{ number = 28; return TNUM; }
110GS|gs		{ number = 29; return TNUM; }
111RS|rs		{ number = 30; return TNUM; }
112NS|ns		{ number = 31; return TNUM; }
113US|us		{ number = 31; return TNUM; }
114SP|sp		{ number = 32; return TNUM; }
115DEL|del		{ number = 127; return TNUM; }
116
117dgra|DGRA	{ number =  0; return TACC; }
118dacu|DACU	{ number =  1; return TACC; }
119dcir|DCIR	{ number =  2; return TACC; }
120dtil|DTIL	{ number =  3; return TACC; }
121dmac|DMAC	{ number =  4; return TACC; }
122dbre|DBRE	{ number =  5; return TACC; }
123ddot|DDOT	{ number =  6; return TACC; }
124duml|DUML	{ number =  7; return TACC; }
125ddia|DDIA	{ number =  7; return TACC; }
126dsla|DSLA	{ number =  8; return TACC; }
127drin|DRIN	{ number =  9; return TACC; }
128dced|DCED	{ number =  10; return TACC; }
129dapo|DAPO	{ number =  11; return TACC; }
130ddac|DDAC	{ number =  12; return TACC; }
131dogo|DOGO	{ number =  13; return TACC; }
132dcar|DCAR	{ number =  14; return TACC; }
133
134fkey{D}({D}*)		{
135				sscanf(yytext+4, "%d", &number);
136				return TFUNC;
137			}
138scr{D}({D}*)		{
139				sscanf(yytext+3, "%d", &number);
140				return TSCRN;
141			}
142'{A}'			{ letter = *(yytext+1); return TLET; }
143#({A}*)			{ /* ignore */ }
1440x{X}({X}*)  		{ sscanf(yytext, "%x", &number); return TNUM; }
145{D}({D}*)  		{ sscanf(yytext, "%d", &number); return TNUM; }
146{L}			{
147				if (*yytext == 'O') number = 0;
148				if (*yytext == 'C') number = 1;
149				if (*yytext == 'N') number = 2;
150				if (*yytext == 'B') number = 3;
151				return TFLAG;
152			}
153[ \t\n]		{ /* ignore */ }
154.		{ return *yytext; }
155