Home | History | Annotate | Line # | Download | only in wsfont
wsfont.c revision 1.82
      1  1.82  macallan /* 	$NetBSD: wsfont.c,v 1.82 2025/03/25 03:12:36 macallan Exp $	*/
      2   1.1        ad 
      3   1.7        ad /*-
      4  1.24        ad  * Copyright (c) 1999, 2000, 2001, 2002 The NetBSD Foundation, Inc.
      5   1.1        ad  * All rights reserved.
      6   1.1        ad  *
      7   1.7        ad  * This code is derived from software contributed to The NetBSD Foundation
      8  1.13        ad  * by Andrew Doran.
      9   1.7        ad  *
     10   1.1        ad  * Redistribution and use in source and binary forms, with or without
     11   1.1        ad  * modification, are permitted provided that the following conditions
     12   1.1        ad  * are met:
     13   1.1        ad  * 1. Redistributions of source code must retain the above copyright
     14   1.1        ad  *    notice, this list of conditions and the following disclaimer.
     15   1.1        ad  * 2. Redistributions in binary form must reproduce the above copyright
     16   1.1        ad  *    notice, this list of conditions and the following disclaimer in the
     17   1.1        ad  *    documentation and/or other materials provided with the distribution.
     18   1.1        ad  *
     19   1.7        ad  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     20   1.7        ad  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     21   1.7        ad  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     22   1.7        ad  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     23   1.7        ad  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     24   1.7        ad  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     25   1.7        ad  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     26   1.7        ad  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     27   1.7        ad  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     28   1.7        ad  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     29   1.7        ad  * POSSIBILITY OF SUCH DAMAGE.
     30   1.1        ad  */
     31   1.2        ad 
     32   1.1        ad #include <sys/cdefs.h>
     33  1.82  macallan __KERNEL_RCSID(0, "$NetBSD: wsfont.c,v 1.82 2025/03/25 03:12:36 macallan Exp $");
     34   1.1        ad 
     35   1.1        ad #include "opt_wsfont.h"
     36   1.1        ad 
     37   1.1        ad #include <sys/param.h>
     38   1.1        ad #include <sys/systm.h>
     39   1.1        ad #include <sys/time.h>
     40   1.1        ad #include <sys/malloc.h>
     41  1.26       uch #include <sys/queue.h>
     42   1.1        ad 
     43   1.1        ad #include <dev/wscons/wsdisplayvar.h>
     44   1.1        ad #include <dev/wscons/wsconsio.h>
     45   1.1        ad #include <dev/wsfont/wsfont.h>
     46   1.1        ad 
     47  1.44      ober #include "wsfont_glue.h"	/* NRASOPS_ROTATION */
     48  1.44      ober 
     49   1.1        ad #undef HAVE_FONT
     50   1.1        ad 
     51   1.4        ad #ifdef FONT_QVSS8x15
     52   1.1        ad #define HAVE_FONT 1
     53   1.4        ad #include <dev/wsfont/qvss8x15.h>
     54   1.1        ad #endif
     55   1.1        ad 
     56   1.1        ad #ifdef FONT_GALLANT12x22
     57   1.1        ad #define HAVE_FONT 1
     58   1.1        ad #include <dev/wsfont/gallant12x22.h>
     59   1.1        ad #endif
     60   1.1        ad 
     61   1.1        ad #ifdef FONT_LUCIDA16x29
     62   1.1        ad #define HAVE_FONT 1
     63   1.1        ad #include <dev/wsfont/lucida16x29.h>
     64   1.1        ad #endif
     65   1.1        ad 
     66   1.8  takemura #ifdef FONT_VT220L8x8
     67   1.8  takemura #define HAVE_FONT 1
     68   1.8  takemura #include <dev/wsfont/vt220l8x8.h>
     69   1.8  takemura #endif
     70   1.8  takemura 
     71   1.8  takemura #ifdef FONT_VT220L8x10
     72   1.8  takemura #define HAVE_FONT 1
     73   1.8  takemura #include <dev/wsfont/vt220l8x10.h>
     74   1.8  takemura #endif
     75   1.8  takemura 
     76  1.30   tsutsui #ifdef FONT_VT220L8x16
     77  1.30   tsutsui #define HAVE_FONT 1
     78  1.30   tsutsui #include <dev/wsfont/vt220l8x16.h>
     79  1.30   tsutsui #endif
     80  1.30   tsutsui 
     81  1.48   tsutsui #ifdef FONT_VT220ISO8x8
     82  1.48   tsutsui #define HAVE_FONT 1
     83  1.48   tsutsui #include <dev/wsfont/vt220iso8x8.h>
     84  1.48   tsutsui #endif
     85  1.48   tsutsui 
     86  1.30   tsutsui #ifdef FONT_VT220ISO8x16
     87  1.30   tsutsui #define HAVE_FONT 1
     88  1.30   tsutsui #include <dev/wsfont/vt220iso8x16.h>
     89  1.30   tsutsui #endif
     90  1.30   tsutsui 
     91  1.34       uwe #ifdef FONT_VT220KOI8x10_KOI8_R
     92  1.34       uwe #define HAVE_FONT 1
     93  1.34       uwe #include <dev/wsfont/vt220koi8x10.h>
     94  1.34       uwe #endif
     95  1.34       uwe 
     96  1.34       uwe #ifdef FONT_VT220KOI8x10_KOI8_U
     97  1.34       uwe #define HAVE_FONT 1
     98  1.34       uwe #define KOI8_U
     99  1.34       uwe #include <dev/wsfont/vt220koi8x10.h>
    100  1.34       uwe #undef KOI8_U
    101  1.34       uwe #endif
    102  1.34       uwe 
    103  1.14   tsutsui #ifdef FONT_SONY8x16
    104  1.14   tsutsui #define HAVE_FONT 1
    105  1.14   tsutsui #include <dev/wsfont/sony8x16.h>
    106  1.14   tsutsui #endif
    107  1.14   tsutsui 
    108  1.14   tsutsui #ifdef FONT_SONY12x24
    109  1.14   tsutsui #define HAVE_FONT 1
    110  1.14   tsutsui #include <dev/wsfont/sony12x24.h>
    111  1.14   tsutsui #endif
    112  1.14   tsutsui 
    113  1.15   tsutsui #ifdef FONT_OMRON12x20
    114  1.15   tsutsui #define HAVE_FONT 1
    115  1.15   tsutsui #include <dev/wsfont/omron12x20.h>
    116  1.15   tsutsui #endif
    117  1.15   tsutsui 
    118  1.57  christos #ifdef FONT_GLASS10x19
    119  1.57  christos #define HAVE_FONT 1
    120  1.57  christos #include <dev/wsfont/glass10x19.h>
    121  1.57  christos #endif
    122  1.57  christos 
    123  1.57  christos #ifdef FONT_GLASS10x25
    124  1.57  christos #define HAVE_FONT 1
    125  1.57  christos #include <dev/wsfont/glass10x25.h>
    126  1.57  christos #endif
    127  1.57  christos 
    128  1.51  macallan #ifdef FONT_DEJAVU_SANS_MONO12x22
    129  1.65       rin #define HAVE_FONT 1
    130  1.51  macallan #include <dev/wsfont/DejaVu_Sans_Mono_12x22.h>
    131  1.51  macallan #endif
    132  1.51  macallan 
    133  1.74       rin #ifdef FONT_DROID_SANS_MONO9x18
    134  1.65       rin #define HAVE_FONT 1
    135  1.74       rin #include <dev/wsfont/Droid_Sans_Mono_9x18.h>
    136  1.51  macallan #endif
    137  1.51  macallan 
    138  1.75       rin #ifdef FONT_DROID_SANS_MONO10x20
    139  1.75       rin #define HAVE_FONT 1
    140  1.75       rin #include <dev/wsfont/Droid_Sans_Mono_10x20.h>
    141  1.75       rin #endif
    142  1.75       rin 
    143  1.74       rin #ifdef FONT_DROID_SANS_MONO12x22
    144  1.65       rin #define HAVE_FONT 1
    145  1.74       rin #include <dev/wsfont/Droid_Sans_Mono_12x22.h>
    146  1.52  macallan #endif
    147  1.52  macallan 
    148  1.56  macallan #ifdef FONT_DROID_SANS_MONO19x36
    149  1.65       rin #define HAVE_FONT 1
    150  1.56  macallan #include <dev/wsfont/Droid_Sans_Mono_19x36.h>
    151  1.56  macallan #endif
    152  1.56  macallan 
    153  1.61  macallan #ifdef FONT_GO_MONO12x23
    154  1.65       rin #define HAVE_FONT 1
    155  1.61  macallan #include <dev/wsfont/Go_Mono_12x23.h>
    156  1.61  macallan #endif
    157  1.61  macallan 
    158  1.70       rin #ifdef FONT_SPLEEN5x8
    159  1.65       rin #define HAVE_FONT 1
    160  1.70       rin #include <dev/wsfont/spleen5x8.h>
    161  1.64       tnn #endif
    162  1.64       tnn 
    163  1.70       rin #ifdef FONT_SPLEEN6x12
    164  1.65       rin #define HAVE_FONT 1
    165  1.70       rin #include <dev/wsfont/spleen6x12.h>
    166  1.64       tnn #endif
    167  1.64       tnn 
    168  1.70       rin #ifdef FONT_SPLEEN8x16
    169  1.65       rin #define HAVE_FONT 1
    170  1.70       rin #include <dev/wsfont/spleen8x16.h>
    171  1.64       tnn #endif
    172  1.64       tnn 
    173  1.70       rin #ifdef FONT_SPLEEN12x24
    174  1.65       rin #define HAVE_FONT 1
    175  1.70       rin #include <dev/wsfont/spleen12x24.h>
    176  1.64       tnn #endif
    177  1.64       tnn 
    178  1.70       rin #ifdef FONT_SPLEEN16x32
    179  1.68   fcambus #define HAVE_FONT 1
    180  1.70       rin #include <dev/wsfont/spleen16x32.h>
    181  1.68   fcambus #endif
    182  1.68   fcambus 
    183  1.70       rin #ifdef FONT_SPLEEN32x64
    184  1.65       rin #define HAVE_FONT 1
    185  1.70       rin #include <dev/wsfont/spleen32x64.h>
    186  1.64       tnn #endif
    187  1.64       tnn 
    188  1.69  macallan #ifdef FONT_LIBERATION_MONO12x21
    189  1.69  macallan #define HAVE_FONT 1
    190  1.69  macallan #include <dev/wsfont/Liberation_Mono_12x21.h>
    191  1.69  macallan #endif
    192  1.69  macallan 
    193  1.66  jmcneill #ifdef FONT_BOLD16x32
    194  1.66  jmcneill #define HAVE_FONT 1
    195  1.66  jmcneill #include <dev/wsfont/bold16x32.h>
    196  1.66  jmcneill #endif
    197  1.66  jmcneill 
    198  1.79  macallan #ifdef FONT_TERMINAL8x13
    199  1.79  macallan #define HAVE_FONT 1
    200  1.79  macallan #include <dev/wsfont/term14.h>
    201  1.79  macallan #endif
    202  1.79  macallan 
    203  1.82  macallan #ifdef FONT_COMIC12x25
    204  1.81  macallan #define HAVE_FONT 1
    205  1.82  macallan #include <dev/wsfont/Comic_Mono_12x25.h>
    206  1.81  macallan #endif
    207  1.81  macallan 
    208  1.53  macallan /* Make sure we always have at least one bitmap font. */
    209   1.1        ad #ifndef HAVE_FONT
    210   1.1        ad #define HAVE_FONT 1
    211   1.4        ad #define FONT_BOLD8x16 1
    212   1.1        ad #endif
    213   1.1        ad 
    214   1.4        ad #ifdef FONT_BOLD8x16
    215   1.4        ad #include <dev/wsfont/bold8x16.h>
    216   1.1        ad #endif
    217   1.1        ad 
    218  1.25        ad #define	WSFONT_IDENT_MASK	0xffffff00
    219  1.25        ad #define	WSFONT_IDENT_SHIFT	8
    220  1.25        ad #define	WSFONT_BITO_MASK	0x000000f0
    221  1.25        ad #define	WSFONT_BITO_SHIFT	4
    222  1.25        ad #define	WSFONT_BYTEO_MASK	0x0000000f
    223  1.25        ad #define	WSFONT_BYTEO_SHIFT	0
    224  1.25        ad 
    225  1.25        ad #define WSFONT_BUILTIN	0x01	/* In wsfont.c */
    226  1.25        ad #define WSFONT_STATIC	0x02	/* Font structures not malloc()ed */
    227  1.25        ad #define WSFONT_COPY	0x04	/* Copy of existing font in table */
    228  1.25        ad 
    229   1.1        ad /* Placeholder struct used for linked list */
    230   1.1        ad struct font {
    231  1.25        ad 	TAILQ_ENTRY(font) chain;
    232   1.1        ad 	struct	wsdisplay_font *font;
    233  1.25        ad 	u_int	lockcount;
    234  1.25        ad 	u_int	cookie;
    235  1.25        ad 	u_int	flags;
    236  1.25        ad };
    237   1.1        ad 
    238   1.1        ad /* Our list of built-in fonts */
    239  1.25        ad static struct font builtin_fonts[] = {
    240   1.1        ad #ifdef FONT_BOLD8x16
    241  1.43  christos 	{ { NULL, NULL }, &bold8x16, 0, 0, WSFONT_STATIC | WSFONT_BUILTIN  },
    242   1.1        ad #endif
    243  1.66  jmcneill #ifdef FONT_BOLD16x32
    244  1.66  jmcneill 	{ { NULL, NULL }, &bold16x32, 0, 0, WSFONT_STATIC | WSFONT_BUILTIN  },
    245  1.66  jmcneill #endif
    246   1.1        ad #ifdef FONT_GALLANT12x22
    247  1.43  christos 	{ { NULL, NULL }, &gallant12x22, 0, 0, WSFONT_STATIC | WSFONT_BUILTIN },
    248   1.1        ad #endif
    249   1.1        ad #ifdef FONT_LUCIDA16x29
    250  1.43  christos 	{ { NULL, NULL }, &lucida16x29, 0, 0, WSFONT_STATIC | WSFONT_BUILTIN },
    251   1.1        ad #endif
    252   1.1        ad #ifdef FONT_QVSS8x15
    253  1.43  christos 	{ { NULL, NULL }, &qvss8x15, 0, 0, WSFONT_STATIC | WSFONT_BUILTIN },
    254   1.8  takemura #endif
    255   1.8  takemura #ifdef FONT_VT220L8x8
    256  1.43  christos 	{ { NULL, NULL }, &vt220l8x8, 0, 0, WSFONT_STATIC | WSFONT_BUILTIN },
    257   1.8  takemura #endif
    258   1.8  takemura #ifdef FONT_VT220L8x10
    259  1.43  christos 	{ { NULL, NULL }, &vt220l8x10, 0, 0, WSFONT_STATIC | WSFONT_BUILTIN },
    260  1.30   tsutsui #endif
    261  1.30   tsutsui #ifdef FONT_VT220L8x16
    262  1.43  christos 	{ { NULL, NULL }, &vt220l8x16, 0, 0, WSFONT_STATIC | WSFONT_BUILTIN },
    263  1.30   tsutsui #endif
    264  1.48   tsutsui #ifdef FONT_VT220ISO8x8
    265  1.48   tsutsui 	{ { NULL, NULL }, &vt220iso8x8, 0, 0, WSFONT_STATIC | WSFONT_BUILTIN },
    266  1.48   tsutsui #endif
    267  1.30   tsutsui #ifdef FONT_VT220ISO8x16
    268  1.43  christos 	{ { NULL, NULL }, &vt220iso8x16, 0, 0, WSFONT_STATIC | WSFONT_BUILTIN },
    269  1.34       uwe #endif
    270  1.34       uwe #ifdef FONT_VT220KOI8x10_KOI8_R
    271  1.43  christos 	{ { NULL, NULL }, &vt220kr8x10, 0, 0, WSFONT_STATIC | WSFONT_BUILTIN },
    272  1.34       uwe #endif
    273  1.34       uwe #ifdef FONT_VT220KOI8x10_KOI8_U
    274  1.43  christos 	{ { NULL, NULL }, &vt220ku8x10, 0, 0, WSFONT_STATIC | WSFONT_BUILTIN },
    275  1.14   tsutsui #endif
    276  1.14   tsutsui #ifdef FONT_SONY8x16
    277  1.43  christos 	{ { NULL, NULL }, &sony8x16, 0, 0, WSFONT_STATIC | WSFONT_BUILTIN },
    278  1.14   tsutsui #endif
    279  1.14   tsutsui #ifdef FONT_SONY12x24
    280  1.43  christos 	{ { NULL, NULL }, &sony12x24, 0, 0, WSFONT_STATIC | WSFONT_BUILTIN },
    281  1.15   tsutsui #endif
    282  1.15   tsutsui #ifdef FONT_OMRON12x20
    283  1.43  christos 	{ { NULL, NULL }, &omron12x20, 0, 0, WSFONT_STATIC | WSFONT_BUILTIN },
    284   1.1        ad #endif
    285  1.57  christos #ifdef FONT_GLASS10x19
    286  1.57  christos 	{ { NULL, NULL }, &Glass_TTY_VT220_10x19, 0, 0, WSFONT_STATIC | WSFONT_BUILTIN },
    287  1.57  christos #endif
    288  1.57  christos #ifdef FONT_GLASS10x25
    289  1.57  christos 	{ { NULL, NULL }, &Glass_TTY_VT220_10x25, 0, 0, WSFONT_STATIC | WSFONT_BUILTIN },
    290  1.57  christos #endif
    291  1.51  macallan #ifdef FONT_DEJAVU_SANS_MONO12x22
    292  1.51  macallan 	{ { NULL, NULL }, &DejaVu_Sans_Mono_12x22, 0, 0, WSFONT_STATIC | WSFONT_BUILTIN },
    293  1.51  macallan #endif
    294  1.76       rin #ifdef FONT_DROID_SANS_MONO9x18
    295  1.76       rin 	{ { NULL, NULL }, &Droid_Sans_Mono_9x18, 0, 0, WSFONT_STATIC | WSFONT_BUILTIN },
    296  1.76       rin #endif
    297  1.76       rin #ifdef FONT_DROID_SANS_MONO10x20
    298  1.76       rin 	{ { NULL, NULL }, &Droid_Sans_Mono_10x20, 0, 0, WSFONT_STATIC | WSFONT_BUILTIN },
    299  1.76       rin #endif
    300  1.51  macallan #ifdef FONT_DROID_SANS_MONO12x22
    301  1.51  macallan 	{ { NULL, NULL }, &Droid_Sans_Mono_12x22, 0, 0, WSFONT_STATIC | WSFONT_BUILTIN },
    302  1.51  macallan #endif
    303  1.56  macallan #ifdef FONT_DROID_SANS_MONO19x36
    304  1.56  macallan 	{ { NULL, NULL }, &Droid_Sans_Mono_19x36, 0, 0, WSFONT_STATIC | WSFONT_BUILTIN },
    305  1.56  macallan #endif
    306  1.61  macallan #ifdef FONT_GO_MONO12x23
    307  1.61  macallan 	{ { NULL, NULL }, &Go_Mono_12x23, 0, 0, WSFONT_STATIC | WSFONT_BUILTIN },
    308  1.61  macallan #endif
    309  1.71       rin #ifdef FONT_SPLEEN5x8
    310  1.71       rin 	{ { NULL, NULL }, &spleen5x8, 0, 0, WSFONT_STATIC | WSFONT_BUILTIN },
    311  1.71       rin #endif
    312  1.71       rin #ifdef FONT_SPLEEN6x12
    313  1.71       rin 	{ { NULL, NULL }, &spleen6x12, 0, 0, WSFONT_STATIC | WSFONT_BUILTIN },
    314  1.71       rin #endif
    315  1.71       rin #ifdef FONT_SPLEEN8x16
    316  1.71       rin 	{ { NULL, NULL }, &spleen8x16, 0, 0, WSFONT_STATIC | WSFONT_BUILTIN },
    317  1.71       rin #endif
    318  1.64       tnn #ifdef FONT_SPLEEN12x24
    319  1.64       tnn 	{ { NULL, NULL }, &spleen12x24, 0, 0, WSFONT_STATIC | WSFONT_BUILTIN },
    320  1.64       tnn #endif
    321  1.64       tnn #ifdef FONT_SPLEEN16x32
    322  1.64       tnn 	{ { NULL, NULL }, &spleen16x32, 0, 0, WSFONT_STATIC | WSFONT_BUILTIN },
    323  1.64       tnn #endif
    324  1.64       tnn #ifdef FONT_SPLEEN32x64
    325  1.64       tnn 	{ { NULL, NULL }, &spleen32x64, 0, 0, WSFONT_STATIC | WSFONT_BUILTIN },
    326  1.64       tnn #endif
    327  1.69  macallan #ifdef FONT_LIBERATION_MONO12x21
    328  1.69  macallan 	{ { NULL, NULL }, &Liberation_Mono_12x21, 0, 0, WSFONT_STATIC | WSFONT_BUILTIN },
    329  1.69  macallan #endif
    330  1.79  macallan #ifdef FONT_TERMINAL8x13
    331  1.79  macallan 	{ { NULL, NULL }, &Terminal_8x13, 0, 0, WSFONT_STATIC | WSFONT_BUILTIN },
    332  1.79  macallan #endif
    333  1.82  macallan #ifdef FONT_COMIC12x25
    334  1.82  macallan 	{ { NULL, NULL }, &Comic_Mono_12x25, 0, 0, WSFONT_STATIC | WSFONT_BUILTIN },
    335  1.81  macallan #endif
    336  1.43  christos 	{ { NULL, NULL }, NULL, 0, 0, 0 },
    337   1.1        ad };
    338   1.1        ad 
    339  1.25        ad static TAILQ_HEAD(,font)	list;
    340  1.25        ad static int	ident;
    341  1.25        ad 
    342   1.1        ad /* Reverse the bit order in a byte */
    343   1.1        ad static const u_char reverse[256] = {
    344  1.37     perry 	0x00, 0x80, 0x40, 0xc0, 0x20, 0xa0, 0x60, 0xe0,
    345  1.37     perry 	0x10, 0x90, 0x50, 0xd0, 0x30, 0xb0, 0x70, 0xf0,
    346  1.37     perry 	0x08, 0x88, 0x48, 0xc8, 0x28, 0xa8, 0x68, 0xe8,
    347  1.37     perry 	0x18, 0x98, 0x58, 0xd8, 0x38, 0xb8, 0x78, 0xf8,
    348  1.37     perry 	0x04, 0x84, 0x44, 0xc4, 0x24, 0xa4, 0x64, 0xe4,
    349  1.37     perry 	0x14, 0x94, 0x54, 0xd4, 0x34, 0xb4, 0x74, 0xf4,
    350  1.37     perry 	0x0c, 0x8c, 0x4c, 0xcc, 0x2c, 0xac, 0x6c, 0xec,
    351  1.37     perry 	0x1c, 0x9c, 0x5c, 0xdc, 0x3c, 0xbc, 0x7c, 0xfc,
    352  1.37     perry 	0x02, 0x82, 0x42, 0xc2, 0x22, 0xa2, 0x62, 0xe2,
    353  1.37     perry 	0x12, 0x92, 0x52, 0xd2, 0x32, 0xb2, 0x72, 0xf2,
    354  1.37     perry 	0x0a, 0x8a, 0x4a, 0xca, 0x2a, 0xaa, 0x6a, 0xea,
    355  1.37     perry 	0x1a, 0x9a, 0x5a, 0xda, 0x3a, 0xba, 0x7a, 0xfa,
    356  1.37     perry 	0x06, 0x86, 0x46, 0xc6, 0x26, 0xa6, 0x66, 0xe6,
    357  1.37     perry 	0x16, 0x96, 0x56, 0xd6, 0x36, 0xb6, 0x76, 0xf6,
    358  1.37     perry 	0x0e, 0x8e, 0x4e, 0xce, 0x2e, 0xae, 0x6e, 0xee,
    359  1.37     perry 	0x1e, 0x9e, 0x5e, 0xde, 0x3e, 0xbe, 0x7e, 0xfe,
    360  1.37     perry 	0x01, 0x81, 0x41, 0xc1, 0x21, 0xa1, 0x61, 0xe1,
    361  1.37     perry 	0x11, 0x91, 0x51, 0xd1, 0x31, 0xb1, 0x71, 0xf1,
    362  1.37     perry 	0x09, 0x89, 0x49, 0xc9, 0x29, 0xa9, 0x69, 0xe9,
    363  1.37     perry 	0x19, 0x99, 0x59, 0xd9, 0x39, 0xb9, 0x79, 0xf9,
    364  1.37     perry 	0x05, 0x85, 0x45, 0xc5, 0x25, 0xa5, 0x65, 0xe5,
    365  1.37     perry 	0x15, 0x95, 0x55, 0xd5, 0x35, 0xb5, 0x75, 0xf5,
    366  1.37     perry 	0x0d, 0x8d, 0x4d, 0xcd, 0x2d, 0xad, 0x6d, 0xed,
    367  1.37     perry 	0x1d, 0x9d, 0x5d, 0xdd, 0x3d, 0xbd, 0x7d, 0xfd,
    368  1.37     perry 	0x03, 0x83, 0x43, 0xc3, 0x23, 0xa3, 0x63, 0xe3,
    369  1.37     perry 	0x13, 0x93, 0x53, 0xd3, 0x33, 0xb3, 0x73, 0xf3,
    370  1.37     perry 	0x0b, 0x8b, 0x4b, 0xcb, 0x2b, 0xab, 0x6b, 0xeb,
    371  1.37     perry 	0x1b, 0x9b, 0x5b, 0xdb, 0x3b, 0xbb, 0x7b, 0xfb,
    372  1.37     perry 	0x07, 0x87, 0x47, 0xc7, 0x27, 0xa7, 0x67, 0xe7,
    373  1.37     perry 	0x17, 0x97, 0x57, 0xd7, 0x37, 0xb7, 0x77, 0xf7,
    374  1.37     perry 	0x0f, 0x8f, 0x4f, 0xcf, 0x2f, 0xaf, 0x6f, 0xef,
    375  1.37     perry 	0x1f, 0x9f, 0x5f, 0xdf, 0x3f, 0xbf, 0x7f, 0xff,
    376   1.1        ad };
    377   1.1        ad 
    378  1.25        ad static struct	font *wsfont_find0(int, int);
    379  1.25        ad static struct	font *wsfont_add0(struct wsdisplay_font *, int);
    380  1.22  augustss static void	wsfont_revbit(struct wsdisplay_font *);
    381  1.22  augustss static void	wsfont_revbyte(struct wsdisplay_font *);
    382  1.25        ad 
    383  1.53  macallan int
    384  1.38  christos wsfont_make_cookie(int cident, int bito, int byteo)
    385  1.25        ad {
    386  1.25        ad 
    387  1.38  christos 	return ((cident & WSFONT_IDENT_MASK) |
    388  1.25        ad 	    (bito << WSFONT_BITO_SHIFT) |
    389  1.25        ad 	    (byteo << WSFONT_BYTEO_SHIFT));
    390  1.25        ad }
    391   1.1        ad 
    392   1.1        ad static void
    393  1.22  augustss wsfont_revbit(struct wsdisplay_font *font)
    394   1.1        ad {
    395   1.1        ad 	u_char *p, *m;
    396  1.24        ad 
    397   1.1        ad 	p = (u_char *)font->data;
    398   1.1        ad 	m = p + font->stride * font->numchars * font->fontheight;
    399  1.18       cgd 
    400  1.37     perry 	for (; p < m; p++)
    401  1.18       cgd 		*p = reverse[*p];
    402   1.1        ad }
    403   1.1        ad 
    404   1.1        ad static void
    405  1.22  augustss wsfont_revbyte(struct wsdisplay_font *font)
    406   1.1        ad {
    407   1.1        ad 	int x, l, r, nr;
    408   1.1        ad 	u_char *rp;
    409  1.24        ad 
    410   1.1        ad 	if (font->stride == 1)
    411   1.1        ad 		return;
    412   1.1        ad 
    413   1.1        ad 	rp = (u_char *)font->data;
    414   1.1        ad 	nr = font->numchars * font->fontheight;
    415  1.24        ad 
    416   1.1        ad 	while (nr--) {
    417   1.1        ad 		l = 0;
    418   1.1        ad 		r = font->stride - 1;
    419  1.24        ad 
    420   1.1        ad 		while (l < r) {
    421   1.1        ad 			x = rp[l];
    422   1.1        ad 			rp[l] = rp[r];
    423   1.1        ad 			rp[r] = x;
    424   1.1        ad 			l++, r--;
    425   1.1        ad 		}
    426  1.24        ad 
    427   1.1        ad 		rp += font->stride;
    428   1.1        ad 	}
    429   1.1        ad }
    430   1.1        ad 
    431   1.1        ad void
    432  1.31  jdolecek wsfont_enum(void (*cb)(const char *, int, int, int))
    433   1.1        ad {
    434   1.9        ad 	struct wsdisplay_font *f;
    435   1.1        ad 	struct font *ent;
    436  1.24        ad 
    437  1.25        ad 	TAILQ_FOREACH(ent, &list, chain) {
    438  1.37     perry 		f = ent->font;
    439   1.9        ad 		cb(f->name, f->fontwidth, f->fontheight, f->stride);
    440   1.1        ad 	}
    441   1.1        ad }
    442   1.1        ad 
    443  1.44      ober #if NRASOPS_ROTATION > 0
    444  1.44      ober 
    445  1.73       rin static struct wsdisplay_font *
    446  1.73       rin wsfont_rotate_internal(struct wsdisplay_font *font, int rotate)
    447  1.44      ober {
    448  1.44      ober 	struct wsdisplay_font *newfont;
    449  1.73       rin 	char *newname, *newdata;
    450  1.73       rin 	u_char *ch, *newch, *p, *newp;
    451  1.73       rin 	int namelen, newstride, n, h, w;
    452  1.73       rin 	u_char bit;
    453  1.73       rin 	bool alpha = FONT_IS_ALPHA(font), cw = (rotate == WSFONT_ROTATE_CW);
    454  1.44      ober 
    455  1.44      ober 	/* Duplicate the existing font... */
    456  1.44      ober 	newfont = malloc(sizeof(*font), M_DEVBUF, M_WAITOK);
    457  1.44      ober 
    458  1.44      ober 	*newfont = *font;
    459  1.44      ober 
    460  1.50   tsutsui 	namelen = strlen(font->name) + 4;
    461  1.50   tsutsui 	newname = malloc(namelen, M_DEVBUF, M_WAITOK);
    462  1.50   tsutsui 	strlcpy(newname, font->name, namelen);
    463  1.73       rin 	strlcat(newname, cw ? "cw" : "ccw", namelen);
    464  1.50   tsutsui 	newfont->name = newname;
    465  1.50   tsutsui 
    466  1.44      ober 	/* Allocate a buffer big enough for the rotated font. */
    467  1.73       rin 	newstride = alpha ? font->fontheight : howmany(font->fontheight, 8);
    468  1.73       rin 	newdata = malloc(newstride * font->fontwidth * font->numchars,
    469  1.44      ober 	    M_DEVBUF, M_WAITOK|M_ZERO);
    470  1.44      ober 
    471  1.73       rin #define	BYTE_OFFSET(x, alpha)	((alpha) ? (x) : (x) / 8)
    472  1.73       rin #define	BIT_FROM_LEFT(x)	__BIT(7 - ((x) % 8))
    473  1.73       rin #define	BIT_FROM_RIGHT(x)	__BIT((x) % 8)
    474  1.73       rin 
    475  1.73       rin 	/* Rotate the font a pixel at a time. */
    476  1.44      ober 	for (n = 0; n < font->numchars; n++) {
    477  1.73       rin 		ch = (u_char *)font->data +
    478  1.44      ober 		    (n * font->stride * font->fontheight);
    479  1.73       rin 		newch = newdata +
    480  1.73       rin 		    (n * newstride * font->fontwidth);
    481  1.73       rin 		for (h = 0; h < font->fontheight; h++) {
    482  1.73       rin 			for (w = 0; w < font->fontwidth; w++) {
    483  1.73       rin 				p = ch + (h * font->stride) +
    484  1.73       rin 				    BYTE_OFFSET(w, alpha);
    485  1.73       rin 				if (cw) {
    486  1.73       rin 					/* Rotate clockwise. */
    487  1.73       rin 					newp = newch +
    488  1.73       rin 					    (w * newstride) +
    489  1.73       rin 					    (newstride - 1 -
    490  1.73       rin 						BYTE_OFFSET(h, alpha));
    491  1.73       rin 					bit = BIT_FROM_RIGHT(h);
    492  1.73       rin 				} else {
    493  1.73       rin 					/* Rotate counter-clockwise. */
    494  1.73       rin 					newp = newch +
    495  1.73       rin 					    ((font->fontwidth - 1 - w) *
    496  1.73       rin 						newstride) +
    497  1.73       rin 					    BYTE_OFFSET(h, alpha);
    498  1.73       rin 					bit = BIT_FROM_LEFT(h);
    499  1.73       rin 				}
    500  1.73       rin 				if (alpha) {
    501  1.73       rin 					*newp = *p;
    502  1.73       rin 				} else {
    503  1.73       rin 					if (*p & BIT_FROM_LEFT(w))
    504  1.73       rin 						*newp |= bit;
    505  1.44      ober 				}
    506  1.44      ober 			}
    507  1.44      ober 		}
    508  1.44      ober 	}
    509  1.44      ober 
    510  1.73       rin #undef	BYTE_OFFSET
    511  1.73       rin #undef	BIT_FROM_LEFT
    512  1.73       rin #undef	BIT_FROM_RIGHT
    513  1.46    nonaka 
    514  1.73       rin 	newfont->data = newdata;
    515  1.46    nonaka 
    516  1.46    nonaka 	/* Update font sizes. */
    517  1.46    nonaka 	newfont->stride = newstride;
    518  1.46    nonaka 	newfont->fontwidth = font->fontheight;
    519  1.46    nonaka 	newfont->fontheight = font->fontwidth;
    520  1.46    nonaka 
    521  1.46    nonaka 	if (wsfont_add(newfont, 0) != 0) {
    522  1.46    nonaka 		/*
    523  1.46    nonaka 		 * If we seem to have rotated this font already, drop the
    524  1.46    nonaka 		 * new one...
    525  1.46    nonaka 		 */
    526  1.73       rin 		free(newdata, M_DEVBUF);
    527  1.46    nonaka 		free(newfont, M_DEVBUF);
    528  1.46    nonaka 		newfont = NULL;
    529  1.46    nonaka 	}
    530  1.46    nonaka 
    531  1.46    nonaka 	return (newfont);
    532  1.46    nonaka }
    533  1.46    nonaka 
    534  1.44      ober int
    535  1.46    nonaka wsfont_rotate(int cookie, int rotate)
    536  1.44      ober {
    537  1.44      ober 	int s, ncookie;
    538  1.44      ober 	struct wsdisplay_font *font;
    539  1.44      ober 	struct font *origfont;
    540  1.44      ober 
    541  1.44      ober 	s = splhigh();
    542  1.44      ober 	origfont = wsfont_find0(cookie, 0xffffffff);
    543  1.44      ober 	splx(s);
    544  1.44      ober 
    545  1.72       rin 	if (origfont == NULL)
    546  1.72       rin 		return (-1);
    547  1.72       rin 
    548  1.46    nonaka 	switch (rotate) {
    549  1.46    nonaka 	case WSFONT_ROTATE_CW:
    550  1.46    nonaka 	case WSFONT_ROTATE_CCW:
    551  1.73       rin 		font = wsfont_rotate_internal(origfont->font, rotate);
    552  1.46    nonaka 		if (font == NULL)
    553  1.46    nonaka 			return (-1);
    554  1.46    nonaka 		break;
    555  1.46    nonaka 
    556  1.46    nonaka 	case WSFONT_ROTATE_UD:
    557  1.46    nonaka 	default:
    558  1.44      ober 		return (-1);
    559  1.46    nonaka 	}
    560  1.73       rin 
    561  1.44      ober 	ncookie = wsfont_find(font->name, font->fontwidth, font->fontheight,
    562  1.73       rin 	    font->stride, 0, 0, WSFONT_FIND_ALL);
    563  1.44      ober 
    564  1.44      ober 	return (ncookie);
    565  1.44      ober }
    566  1.44      ober 
    567  1.44      ober #endif	/* NRASOPS_ROTATION */
    568  1.44      ober 
    569   1.1        ad void
    570   1.1        ad wsfont_init(void)
    571   1.1        ad {
    572  1.25        ad 	struct font *ent;
    573   1.1        ad 	static int again;
    574   1.1        ad 	int i;
    575  1.25        ad 
    576   1.9        ad 	if (again != 0)
    577   1.1        ad 		return;
    578   1.1        ad 	again = 1;
    579  1.25        ad 
    580  1.25        ad 	TAILQ_INIT(&list);
    581  1.25        ad 	ent = builtin_fonts;
    582  1.25        ad 
    583  1.25        ad 	for (i = 0; builtin_fonts[i].font != NULL; i++, ent++) {
    584  1.25        ad 		ident += (1 << WSFONT_IDENT_SHIFT);
    585  1.25        ad 		ent->cookie = wsfont_make_cookie(ident,
    586  1.25        ad 		    ent->font->bitorder, ent->font->byteorder);
    587  1.25        ad 		TAILQ_INSERT_TAIL(&list, ent, chain);
    588   1.1        ad 	}
    589   1.1        ad }
    590   1.1        ad 
    591   1.1        ad static struct font *
    592  1.25        ad wsfont_find0(int cookie, int mask)
    593   1.1        ad {
    594   1.1        ad 	struct font *ent;
    595  1.24        ad 
    596  1.25        ad 	TAILQ_FOREACH(ent, &list, chain) {
    597  1.25        ad 		if ((ent->cookie & mask) == (cookie & mask))
    598   1.1        ad 			return (ent);
    599  1.25        ad 	}
    600  1.24        ad 
    601   1.1        ad 	return (NULL);
    602   1.1        ad }
    603   1.1        ad 
    604  1.21  drochner int
    605  1.31  jdolecek wsfont_matches(struct wsdisplay_font *font, const char *name,
    606  1.53  macallan 	       int width, int height, int stride, int flags)
    607  1.21  drochner {
    608  1.59   mlelstv 	int score = 20000;
    609  1.21  drochner 
    610  1.53  macallan 	/* first weed out fonts the caller doesn't claim support for */
    611  1.53  macallan 	if (FONT_IS_ALPHA(font)) {
    612  1.60  macallan 		if (flags & WSFONT_PREFER_ALPHA)
    613  1.60  macallan 			score++;
    614  1.53  macallan 		if ((flags & WSFONT_FIND_ALPHA) == 0)
    615  1.53  macallan 			return 0;
    616  1.53  macallan 	} else {
    617  1.53  macallan 		if ((flags & WSFONT_FIND_BITMAP) == 0)
    618  1.53  macallan 			return 0;
    619  1.53  macallan 	}
    620  1.53  macallan 
    621  1.21  drochner 	if (height != 0 && font->fontheight != height)
    622  1.21  drochner 		return (0);
    623  1.21  drochner 
    624  1.58   mlelstv 	if (width != 0) {
    625  1.58   mlelstv 		if ((flags & WSFONT_FIND_BESTWIDTH) == 0) {
    626  1.58   mlelstv 			if (font->fontwidth != width)
    627  1.58   mlelstv 				return (0);
    628  1.58   mlelstv 		} else {
    629  1.77  jmcneill 			if (font->fontwidth > width) {
    630  1.77  jmcneill 				score -= uimin(font->fontwidth - width, 9999);
    631  1.77  jmcneill 				if ((flags & WSFONT_PREFER_WIDE) == 0) {
    632  1.77  jmcneill 					score -= 10000;
    633  1.77  jmcneill 				}
    634  1.77  jmcneill 			} else {
    635  1.63  riastrad 				score -= uimin(width - font->fontwidth, 9999);
    636  1.77  jmcneill 				if ((flags & WSFONT_PREFER_WIDE) != 0) {
    637  1.77  jmcneill 					score -= 10000;
    638  1.77  jmcneill 				}
    639  1.77  jmcneill 			}
    640  1.58   mlelstv 		}
    641  1.58   mlelstv 	}
    642  1.21  drochner 
    643  1.21  drochner 	if (stride != 0 && font->stride != stride)
    644  1.21  drochner 		return (0);
    645  1.24        ad 
    646  1.21  drochner 	if (name != NULL && strcmp(font->name, name) != 0)
    647  1.21  drochner 		return (0);
    648  1.21  drochner 
    649  1.58   mlelstv 	return (score);
    650  1.21  drochner }
    651  1.21  drochner 
    652   1.1        ad int
    653  1.53  macallan wsfont_find(const char *name, int width, int height, int stride, int bito, int byteo, int flags)
    654   1.1        ad {
    655  1.58   mlelstv 	struct font *ent, *bestent = NULL;
    656  1.58   mlelstv 	int score, bestscore = 0;
    657  1.24        ad 
    658  1.25        ad 	TAILQ_FOREACH(ent, &list, chain) {
    659  1.58   mlelstv 		score = wsfont_matches(ent->font, name,
    660  1.58   mlelstv 				width, height, stride, flags);
    661  1.58   mlelstv 		if (score > bestscore) {
    662  1.58   mlelstv 			bestscore = score;
    663  1.58   mlelstv 			bestent = ent;
    664  1.58   mlelstv 		}
    665   1.1        ad 	}
    666   1.1        ad 
    667  1.58   mlelstv 	if (bestent != NULL)
    668  1.58   mlelstv 		return (wsfont_make_cookie(bestent->cookie, bito, byteo));
    669  1.58   mlelstv 
    670   1.1        ad 	return (-1);
    671   1.1        ad }
    672   1.1        ad 
    673  1.53  macallan void
    674  1.53  macallan wsfont_walk(void (*matchfunc)(struct wsdisplay_font *, void *, int), void *cookie)
    675  1.51  macallan {
    676  1.51  macallan 	struct font *ent;
    677  1.51  macallan 
    678  1.53  macallan 	TAILQ_FOREACH(ent, &list, chain) {
    679  1.53  macallan 		matchfunc(ent->font, cookie, ent->cookie);
    680  1.51  macallan 	}
    681  1.51  macallan }
    682  1.51  macallan 
    683  1.25        ad static struct font *
    684  1.25        ad wsfont_add0(struct wsdisplay_font *font, int copy)
    685   1.1        ad {
    686   1.1        ad 	struct font *ent;
    687   1.9        ad 	size_t size;
    688  1.24        ad 
    689  1.28     enami 	ent = malloc(sizeof(struct font), M_DEVBUF, M_WAITOK | M_ZERO);
    690  1.24        ad 
    691   1.1        ad 	/* Is this font statically allocated? */
    692   1.1        ad 	if (!copy) {
    693   1.1        ad 		ent->font = font;
    694  1.25        ad 		ent->flags = WSFONT_STATIC;
    695   1.1        ad 	} else {
    696  1.31  jdolecek 		void *data;
    697  1.31  jdolecek 		char *name;
    698  1.31  jdolecek 
    699  1.25        ad 		ent->font = malloc(sizeof(struct wsdisplay_font), M_DEVBUF,
    700  1.28     enami 		    M_WAITOK);
    701  1.27        ad 		memcpy(ent->font, font, sizeof(*ent->font));
    702  1.25        ad 
    703   1.1        ad 		size = font->fontheight * font->numchars * font->stride;
    704  1.31  jdolecek 		data = malloc(size, M_DEVBUF, M_WAITOK);
    705  1.31  jdolecek 		memcpy(data, font->data, size);
    706  1.31  jdolecek 		ent->font->data = data;
    707  1.31  jdolecek 
    708  1.31  jdolecek 		name = malloc(strlen(font->name) + 1, M_DEVBUF, M_WAITOK);
    709  1.36    itojun 		strlcpy(name, font->name, strlen(font->name) + 1);
    710  1.31  jdolecek 		ent->font->name = name;
    711   1.1        ad 	}
    712  1.24        ad 
    713  1.25        ad 	TAILQ_INSERT_TAIL(&list, ent, chain);
    714  1.25        ad 	return (ent);
    715  1.25        ad }
    716  1.25        ad 
    717  1.25        ad int
    718  1.25        ad wsfont_add(struct wsdisplay_font *font, int copy)
    719  1.25        ad {
    720  1.25        ad 	struct font *ent;
    721  1.25        ad 
    722  1.25        ad 	/* Don't allow exact duplicates */
    723  1.25        ad 	if (wsfont_find(font->name, font->fontwidth, font->fontheight,
    724  1.53  macallan 	    font->stride, 0, 0, WSFONT_FIND_ALL) >= 0)
    725  1.25        ad 		return (EEXIST);
    726  1.25        ad 
    727  1.25        ad 	ent = wsfont_add0(font, copy);
    728  1.25        ad 
    729  1.25        ad 	ident += (1 << WSFONT_IDENT_SHIFT);
    730  1.25        ad 	ent->cookie = wsfont_make_cookie(ident, font->bitorder,
    731  1.25        ad 	    font->byteorder);
    732  1.25        ad 
    733   1.1        ad 	return (0);
    734   1.1        ad }
    735  1.24        ad 
    736   1.1        ad int
    737  1.22  augustss wsfont_remove(int cookie)
    738   1.1        ad {
    739   1.1        ad 	struct font *ent;
    740   1.1        ad 
    741  1.25        ad 	if ((ent = wsfont_find0(cookie, 0xffffffff)) == NULL)
    742  1.21  drochner 		return (ENOENT);
    743  1.24        ad 
    744  1.25        ad 	if ((ent->flags & WSFONT_BUILTIN) != 0 || ent->lockcount != 0)
    745  1.21  drochner 		return (EBUSY);
    746  1.24        ad 
    747  1.25        ad 	if ((ent->flags & WSFONT_STATIC) == 0) {
    748  1.38  christos 		free(ent->font->data, M_DEVBUF);
    749  1.38  christos 		free(__UNCONST(ent->font->name), M_DEVBUF); /*XXXUNCONST*/
    750  1.25        ad 		free(ent->font, M_DEVBUF);
    751   1.1        ad 	}
    752  1.24        ad 
    753  1.25        ad 	TAILQ_REMOVE(&list, ent, chain);
    754  1.25        ad 	free(ent, M_DEVBUF);
    755  1.24        ad 
    756   1.9        ad 	return (0);
    757   1.1        ad }
    758   1.1        ad 
    759   1.1        ad int
    760  1.25        ad wsfont_lock(int cookie, struct wsdisplay_font **ptr)
    761   1.1        ad {
    762  1.25        ad 	struct font *ent, *neu;
    763  1.25        ad 	int bito, byteo;
    764  1.25        ad 
    765  1.25        ad 	if ((ent = wsfont_find0(cookie, 0xffffffff)) == NULL) {
    766  1.25        ad 		if ((ent = wsfont_find0(cookie, WSFONT_IDENT_MASK)) == NULL)
    767  1.25        ad 			return (ENOENT);
    768  1.25        ad 
    769  1.32  jdolecek 		bito = (cookie & WSFONT_BITO_MASK) >> WSFONT_BITO_SHIFT;
    770  1.32  jdolecek 		byteo = (cookie & WSFONT_BYTEO_MASK) >> WSFONT_BYTEO_SHIFT;
    771  1.32  jdolecek 
    772  1.33  jdolecek 		if (ent->lockcount != 0) {
    773  1.25        ad 			neu = wsfont_add0(ent->font, 1);
    774  1.25        ad 			neu->flags |= WSFONT_COPY;
    775  1.32  jdolecek 
    776  1.35   tsutsui 			aprint_debug("wsfont: font '%s' bito %d byteo %d "
    777  1.35   tsutsui 			    "copied to bito %d byteo %d\n",
    778  1.35   tsutsui 			    ent->font->name,
    779  1.35   tsutsui 			    ent->font->bitorder, ent->font->byteorder,
    780  1.35   tsutsui 			    bito, byteo);
    781  1.32  jdolecek 
    782  1.25        ad 			ent = neu;
    783  1.25        ad 		}
    784  1.24        ad 
    785  1.25        ad 		if (bito && bito != ent->font->bitorder) {
    786   1.1        ad 			wsfont_revbit(ent->font);
    787  1.25        ad 			ent->font->bitorder = bito;
    788   1.1        ad 		}
    789   1.1        ad 
    790  1.25        ad 		if (byteo && byteo != ent->font->byteorder) {
    791   1.1        ad 			wsfont_revbyte(ent->font);
    792  1.25        ad 			ent->font->byteorder = byteo;
    793   1.1        ad 		}
    794  1.24        ad 
    795  1.25        ad 		ent->cookie = cookie;
    796   1.1        ad 	}
    797  1.24        ad 
    798  1.25        ad 	ent->lockcount++;
    799  1.25        ad 	*ptr = ent->font;
    800  1.25        ad 	return (0);
    801   1.1        ad }
    802   1.1        ad 
    803   1.1        ad int
    804  1.22  augustss wsfont_unlock(int cookie)
    805   1.1        ad {
    806   1.1        ad 	struct font *ent;
    807  1.24        ad 
    808  1.25        ad 	if ((ent = wsfont_find0(cookie, 0xffffffff)) == NULL)
    809  1.25        ad 		return (ENOENT);
    810  1.25        ad 
    811  1.25        ad 	if (ent->lockcount == 0)
    812  1.29    provos 		panic("wsfont_unlock: font not locked");
    813  1.24        ad 
    814  1.25        ad 	if (--ent->lockcount == 0 && (ent->flags & WSFONT_COPY) != 0)
    815  1.25        ad 		wsfont_remove(cookie);
    816  1.24        ad 
    817  1.25        ad 	return (0);
    818  1.16    marcus }
    819  1.16    marcus 
    820  1.16    marcus /*
    821  1.16    marcus  * Unicode to font encoding mappings
    822  1.16    marcus  */
    823  1.16    marcus 
    824  1.16    marcus /*
    825  1.24        ad  * To save memory, font encoding tables use a two level lookup.  First the
    826  1.24        ad  * high byte of the Unicode is used to lookup the level 2 table, then the
    827  1.24        ad  * low byte indexes that table.  Level 2 tables that are not needed are
    828  1.24        ad  * omitted (NULL), and both level 1 and level 2 tables have base and size
    829  1.24        ad  * attributes to keep their size down.
    830  1.16    marcus  */
    831  1.16    marcus 
    832  1.16    marcus struct wsfont_level1_glyphmap {
    833  1.24        ad 	const struct	wsfont_level2_glyphmap **level2;
    834  1.24        ad 	int	base;	/* High byte for first level2 entry	*/
    835  1.24        ad 	int	size;	/* Number of level2 entries		*/
    836  1.16    marcus };
    837  1.16    marcus 
    838  1.16    marcus struct wsfont_level2_glyphmap {
    839  1.24        ad 	int	base;	/* Low byte for first character		*/
    840  1.24        ad 	int	size;	/* Number of characters			*/
    841  1.24        ad 	const void	*chars;	/* Pointer to character number entries  */
    842  1.24        ad 	int	width;	/* Size of each entry in bytes (1,2,4)  */
    843  1.16    marcus };
    844  1.16    marcus 
    845  1.16    marcus #define null16			\
    846  1.16    marcus 	NULL, NULL, NULL, NULL,	\
    847  1.16    marcus 	NULL, NULL, NULL, NULL,	\
    848  1.16    marcus 	NULL, NULL, NULL, NULL,	\
    849  1.16    marcus 	NULL, NULL, NULL, NULL
    850  1.16    marcus 
    851  1.16    marcus /*
    852  1.16    marcus  * IBM 437 maps
    853  1.16    marcus  */
    854  1.16    marcus 
    855  1.24        ad static const u_int8_t ibm437_chars_0[] = {
    856  1.16    marcus 	 0,  1,  2,  3,  4,  5,  6,  7,  8,  9, 10, 11, 12, 13, 14, 15,
    857  1.16    marcus 	16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31,
    858  1.16    marcus 	32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47,
    859  1.16    marcus 	48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63,
    860  1.16    marcus 	64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79,
    861  1.16    marcus 	80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95,
    862  1.16    marcus 	96, 97, 98, 99, 100,101,102,103,104,105,106,107,108,109,110,111,
    863  1.16    marcus 	112,113,114,115,116,117,118,119,120,121,122,123,124,125,126,127,
    864  1.16    marcus 	 0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
    865  1.16    marcus 	 0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
    866  1.16    marcus 	255,173,155,156, 0, 157, 0,  0,  0,  0, 166,174,170, 0,  0,  0,
    867  1.16    marcus 	 0, 241,253, 0,  0,  0,  0, 249, 0,  0, 167,175,172,171, 0, 168,
    868  1.16    marcus 	 0,  0,  0,  0, 142,143,146,128, 0, 144, 0,  0,  0,  0,  0,  0,
    869  1.80   mlelstv 	 0, 165, 0,  0,  0,  0, 153, 0,  0,  0,  0,  0, 154, 0,  0, 225,
    870  1.16    marcus 	133,160,131, 0, 132,134,145,135,138,130,136,137,141,161,140,139,
    871  1.16    marcus 	 0, 164,149,162,147, 0, 148,246, 0, 151,163,150,129, 0,  0, 152
    872  1.24        ad };
    873  1.24        ad 
    874  1.24        ad static const u_int8_t ibm437_chars_1[] = {
    875  1.16    marcus 	159
    876  1.24        ad };
    877  1.24        ad 
    878  1.24        ad static const u_int8_t ibm437_chars_3[] = {
    879  1.16    marcus 	226, 0,  0,  0,  0, 233, 0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
    880  1.16    marcus 	228, 0,  0, 232, 0,  0, 234, 0,  0,  0,  0,  0,  0,  0, 224,225,
    881  1.16    marcus 	 0, 235,238, 0,  0,  0,  0,  0,  0, 230, 0,  0,  0, 227, 0,  0,
    882  1.16    marcus 	229,231
    883  1.24        ad };
    884  1.24        ad 
    885  1.24        ad static const u_int8_t ibm437_chars_32[] = {
    886  1.16    marcus 	252, 0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
    887  1.16    marcus 	 0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
    888  1.16    marcus 	 0,  0,  0,  0,  0,  0,  0,  0, 158
    889  1.24        ad };
    890  1.24        ad 
    891  1.24        ad static const u_int8_t ibm437_chars_34[] = {
    892  1.16    marcus 	237, 0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
    893  1.16    marcus 	 0,  0,  0, 248,250,251, 0,  0,  0, 236, 0,  0,  0,  0,  0,  0,
    894  1.16    marcus 	 0,  0,  0,  0, 239, 0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
    895  1.16    marcus 	 0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
    896  1.16    marcus 	 0,  0,  0, 247, 0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
    897  1.16    marcus 	 0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,240,  0,  0,243,
    898  1.16    marcus 	242
    899  1.24        ad };
    900  1.24        ad 
    901  1.24        ad static const u_int8_t ibm437_chars_35[] = {
    902  1.16    marcus 	169, 0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
    903  1.16    marcus 	244,245
    904  1.24        ad };
    905  1.24        ad 
    906  1.24        ad static const u_int8_t ibm437_chars_37[] = {
    907  1.16    marcus 	196,205,179,186, 0,  0,  0,  0,  0,  0,  0,  0, 218,213,214,201,
    908  1.16    marcus 	191,184,183,187,192,212,211,200,217,190,189,188,195,198, 0,  0,
    909  1.16    marcus 	199, 0,  0, 204,180,181, 0,  0, 182, 0,  0, 185,194, 0,  0, 209,
    910  1.16    marcus 	210, 0,  0, 203,193, 0,  0, 207,208, 0,  0, 202,197, 0,  0, 216,
    911  1.16    marcus 	 0,  0, 215, 0,  0,  0,  0,  0,  0,  0,  0, 206, 0,  0,  0,  0,
    912  1.16    marcus 	 0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
    913  1.16    marcus 	 0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
    914  1.16    marcus 	 0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
    915  1.16    marcus 	223, 0,  0,  0, 220, 0,  0,  0, 219, 0,  0,  0, 221, 0,  0,  0,
    916  1.16    marcus 	222,176,177,178, 0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
    917  1.16    marcus 	254
    918  1.16    marcus };
    919  1.16    marcus 
    920  1.24        ad static const struct wsfont_level2_glyphmap ibm437_level2_0 =
    921  1.24        ad     { 0, 256, ibm437_chars_0, 1 };
    922  1.24        ad 
    923  1.24        ad static const struct wsfont_level2_glyphmap ibm437_level2_1 =
    924  1.24        ad     { 146, 1, ibm437_chars_1, 1 };
    925  1.24        ad 
    926  1.24        ad static const struct wsfont_level2_glyphmap ibm437_level2_3 =
    927  1.24        ad     { 147, 50, ibm437_chars_3, 1 };
    928  1.24        ad 
    929  1.24        ad static const struct wsfont_level2_glyphmap ibm437_level2_32 =
    930  1.24        ad     { 127, 41, ibm437_chars_32, 1 };
    931  1.24        ad 
    932  1.24        ad static const struct wsfont_level2_glyphmap ibm437_level2_34 =
    933  1.24        ad     { 5, 97, ibm437_chars_34, 1 };
    934  1.24        ad 
    935  1.24        ad static const struct wsfont_level2_glyphmap ibm437_level2_35 =
    936  1.24        ad     { 16, 18, ibm437_chars_35, 1 };
    937  1.16    marcus 
    938  1.24        ad static const struct wsfont_level2_glyphmap ibm437_level2_37 =
    939  1.24        ad     { 0, 161, ibm437_chars_37, 1 };
    940  1.24        ad 
    941  1.24        ad static const struct wsfont_level2_glyphmap *ibm437_level1[] = {
    942  1.16    marcus 	&ibm437_level2_0, &ibm437_level2_1, NULL, &ibm437_level2_3,
    943  1.16    marcus 	NULL, NULL, NULL, NULL,
    944  1.16    marcus 	NULL, NULL, NULL, NULL,
    945  1.16    marcus 	NULL, NULL, NULL, NULL,
    946  1.16    marcus 	NULL, NULL, NULL, NULL,
    947  1.16    marcus 	NULL, NULL, NULL, NULL,
    948  1.16    marcus 	NULL, NULL, NULL, NULL,
    949  1.16    marcus 	NULL, NULL, NULL, NULL,
    950  1.16    marcus 	&ibm437_level2_32, NULL, &ibm437_level2_34, &ibm437_level2_35,
    951  1.16    marcus 	NULL, &ibm437_level2_37
    952  1.16    marcus };
    953  1.16    marcus 
    954  1.16    marcus /*
    955  1.16    marcus  * ISO-8859-7 maps
    956  1.16    marcus  */
    957  1.24        ad static const u_int8_t iso7_chars_0[] = {
    958  1.16    marcus 	 0,  1,  2,  3,  4,  5,  6,  7,  8,  9, 10, 11, 12, 13, 14, 15,
    959  1.16    marcus 	16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31,
    960  1.16    marcus 	32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47,
    961  1.16    marcus 	48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63,
    962  1.16    marcus 	64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79,
    963  1.16    marcus 	80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95,
    964  1.16    marcus 	96, 97, 98, 99, 100,101,102,103,104,105,106,107,108,109,110,111,
    965  1.16    marcus 	112,113,114,115,116,117,118,119,120,121,122,123,124,125,126,127,
    966  1.16    marcus 	128,129,130,131,132,133,134,135,136,137,138,139,140,141,142,143,
    967  1.16    marcus 	144,145,146,147,148,149,150,151,152,153,154,155,156,157,158,159,
    968  1.16    marcus 	160, 0,  0, 163, 0,  0, 166,167,168,169, 0, 171,172,173, 0,  0,
    969  1.16    marcus 	176,177,178,179,180, 0,  0, 183, 0,  0,  0, 187, 0, 189
    970  1.24        ad };
    971  1.24        ad 
    972  1.24        ad static const u_int8_t iso7_chars_3[] = {
    973  1.16    marcus 	182, 0, 184,185,186, 0, 188, 0, 190,191,192,193,194,195,196,197,
    974  1.16    marcus 	198,199,200,201,202,203,204,205,206,207,208,209, 0, 211,212,213,
    975  1.16    marcus 	214,215,216,217,218,219,220,221,222,223,224,225,226,227,228,229,
    976  1.16    marcus 	230,231,232,233,234,235,236,237,238,239,240,241,242,243,244,245,
    977  1.16    marcus 	246,247,248,249,250,251,252,253,254, 0,  0,  0,  0,  0,  0,  0,
    978  1.16    marcus 	 0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
    979  1.16    marcus 	 0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0, 181
    980  1.24        ad };
    981  1.24        ad 
    982  1.47  macallan /*
    983  1.47  macallan  * map all variants of the box drawing characters to the same basic shapes for
    984  1.47  macallan  * now, encoded like this:
    985  1.47  macallan  *
    986  1.47  macallan  *    1
    987  1.47  macallan  *    1
    988  1.47  macallan  * 888 222
    989  1.47  macallan  *    4
    990  1.47  macallan  *    4
    991  1.47  macallan  *
    992  1.47  macallan  * so an upright line would be 0x05
    993  1.47  macallan  */
    994  1.47  macallan #define FL |WSFONT_FLAG_OPT
    995  1.47  macallan static const u_int32_t netbsd_boxes[] = {
    996  1.47  macallan /*00*/ 0x0a FL, 0x0a FL, 0x05 FL, 0x05 FL, 0x0a FL, 0x0a FL, 0x05 FL, 0x05 FL,
    997  1.47  macallan /*08*/ 0x0a FL, 0x0a FL, 0x05 FL, 0x05 FL, 0x06 FL, 0x06 FL, 0x06 FL, 0x06 FL,
    998  1.47  macallan /*10*/ 0x0c FL, 0x0c FL, 0x0c FL, 0x0c FL, 0x03 FL, 0x03 FL, 0x03 FL, 0x03 FL,
    999  1.47  macallan /*18*/ 0x09 FL, 0x09 FL, 0x09 FL, 0x09 FL, 0x07 FL, 0x07 FL, 0x07 FL, 0x07 FL,
   1000  1.47  macallan /*20*/ 0x07 FL, 0x07 FL, 0x07 FL, 0x07 FL, 0x0d FL, 0x0d FL, 0x0d FL, 0x0d FL,
   1001  1.47  macallan /*28*/ 0x0d FL, 0x0d FL, 0x0d FL, 0x0d FL, 0x0e FL, 0x0e FL, 0x0e FL, 0x0e FL,
   1002  1.47  macallan /*30*/ 0x0e FL, 0x0e FL, 0x0e FL, 0x0e FL, 0x0b FL, 0x0b FL, 0x0b FL, 0x0b FL,
   1003  1.47  macallan /*38*/ 0x0b FL, 0x0b FL, 0x0b FL, 0x0b FL, 0x0f FL, 0x0f FL, 0x0f FL, 0x0f FL,
   1004  1.47  macallan /*40*/ 0x0f FL, 0x0f FL, 0x0f FL, 0x0f FL, 0x0f FL, 0x0f FL, 0x0f FL, 0x0f FL,
   1005  1.47  macallan /*48*/ 0x0f FL, 0x0f FL, 0x0f FL, 0x0f FL, 0x0a FL, 0x0a FL, 0x05 FL, 0x05 FL,
   1006  1.47  macallan /*50*/ 0x0a FL, 0x05 FL, 0x06 FL, 0x06 FL, 0x06 FL, 0x0c FL, 0x0c FL, 0x0c FL,
   1007  1.47  macallan /*58*/ 0x03 FL, 0x03 FL, 0x03 FL, 0x09 FL, 0x09 FL, 0x09 FL, 0x07 FL, 0x07 FL,
   1008  1.47  macallan /*60*/ 0x07 FL, 0x0d FL, 0x0d FL, 0x0d FL, 0x0e FL, 0x0e FL, 0x0e FL, 0x0b FL,
   1009  1.47  macallan /*68*/ 0x0b FL, 0x0b FL, 0x0f FL, 0x0f FL, 0x0f FL, 0x06 FL, 0x0c FL, 0x09 FL,
   1010  1.47  macallan /*70*/ 0x03 FL,    0 FL,    0 FL,    0 FL, 0x08 FL, 0x01 FL, 0x02 FL, 0x04 FL,
   1011  1.47  macallan /*78*/ 0x08 FL, 0x01 FL, 0x02 FL, 0x04 FL, 0x0a FL, 0x05 FL, 0x0a FL, 0x05 FL
   1012  1.47  macallan };
   1013  1.47  macallan #undef FL
   1014  1.47  macallan 
   1015  1.24        ad static const u_int8_t iso7_chars_32[] = {
   1016  1.16    marcus 	175, 0,  0,  0,  0, 162, 0, 161
   1017  1.16    marcus };
   1018  1.16    marcus 
   1019  1.24        ad static const struct wsfont_level2_glyphmap iso7_level2_0 =
   1020  1.24        ad     { 0, 190, iso7_chars_0, 1 };
   1021  1.24        ad 
   1022  1.24        ad static const struct wsfont_level2_glyphmap iso7_level2_3 =
   1023  1.24        ad     { 134, 111, iso7_chars_3, 1 };
   1024  1.16    marcus 
   1025  1.24        ad static const struct wsfont_level2_glyphmap iso7_level2_32 =
   1026  1.24        ad     { 20, 8, iso7_chars_32, 1 };
   1027  1.24        ad 
   1028  1.47  macallan static const struct wsfont_level2_glyphmap netbsd_box_drawing =
   1029  1.47  macallan     { 0, 128, netbsd_boxes, 4 };
   1030  1.47  macallan 
   1031  1.24        ad static const struct wsfont_level2_glyphmap *iso7_level1[] = {
   1032  1.16    marcus 	&iso7_level2_0, NULL, NULL, &iso7_level2_3,
   1033  1.16    marcus 	NULL, NULL, NULL, NULL,
   1034  1.16    marcus 	NULL, NULL, NULL, NULL,
   1035  1.16    marcus 	NULL, NULL, NULL, NULL,
   1036  1.16    marcus 	NULL, NULL, NULL, NULL,
   1037  1.16    marcus 	NULL, NULL, NULL, NULL,
   1038  1.16    marcus 	NULL, NULL, NULL, NULL,
   1039  1.16    marcus 	NULL, NULL, NULL, NULL,
   1040  1.47  macallan 	&iso7_level2_32, NULL, NULL, NULL,
   1041  1.47  macallan 	NULL, &netbsd_box_drawing
   1042  1.47  macallan };
   1043  1.47  macallan 
   1044  1.47  macallan static const struct wsfont_level2_glyphmap *iso_level1[] = {
   1045  1.47  macallan 	NULL, NULL, NULL, NULL,
   1046  1.47  macallan 	NULL, NULL, NULL, NULL,
   1047  1.47  macallan 	NULL, NULL, NULL, NULL,
   1048  1.47  macallan 	NULL, NULL, NULL, NULL,
   1049  1.47  macallan 	NULL, NULL, NULL, NULL,
   1050  1.47  macallan 	NULL, NULL, NULL, NULL,
   1051  1.47  macallan 	NULL, NULL, NULL, NULL,
   1052  1.47  macallan 	NULL, NULL, NULL, NULL,
   1053  1.47  macallan 	NULL, NULL, NULL, NULL,
   1054  1.47  macallan 	NULL, &netbsd_box_drawing
   1055  1.16    marcus };
   1056  1.16    marcus 
   1057  1.24        ad static const struct wsfont_level1_glyphmap encodings[] = {
   1058  1.47  macallan 	{ iso_level1, 0, 0x26 },	/* WSDISPLAY_FONTENC_ISO */
   1059  1.16    marcus 	{ ibm437_level1, 0, 38 },	/* WSDISPLAY_FONTENC_IBM */
   1060  1.16    marcus 	{ NULL, 0, 0 },			/* WSDISPLAY_FONTENC_PCVT */
   1061  1.47  macallan 	{ iso7_level1, 0, 0x26 },	/* WSDISPLAY_FONTENC_ISO7 */
   1062  1.16    marcus };
   1063  1.16    marcus 
   1064  1.16    marcus 
   1065  1.16    marcus /*
   1066  1.16    marcus  * Remap Unicode character to glyph
   1067  1.16    marcus  */
   1068  1.16    marcus int
   1069  1.22  augustss wsfont_map_unichar(struct wsdisplay_font *font, int c)
   1070  1.16    marcus {
   1071  1.24        ad 	const struct wsfont_level1_glyphmap *map1;
   1072  1.24        ad 	const struct wsfont_level2_glyphmap *map2;
   1073  1.24        ad 	int hi, lo;
   1074  1.16    marcus 
   1075  1.78       uwe 	if (font->encoding < 0 || font->encoding >= __arraycount(encodings))
   1076  1.24        ad 		return (-1);
   1077  1.16    marcus 
   1078  1.24        ad 	hi = (c >> 8);
   1079  1.24        ad 	lo = c & 255;
   1080  1.24        ad 	map1 = &encodings[font->encoding];
   1081  1.24        ad 
   1082  1.24        ad 	if (hi < map1->base || hi >= map1->base + map1->size)
   1083  1.16    marcus 		return (-1);
   1084  1.16    marcus 
   1085  1.24        ad 	map2 = map1->level2[hi - map1->base];
   1086  1.16    marcus 
   1087  1.47  macallan 	/* so we don't need an identical level 2 table for hi == 0 */
   1088  1.47  macallan 	if (hi == 0 && font->encoding == WSDISPLAY_FONTENC_ISO)
   1089  1.47  macallan 		return lo;
   1090  1.47  macallan 
   1091  1.24        ad 	if (map2 == NULL || lo < map2->base || lo >= map2->base + map2->size)
   1092  1.24        ad 		return (-1);
   1093  1.16    marcus 
   1094  1.24        ad 	lo -= map2->base;
   1095  1.16    marcus 
   1096  1.24        ad 	switch(map2->width) {
   1097  1.24        ad 	case 1:
   1098  1.24        ad 		c = (((const u_int8_t *)map2->chars)[lo]);
   1099  1.24        ad 		break;
   1100  1.24        ad 	case 2:
   1101  1.24        ad 		c = (((const u_int16_t *)map2->chars)[lo]);
   1102  1.24        ad 		break;
   1103  1.24        ad 	case 4:
   1104  1.24        ad 		c = (((const u_int32_t *)map2->chars)[lo]);
   1105  1.24        ad 		break;
   1106  1.24        ad 	}
   1107  1.16    marcus 
   1108  1.24        ad 	if (c == 0 && lo != 0)
   1109  1.24        ad 		return (-1);
   1110  1.16    marcus 
   1111  1.24        ad 	return (c);
   1112   1.1        ad }
   1113