WebSVN – HelenOS-historic – Diff – /uspace/trunk/fb/fb.c


/*
 * Copyright (C) 2006 Jakub Vana
 * Copyright (C) 2006 Ondrej Palkovsky
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 *
 * - Redistributions of source code must retain the above copyright
 *   notice, this list of conditions and the following disclaimer.
 * - 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.
 * - The name of the author may not be used to endorse or promote products
 *   derived from this software without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``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 AUTHOR 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.
 */
 
/** @defgroup fbs Framebuffers
 * @brief   HelenOS framebuffers.
 * @{
 * @}
 */
/** @defgroup fb Framebuffer
 * @brief   HelenOS framebuffer.
 * @ingroup fbs
 * @{
 */
/** @file
 */
 
 
#include <stdlib.h>
#include <unistd.h>
#include <string.h>
#include <ddi.h>
#include <sysinfo.h>
#include <align.h>
#include <as.h>
#include <ipc/fb.h>
#include <ipc/ipc.h>
#include <ipc/ns.h>
#include <ipc/services.h>
#include <kernel/errno.h>
#include <async.h>
 
#include "font-8x16.h"
#include "fb.h"
#include "main.h"
#include "../console/screenbuffer.h"
#include "ppm.h"
 
#define DEFAULT_BGCOLOR                0xf0f0f0
#define DEFAULT_FGCOLOR                0x0
 
/***************************************************************/
/* Pixel specific fuctions */
 
typedef void (*conv2scr_fn_t)(void *, int);
typedef int (*conv2rgb_fn_t)(void *);
 
struct {
    __u8 *fbaddress ;
 
    unsigned int xres ;
    unsigned int yres ;
    unsigned int scanline ;
    unsigned int pixelbytes ;
 
    conv2scr_fn_t rgb2scr;
    conv2rgb_fn_t scr2rgb;
} screen;
 
typedef struct {
    int initialized;
    unsigned int x, y;
    unsigned int width, height;
 
    /* Text support in window */
    unsigned int rows, cols;
    /* Style for text printing */
    style_t style;
    /* Auto-cursor position */
    int cursor_active, cur_col, cur_row;
    int cursor_shown;
    /* Double buffering */
    __u8 *dbdata;
    unsigned int dboffset;
    unsigned int paused;
} viewport_t;
 
#define MAX_ANIM_LEN    8
#define MAX_ANIMATIONS  4
typedef struct {
    int initialized;
    int enabled;
    unsigned int vp;
 
    unsigned int pos;
    unsigned int animlen;
    unsigned int pixmaps[MAX_ANIM_LEN];
} animation_t;
static animation_t animations[MAX_ANIMATIONS];
static int anims_enabled;
 
/** Maximum number of saved pixmaps
 * Pixmap is a saved rectangle
 */
#define MAX_PIXMAPS        256
typedef struct {
    unsigned int width;
    unsigned int height;
    __u8 *data;
} pixmap_t;
static pixmap_t pixmaps[MAX_PIXMAPS];
 
/* Viewport is a rectangular area on the screen */
#define MAX_VIEWPORTS 128
static viewport_t viewports[128];
 
/* Allow only 1 connection */
static int client_connected = 0;
 
#define RED(x, bits)    ((x >> (16 + 8 - bits)) & ((1 << bits) - 1))
#define GREEN(x, bits)  ((x >> (8 + 8 - bits)) & ((1 << bits) - 1))
#define BLUE(x, bits)   ((x >> (8 - bits)) & ((1 << bits) - 1))
 
#define COL_WIDTH   8
#define ROW_BYTES   (screen.scanline * FONT_SCANLINES)
 
#define POINTPOS(x, y)  ((y) * screen.scanline + (x) * screen.pixelbytes)
 
/* Conversion routines between different color representations */
static void rgb_4byte(void *dst, int rgb)
{
    *(int *)dst = rgb;
}
 
static int byte4_rgb(void *src)
{
    return (*(int *)src) & 0xffffff;
}
 
static void rgb_3byte(void *dst, int rgb)
{
    __u8 *scr = dst;
#if (defined(BIG_ENDIAN) || defined(FB_BIG_ENDIAN))
    scr[0] = RED(rgb, 8);
    scr[1] = GREEN(rgb, 8);
    scr[2] = BLUE(rgb, 8);
#else
    scr[2] = RED(rgb, 8);
    scr[1] = GREEN(rgb, 8);
    scr[0] = BLUE(rgb, 8);
#endif
 
 
}
 
static int byte3_rgb(void *src)
{
    __u8 *scr = src;
#if (defined(BIG_ENDIAN) || defined(FB_BIG_ENDIAN))
    return scr[0] << 16 | scr[1] << 8 | scr[2];
#else
    return scr[2] << 16 | scr[1] << 8 | scr[0];
#endif  
}
 
/**  16-bit depth (5:6:5) */
static void rgb_2byte(void *dst, int rgb)
{
    /* 5-bit, 6-bits, 5-bits */
    *((__u16 *)(dst)) = RED(rgb, 5) << 11 | GREEN(rgb, 6) << 5 | BLUE(rgb, 5);
}
 
/** 16-bit depth (5:6:5) */
static int byte2_rgb(void *src)
{
    int color = *(__u16 *)(src);
    return (((color >> 11) & 0x1f) << (16 + 3)) | (((color >> 5) & 0x3f) << (8 + 2)) | ((color & 0x1f) << 3);
}
 
/** Put pixel - 8-bit depth (3:2:3) */
static void rgb_1byte(void *dst, int rgb)
{
    *(__u8 *)dst = RED(rgb, 3) << 5 | GREEN(rgb, 2) << 3 | BLUE(rgb, 3);
}
 
/** Return pixel color - 8-bit depth (3:2:3) */
static int byte1_rgb(void *src)
{
    int color = *(__u8 *)src;
    return (((color >> 5) & 0x7) << (16 + 5)) | (((color >> 3) & 0x3) << (8 + 6)) | ((color & 0x7) << 5);
}
 
/** Put pixel into viewport
 *
 * @param vp Viewport identification
 * @param x X coord relative to viewport
 * @param y Y coord relative to viewport
 * @param color RGB color
 */
static void putpixel(viewport_t *vport, unsigned int x, unsigned int y, int color)
{
    int dx = vport->x + x;
    int dy = vport->y + y;
 
    if (! (vport->paused && vport->dbdata))
        (*screen.rgb2scr)(&screen.fbaddress[POINTPOS(dx,dy)],color);
 
    if (vport->dbdata) {
        int dline = (y + vport->dboffset) % vport->height;
        int doffset = screen.pixelbytes * (dline * vport->width + x);
        (*screen.rgb2scr)(&vport->dbdata[doffset],color);
    }
}
 
/** Get pixel from viewport */
static int getpixel(viewport_t *vport, unsigned int x, unsigned int y)
{
    int dx = vport->x + x;
    int dy = vport->y + y;
 
    return (*screen.scr2rgb)(&screen.fbaddress[POINTPOS(dx,dy)]);
}
 
static inline void putpixel_mem(char *mem, unsigned int x, unsigned int y,
                int color)
{
    (*screen.rgb2scr)(&mem[POINTPOS(x,y)],color);
}
 
static void draw_rectangle(viewport_t *vport, unsigned int sx, unsigned int sy,
               unsigned int width, unsigned int height,
               int color)
{
    unsigned int x, y;
    static void *tmpline;
 
    if (!tmpline)
        tmpline = malloc(screen.scanline*screen.pixelbytes);
 
    /* Clear first line */
    for (x = 0; x < width; x++)
        putpixel_mem(tmpline, x, 0, color);
 
    if (!vport->paused) {
        /* Recompute to screen coords */
        sx += vport->x;
        sy += vport->y;
        /* Copy the rest */
        for (y = sy;y < sy+height; y++)
            memcpy(&screen.fbaddress[POINTPOS(sx,y)], tmpline,
                   screen.pixelbytes * width);
    }
    if (vport->dbdata) {
        for (y=sy;y < sy+height; y++) {
            int rline = (y + vport->dboffset) % vport->height;
            int rpos = (rline * vport->width + sx) * screen.pixelbytes;
            memcpy(&vport->dbdata[rpos], tmpline, screen.pixelbytes * width);
        }
    }
 
}
 
/** Fill viewport with background color */
static void clear_port(viewport_t *vport)
{
    draw_rectangle(vport, 0, 0, vport->width, vport->height, vport->style.bg_color);
}
 
/** Scroll unbuffered viewport up/down
 *
 * @param vp Viewport to scroll
 * @param rows Positive number - scroll up, negative - scroll down
 */
