root/sys/arch/luna88k/dev/maskbits.h
/*      $OpenBSD: maskbits.h,v 1.3 2017/11/03 06:54:06 aoyama Exp $     */
/*      $NetBSD: maskbits.h,v 1.3 1997/03/31 07:37:28 scottr Exp $      */

/*-
 * Copyright (c) 1994
 *      The Regents of the University of California.  All rights reserved.
 *
 * 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. 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.
 *
 * 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.
 *
 *      @(#)maskbits.h  8.2 (Berkeley) 3/21/94
 */

#include <luna88k/dev/omrasops.h>       /* R(), W(), RR_* defines */

/* This file is derived from OpenBSD:/usr/src/sys/arch/hp300/dev/maskbits.h */

/*
 * Derived from X11R4
 */

/* the following notes use the following conventions:
SCREEN LEFT                             SCREEN RIGHT
in this file and maskbits.c, left and right refer to screen coordinates,
NOT bit numbering in registers.

rasops_lmask[n]
        bits[0,n-1] = 0 bits[n,31] = 1
rasops_rmask[n] =
        bits[0,n-1] = 1 bits[n,31] = 0

maskbits(x, w, startmask, endmask, nlw)
        for a span of width w starting at position x, returns
a mask for ragged bits at start, mask for ragged bits at end,
and the number of whole longwords between the ends.

*/

#define maskbits(x, w, startmask, endmask, nlw)                         \
do {                                                                    \
        startmask = rasops_lmask[(x) & 0x1f];                           \
        endmask = rasops_rmask[((x) + (w)) & 0x1f];                     \
        if (startmask)                                                  \
                nlw = (((w) - (32 - ((x) & 0x1f))) >> 5);               \
        else                                                            \
                nlw = (w) >> 5;                                         \
} while (0)

/*
 * On LUNA's frame buffer, MSB(bit 31) is displayed at most left hand of
 * the screen.  This is different from rasops_masks.{c,h} assumption.
 * So we use our own MBL(Move Bit Left)/MBR(Move Bit Right) macros to
 * handle display memory images.
 */
 
#define OMFB_MBL(x,y)   ((y) > 31 ? 0 : (x) << (y))
#define OMFB_MBR(x,y)   ((y) > 31 ? 0 : (x) >> (y))

/*
 * And, our private version of GETBITS/PUTBITS.
 * XXX: We consider only 1 bpp for now.
 */

/* Get a number of bits ( <= 32 ) from *sp and store in dw */
#define OMFB_GETBITS(sp, x, w, dw)                                      \
do {                                                                    \
        dw = OMFB_MBL(*(sp), (x));                                      \
        if (((x) + (w)) > 32)                                           \
                dw |= (OMFB_MBR(*(sp + 1), 32 - (x)));                  \
} while(0);

/* Put a number of bits ( <= 32 ) from sw to *dp */
#define OMFB_PUTBITS(sw, x, w, dp)                                      \
do {                                                                    \
        int n = (x) + (w) - 32;                                         \
                                                                        \
        if (n <= 0) {                                                   \
                n = rasops_pmask[x & 31][w & 31];                       \
                *(dp) = (*(dp) & ~n) | (OMFB_MBR(sw, x) & n);           \
        } else {                                                        \
                *(dp) = (*(dp) & rasops_rmask[x])                       \
                        | (OMFB_MBR(sw, x));                            \
                *(dp + 1) = (*(dp + 1) & rasops_lmask[n])               \
                        | (OMFB_MBL(sw, 32-(x)) & rasops_rmask[n]);     \
        }                                                               \
} while(0);

#define getandputrop(psrc, srcbit, dstbit, width, pdst, rop)            \
do {                                                                    \
        u_int32_t _tmpdst;                                              \
        if (rop == RR_CLEAR)                                            \
                _tmpdst = 0;                                            \
        else                                                            \
                OMFB_GETBITS(psrc, srcbit, width, _tmpdst);             \
        OMFB_PUTBITS(_tmpdst, dstbit, width, pdst);                     \
} while (0)

#define getunalignedword(psrc, x, dst)                                  \
do {                                                                    \
        u_int32_t _tmp;                                                 \
        OMFB_GETBITS(psrc, x, 32, _tmp);                                \
        dst = _tmp;                                                     \
} while (0)