Return to dumpfont.c CVS log

Up to [Net/2] / Net2 / arch / amiga / stand / dumpfont

Annotation of Net2/arch/amiga/stand/dumpfont/dumpfont.c, revision 1.1

1.1     ! root        1: /* This is a *real* hack to dump the topaz80 kernel font. This one is 
        !             2:    ways nicer than the ugly Mach font, but we'll have to dump it from a
        !             3:    running system to not run against Commodore copyrights. *NEVER* distribute
        !             4:    the generated font with BSD, always regenerate! */
        !             5: 
        !             6: #include <exec/types.h>
        !             7: #include <exec/memory.h>
        !             8: #include <dos/dos.h>
        !             9: #include <graphics/gfx.h>
        !            10: #include <graphics/rastport.h>
        !            11: #include <graphics/text.h>
        !            12: 
        !            13: #include <inline/exec.h>
        !            14: #include <inline/graphics.h>
        !            15: 
        !            16: #include <stdio.h>
        !            17: 
        !            18: 
        !            19: main()
        !            20: {
        !            21:   unsigned char str[256], *pp;
        !            22:   int i;
        !            23:   struct TextAttr ta = { "topaz.font", 8, FS_NORMAL, FPF_ROMFONT };
        !            24:   struct RastPort rp;
        !            25:   struct BitMap bm = { 256,    /* bytes per row */
        !            26:                         8,     /* rows */
        !            27:                         0,     /* flags */
        !            28:                         1,     /* depth */
        !            29:                         0,     /* pad */
        !            30:                         0 };   /* planes */
        !            31:   struct TextFont *tf;
        !            32: 
        !            33:   InitRastPort (& rp);
        !            34:   rp.BitMap = &bm;
        !            35:   bm.Planes[0] = pp = AllocRaster (256 * 8, 8);
        !            36: 
        !            37:   if (!pp)
        !            38:     {
        !            39:       fprintf (stderr, "Can't allocate raster!\n");
        !            40:       exit (1);
        !            41:     }
        !            42:   bzero (pp, 256 * 8);
        !            43:   
        !            44:   tf = OpenFont (& ta);
        !            45:   if (! tf)
        !            46:     {
        !            47:       fprintf (stderr, "can't open topaz font.\n");
        !            48:       exit (1);
        !            49:     }
        !            50: 
        !            51:   SetFont (&rp, tf);
        !            52: 
        !            53:   /* initialize string to be printed */
        !            54:   for (i = 32; i < 256; i++) str[i - 32] = i;
        !            55: 
        !            56:   Move (&rp, 0, 6);
        !            57:   
        !            58:   Text (&rp, str, 256 - 32);
        !            59:   {
        !            60:     int bin = open ("bitmap", 1);
        !            61:     if (bin >= 0)
        !            62:       {
        !            63:         write (bin, pp, 256*8);
        !            64:         close (bin);
        !            65:       }
        !            66:   }
        !            67:   
        !            68:   /* dump them.. */
        !            69:   printf ("/* generated automatically by dumpfont.c. *DONT* distribute\n");
        !            70:   printf ("   this file, it contains information Copyright by Commodore!\n");
        !            71:   printf ("\n");
        !            72:   printf ("   This is the (new) topaz80 system font: */\n\n");
        !            73:   
        !            74:   printf ("unsigned char kernel_font_width  = 8;\n");
        !            75:   printf ("unsigned char kernel_font_height = 8;\n");
        !            76:   printf ("unsigned char kernel_font_lo = 32;\n");
        !            77:   printf ("unsigned char kernel_font_hi = 255;\n\n");
        !            78:   
        !            79:   printf ("unsigned char kernel_cursor[] = {\n");
        !            80:   printf ("  0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff };\n\n");
        !            81:   printf ("unsigned char kernel_font[] = {\n");
        !            82:   
        !            83:   for (i = 0; i < 256 - 32; i++)
        !            84:     {
        !            85:       printf ("/* %c */ ", i + 32);
        !            86:       printf ("0x%02x, 0x%02x, 0x%02x, 0x%02x, 0x%02x, 0x%02x, 0x%02x, 0x%02x,\n",
        !            87:              pp[i+0*256], pp[i+1*256], pp[i+2*256], pp[i+3*256],
        !            88:              pp[i+4*256], pp[i+5*256], pp[i+6*256], pp[i+7*256]);
        !            89:     }
        !            90:   printf ("};\n");
        !            91:   
        !            92:   CloseFont (tf);
        !            93:   FreeRaster (pp, 256 * 8, 8);
        !            94: }

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