static void scroll_port_nodb(viewport_t *vport, int lines)
{
    int y;
    int startline;
    int endline;
 
    if (lines > 0) {
        for (y=vport->y; y < vport->y+vport->height - lines; y++)
            memcpy(&screen.fbaddress[POINTPOS(vport->x,y)],
                   &screen.fbaddress[POINTPOS(vport->x,y + lines)],
                   screen.pixelbytes * vport->width);
        draw_rectangle(vport, 0, vport->height - lines,
                   vport->width, lines, vport->style.bg_color);
    } else if (lines < 0) {
        lines = -lines;
        for (y=vport->y + vport->height-1; y >= vport->y + lines; y--)
            memcpy(&screen.fbaddress[POINTPOS(vport->x,y)],
                   &screen.fbaddress[POINTPOS(vport->x,y - lines)],
                   screen.pixelbytes * vport->width);
        draw_rectangle(vport, 0, 0, vport->width, lines, vport->style.bg_color);
    }
}
 
/** Refresh given viewport from double buffer */
static void refresh_viewport_db(viewport_t *vport)
{
    unsigned int y, srcy, srcoff, dsty, dstx;
 
    for (y = 0; y < vport->height; y++) {
        srcy = (y + vport->dboffset) % vport->height;
        srcoff = (vport->width * srcy) * screen.pixelbytes;
 
        dstx = vport->x;
        dsty = vport->y + y;
 
        memcpy(&screen.fbaddress[POINTPOS(dstx,dsty)],
               &vport->dbdata[srcoff],
               vport->width*screen.pixelbytes);
    }
}
 
/** Scroll viewport that has double buffering enabled */
static void scroll_port_db(viewport_t *vport, int lines)
{
    ++vport->paused;
    if (lines > 0) {
        draw_rectangle(vport, 0, 0, vport->width, lines,
                   vport->style.bg_color);
        vport->dboffset += lines;
        vport->dboffset %= vport->height;
    } else if (lines < 0) {
        lines = -lines;
        draw_rectangle(vport, 0, vport->height-lines,
                   vport->width, lines,
                   vport->style.bg_color);
 
        if (vport->dboffset < lines)
            vport->dboffset += vport->height;
        vport->dboffset -= lines;
    }
   
    --vport->paused;
   
    refresh_viewport_db(vport);
}
 
/** Scrolls viewport given number of lines */
static void scroll_port(viewport_t *vport, int lines)
{
    if (vport->dbdata)
        scroll_port_db(vport, lines);
    else
        scroll_port_nodb(vport, lines);
   
}
 
static void invert_pixel(viewport_t *vport, unsigned int x, unsigned int y)
{
    putpixel(vport, x, y, ~getpixel(vport, x, y));
}
 
 
/***************************************************************/
/* Character-console functions */
 
/** Draw character at given position
 *
 * @param vp Viewport where the character is printed
 * @param sx Coordinates of top-left of the character
 * @param sy Coordinates of top-left of the character
 * @param style Color of the character
 * @param transparent If false, print background color
 */
static void draw_glyph(viewport_t *vport,__u8 glyph, unsigned int sx, unsigned int sy,
               style_t style, int transparent)
{
    int i;
    unsigned int y;
    unsigned int glline;
 
    for (y = 0; y < FONT_SCANLINES; y++) {
        glline = fb_font[glyph * FONT_SCANLINES + y];
        for (i = 0; i < 8; i++) {
            if (glline & (1 << (7 - i)))
                putpixel(vport, sx + i, sy + y, style.fg_color);
            else if (!transparent)
                putpixel(vport, sx + i, sy + y, style.bg_color);
        }
    }
}
 
/** Invert character at given position */
static void invert_char(viewport_t *vport,unsigned int row, unsigned int col)
{
    unsigned int x;
    unsigned int y;
 
    for (x = 0; x < COL_WIDTH; x++)
        for (y = 0; y < FONT_SCANLINES; y++)
            invert_pixel(vport, col * COL_WIDTH + x, row * FONT_SCANLINES + y);
}
 
/***************************************************************/
/* Stdout specific functions */
 
 
/** Create new viewport
 *
 * @return New viewport number
 */
static int viewport_create(unsigned int x, unsigned int y,unsigned int width,
               unsigned int height)
{
    int i;
 
    for (i=0; i < MAX_VIEWPORTS; i++) {
        if (!viewports[i].initialized)
            break;
    }
    if (i == MAX_VIEWPORTS)
        return ELIMIT;
 
    if (width ==0 || height == 0 ||
        x+width > screen.xres || y+height > screen.yres)
        return EINVAL;
    if (width < FONT_SCANLINES || height < COL_WIDTH)
        return EINVAL;
 
    viewports[i].x = x;
    viewports[i].y = y;
    viewports[i].width = width;
    viewports[i].height = height;
   
    viewports[i].rows = height / FONT_SCANLINES;
    viewports[i].cols = width / COL_WIDTH;
 
    viewports[i].style.bg_color = DEFAULT_BGCOLOR;
    viewports[i].style.fg_color = DEFAULT_FGCOLOR;
   
    viewports[i].cur_col = 0;
    viewports[i].cur_row = 0;
    viewports[i].cursor_active = 0;
 
    viewports[i].initialized = 1;
 
    return i;
}
 
 
/** Initialize framebuffer as a chardev output device
 *
 * @param addr Address of theframebuffer
 * @param x    Screen width in pixels
 * @param y    Screen height in pixels
 * @param bpp  Bits per pixel (8, 16, 24, 32)
 * @param scan Bytes per one scanline
 *
 */
static void screen_init(void *addr, unsigned int xres, unsigned int yres, unsigned int bpp, unsigned int scan)
{
    switch (bpp) {
        case 8:
            screen.rgb2scr = rgb_1byte;
            screen.scr2rgb = byte1_rgb;
            screen.pixelbytes = 1;
            break;
        case 16:
            screen.rgb2scr = rgb_2byte;
            screen.scr2rgb = byte2_rgb;
            screen.pixelbytes = 2;
            break;
        case 24:
            screen.rgb2scr = rgb_3byte;
            screen.scr2rgb = byte3_rgb;
            screen.pixelbytes = 3;
            break;
        case 32:
            screen.rgb2scr = rgb_4byte;
            screen.scr2rgb = byte4_rgb;
            screen.pixelbytes = 4;
            break;
    }
 
       
    screen.fbaddress = (unsigned char *) addr;
    screen.xres = xres;
    screen.yres = yres;
    screen.scanline = scan;
   
    /* Create first viewport */
    viewport_create(0,0,xres,yres);
}
 
/** Hide cursor if it is shown */
static void cursor_hide(viewport_t *vport)
{
    if (vport->cursor_active && vport->cursor_shown) {
        invert_char(vport, vport->cur_row, vport->cur_col);
        vport->cursor_shown = 0;
    }
}
 
/** Show cursor if cursor showing is enabled */
static void cursor_print(viewport_t *vport)
{
    /* Do not check for cursor_shown */
    if (vport->cursor_active) {
        invert_char(vport, vport->cur_row, vport->cur_col);
        vport->cursor_shown = 1;
    }
}
 
/** Invert cursor, if it is enabled */
static void cursor_blink(viewport_t *vport)
{
    if (vport->cursor_shown)
        cursor_hide(vport);
    else
        cursor_print(vport);
}
 
/** Draw character at given position relative to viewport
 *
 * @param vp Viewport identification
 * @param c Character to print
 * @param row Screen position relative to viewport
 * @param col Screen position relative to viewport
 * @param transparent If false, print background color with character
 */
static void draw_char(viewport_t *vport, char c, unsigned int row, unsigned int col,
              style_t style, int transparent)
{
    /* Optimize - do not hide cursor if we are going to overwrite it */
    if (vport->cursor_active && vport->cursor_shown &&
        (vport->cur_col != col || vport->cur_row != row))
        invert_char(vport, vport->cur_row, vport->cur_col);
   
    draw_glyph(vport, c, col * COL_WIDTH, row * FONT_SCANLINES, style, transparent);
 
    vport->cur_col = col;
    vport->cur_row = row;
 
    vport->cur_col++;
    if (vport->cur_col>= vport->cols) {
        vport->cur_col = 0;
        vport->cur_row++;
        if (vport->cur_row >= vport->rows)
            vport->cur_row--;
    }
    cursor_print(vport);
}
 
/** Draw text data to viewport
 *
 * @param vp Viewport id
 * @param data Text data fitting exactly into viewport
 */
