Return to textutil.c CVS log

Up to [CSRG BSD Unix] / 43BSD / contrib / X / libsun

Annotation of 43BSD/contrib/X/libsun/textutil.c, revision 1.1.1.1

1.1       root        1: #ifndef lint
                      2: static char *rcsid_textutil_c = "$Header: textutil.c,v 10.2 86/02/01 16:21:27 tony Rel $";
                      3: #endif lint
                      4: #ifdef sun
                      5: /*
                      6:  * The Sun X drivers are a product of Sun Microsystems, Inc. and are provided
                      7:  * for unrestricted use provided that this legend is included on all tape
                      8:  * media and as a part of the software program in whole or part.  Users
                      9:  * may copy or modify these drivers without charge, but are not authorized
                     10:  * to license or distribute them to anyone else except as part of a product or
                     11:  * program developed by the user.
                     12:  * 
                     13:  * THE SUN X DRIVERS ARE PROVIDED AS IS WITH NO WARRANTIES OF ANY KIND
                     14:  * INCLUDING THE WARRANTIES OF DESIGN, MERCHANTIBILITY AND FITNESS FOR A
                     15:  * PARTICULAR PURPOSE, OR ARISING FROM A COURSE OF DEALING, USAGE OR TRADE
                     16:  * PRACTICE.
                     17:  *
                     18:  * The Sun X Drivers are provided with no support and without any obligation
                     19:  * on the part of Sun Microsystems, Inc. to assist in their use, correction,
                     20:  * modification or enhancement.
                     21:  * 
                     22:  * SUN MICROSYSTEMS, INC. SHALL HAVE NO LIABILITY WITH RESPECT TO THE
                     23:  * INFRINGEMENT OF COPYRIGHTS, TRADE SECRETS OR ANY PATENTS BY THE SUN X
                     24:  * DRIVERS OR ANY PART THEREOF.
                     25:  * 
                     26:  * In no event will Sun Microsystems, Inc. be liable for any lost revenue
                     27:  * or profits or other special, indirect and consequential damages, even if
                     28:  * Sun has been advised of the possibility of such damages.
                     29:  * 
                     30:  * Sun Microsystems, Inc.
                     31:  * 2550 Garcia Avenue
                     32:  * Mountain View, California  94043
                     33:  */
                     34: 
                     35: #ifndef        lint
                     36: static char sccsid[] = "@(#)textutil.c 2.1 86/01/28 Copyright 1986 Sun Micro";
                     37: #endif
                     38: 
                     39: /*-
                     40:  * Copyright (c) 1986 by Sun Microsystems,  Inc.
                     41:  */
                     42: 
                     43: /* textutil.c  text related utility routines.
                     44:  *
                     45:  *     CopyText        Copy text to bitmap
                     46:  *     TextWidth       Returns width of a piece of text in a font
                     47:  *     CharWidth       Returns width of a character in a font
                     48:  *
                     49:  */
                     50: 
                     51: /*
                     52:  *     ToDo:
                     53:  *             Use static pixrects
                     54:  */
                     55: 
                     56: #include "Xsun.h"
                     57: 
                     58: CopyText (string, strlen, font, bm)
                     59:        char *string;
                     60:        int strlen;
                     61:        FONT *font;
                     62:        BITMAP *bm;
                     63: {
                     64:     struct pixrect *region;
                     65:     int         i;
                     66:     register struct pixfont *pf = (struct pixfont *) font->data;
                     67:     char       *buf = (char *) Xalloc(strlen + 1);
                     68: 
                     69:     strncpy(buf, string, strlen);      /* XXX - to guarantee
                     70:                                         * zero-termination (BARF!) */
                     71:     region = mem_point(bm->width, bm->height, 1, (short *) bm->data);  /* XXX - slow!! */
                     72: #define        CHUNK   80
                     73:     for (i = 0; i < strlen; i += CHUNK) {
                     74:        register int j;
                     75:        struct pr_prpos bat[CHUNK];
                     76: 
                     77:        for (j = 0; j < CHUNK && i + j < strlen; j++) {
                     78:            int         c = string[i + j];
                     79:            register struct pixchar *pc = &(pf->pf_char[c]);
                     80: 
                     81:            bat[j].pr = pc->pc_pr;
                     82:            bat[j].pos = pc->pc_adv;
                     83:        }
                     84:        pr_batchrop(region, 0 - bat[0].pos.x, 0 - bat[0].pos.y, PIX_SRC, bat, j);
                     85:     }
                     86:     pr_destroy(region);                /* XXX - slow */
                     87:     free((caddr_t) buf);
                     88: }
                     89: 
                     90: /* Returns the width of a string in a font */
                     91: 
                     92: int TextWidth (string, strlen, spacepad, font)
                     93:        register char *string;
                     94:        register int strlen;
                     95:        int spacepad;
                     96:        register FONT *font;
                     97: {
                     98:        register unsigned int c;
                     99:        register int width = 0;
                    100: 
                    101:        if (font->fixed) {
                    102:            width = strlen * font->avg_width;
                    103:            if (spacepad) {
                    104:                while (--strlen >= 0)
                    105:                    if (*string++ == font->space)
                    106:                        width += spacepad;
                    107:            }
                    108:        } else {
                    109:            register struct pixfont *pf = (struct pixfont *)font->data;
                    110:            while (--strlen >= 0) {
                    111:                c = *string++;
                    112:                if (c >= font->first && c <= font->last) {
                    113:                    if (c == font->space)
                    114:                        width += spacepad;
                    115:                    width += pf->pf_char[c].pc_adv.x;
                    116:                }
                    117:            }
                    118:        }
                    119: 
                    120:        return (width);
                    121: }
                    122: 
                    123: /* Returns width of a character in a font. */
                    124: 
                    125: int CharWidth(c, font)
                    126:        register unsigned int c;
                    127:        register FONT *font;
                    128: {
                    129: 
                    130:        if (c < font->first || c > font->last)
                    131:            return (0);
                    132:        else if (font->fixed)
                    133:            return (font->avg_width);
                    134:        else
                    135:            return (((struct pixfont *) font->data)->pf_char[c].pc_adv.x);
                    136: }
                    137: #endif sun

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