BSD 4_4 release

[unix-history] / usr / src / usr.bin / tn3270 / tools / mkastosc / mkastosc.c

diff --git a/usr/src/usr.bin/tn3270/tools/mkastosc/mkastosc.c b/usr/src/usr.bin/tn3270/tools/mkastosc/mkastosc.c
index 8593b82..697122d 100644 (file)
--- a/usr/src/usr.bin/tn3270/tools/mkastosc/mkastosc.c
+++ b/usr/src/usr.bin/tn3270/tools/mkastosc/mkastosc.c
@@ -1,21 +1,46 @@
-/*
- * This program scans a file which describes a keyboard.  The output
- * of the program is a series of 'C' declarations which describe a
- * mapping between (scancode, shiftstate, altstate) and 3270 functions,
- * characters, and AIDs.
+/*-
+ * Copyright (c) 1988, 1993
+ *     The Regents of the University of California.  All rights reserved.

  *
  *

- * The format of the input file is as follows:
+ * 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.

  *
  *

- * keynumber [ scancode [ unshifted [ shifted [ alted [ shiftalted ] ] ] ] ]
- *
- * keynumber is in decimal, and starts in column 1.
- * scancode is hexadecimal.
- * unshifted, etc. - these are either a single ascii character,
- *                     or the name of a function or an AID-generating key.
- *
- * all fields are separated by a single space.
+ * 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 copyright[] =
+"@(#) Copyright (c) 1988, 1993\n\
+       The Regents of the University of California.  All rights reserved.\n";
+#endif /* not lint */
+
+#ifndef lint
+static char sccsid[] = "@(#)mkastosc.c 8.1 (Berkeley) 6/6/93";
+#endif /* not lint */
+

 #include <stdio.h>
 #if    defined(unix)
 #include <strings.h>
 #include <stdio.h>
 #if    defined(unix)
 #include <strings.h>


@@ -25,19 +50,16 @@
 #include <ctype.h>
 
 #include "../general/general.h"
 #include <ctype.h>
 
 #include "../general/general.h"

-#define        LETS_SEE_ASCII
-#include "../ascii/m4.out"
-#undef LETS_SEE_ASCII
-
-#include "../ascii/ascebc.h"
-#include "../ctlr/ebc_disp.h"

 #include "../ctlr/function.h"
 
 #include "dohits.h"
 
 static struct tbl {
 #include "../ctlr/function.h"
 
 #include "dohits.h"
 
 static struct tbl {

-    char *shift;
-    int        scancode;
+    unsigned char
+       scancode,
+       used;
+    char
+       *shiftstate;

 } tbl[128];
 
 int
 } tbl[128];
 
 int


@@ -53,10 +75,11 @@ char        *argv[];
     int found;
     struct hits *ph;
     struct Hits *Ph;
     int found;
     struct hits *ph;
     struct Hits *Ph;

-    TC_Ascii_t *TC;

     struct thing *this;
     struct thing *this;

+    struct thing **attable;

     struct tbl *Pt;
     struct tbl *Pt;

