Subversion Repositories Kolibri OS

#include "drm.h"

#include "i915_drm.h"

#include "i915_drv.h"

#include "intel_drv.h"

#include 

#include 

#include 

#include 

{

    kobj_t     header;

    uint32_t   hot_x;

    uint32_t   hot_y;

    struct drm_i915_gem_object  *cobj;

}cursor_t;

#define CURSOR_HEIGHT 64

{

    int  x;

    int  y;

    int  width;

    int  height;

    int  bpp;

    int  vrefresh;

    int  pitch;

    int  lfb;

    struct drm_device    *ddev;

    struct drm_connector *connector;

    struct drm_crtc      *crtc;

    int       (*init_cursor)(cursor_t*);

    cursor_t* (__stdcall *select_cursor)(cursor_t*);

    void      (*show_cursor)(int show);

    void      (__stdcall *move_cursor)(cursor_t *cursor, int x, int y);

    void      (__stdcall *restore_cursor)(int x, int y);

    void      (*disable_mouse)(void);

    u32  mask_seqno;

    u32  check_mouse;

    u32  check_m_pixel;

u32_t cmd_offset;

int  sna_init();

static cursor_t*  __stdcall select_cursor_kms(cursor_t *cursor);

static void       __stdcall move_cursor_kms(cursor_t *cursor, int x, int y);

{};

{};

{

    static char name[4];

    name[1] = ((x[0] & 0x03) << 3) + ((x[1] & 0xE0) >> 5) + '@';

    name[2] = (x[1] & 0x1F) + '@';

    name[3] = 0;

}

              videomode_t *reqmode, bool strict)

{

    drm_i915_private_t      *dev_priv   = dev->dev_private;

    struct drm_fb_helper    *fb_helper  = &dev_priv->fbdev->helper;

    struct drm_display_mode *mode       = NULL, *tmpmode;

    struct drm_framebuffer  *fb         = NULL;

    struct drm_crtc         *crtc;

    struct drm_encoder      *encoder;

    struct drm_mode_set     set;

    char *con_name;

    char *enc_name;

    unsigned hdisplay, vdisplay;

    int ret;

    {

        if( (drm_mode_width(tmpmode)    == reqmode->width)  &&

            (drm_mode_height(tmpmode)   == reqmode->height) &&

            (drm_mode_vrefresh(tmpmode) == reqmode->freq) )

        {

            mode = tmpmode;

            goto do_set;

        }

    };

    {

        list_for_each_entry(tmpmode, &connector->modes, head)

        {

            if( (drm_mode_width(tmpmode)  == reqmode->width)  &&

                (drm_mode_height(tmpmode) == reqmode->height) )

            {

                mode = tmpmode;

                goto do_set;

            }

        };

    };

    crtc = encoder->crtc;

    enc_name = drm_get_encoder_name(encoder);

              reqmode->width, reqmode->height, crtc->base.id,

              con_name, enc_name);

    vdisplay = mode->vdisplay;

        swap(hdisplay, vdisplay);

    fb->height = reqmode->height;

    fb->pitches[0]  = ALIGN(reqmode->width * 4, 64);

    fb->pitches[1]  = ALIGN(reqmode->width * 4, 64);

    fb->pitches[2]  = ALIGN(reqmode->width * 4, 64);

    fb->pitches[3]  = ALIGN(reqmode->width * 4, 64);

    fb->depth = 24;

    crtc->enabled = true;

    os_display->crtc = crtc;

    set.x = 0;

    set.y = 0;

    set.mode = mode;

    set.connectors = &connector;

    set.num_connectors = 1;

    set.fb = fb;

    ret = crtc->funcs->set_config(&set);

    mutex_unlock(&dev->mode_config.mutex);

    {

        os_display->width    = fb->width;

        os_display->height   = fb->height;

        os_display->pitch    = fb->pitches[0];

        os_display->vrefresh = drm_mode_vrefresh(mode);

                       fb->width, fb->height, fb->pitches[0]);

    }

    else

        DRM_ERROR("failed to set mode %d_%d on crtc %p\n",

                   fb->width, fb->height, crtc);

}

{

    struct drm_display_mode  *mode;

    int count = 0;

    {

        count++;

    };

    return count;

};

{

    struct drm_connector  *connector;

    struct drm_connector_helper_funcs *connector_funcs;

    {

        struct drm_encoder  *encoder;

        struct drm_crtc     *crtc;

            continue;

        encoder = connector_funcs->best_encoder(connector);

        if( encoder == NULL)

            continue;

                   connector, connector->base.id,

                   connector->status, connector->encoder,

                   crtc);

//            continue;

    };

};