static void draw_text_data(viewport_t *vport, keyfield_t *data)
{
    int i;
    char c;
    int col,row;
 
    clear_port(vport);
    for (i=0; i < vport->cols * vport->rows; i++) {
        if (data[i].character == ' ' && style_same(data[i].style,vport->style))
            continue;
        col = i % vport->cols;
        row = i / vport->cols;
        draw_glyph(vport, data[i].character, col * COL_WIDTH, row * FONT_SCANLINES,
               data[i].style, style_same(data[i].style,vport->style));
    }
    cursor_print(vport);
}
 
 
/** Return first free pixmap */
static int find_free_pixmap(void)
{
    int i;
   
    for (i=0;i < MAX_PIXMAPS;i++)
        if (!pixmaps[i].data)
            return i;
    return -1;
}
 
static void putpixel_pixmap(int pm, unsigned int x, unsigned int y, int color)
{
    pixmap_t *pmap = &pixmaps[pm];
    int pos = (y * pmap->width + x) * screen.pixelbytes;
 
    (*screen.rgb2scr)(&pmap->data[pos],color);
}
 
/** Create a new pixmap and return appropriate ID */
static int shm2pixmap(char *shm, size_t size)
{
    int pm;
    pixmap_t *pmap;
 
    pm = find_free_pixmap();
    if (pm == -1)
        return ELIMIT;
    pmap = &pixmaps[pm];
   
    if (ppm_get_data(shm, size, &pmap->width, &pmap->height))
        return EINVAL;
   
    pmap->data = malloc(pmap->width * pmap->height * screen.pixelbytes);
    if (!pmap->data)
        return ENOMEM;
 
    ppm_draw(shm, size, 0, 0, pmap->width, pmap->height,
         (putpixel_cb_t)putpixel_pixmap, (void *)pm);
 
    return pm;
}
 
/** Handle shared memory communication calls
 *
 * Protocol for drawing pixmaps:
 * - FB_PREPARE_SHM(client shm identification)
 * - IPC_M_SEND_AS_AREA
 * - FB_DRAW_PPM(startx,starty)
 * - FB_DROP_SHM
 *
 * Protocol for text drawing
 * - IPC_M_SEND_AS_AREA
 * - FB_DRAW_TEXT_DATA
 *
 * @param callid Callid of the current call
 * @param call Current call data
 * @param vp Active viewport
 * @return 0 if the call was not handled byt this function, 1 otherwise
 *
 * note: this function is not threads safe, you would have
 * to redefine static variables with __thread
 */
static int shm_handle(ipc_callid_t callid, ipc_call_t *call, int vp)
{
    static keyfield_t *interbuffer = NULL;
    static size_t intersize = 0;
 
    static char *shm = NULL;
    static ipcarg_t shm_id = 0;
    static size_t shm_size;
 
    int handled = 1;
    int retval = 0;
    viewport_t *vport = &viewports[vp];
    unsigned int x,y;
 
    switch (IPC_GET_METHOD(*call)) {
    case IPC_M_AS_AREA_SEND:
        /* We accept one area for data interchange */
        if (IPC_GET_ARG1(*call) == shm_id) {
            void *dest = as_get_mappable_page(IPC_GET_ARG2(*call));
            shm_size = IPC_GET_ARG2(*call);
            if (!ipc_answer_fast(callid, 0, (sysarg_t)dest, 0))
                shm = dest;
            else
                shm_id = 0;
            if (shm[0] != 'P')
                while (1)
                    ;
            return 1;
        } else {
            intersize = IPC_GET_ARG2(*call);
            receive_comm_area(callid,call,(void **)&interbuffer);
        }
        return 1;
    case FB_PREPARE_SHM:
        if (shm_id)
            retval = EBUSY;
        else
            shm_id = IPC_GET_ARG1(*call);
        break;
       
    case FB_DROP_SHM:
        if (shm) {
            as_area_destroy(shm);
            shm = NULL;
        }
        shm_id = 0;
        break;
 
    case FB_SHM2PIXMAP:
        if (!shm) {
            retval = EINVAL;
            break;
        }
        retval = shm2pixmap(shm, shm_size);
        break;
    case FB_DRAW_PPM:
        if (!shm) {
            retval = EINVAL;
            break;
        }
        x = IPC_GET_ARG1(*call);
        y = IPC_GET_ARG2(*call);
        if (x > vport->width || y > vport->height) {
            retval = EINVAL;
            break;
        }
       
        ppm_draw(shm, shm_size, IPC_GET_ARG1(*call), IPC_GET_ARG2(*call),
             vport->width - x, vport->height - y, (putpixel_cb_t)putpixel, vport);
        break;
    case FB_DRAW_TEXT_DATA:
        if (!interbuffer) {
            retval = EINVAL;
            break;
        }
        if (intersize < vport->cols*vport->rows*sizeof(*interbuffer)) {
            retval = EINVAL;
            break;
        }
        draw_text_data(vport, interbuffer);
        break;
    default:
        handled = 0;
    }
   
    if (handled)
        ipc_answer_fast(callid, retval, 0, 0);
    return handled;
}
 
/** Save viewport to pixmap */
static int save_vp_to_pixmap(int vp)
{
    int pm;
    pixmap_t *pmap;
    viewport_t *vport = &viewports[vp];
    int x,y;
    int rowsize;
    int tmp;
 
    pm = find_free_pixmap();
    if (pm == -1)
        return ELIMIT;
   
    pmap = &pixmaps[pm];
    pmap->data = malloc(screen.pixelbytes * vport->width * vport->height);
    if (!pmap->data)
        return ENOMEM;
 
    pmap->width = vport->width;
    pmap->height = vport->height;
   
    rowsize = vport->width * screen.pixelbytes;
    for (y=0;y < vport->height; y++) {
        tmp = (vport->y + y) * screen.scanline + vport->x * screen.pixelbytes;
        memcpy(pmap->data + rowsize*y, screen.fbaddress + tmp, rowsize);
    }
    return pm;
}
 
/** Draw pixmap on screen
 *
 * @param vp Viewport to draw on
 * @param pm Pixmap identifier
 */
static int draw_pixmap(int vp, int pm)
{
    pixmap_t *pmap = &pixmaps[pm];
    viewport_t *vport = &viewports[vp];
    int x,y;
    int tmp, srcrowsize;
    int realwidth, realheight, realrowsize;
 
    if (!pmap->data)
        return EINVAL;
 
    realwidth = pmap->width <= vport->width ? pmap->width : vport->width;
    realheight = pmap->height <= vport->height ? pmap->height : vport->height;
 
    srcrowsize = vport->width * screen.pixelbytes;
    realrowsize = realwidth * screen.pixelbytes;
 
    for (y=0; y < realheight; y++) {
        tmp = (vport->y + y) * screen.scanline + vport->x * screen.pixelbytes;
        memcpy(screen.fbaddress + tmp, pmap->data + y * srcrowsize, realrowsize);
    }
    return 0;
}
 
/** Tick animation one step forward */
static void anims_tick(void)
{
    int i;
    static int counts = 0;
   
    /* Limit redrawing */
    counts = (counts+1) % 8;
    if (counts)
        return;
 
    for (i=0; i < MAX_ANIMATIONS; i++) {
        if (!animations[i].animlen || !animations[i].initialized || !animations[i].enabled)
            continue;
        draw_pixmap(animations[i].vp, animations[i].pixmaps[animations[i].pos]);
        animations[i].pos = (animations[i].pos+1) % animations[i].animlen;
    }
}
 
static int anim_handle(ipc_callid_t callid, ipc_call_t *call, int vp)
{
    int handled = 1;
    int retval = 0;
    int i,nvp;
    int newval;
 
    switch (IPC_GET_METHOD(*call)) {
    case FB_ANIM_CREATE:
        nvp = IPC_GET_ARG1(*call);
        if (nvp == -1)
            nvp = vp;
        if (nvp >= MAX_VIEWPORTS || nvp < 0 || !viewports[nvp].initialized) {
            retval = EINVAL;
            break;
        }
        for (i=0; i < MAX_ANIMATIONS; i++) {
            if (! animations[i].initialized)
                break;
        }
        if (i == MAX_ANIMATIONS) {
            retval = ELIMIT;
            break;
        }
        animations[i].initialized = 1;
        animations[i].animlen = 0;
        animations[i].pos = 0;
        animations[i].enabled = 0;
        animations[i].vp = nvp;
        retval = i;
        break;
    case FB_ANIM_DROP:
        i = IPC_GET_ARG1(*call);
        if (nvp >= MAX_ANIMATIONS || i < 0) {
            retval = EINVAL;
            break;
        }
        animations[i].initialized = 0;
        break;
    case FB_ANIM_ADDPIXMAP:
        i = IPC_GET_ARG1(*call);
        if (i >= MAX_ANIMATIONS || i < 0 || !animations[i].initialized) {
            retval = EINVAL;
            break;
        }
        if (animations[i].animlen == MAX_ANIM_LEN) {
            retval = ELIMIT;
            break;
        }
        newval = IPC_GET_ARG2(*call);
        if (newval < 0 || newval > MAX_PIXMAPS || !pixmaps[newval].data) {
            retval = EINVAL;
            break;
        }
        animations[i].pixmaps[animations[i].animlen++] = newval;
        break;
    case FB_ANIM_CHGVP:
        i = IPC_GET_ARG1(*call);
        if (i >= MAX_ANIMATIONS || i < 0) {
            retval = EINVAL;
            break;
        }
        nvp = IPC_GET_ARG2(*call);
        if (nvp == -1)
            nvp = vp;
        if (nvp >= MAX_VIEWPORTS || nvp < 0 || !viewports[nvp].initialized) {
            retval = EINVAL;
            break;
        }
        animations[i].vp = nvp;
        break;
    case FB_ANIM_START:
    case FB_ANIM_STOP:
        i = IPC_GET_ARG1(*call);
        if (i >= MAX_ANIMATIONS || i < 0) {
            retval = EINVAL;
            break;
        }
        newval = (IPC_GET_METHOD(*call) == FB_ANIM_START);
        if (newval ^ animations[i].enabled) {
            animations[i].enabled = newval;
            anims_enabled += newval ? 1 : -1;
        }
        break;
    default:
        handled = 0;
    }
    if (handled)
        ipc_answer_fast(callid, retval, 0, 0);
    return handled;
}
 