-    static char *shiftof[] = { "normal", "shifted", "alted", "shiftalted" };
+    static char *shiftof[] =
+           { "0", "SHIFT_UPSHIFT", "SHIFT_ALT", "SHIFT_ALT|SHIFT_UPSHIFT" };

     char *aidfile = 0, *fcnfile = 0;
 
     if (argc > 1) {
     char *aidfile = 0, *fcnfile = 0;
 
     if (argc > 1) {


@@ -75,13 +98,8 @@ char *argv[];
     printf("/*\n");
     printf(" * Ascii to scancode conversion table.  First\n");
     printf(" * 128 bytes (0-127) correspond with actual Ascii\n");
     printf("/*\n");
     printf(" * Ascii to scancode conversion table.  First\n");
     printf(" * 128 bytes (0-127) correspond with actual Ascii\n");

-    printf(" * characters; the rest are TC types from termcodes.m4\n");
-    printf(" * (actually, from m4.out).\n");
+    printf(" * characters; the rest are functions from ctrl/function.h\n");

     printf(" */\n");
     printf(" */\n");

-    printf("struct asctosc {\n");
-    printf("\tenum shiftvalue { cantdo, normal, shifted, alted,");
-    printf(" shiftalted } shift;\n\tunsigned char scancode;");
-    printf("\n} asctosc[] = {\n");

     /* Build the ascii part of the table. */
     for (Ph = Hits, scancode = 0; Ph <= Hits+highestof(Hits);
                                                        Ph++, scancode++) {
     /* Build the ascii part of the table. */
     for (Ph = Hits, scancode = 0; Ph <= Hits+highestof(Hits);
                                                        Ph++, scancode++) {


@@ -89,8 +107,9 @@ char *argv[];
        for (i = 0; i < 4; i++) {
            if (ph->hit[i].ctlrfcn == FCN_CHARACTER) {
                c = Ph->name[i][0];     /* "name" of this one */
        for (i = 0; i < 4; i++) {
            if (ph->hit[i].ctlrfcn == FCN_CHARACTER) {
                c = Ph->name[i][0];     /* "name" of this one */

-               if ((tbl[c].shift == 0) || (tbl[c].shift[0] == 0)) {
-                   tbl[c].shift = shiftof[i];
+               if (tbl[c].used == 0) {
+                   tbl[c].used = 1;
+                   tbl[c].shiftstate = shiftof[i];

                    tbl[c].scancode = scancode;
                }
            }
                    tbl[c].scancode = scancode;
                }
            }


@@ -98,14 +117,15 @@ char       *argv[];
     }
     /* Now, output the table */
     for (Pt = tbl, asciicode = 0; Pt <= tbl+highestof(tbl); Pt++, asciicode++) {
     }
     /* Now, output the table */
     for (Pt = tbl, asciicode = 0; Pt <= tbl+highestof(tbl); Pt++, asciicode++) {

-       if ((Pt->shift == 0) || (Pt->shift[0] == 0)) {
+       if (Pt->used == 0) {

            if (isprint(asciicode) && (asciicode != ' ')) {
                fprintf(stderr, "Unable to produce scancode sequence for");
                fprintf(stderr, " ASCII character [%c]!\n", asciicode);
            }
            if (isprint(asciicode) && (asciicode != ' ')) {
                fprintf(stderr, "Unable to produce scancode sequence for");
                fprintf(stderr, " ASCII character [%c]!\n", asciicode);
            }

-           printf("\t{ cantdo, 0 },\t");
+           printf("\t{ 0, 0, undefined, 0 },\t");

        } else {
        } else {

-           printf("\t{ %s, 0x%x },", Pt->shift, Pt->scancode);
+           printf("\t{ 0x%02x, %s, FCN_CHARACTER, 0 },",
+                                       Pt->scancode, Pt->shiftstate);

        }
        printf("\t/* 0x%x", asciicode);
        if (isprint(asciicode)) {
        }
        printf("\t/* 0x%x", asciicode);
        if (isprint(asciicode)) {


@@ -115,65 +135,32 @@ char      *argv[];
     }
                
 
     }
                
 

-    for (TC = &TC_Ascii[TC_LOWEST-TC_LOWEST];
-               TC < &TC_Ascii[TC_LOWEST_USER-TC_LOWEST]; TC++, asciicode++) {
-       printf("\t{ cantdo, 0 },\t");
-       printf("\t/* 0x%x */\n", asciicode);
-    }
-    for (TC = &TC_Ascii[TC_LOWEST_USER-TC_LOWEST];
-               TC <= &TC_Ascii[TC_HIGHEST-TC_LOWEST]; TC++, asciicode++) {
-       /* Hack for "PFK" names (which should be "PF") */
-       if (memcmp(TC->tc_name, "PFK", 3) == 0) {
-           static char PFonly[100] = "PF";
-
-           strcpy(PFonly+2, TC->tc_name+3);
-           TC->tc_name = PFonly;
-       }
-       found = 0;
-       for (this = firstentry(TC->tc_name); (!found) && this;
-                                                       this = this->next) {
-           if ((this->name[4] == TC->tc_name[0])
-                       && (strcmp(this->name+4, TC->tc_name) == 0)) {
-               /* this is the entry */
-               /* What we have is a TC entry matching a scancode entry */
-               Ph = this->hits;                /* now, get hits */
-               if (Ph == 0) {
-                   continue;
-               }
-               for (i = 0; i < 4; i++) {
-                   if ((Ph->name[i][4] == TC->tc_name[0])
-                           && (strcmp(Ph->name[i]+4, TC->tc_name) == 0)) {
-                       /* This is THE hit! */
-                       found = 1;
-                       printf("\t{ ");
-                       switch (i) {
-                       case 0:
-                           printf("normal, ");
-                           break;
-                       case 1:
-                           printf("shifted, ");
-                           break;
-                       case 2:
-                           printf("alted, ");
-                           break;
-                       case 3:
-                           printf("shitfalted, ");
-                           break;
-                       }
-                       printf("0x%02x },", Ph-Hits);
-                       break;
+    for (attable = &table[0]; attable <= &table[highestof(table)]; attable++) {
+       for (this = *attable; this; this = this->next) {
+           Ph = this->hits;
+           if (Ph == 0) {
+               continue;
+           }
+           for (i = 0; i < 4; i++) {
+               if ((Ph->name[i] != 0) &&
+                       (Ph->name[i][0] == this->name[0]) &&
+                       (strcmp(Ph->name[i], this->name) == 0)) {
+                   printf("\t{ 0x%02x, %s, ",
+                               Ph-Hits, shiftof[i]);
+                   if (memcmp("AID_", this->name, 4) == 0) {   /* AID key */
+                       printf("FCN_AID, ");
+                   } else {
+                       printf("%s, ", Ph->name[i]);
+                   }
+                   if (memcmp("PF", this->name+4, 2) == 0) {
+                       printf("\"PFK%s\" },\n", Ph->name[i]+4+2);
+                   } else {
+                       printf("\"%s\" },\n", Ph->name[i]+4);

                    }
                }
            }
        }
                    }
                }
            }
        }

-       if (!found) {
-           printf("\t{ cantdo, 0 },\t");
-           fprintf(stderr, "Unable to produce TC_%s with scan codes!\n",
-                               TC->tc_name);
-       }
-       printf("\t/* 0x%x - %s */\n", asciicode, TC->tc_name);

     }
     }

-    printf("};\n");

 
     return 0;
 }
 
     return 0;
 }