{

    struct drm_connector    *connector;

    struct drm_connector_helper_funcs *connector_funcs;

    struct drm_encoder      *encoder;

    struct drm_crtc         *crtc = NULL;

    struct drm_framebuffer  *fb;

    u32_t      ifl;

    int        err;

    {

        if( connector->status != connector_status_connected)

            continue;

        encoder = connector_funcs->best_encoder(connector);

        if( encoder == NULL)

        {

            DRM_DEBUG_KMS("CONNECTOR %x ID: %d no active encoders\n",

                      connector, connector->base.id);

            continue;

        }

        connector->encoder = encoder;

        crtc = encoder->crtc;

               connector, connector->base.id,

               connector->status, connector->encoder,

               crtc, crtc->base.id );

    };

    {

        DRM_ERROR("No active connectors!\n");

        return -1;

    };

    {

        struct drm_crtc *tmp_crtc;

        int crtc_mask = 1;

        {

            if (encoder->possible_crtcs & crtc_mask)

            {

                crtc = tmp_crtc;

                encoder->crtc = crtc;

                break;

            };

            crtc_mask <<= 1;

        };

    };

    {

        DRM_ERROR("No CRTC for encoder %d\n", encoder->base.id);

        return -1;

    };

    os_display->ddev = dev;

    os_display->connector = connector;

    os_display->crtc = crtc;

    {

        struct intel_crtc *intel_crtc = to_intel_crtc(os_display->crtc);

        {

            init_cursor(cursor);

        };

        os_display->init_cursor    = init_cursor;

        os_display->select_cursor  = select_cursor_kms;

        os_display->show_cursor    = NULL;

        os_display->move_cursor    = move_cursor_kms;

        os_display->restore_cursor = restore_cursor;

        os_display->disable_mouse  = disable_mouse;

        intel_crtc->cursor_y = os_display->height/2;

    };

    safe_sti(ifl);

    err = init_bitmaps();

#endif

};

{

    int err = -1;

    {

        *count = os_display->supported_modes;

        err = 0;

    }

    else if( mode != NULL )

    {

        struct drm_display_mode  *drmmode;

        int i = 0;

            *count = os_display->supported_modes;

        {

            if( i < *count)

            {

                mode->width  = drm_mode_width(drmmode);

                mode->height = drm_mode_height(drmmode);

                mode->bpp    = 32;

                mode->freq   = drm_mode_vrefresh(drmmode);

                i++;

                mode++;

            }

            else break;

        };

        *count = i;

        err = 0;

    };

    return err;

};

{

    int err = -1;

//               mode->width, mode->height, mode->freq);

        (mode->height != 0)  &&

        (mode->freq   != 0 ) &&

        ( (mode->width   != os_display->width)  ||

          (mode->height  != os_display->height) ||

          (mode->freq    != os_display->vrefresh) ) )

    {

        if( set_mode(os_display->ddev, os_display->connector, mode, true) )

            err = 0;

    };

};

{

    list_del(&cursor->list);

    drm_gem_object_unreference(&cursor->cobj->base);

    mutex_unlock(&main_device->struct_mutex);

};

{

    struct drm_i915_private *dev_priv = os_display->ddev->dev_private;

    struct drm_i915_gem_object *obj;

    uint32_t *bits;

    uint32_t *src;

    void     *mapped;

    int       ret;

    {

        bits = (uint32_t*)KernelAlloc(CURSOR_WIDTH*CURSOR_HEIGHT*4);

        if (unlikely(bits == NULL))

            return ENOMEM;

        cursor->cobj = (struct drm_i915_gem_object *)GetPgAddr(bits);

    }

    else

    {

        obj = i915_gem_alloc_object(os_display->ddev, CURSOR_WIDTH*CURSOR_HEIGHT*4);

        if (unlikely(obj == NULL))

            return -ENOMEM;

        if (ret) {

            drm_gem_object_unreference(&obj->base);

            return ret;

        }

        if (ret)

        {

            i915_gem_object_unpin(obj);

            drm_gem_object_unreference(&obj->base);

            return ret;

        }

/* You don't need to worry about fragmentation issues.

 * GTT space is continuous. I guarantee it.                           */

                    CURSOR_WIDTH*CURSOR_HEIGHT*4, PG_SW);

        {

            i915_gem_object_unpin(obj);

            drm_gem_object_unreference(&obj->base);

            return -ENOMEM;

        };

        cursor->cobj = obj;

    };

    {

        for(j = 0; j < 32; j++)

            *bits++ = *src++;

        for(j = 32; j < CURSOR_WIDTH; j++)

            *bits++ = 0;

    }

    for(i = 0; i < CURSOR_WIDTH*(CURSOR_HEIGHT-32); i++)

        *bits++ = 0;

}