/** Handler for messages concerning pixmap handling */
static int pixmap_handle(ipc_callid_t callid, ipc_call_t *call, int vp)
{
    int handled = 1;
    int retval = 0;
    int i,nvp;
 
    switch (IPC_GET_METHOD(*call)) {
    case FB_VP_DRAW_PIXMAP:
        nvp = IPC_GET_ARG1(*call);
        if (nvp == -1)
            nvp = vp;
        if (nvp < 0 || nvp >= MAX_VIEWPORTS || !viewports[nvp].initialized) {
            retval = EINVAL;
            break;
        }
        i = IPC_GET_ARG2(*call);
        retval = draw_pixmap(nvp, i);
        break;
    case FB_VP2PIXMAP:
        nvp = IPC_GET_ARG1(*call);
        if (nvp == -1)
            nvp = vp;
        if (nvp < 0 || nvp >= MAX_VIEWPORTS || !viewports[nvp].initialized)
            retval = EINVAL;
        else
            retval = save_vp_to_pixmap(nvp);
        break;
    case FB_DROP_PIXMAP:
        i = IPC_GET_ARG1(*call);
        if (i >= MAX_PIXMAPS) {
            retval = EINVAL;
            break;
        }
        if (pixmaps[i].data) {
            free(pixmaps[i].data);
            pixmaps[i].data = NULL;
        }
        break;
    default:
        handled = 0;
    }
 
    if (handled)
        ipc_answer_fast(callid, retval, 0, 0);
    return handled;
   
}
 
/** Function for handling connections to FB
 *
 */
static void fb_client_connection(ipc_callid_t iid, ipc_call_t *icall)
{
    ipc_callid_t callid;
    ipc_call_t call;
    int retval;
    int i;
    unsigned int row,col;
    char c;
 
    int vp = 0;
    viewport_t *vport = &viewports[0];
 
    if (client_connected) {
        ipc_answer_fast(iid, ELIMIT, 0,0);
        return;
    }
    client_connected = 1;
    ipc_answer_fast(iid, 0, 0, 0); /* Accept connection */
 
    while (1) {
        if (vport->cursor_active || anims_enabled)
            callid = async_get_call_timeout(&call,250000);
        else
            callid = async_get_call(&call);
 
        if (!callid) {
            cursor_blink(vport);
            anims_tick();
            continue;
        }
        if (shm_handle(callid, &call, vp))
            continue;
        if (pixmap_handle(callid, &call, vp))
            continue;
        if (anim_handle(callid, &call, vp))
            continue;
 
        switch (IPC_GET_METHOD(call)) {
        case IPC_M_PHONE_HUNGUP:
            client_connected = 0;
            /* cleanup other viewports */
            for (i=1; i < MAX_VIEWPORTS; i++)
                vport->initialized = 0;
            return; /* Exit thread */
 
        case FB_PUTCHAR:
        case FB_TRANS_PUTCHAR:
            c = IPC_GET_ARG1(call);
            row = IPC_GET_ARG2(call);
            col = IPC_GET_ARG3(call);
            if (row >= vport->rows || col >= vport->cols) {
                retval = EINVAL;
                break;
            }
            ipc_answer_fast(callid,0,0,0);
 
            draw_char(vport, c, row, col, vport->style, IPC_GET_METHOD(call) == FB_TRANS_PUTCHAR);
            continue; /* msg already answered */
        case FB_CLEAR:
            clear_port(vport);
            cursor_print(vport);
            retval = 0;
            break;
        case FB_CURSOR_GOTO:
            row = IPC_GET_ARG1(call);
            col = IPC_GET_ARG2(call);
            if (row >= vport->rows || col >= vport->cols) {
                retval = EINVAL;
                break;
            }
            retval = 0;
            cursor_hide(vport);
            vport->cur_col = col;
            vport->cur_row = row;
            cursor_print(vport);
            break;
        case FB_CURSOR_VISIBILITY:
            cursor_hide(vport);
            vport->cursor_active = IPC_GET_ARG1(call);
            cursor_print(vport);
            retval = 0;
            break;
        case FB_GET_CSIZE:
            ipc_answer_fast(callid, 0, vport->rows, vport->cols);
            continue;
        case FB_SCROLL:
            i = IPC_GET_ARG1(call);
            if (i > vport->rows || i < (- (int)vport->rows)) {
                retval = EINVAL;
                break;
            }
            cursor_hide(vport);
            scroll_port(vport, i*FONT_SCANLINES);
            cursor_print(vport);
            retval = 0;
            break;
        case FB_VIEWPORT_DB:
            /* Enable double buffering */
            i = IPC_GET_ARG1(call);
            if (i == -1)
                i = vp;
            if (i < 0 || i >= MAX_VIEWPORTS) {
                retval = EINVAL;
                break;
            }
            if (! viewports[i].initialized ) {
                while (1)
                    ;
                retval = EADDRNOTAVAIL;
                break;
            }
            viewports[i].dboffset = 0;
            if (IPC_GET_ARG2(call) == 1 && !viewports[i].dbdata)
                viewports[i].dbdata = malloc(screen.pixelbytes*viewports[i].width * viewports[i].height);
            else if (IPC_GET_ARG2(call) == 0 && viewports[i].dbdata) {
                free(viewports[i].dbdata);
                viewports[i].dbdata = NULL;
            }
            retval = 0;
            break;
        case FB_VIEWPORT_SWITCH:
            i = IPC_GET_ARG1(call);
            if (i < 0 || i >= MAX_VIEWPORTS) {
                retval = EINVAL;
                break;
            }
            if (! viewports[i].initialized ) {
                retval = EADDRNOTAVAIL;
                break;
            }
            cursor_hide(vport);
            vp = i;
            vport = &viewports[vp];
            cursor_print(vport);
            retval = 0;
            break;
        case FB_VIEWPORT_CREATE:
            retval = viewport_create(IPC_GET_ARG1(call) >> 16,
                         IPC_GET_ARG1(call) & 0xffff,
                         IPC_GET_ARG2(call) >> 16,
                         IPC_GET_ARG2(call) & 0xffff);
            break;
        case FB_VIEWPORT_DELETE:
            i = IPC_GET_ARG1(call);
            if (i < 0 || i >= MAX_VIEWPORTS) {
                retval = EINVAL;
                break;
            }
            if (! viewports[i].initialized ) {
                retval = EADDRNOTAVAIL;
                break;
            }
            viewports[i].initialized = 0;
            if (viewports[i].dbdata) {
                free(viewports[i].dbdata);
                viewports[i].dbdata = NULL;
            }
            retval = 0;
            break;
        case FB_SET_STYLE:
            vport->style.fg_color = IPC_GET_ARG1(call);
            vport->style.bg_color = IPC_GET_ARG2(call);
            retval = 0;
            break;
        case FB_GET_RESOLUTION:
            ipc_answer_fast(callid, 0, screen.xres,screen.yres);
            continue;
        case FB_POINTER_MOVE:
            putpixel(&viewports[0], IPC_GET_ARG1(call), IPC_GET_ARG2(call),
                 0xd0a080);
            break;
        default:
            retval = ENOENT;
        }
        ipc_answer_fast(callid,retval,0,0);
    }
}
 
