Return to build_font.c CVS log

Up to [GnuMach] / Gnu-Mach / chips

Annotation of Gnu-Mach/chips/build_font.c, revision 1.1

1.1     ! root        1: /* 
        !             2:  * Mach Operating System
        !             3:  * Copyright (c) 1991,1990,1989 Carnegie Mellon University
        !             4:  * All Rights Reserved.
        !             5:  * 
        !             6:  * Permission to use, copy, modify and distribute this software and its
        !             7:  * documentation is hereby granted, provided that both the copyright
        !             8:  * notice and this permission notice appear in all copies of the
        !             9:  * software, derivative works or modified versions, and any portions
        !            10:  * thereof, and that both notices appear in supporting documentation.
        !            11:  * 
        !            12:  * CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS "AS IS"
        !            13:  * CONDITION.  CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND FOR
        !            14:  * ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE.
        !            15:  * 
        !            16:  * Carnegie Mellon requests users of this software to return to
        !            17:  * 
        !            18:  *  Software Distribution Coordinator  or  [email protected]
        !            19:  *  School of Computer Science
        !            20:  *  Carnegie Mellon University
        !            21:  *  Pittsburgh PA 15213-3890
        !            22:  * 
        !            23:  * any improvements or extensions that they make and grant Carnegie Mellon
        !            24:  * the rights to redistribute these changes.
        !            25:  */
        !            26: /*
        !            27:  *     File: build_font.c
        !            28:  *     Author: Alessandro Forin, Carnegie Mellon University
        !            29:  *     Date:   10/90
        !            30:  *
        !            31:  *
        !            32:  *     Takes a font description file and generates a C source
        !            33:  *     appropriate for use as kernel font on mips/vax boxes.
        !            34:  *     This basically means encoding and mirroring the bitmaps.
        !            35:  */
        !            36: 
        !            37: #include <stdio.h>
        !            38: 
        !            39: main(argc,argv)
        !            40:        char **argv;
        !            41: {
        !            42:        int             fd;
        !            43:        FILE            *fout;
        !            44:        int             i, j, k, n, l;
        !            45:        int             first, last;
        !            46:        char            *fname = "kernel_font.data";
        !            47:        char            buf[16*9];
        !            48:        int             verbose = 0;
        !            49: 
        !            50:        if (argc > 1 && argv[1][0] == '+')
        !            51:                verbose++, argc--, argv++;
        !            52: 
        !            53:        first = 0;
        !            54:        last = 190;     /* 8-bit ASCII, offset by 'space' */
        !            55:        if (argc > 1) {
        !            56:                first = atoi(argv[1]);
        !            57:                last = first + 1;
        !            58:        }
        !            59:        if (argc > 2)
        !            60:                last = atoi(argv[2]) + 1;
        !            61:        if (argc > 3)
        !            62:                fname = argv[3];
        !            63: 
        !            64:        fd = open(fname, 0, 0);
        !            65:        fout = fopen("kernel_font.c", "w");
        !            66: 
        !            67:        fprintf(fout, "/* \n\
        !            68:  * Mach Operating System\n\
        !            69:  * Copyright (c) 1989 Carnegie-Mellon University\n\
        !            70:  * All rights reserved.  The CMU software License Agreement specifies\n\
        !            71:  * the terms and conditions for use and redistribution.\n\
        !            72:  */\n\
        !            73: /*\n\
        !            74:  * THIS FILE WAS GENERATED BY %s FROM %s\n\
        !            75:  * IF YOU NEED TO, BE SURE YOU EDIT THE REAL THING!\n\
        !            76:  */\n\
        !            77: /*\n\
        !            78:  *     Object:\n\
        !            79:  *             kfont_7x14                      EXPORTED array\n\
        !            80:  *\n\
        !            81:  *             Kernel font for printable ASCII chars\n\
        !            82:  *\n\
        !            83:  * The smallest index in this array corresponds to a\n\
        !            84:  * space. So, we start at 0x20 in the ascii table.\n\
        !            85:  * Note that glyphs are mirrored (byteorder, I think)\n\
        !            86:  * the commented bitmap shows how they really look like\n\
        !            87:  */\n\
        !            88: \n\
        !            89: unsigned char kfont_7x14[] = {\n", argv[0], fname);
        !            90: 
        !            91: skip_comments:
        !            92:        read(fd, buf, 1);
        !            93:        if (buf[0] == '#') {
        !            94:                do
        !            95:                        read(fd, buf, 1);
        !            96:                while (buf[0] != '\n');
        !            97:                goto skip_comments;
        !            98:        }
        !            99:        lseek(fd, -1, 1);       /* put char back */
        !           100: 
        !           101:        /* if must skip some */
        !           102:        for (l = 0; l < first; l++)
        !           103:                read(fd, buf, 2+(9*15));
        !           104: 
        !           105:        /* scan for real now */
        !           106:        for (i = first; i < last; i++) {
        !           107:                /* read one full glyph */
        !           108:                if (read(fd, buf, 2+(9*15)) < 0)
        !           109:                        break;
        !           110:                if (verbose)
        !           111:                        printf("Character '%c':\n\t", buf[0]);
        !           112:                /* index and char itself in comments */
        !           113:                fprintf(fout, "/* %3x '%c' */\n", i, 0x20+i);
        !           114: 
        !           115:                /* encode and mirror each one of the 15 scanlines */
        !           116:                for (n = 0; n < 15; n++) {
        !           117:                        unsigned char   cc[8], swap = 0;
        !           118:                        /* 8 bits per scanline */
        !           119:                        for (k = 2+(n*9), j = 0; j < 8; k++, j++) {
        !           120:                                if (verbose)
        !           121:                                        printf("%c", (buf[k] == '1') ? '@' : ' ');
        !           122:                                swap = ((buf[k] - '0') << 7) | (swap >> 1);
        !           123:                                cc[j] = buf[k];
        !           124:                        }
        !           125:                        fprintf(fout,"\t/* %8s */\t%#2x,\n", cc, (unsigned char)swap);
        !           126:                        if (verbose)
        !           127:                                printf("\n\t");
        !           128:                }
        !           129:        }
        !           130:        fprintf(fout, "};\n");
        !           131:        fclose(fout);
        !           132: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.