{

    struct drm_device *dev = crtc->dev;

    struct drm_i915_private *dev_priv = dev->dev_private;

    struct intel_crtc *intel_crtc = to_intel_crtc(crtc);

    int pipe = intel_crtc->pipe;

    bool visible = base != 0;

        uint32_t cntl = I915_READ(CURCNTR(pipe));

        if (base) {

            cntl &= ~(CURSOR_MODE | MCURSOR_PIPE_SELECT);

            cntl |= CURSOR_MODE_64_ARGB_AX | MCURSOR_GAMMA_ENABLE;

            cntl |= pipe << 28; /* Connect to correct pipe */

        } else {

            cntl &= ~(CURSOR_MODE | MCURSOR_GAMMA_ENABLE);

            cntl |= CURSOR_MODE_DISABLE;

        }

        I915_WRITE(CURCNTR(pipe), cntl);

    }

    /* and commit changes on next vblank */

    I915_WRITE(CURBASE(pipe), base);

}

{

    struct drm_i915_private *dev_priv = os_display->ddev->dev_private;

    struct intel_crtc *intel_crtc = to_intel_crtc(os_display->crtc);

    u32 base, pos;

    bool visible;

    intel_crtc->cursor_y = y;

    y = y - cursor->hot_y;

    if (x >= os_display->width)

        base = 0;

        base = 0;

    {

        if (x + intel_crtc->cursor_width < 0)

            base = 0;

        x = -x;

    }

    pos |= x << CURSOR_X_SHIFT;

    {

        if (y + intel_crtc->cursor_height < 0)

            base = 0;

        y = -y;

    }

    pos |= y << CURSOR_Y_SHIFT;

    if (!visible && !intel_crtc->cursor_visible)

        return;

//    if (IS_845G(dev) || IS_I865G(dev))

//        i845_update_cursor(crtc, base);

//    else

        i9xx_update_cursor(os_display->crtc, base);

{

    struct drm_i915_private *dev_priv = os_display->ddev->dev_private;

    struct intel_crtc *intel_crtc = to_intel_crtc(os_display->crtc);

    cursor_t *old;

    os_display->cursor = cursor;

       intel_crtc->cursor_addr = i915_gem_obj_ggtt_offset(cursor->cobj);

    else

        intel_crtc->cursor_addr = (addr_t)cursor->cobj;

    intel_crtc->cursor_height = 32;

    return old;

};

{

    uint32_t  width;

    uint32_t  height;

    uint32_t  pitch;

    uint32_t  tiling;

};

{

    fb->width  = os_display->width;

    fb->height = os_display->height;

    fb->pitch  = os_display->pitch;

    fb->tiling = 0;

};

{

    int left;

    int top;

    int right;

    int bottom;

}rect_t;

    __u32 handle;

    __u32 width;

    __u32 height;

    __u32 bo_size;

    __u32 bo_pitch;

    __u32 bo_map;

};

{

    u32_t   addr;

    addr+= sizeof(display_t);            /*  shoot me  */

    return *(u32_t*)addr;

}

            struct drm_file *file)

{

    struct drm_i915_mask *mask = data;

    struct drm_gem_object *obj;

    static unsigned int mask_seqno[256];

    rect_t winrc;

    u32    slot;

    int    ret;

     {

        printf("%s handle %d\n", __FUNCTION__, mask->handle);

        return 0;

     }

    if (obj == NULL)

        return -ENOENT;

        drm_gem_object_unreference_unlocked(obj);