/** Initialization of framebuffer */
int fb_init(void)
{
    void *fb_ph_addr;
    unsigned int fb_width;
    unsigned int fb_height;
    unsigned int fb_bpp;
    unsigned int fb_scanline;
    void *fb_addr;
    size_t asz;
 
    async_set_client_connection(fb_client_connection);
 
    fb_ph_addr=(void *)sysinfo_value("fb.address.physical");
    fb_width=sysinfo_value("fb.width");
    fb_height=sysinfo_value("fb.height");
    fb_bpp=sysinfo_value("fb.bpp");
    fb_scanline=sysinfo_value("fb.scanline");
 
    asz = fb_scanline*fb_height;
    fb_addr = as_get_mappable_page(asz);
   
    map_physmem(fb_ph_addr, fb_addr, ALIGN_UP(asz,PAGE_SIZE) >>PAGE_WIDTH,
            AS_AREA_READ | AS_AREA_WRITE | AS_AREA_CACHEABLE);
   
    screen_init(fb_addr, fb_width, fb_height, fb_bpp, fb_scanline);
 
    return 0;
}
 
 
/**
 * @}
 */
 

Rev 1673	Rev 1707
1	/*	1	/*
2	* Copyright (C) 2006 Jakub Vana	2	* Copyright (C) 2006 Jakub Vana
3	* Copyright (C) 2006 Ondrej Palkovsky	3	* Copyright (C) 2006 Ondrej Palkovsky
4	* All rights reserved.	4	* All rights reserved.
5	*	5	*
6	* Redistribution and use in source and binary forms, with or without	6	* Redistribution and use in source and binary forms, with or without
7	* modification, are permitted provided that the following conditions	7	* modification, are permitted provided that the following conditions
8	* are met:	8	* are met:
9	*	9	*
10	* - Redistributions of source code must retain the above copyright	10	* - Redistributions of source code must retain the above copyright
11	* notice, this list of conditions and the following disclaimer.	11	* notice, this list of conditions and the following disclaimer.
12	* - Redistributions in binary form must reproduce the above copyright	12	* - Redistributions in binary form must reproduce the above copyright
13	* notice, this list of conditions and the following disclaimer in the	13	* notice, this list of conditions and the following disclaimer in the
14	* documentation and/or other materials provided with the distribution.	14	* documentation and/or other materials provided with the distribution.
15	* - The name of the author may not be used to endorse or promote products	15	* - The name of the author may not be used to endorse or promote products
16	* derived from this software without specific prior written permission.	16	* derived from this software without specific prior written permission.
17	*	17	*
18	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR	18	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
19	* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES	19	* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
20	* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.	20	* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
21	* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,	21	* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
22	* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT	22	* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
23	* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,	23	* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
24	* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY	24	* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
25	* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT	25	* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
26	* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF	26	* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
27	* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.	27	* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
28	*/	28	*/
29		29
30	/** @defgroup fbs Framebuffers	30	/** @defgroup fbs Framebuffers
31	* @brief HelenOS framebuffers.	31	* @brief HelenOS framebuffers.
32	* @{	32	* @{
33	* @}	33	* @}
34	*/	34	*/
35	/** @defgroup fb Framebuffer	35	/** @defgroup fb Framebuffer
36	* @brief HelenOS framebuffer.	36	* @brief HelenOS framebuffer.
37	* @ingroup fbs	37	* @ingroup fbs
38	* @{	38	* @{
39	*/	39	*/
40	/** @file	40	/** @file
41	*/	41	*/
42		42
43		43
44	#include <stdlib.h>	44	#include <stdlib.h>
45	#include <unistd.h>	45	#include <unistd.h>
46	#include <string.h>	46	#include <string.h>
47	#include <ddi.h>	47	#include <ddi.h>
48	#include <sysinfo.h>	48	#include <sysinfo.h>
49	#include <align.h>	49	#include <align.h>
50	#include <as.h>	50	#include <as.h>
51	#include <ipc/fb.h>	51	#include <ipc/fb.h>
52	#include <ipc/ipc.h>	52	#include <ipc/ipc.h>
53	#include <ipc/ns.h>	53	#include <ipc/ns.h>
54	#include <ipc/services.h>	54	#include <ipc/services.h>
55	#include <kernel/errno.h>	55	#include <kernel/errno.h>
56	#include <async.h>	56	#include <async.h>
57		57
58	#include "font-8x16.h"	58	#include "font-8x16.h"
59	#include "fb.h"	59	#include "fb.h"
60	#include "main.h"	60	#include "main.h"
61	#include "../console/screenbuffer.h"	61	#include "../console/screenbuffer.h"
62	#include "ppm.h"	62	#include "ppm.h"
63		63
64	#define DEFAULT_BGCOLOR 0xf0f0f0	64	#define DEFAULT_BGCOLOR 0xf0f0f0
65	#define DEFAULT_FGCOLOR 0x0	65	#define DEFAULT_FGCOLOR 0x0
66		66
67	/***************************************************************/	67	/***************************************************************/
68	/* Pixel specific fuctions */	68	/* Pixel specific fuctions */
69		69
70	typedef void (conv2scr_fn_t)(void , int);	70	typedef void (conv2scr_fn_t)(void , int);
71	typedef int (conv2rgb_fn_t)(void );	71	typedef int (conv2rgb_fn_t)(void );
72		72
73	struct {	73	struct {
74	__u8 *fbaddress ;	74	__u8 *fbaddress ;
75		75
76	unsigned int xres ;	76	unsigned int xres ;
77	unsigned int yres ;	77	unsigned int yres ;
78	unsigned int scanline ;	78	unsigned int scanline ;
79	unsigned int pixelbytes ;	79	unsigned int pixelbytes ;
80		80
81	conv2scr_fn_t rgb2scr;	81	conv2scr_fn_t rgb2scr;
82	conv2rgb_fn_t scr2rgb;	82	conv2rgb_fn_t scr2rgb;
83	} screen;	83	} screen;
84		84
85	typedef struct {	85	typedef struct {
86	int initialized;	86	int initialized;
87	unsigned int x, y;	87	unsigned int x, y;
88	unsigned int width, height;	88	unsigned int width, height;
89		89
90	/* Text support in window */	90	/* Text support in window */
91	unsigned int rows, cols;	91	unsigned int rows, cols;
92	/* Style for text printing */	92	/* Style for text printing */
93	style_t style;	93	style_t style;
94	/* Auto-cursor position */	94	/* Auto-cursor position */
95	int cursor_active, cur_col, cur_row;	95	int cursor_active, cur_col, cur_row;
96	int cursor_shown;	96	int cursor_shown;
97	/* Double buffering */	97	/* Double buffering */
98	__u8 *dbdata;	98	__u8 *dbdata;
99	unsigned int dboffset;	99	unsigned int dboffset;
100	unsigned int paused;	100	unsigned int paused;
101	} viewport_t;	101	} viewport_t;
102		102
103	#define MAX_ANIM_LEN 8	103	#define MAX_ANIM_LEN 8
104	#define MAX_ANIMATIONS 4	104	#define MAX_ANIMATIONS 4
105	typedef struct {	105	typedef struct {
106	int initialized;	106	int initialized;
107	int enabled;	107	int enabled;
108	unsigned int vp;	108	unsigned int vp;
109		109
110	unsigned int pos;	110	unsigned int pos;
111	unsigned int animlen;	111	unsigned int animlen;
112	unsigned int pixmaps[MAX_ANIM_LEN];	112	unsigned int pixmaps[MAX_ANIM_LEN];
113	} animation_t;	113	} animation_t;
114	static animation_t animations[MAX_ANIMATIONS];	114	static animation_t animations[MAX_ANIMATIONS];
115	static int anims_enabled;	115	static int anims_enabled;
116		116
117	/** Maximum number of saved pixmaps	117	/** Maximum number of saved pixmaps
118	* Pixmap is a saved rectangle	118	* Pixmap is a saved rectangle
119	*/	119	*/
120	#define MAX_PIXMAPS 256	120	#define MAX_PIXMAPS 256
121	typedef struct {	121	typedef struct {
122	unsigned int width;	122	unsigned int width;
123	unsigned int height;	123	unsigned int height;
124	__u8 *data;	124	__u8 *data;
125	} pixmap_t;	125	} pixmap_t;
126	static pixmap_t pixmaps[MAX_PIXMAPS];	126	static pixmap_t pixmaps[MAX_PIXMAPS];
127		127
128	/* Viewport is a rectangular area on the screen */	128	/* Viewport is a rectangular area on the screen */
129	#define MAX_VIEWPORTS 128	129	#define MAX_VIEWPORTS 128
130	static viewport_t viewports[128];	130	static viewport_t viewports[128];
131		131
132	/* Allow only 1 connection */	132	/* Allow only 1 connection */
133	static int client_connected = 0;	133	static int client_connected = 0;
134		134
135	#define RED(x, bits) ((x >> (16 + 8 - bits)) & ((1 << bits) - 1))	135	#define RED(x, bits) ((x >> (16 + 8 - bits)) & ((1 << bits) - 1))
136	#define GREEN(x, bits) ((x >> (8 + 8 - bits)) & ((1 << bits) - 1))	136	#define GREEN(x, bits) ((x >> (8 + 8 - bits)) & ((1 << bits) - 1))
137	#define BLUE(x, bits) ((x >> (8 - bits)) & ((1 << bits) - 1))	137	#define BLUE(x, bits) ((x >> (8 - bits)) & ((1 << bits) - 1))
138		138
139	#define COL_WIDTH 8	139	#define COL_WIDTH 8
140	#define ROW_BYTES (screen.scanline * FONT_SCANLINES)	140	#define ROW_BYTES (screen.scanline * FONT_SCANLINES)
141		141
142	#define POINTPOS(x, y) ((y) * screen.scanline + (x) * screen.pixelbytes)	142	#define POINTPOS(x, y) ((y) * screen.scanline + (x) * screen.pixelbytes)
143		143
144	/* Conversion routines between different color representations */	144	/* Conversion routines between different color representations */
145	static void rgb_4byte(void *dst, int rgb)	145	static void rgb_4byte(void *dst, int rgb)
146	{	146	{
147	(int )dst = rgb;	147	(int )dst = rgb;
148	}	148	}
149		149
150	static int byte4_rgb(void *src)	150	static int byte4_rgb(void *src)
151	{	151	{
152	return ((int )src) & 0xffffff;	152	return ((int )src) & 0xffffff;
153	}	153	}
154		154
155	static void rgb_3byte(void *dst, int rgb)	155	static void rgb_3byte(void *dst, int rgb)
156	{	156	{
157	__u8 *scr = dst;	157	__u8 *scr = dst;
158	#if (defined(BIG_ENDIAN) \|\| defined(FB_BIG_ENDIAN))	158	#if (defined(BIG_ENDIAN) \|\| defined(FB_BIG_ENDIAN))
159	scr[0] = RED(rgb, 8);	159	scr[0] = RED(rgb, 8);
160	scr[1] = GREEN(rgb, 8);	160	scr[1] = GREEN(rgb, 8);
161	scr[2] = BLUE(rgb, 8);	161	scr[2] = BLUE(rgb, 8);
162	#else	162	#else
163	scr[2] = RED(rgb, 8);	163	scr[2] = RED(rgb, 8);
164	scr[1] = GREEN(rgb, 8);	164	scr[1] = GREEN(rgb, 8);
165	scr[0] = BLUE(rgb, 8);	165	scr[0] = BLUE(rgb, 8);
166	#endif	166	#endif
167		167
168		168
169	}	169	}
170		170
171	static int byte3_rgb(void *src)	171	static int byte3_rgb(void *src)
172	{	172	{
173	__u8 *scr = src;	173	__u8 *scr = src;
174	#if (defined(BIG_ENDIAN) \|\| defined(FB_BIG_ENDIAN))	174	#if (defined(BIG_ENDIAN) \|\| defined(FB_BIG_ENDIAN))
175	return scr[0] << 16 \| scr[1] << 8 \| scr[2];	175	return scr[0] << 16 \| scr[1] << 8 \| scr[2];
176	#else	176	#else
177	return scr[2] << 16 \| scr[1] << 8 \| scr[0];	177	return scr[2] << 16 \| scr[1] << 8 \| scr[0];
178	#endif	178	#endif
179	}	179	}
180		180
181	/** 16-bit depth (5:6:5) */	181	/** 16-bit depth (5:6:5) */
182	static void rgb_2byte(void *dst, int rgb)	182	static void rgb_2byte(void *dst, int rgb)
183	{	183	{
184	/* 5-bit, 6-bits, 5-bits */	184	/* 5-bit, 6-bits, 5-bits */
185	((__u16 )(dst)) = RED(rgb, 5) << 11 \| GREEN(rgb, 6) << 5 \| BLUE(rgb, 5);	185	((__u16 )(dst)) = RED(rgb, 5) << 11 \| GREEN(rgb, 6) << 5 \| BLUE(rgb, 5);
186	}	186	}
187		187
188	/** 16-bit depth (5:6:5) */	188	/** 16-bit depth (5:6:5) */
189	static int byte2_rgb(void *src)	189	static int byte2_rgb(void *src)
190	{	190	{
191	int color = (__u16 )(src);	191	int color = (__u16 )(src);
192	return (((color >> 11) & 0x1f) << (16 + 3)) \| (((color >> 5) & 0x3f) << (8 + 2)) \| ((color & 0x1f) << 3);	192	return (((color >> 11) & 0x1f) << (16 + 3)) \| (((color >> 5) & 0x3f) << (8 + 2)) \| ((color & 0x1f) << 3);
193	}	193	}
194		194
195	/** Put pixel - 8-bit depth (3:2:3) */	195	/** Put pixel - 8-bit depth (3:2:3) */
196	static void rgb_1byte(void *dst, int rgb)	196	static void rgb_1byte(void *dst, int rgb)
197	{	197	{
198	(__u8 )dst = RED(rgb, 3) << 5 \| GREEN(rgb, 2) << 3 \| BLUE(rgb, 3);	198	(__u8 )dst = RED(rgb, 3) << 5 \| GREEN(rgb, 2) << 3 \| BLUE(rgb, 3);
199	}	199	}
200		200
201	/** Return pixel color - 8-bit depth (3:2:3) */	201	/** Return pixel color - 8-bit depth (3:2:3) */
202	static int byte1_rgb(void *src)	202	static int byte1_rgb(void *src)
203	{	203	{
204	int color = (__u8 )src;	204	int color = (__u8 )src;
205	return (((color >> 5) & 0x7) << (16 + 5)) \| (((color >> 3) & 0x3) << (8 + 6)) \| ((color & 0x7) << 5);	205	return (((color >> 5) & 0x7) << (16 + 5)) \| (((color >> 3) & 0x3) << (8 + 6)) \| ((color & 0x7) << 5);
206	}	206	}
207		207
208	/** Put pixel into viewport	208	/** Put pixel into viewport
209	*	209	*
210	* @param vp Viewport identification	210	* @param vp Viewport identification
211	* @param x X coord relative to viewport	211	* @param x X coord relative to viewport
212	* @param y Y coord relative to viewport	212	* @param y Y coord relative to viewport
213	* @param color RGB color	213	* @param color RGB color
214	*/	214	*/
215	static void putpixel(viewport_t *vport, unsigned int x, unsigned int y, int color)	215	static void putpixel(viewport_t *vport, unsigned int x, unsigned int y, int color)
216	{	216	{
217	int dx = vport->x + x;	217	int dx = vport->x + x;
218	int dy = vport->y + y;	218	int dy = vport->y + y;
219		219
220	if (! (vport->paused && vport->dbdata))	220	if (! (vport->paused && vport->dbdata))
221	(*screen.rgb2scr)(&screen.fbaddress[POINTPOS(dx,dy)],color);	221	(*screen.rgb2scr)(&screen.fbaddress[POINTPOS(dx,dy)],color);
222		222
223	if (vport->dbdata) {	223	if (vport->dbdata) {
224	int dline = (y + vport->dboffset) % vport->height;	224	int dline = (y + vport->dboffset) % vport->height;
225	int doffset = screen.pixelbytes * (dline * vport->width + x);	225	int doffset = screen.pixelbytes * (dline * vport->width + x);
226	(*screen.rgb2scr)(&vport->dbdata[doffset],color);	226	(*screen.rgb2scr)(&vport->dbdata[doffset],color);
227	}	227	}
228	}	228	}
229		229
230	/** Get pixel from viewport */	230	/** Get pixel from viewport */
231	static int getpixel(viewport_t *vport, unsigned int x, unsigned int y)	231	static int getpixel(viewport_t *vport, unsigned int x, unsigned int y)
232	{	232	{
233	int dx = vport->x + x;	233	int dx = vport->x + x;
234	int dy = vport->y + y;	234	int dy = vport->y + y;
235		235
236	return (*screen.scr2rgb)(&screen.fbaddress[POINTPOS(dx,dy)]);	236	return (*screen.scr2rgb)(&screen.fbaddress[POINTPOS(dx,dy)]);
237	}	237	}
238		238
239	static inline void putpixel_mem(char *mem, unsigned int x, unsigned int y,	239	static inline void putpixel_mem(char *mem, unsigned int x, unsigned int y,
240	int color)	240	int color)
241	{	241	{
242	(*screen.rgb2scr)(&mem[POINTPOS(x,y)],color);	242	(*screen.rgb2scr)(&mem[POINTPOS(x,y)],color);
243	}	243	}
244		244
245	static void draw_rectangle(viewport_t *vport, unsigned int sx, unsigned int sy,	245	static void draw_rectangle(viewport_t *vport, unsigned int sx, unsigned int sy,
246	unsigned int width, unsigned int height,	246	unsigned int width, unsigned int height,
247	int color)	247	int color)
248	{	248	{
249	unsigned int x, y;	249	unsigned int x, y;
250	static void *tmpline;	250	static void *tmpline;
251		251
252	if (!tmpline)	252	if (!tmpline)
253	tmpline = malloc(screen.scanline*screen.pixelbytes);	253	tmpline = malloc(screen.scanline*screen.pixelbytes);
254		254
255	/* Clear first line */	255	/* Clear first line */
256	for (x = 0; x < width; x++)	256	for (x = 0; x < width; x++)
257	putpixel_mem(tmpline, x, 0, color);	257	putpixel_mem(tmpline, x, 0, color);
258		258
259	if (!vport->paused) {	259	if (!vport->paused) {
260	/* Recompute to screen coords */	260	/* Recompute to screen coords */
261	sx += vport->x;	261	sx += vport->x;
262	sy += vport->y;	262	sy += vport->y;
263	/* Copy the rest */	263	/* Copy the rest */
264	for (y = sy;y < sy+height; y++)	264	for (y = sy;y < sy+height; y++)
265	memcpy(&screen.fbaddress[POINTPOS(sx,y)], tmpline,	265	memcpy(&screen.fbaddress[POINTPOS(sx,y)], tmpline,
266	screen.pixelbytes * width);	266	screen.pixelbytes * width);
267	}	267	}
268	if (vport->dbdata) {	268	if (vport->dbdata) {
269	for (y=sy;y < sy+height; y++) {	269	for (y=sy;y < sy+height; y++) {
270	int rline = (y + vport->dboffset) % vport->height;	270	int rline = (y + vport->dboffset) % vport->height;
271	int rpos = (rline * vport->width + sx) * screen.pixelbytes;	271	int rpos = (rline * vport->width + sx) * screen.pixelbytes;
272	memcpy(&vport->dbdata[rpos], tmpline, screen.pixelbytes * width);	272	memcpy(&vport->dbdata[rpos], tmpline, screen.pixelbytes * width);
273	}	273	}
274	}	274	}
275		275
276	}	276	}
277		277
278	/** Fill viewport with background color */	278	/** Fill viewport with background color */
279	static void clear_port(viewport_t *vport)	279	static void clear_port(viewport_t *vport)
280	{	280	{
281	draw_rectangle(vport, 0, 0, vport->width, vport->height, vport->style.bg_color);	281	draw_rectangle(vport, 0, 0, vport->width, vport->height, vport->style.bg_color);
282	}	282	}
283		283
284	/** Scroll unbuffered viewport up/down	284	/** Scroll unbuffered viewport up/down
285	*	285	*
286	* @param vp Viewport to scroll	286	* @param vp Viewport to scroll
287	* @param rows Positive number - scroll up, negative - scroll down	287	* @param rows Positive number - scroll up, negative - scroll down
288	*/	288	*/
289	static void scroll_port_nodb(viewport_t *vport, int lines)	289	static void scroll_port_nodb(viewport_t *vport, int lines)
290	{	290	{
291	int y;	291	int y;
292	int startline;	292	int startline;
293	int endline;	293	int endline;
294		294
295	if (lines > 0) {	295	if (lines > 0) {
296	for (y=vport->y; y < vport->y+vport->height - lines; y++)	296	for (y=vport->y; y < vport->y+vport->height - lines; y++)
297	memcpy(&screen.fbaddress[POINTPOS(vport->x,y)],	297	memcpy(&screen.fbaddress[POINTPOS(vport->x,y)],
298	&screen.fbaddress[POINTPOS(vport->x,y + lines)],	298	&screen.fbaddress[POINTPOS(vport->x,y + lines)],
299	screen.pixelbytes * vport->width);	299	screen.pixelbytes * vport->width);
300	draw_rectangle(vport, 0, vport->height - lines,	300	draw_rectangle(vport, 0, vport->height - lines,
301	vport->width, lines, vport->style.bg_color);	301	vport->width, lines, vport->style.bg_color);
302	} else if (lines < 0) {	302	} else if (lines < 0) {
303	lines = -lines;	303	lines = -lines;
304	for (y=vport->y + vport->height-1; y >= vport->y + lines; y--)	304	for (y=vport->y + vport->height-1; y >= vport->y + lines; y--)
305	memcpy(&screen.fbaddress[POINTPOS(vport->x,y)],	305	memcpy(&screen.fbaddress[POINTPOS(vport->x,y)],
306	&screen.fbaddress[POINTPOS(vport->x,y - lines)],	306	&screen.fbaddress[POINTPOS(vport->x,y - lines)],
307	screen.pixelbytes * vport->width);	307	screen.pixelbytes * vport->width);
308	draw_rectangle(vport, 0, 0, vport->width, lines, vport->style.bg_color);	308	draw_rectangle(vport, 0, 0, vport->width, lines, vport->style.bg_color);
309	}	309	}
310	}	310	}
311		311
312	/** Refresh given viewport from double buffer */	312	/** Refresh given viewport from double buffer */
313	static void refresh_viewport_db(viewport_t *vport)	313	static void refresh_viewport_db(viewport_t *vport)
314	{	314	{
315	unsigned int y, srcy, srcoff, dsty, dstx;	315	unsigned int y, srcy, srcoff, dsty, dstx;
316		316
317	for (y = 0; y < vport->height; y++) {	317	for (y = 0; y < vport->height; y++) {
318	srcy = (y + vport->dboffset) % vport->height;	318	srcy = (y + vport->dboffset) % vport->height;
319	srcoff = (vport->width * srcy) * screen.pixelbytes;	319	srcoff = (vport->width * srcy) * screen.pixelbytes;
320		320
321	dstx = vport->x;	321	dstx = vport->x;
322	dsty = vport->y + y;	322	dsty = vport->y + y;
323		323
324	memcpy(&screen.fbaddress[POINTPOS(dstx,dsty)],	324	memcpy(&screen.fbaddress[POINTPOS(dstx,dsty)],
325	&vport->dbdata[srcoff],	325	&vport->dbdata[srcoff],
326	vport->width*screen.pixelbytes);	326	vport->width*screen.pixelbytes);
327	}	327	}
328	}	328	}
329		329
330	/** Scroll viewport that has double buffering enabled */	330	/** Scroll viewport that has double buffering enabled */
331	static void scroll_port_db(viewport_t *vport, int lines)	331	static void scroll_port_db(viewport_t *vport, int lines)
332	{	332	{
333	++vport->paused;	333	++vport->paused;
334	if (lines > 0) {	334	if (lines > 0) {
335	draw_rectangle(vport, 0, 0, vport->width, lines,	335	draw_rectangle(vport, 0, 0, vport->width, lines,
336	vport->style.bg_color);	336	vport->style.bg_color);
337	vport->dboffset += lines;	337	vport->dboffset += lines;
338	vport->dboffset %= vport->height;	338	vport->dboffset %= vport->height;
339	} else if (lines < 0) {	339	} else if (lines < 0) {
340	lines = -lines;	340	lines = -lines;
341	draw_rectangle(vport, 0, vport->height-lines,	341	draw_rectangle(vport, 0, vport->height-lines,
342	vport->width, lines,	342	vport->width, lines,
343	vport->style.bg_color);	343	vport->style.bg_color);
344		344
345	if (vport->dboffset < lines)	345	if (vport->dboffset < lines)
346	vport->dboffset += vport->height;	346	vport->dboffset += vport->height;
347	vport->dboffset -= lines;	347	vport->dboffset -= lines;
348	}	348	}
349		349
350	--vport->paused;	350	--vport->paused;
351		351
352	refresh_viewport_db(vport);	352	refresh_viewport_db(vport);
353	}	353	}
354		354
355	/** Scrolls viewport given number of lines */	355	/** Scrolls viewport given number of lines */
356	static void scroll_port(viewport_t *vport, int lines)	356	static void scroll_port(viewport_t *vport, int lines)
357	{	357	{
358	if (vport->dbdata)	358	if (vport->dbdata)
359	scroll_port_db(vport, lines);	359	scroll_port_db(vport, lines);
360	else	360	else
361	scroll_port_nodb(vport, lines);	361	scroll_port_nodb(vport, lines);
362		362
363	}	363	}
364		364
365	static void invert_pixel(viewport_t *vport, unsigned int x, unsigned int y)	365	static void invert_pixel(viewport_t *vport, unsigned int x, unsigned int y)
366	{	366	{
367	putpixel(vport, x, y, ~getpixel(vport, x, y));	367	putpixel(vport, x, y, ~getpixel(vport, x, y));
368	}	368	}
369		369
370		370
371	/***************************************************************/	371	/***************************************************************/
372	/* Character-console functions */	372	/* Character-console functions */
373		373
374	/** Draw character at given position	374	/** Draw character at given position
375	*	375	*
376	* @param vp Viewport where the character is printed	376	* @param vp Viewport where the character is printed
377	* @param sx Coordinates of top-left of the character	377	* @param sx Coordinates of top-left of the character
378	* @param sy Coordinates of top-left of the character	378	* @param sy Coordinates of top-left of the character
379	* @param style Color of the character	379	* @param style Color of the character
380	* @param transparent If false, print background color	380	* @param transparent If false, print background color
381	*/	381	*/
382	static void draw_glyph(viewport_t *vport,__u8 glyph, unsigned int sx, unsigned int sy,	382	static void draw_glyph(viewport_t *vport,__u8 glyph, unsigned int sx, unsigned int sy,
383	style_t style, int transparent)	383	style_t style, int transparent)
384	{	384	{
385	int i;	385	int i;
386	unsigned int y;	386	unsigned int y;
387	unsigned int glline;	387	unsigned int glline;
388		388
389	for (y = 0; y < FONT_SCANLINES; y++) {	389	for (y = 0; y < FONT_SCANLINES; y++) {
390	glline = fb_font[glyph * FONT_SCANLINES + y];	390	glline = fb_font[glyph * FONT_SCANLINES + y];
391	for (i = 0; i < 8; i++) {	391	for (i = 0; i < 8; i++) {
392	if (glline & (1 << (7 - i)))	392	if (glline & (1 << (7 - i)))
393	putpixel(vport, sx + i, sy + y, style.fg_color);	393	putpixel(vport, sx + i, sy + y, style.fg_color);
394	else if (!transparent)	394	else if (!transparent)
395	putpixel(vport, sx + i, sy + y, style.bg_color);	395	putpixel(vport, sx + i, sy + y, style.bg_color);
396	}	396	}
397	}	397	}
398	}	398	}
399		399
400	/** Invert character at given position */	400	/** Invert character at given position */
401	static void invert_char(viewport_t *vport,unsigned int row, unsigned int col)	401	static void invert_char(viewport_t *vport,unsigned int row, unsigned int col)
402	{	402	{
403	unsigned int x;	403	unsigned int x;
404	unsigned int y;	404	unsigned int y;
405		405
406	for (x = 0; x < COL_WIDTH; x++)	406	for (x = 0; x < COL_WIDTH; x++)
407	for (y = 0; y < FONT_SCANLINES; y++)	407	for (y = 0; y < FONT_SCANLINES; y++)
408	invert_pixel(vport, col * COL_WIDTH + x, row * FONT_SCANLINES + y);	408	invert_pixel(vport, col * COL_WIDTH + x, row * FONT_SCANLINES + y);
409	}	409	}
410		410
411	/***************************************************************/	411	/***************************************************************/
412	/* Stdout specific functions */	412	/* Stdout specific functions */
413		413
414		414
415	/** Create new viewport	415	/** Create new viewport
416	*	416	*
417	* @return New viewport number	417	* @return New viewport number
418	*/	418	*/
419	static int viewport_create(unsigned int x, unsigned int y,unsigned int width,	419	static int viewport_create(unsigned int x, unsigned int y,unsigned int width,
420	unsigned int height)	420	unsigned int height)
421	{	421	{
422	int i;	422	int i;
423		423
424	for (i=0; i < MAX_VIEWPORTS; i++) {	424	for (i=0; i < MAX_VIEWPORTS; i++) {
425	if (!viewports[i].initialized)	425	if (!viewports[i].initialized)
426	break;	426	break;
427	}	427	}
428	if (i == MAX_VIEWPORTS)	428	if (i == MAX_VIEWPORTS)
429	return ELIMIT;	429	return ELIMIT;
430		430
431	if (width ==0 \|\| height == 0 \|\|	431	if (width ==0 \|\| height == 0 \|\|
432	x+width > screen.xres \|\| y+height > screen.yres)	432	x+width > screen.xres \|\| y+height > screen.yres)
433	return EINVAL;	433	return EINVAL;
434	if (width < FONT_SCANLINES \|\| height < COL_WIDTH)	434	if (width < FONT_SCANLINES \|\| height < COL_WIDTH)
435	return EINVAL;	435	return EINVAL;
436		436
437	viewports[i].x = x;	437	viewports[i].x = x;
438	viewports[i].y = y;	438	viewports[i].y = y;
439	viewports[i].width = width;	439	viewports[i].width = width;
440	viewports[i].height = height;	440	viewports[i].height = height;
441		441
442	viewports[i].rows = height / FONT_SCANLINES;	442	viewports[i].rows = height / FONT_SCANLINES;
443	viewports[i].cols = width / COL_WIDTH;	443	viewports[i].cols = width / COL_WIDTH;
444		444
445	viewports[i].style.bg_color = DEFAULT_BGCOLOR;	445	viewports[i].style.bg_color = DEFAULT_BGCOLOR;
446	viewports[i].style.fg_color = DEFAULT_FGCOLOR;	446	viewports[i].style.fg_color = DEFAULT_FGCOLOR;
447		447
448	viewports[i].cur_col = 0;	448	viewports[i].cur_col = 0;
449	viewports[i].cur_row = 0;	449	viewports[i].cur_row = 0;
450	viewports[i].cursor_active = 0;	450	viewports[i].cursor_active = 0;
451		451
452	viewports[i].initialized = 1;	452	viewports[i].initialized = 1;
453		453
454	return i;	454	return i;
455	}	455	}
456		456
457		457
458	/** Initialize framebuffer as a chardev output device	458	/** Initialize framebuffer as a chardev output device
459	*	459	*
460	* @param addr Address of theframebuffer	460	* @param addr Address of theframebuffer
461	* @param x Screen width in pixels	461	* @param x Screen width in pixels
462	* @param y Screen height in pixels	462	* @param y Screen height in pixels
463	* @param bpp Bits per pixel (8, 16, 24, 32)	463	* @param bpp Bits per pixel (8, 16, 24, 32)
464	* @param scan Bytes per one scanline	464	* @param scan Bytes per one scanline
465	*	465	*
466	*/	466	*/
467	static void screen_init(void *addr, unsigned int xres, unsigned int yres, unsigned int bpp, unsigned int scan)	467	static void screen_init(void *addr, unsigned int xres, unsigned int yres, unsigned int bpp, unsigned int scan)
468	{	468	{
469	switch (bpp) {	469	switch (bpp) {
470	case 8:	470	case 8:
471	screen.rgb2scr = rgb_1byte;	471	screen.rgb2scr = rgb_1byte;
472	screen.scr2rgb = byte1_rgb;	472	screen.scr2rgb = byte1_rgb;
473	screen.pixelbytes = 1;	473	screen.pixelbytes = 1;
474	break;	474	break;
475	case 16:	475	case 16:
476	screen.rgb2scr = rgb_2byte;	476	screen.rgb2scr = rgb_2byte;
477	screen.scr2rgb = byte2_rgb;	477	screen.scr2rgb = byte2_rgb;
478	screen.pixelbytes = 2;	478	screen.pixelbytes = 2;
479	break;	479	break;
480	case 24:	480	case 24:
481	screen.rgb2scr = rgb_3byte;	481	screen.rgb2scr = rgb_3byte;
482	screen.scr2rgb = byte3_rgb;	482	screen.scr2rgb = byte3_rgb;
483	screen.pixelbytes = 3;	483	screen.pixelbytes = 3;
484	break;	484	break;
485	case 32:	485	case 32:
486	screen.rgb2scr = rgb_4byte;	486	screen.rgb2scr = rgb_4byte;
487	screen.scr2rgb = byte4_rgb;	487	screen.scr2rgb = byte4_rgb;
488	screen.pixelbytes = 4;	488	screen.pixelbytes = 4;
489	break;	489	break;
490	}	490	}
491		491
492		492
493	screen.fbaddress = (unsigned char *) addr;	493	screen.fbaddress = (unsigned char *) addr;
494	screen.xres = xres;	494	screen.xres = xres;
495	screen.yres = yres;	495	screen.yres = yres;
496	screen.scanline = scan;	496	screen.scanline = scan;
497		497
498	/* Create first viewport */	498	/* Create first viewport */
499	viewport_create(0,0,xres,yres);	499	viewport_create(0,0,xres,yres);
500	}	500	}

Subversion Repositories HelenOS-historic

(root)/uspace/trunk/fb/fb.c – Rev 1673 → 1707