        return -EINVAL;

    }

    {

//        static warn_count;

        mask->height   = winrc.bottom - winrc.top + 1;

        mask->bo_pitch = (mask->width+15) & ~15;

        if(warn_count < 1)

        {

            printf("left %d top %d right %d bottom %d\n",

                    winrc.left, winrc.top, winrc.right, winrc.bottom);

            printf("mask pitch %d data %p\n", mask->bo_pitch, mask->bo_size);

            warn_count++;

        };

#endif

    {

        u8* src_offset;

        u8* dst_offset;

        u32 ifl;

        if (ret)

            return ret;

        if(ret !=0 )

        {

            dbgprintf("%s fail\n", __FUNCTION__);

            return ret;

        };

        src_offset+= get_display_map();

        dst_offset = (u8*)mask->bo_map;

        {

            mask_seqno[slot] = os_display->mask_seqno;

                "movd       %[slot],   %%xmm6    \n"

            "punpckldq  %%xmm6, %%xmm6            \n"

            "punpcklqdq %%xmm6, %%xmm6            \n"

            :: [slot]  "m" (slot)

            :"xmm6");

            {

                int tmp_w = mask->bo_pitch;

                u8* tmp_dst = dst_offset;

                dst_offset+= mask->bo_pitch;

                {

                    __asm__ __volatile__ (

                    "movdqu     (%0),   %%xmm0            \n"

                    "movdqu   16(%0),   %%xmm1            \n"

                    "movdqu   32(%0),   %%xmm2            \n"

                    "movdqu   48(%0),   %%xmm3            \n"

                    "pcmpeqb    %%xmm6, %%xmm0            \n"

                    "pcmpeqb    %%xmm6, %%xmm1            \n"

                    "pcmpeqb    %%xmm6, %%xmm2            \n"

                    "pcmpeqb    %%xmm6, %%xmm3            \n"

                    "movdqa     %%xmm0,   (%%edi)         \n"

                    "movdqa     %%xmm1, 16(%%edi)         \n"

                    "movdqa     %%xmm2, 32(%%edi)         \n"

                    "movdqa     %%xmm3, 48(%%edi)         \n"

                    :"xmm0","xmm1","xmm2","xmm3");

                    tmp_w -= 64;

                    tmp_src += 64;

                    tmp_dst += 64;

                }

                {

                    __asm__ __volatile__ (

                    "movdqu     (%0),   %%xmm0            \n"

                    "movdqu   16(%0),   %%xmm1            \n"

                    "pcmpeqb    %%xmm6, %%xmm0            \n"

                    "pcmpeqb    %%xmm6, %%xmm1            \n"

                    "movdqa     %%xmm0,   (%%edi)         \n"

                    "movdqa     %%xmm1, 16(%%edi)         \n"

                    :"xmm0","xmm1");

                    tmp_w -= 32;

                    tmp_src += 32;

                    tmp_dst += 32;

                }

                {

                    __asm__ __volatile__ (

                    "movdqu     (%0),   %%xmm0            \n"

                    "pcmpeqb    %%xmm6, %%xmm0            \n"

                    "movdqa     %%xmm0,   (%%edi)         \n"

                    :: "r" (tmp_src), "D" (tmp_dst)

                    :"xmm0");

                    tmp_w -= 16;

                    tmp_src += 16;

                    tmp_dst += 16;

                }

            };

        };

        safe_sti(ifl);

    }

}

{

    u32 tmp = GetTimerTicks();

    ts->tv_nsec = (tmp - ts->tv_sec*100)*10000000;

}

{

    while (nsec >= NSEC_PER_SEC) {

        /*

         * The following asm() prevents the compiler from

         * optimising this loop into a modulo operation. See

         * also __iter_div_u64_rem() in include/linux/time.h

         */

        asm("" : "+rm"(nsec));

        nsec -= NSEC_PER_SEC;

        ++sec;

    }

    while (nsec < 0) {

        asm("" : "+rm"(nsec));

        nsec += NSEC_PER_SEC;

        --sec;

    }

    ts->tv_sec = sec;

    ts->tv_nsec = nsec;

}

prepare_to_wait(wait_queue_head_t *q, wait_queue_t *wait, int state)

{

    unsigned long flags;

    spin_lock_irqsave(&q->lock, flags);

    if (list_empty(&wait->task_list))

            __add_wait_queue(q, wait);

    spin_unlock_irqrestore(&q->lock, flags);

}

 * finish_wait - clean up after waiting in a queue

 * @q: waitqueue waited on

 * @wait: wait descriptor

 *

 * Sets current thread back to running state and removes

 * the wait descriptor from the given waitqueue if still

 * queued.

 */

void finish_wait(wait_queue_head_t *q, wait_queue_t *wait)

{

    unsigned long flags;

    /*

     * We can check for list emptiness outside the lock

     * IFF:

     *  - we use the "careful" check that verifies both

     *    the next and prev pointers, so that there cannot

     *    be any half-pending updates in progress on other

     *    CPU's that we haven't seen yet (and that might

     *    still change the stack area.

     * and

     *  - all other users take the lock (ie we can only

     *    have _one_ other CPU that looks at or modifies

     *    the list).

     */

    if (!list_empty_careful(&wait->task_list)) {

            spin_lock_irqsave(&q->lock, flags);

            list_del_init(&wait->task_list);

            spin_unlock_irqrestore(&q->lock, flags);

    }

}

{

    list_del_init(&wait->task_list);

    return 1;

}

{

    unsigned int res = w - ((w >> 1) & 0x5555);

    res = (res & 0x3333) + ((res >> 2) & 0x3333);

    res = (res + (res >> 4)) & 0x0F0F;

    return (res + (res >> 8)) & 0x00FF;

}

{

    unsigned long j0 = GetTimerTicks();

    return round_jiffies_common(j + j0, true) - j0;

}