Wayland: wl_subsurface

$ cc -o test 12-subsurface.c client.c imagebuf.c xdg-shell-protocol.c -lwayland-client -lrt

#include <stdio.h>
#include <string.h>
#include <linux/input-event-codes.h>

#include <wayland-client.h>
#include "xdg-shell-client-protocol.h"

#include "client.h"
#include "imagebuf.h"


typedef struct
{
    Surface sf;
    struct wl_subsurface *subsurface;
}subwindow;

typedef struct
{
    client b;

    struct wl_subcompositor *subcompositor;
    
    Toplevel *win;
    subwindow subwin[2];

    int enter_win;
}client_ex;


//=======================
// subwindow
//=======================


/* 破棄 */

static void subwindow_destroy(subwindow *p)
{
    wl_subsurface_destroy(p->subsurface);
    surface_destroy(&p->sf);
}

/* 作成 */

static void subwindow_create(client_ex *cl,subwindow *p,
    Toplevel *parent,int x,int y,int width,int height,uint32_t col)
{
    surface_create(&p->sf, CLIENT(cl), width, height);

    p->subsurface = wl_subcompositor_get_subsurface(cl->subcompositor,
        p->sf.surface, parent->sf.surface);

    wl_subsurface_set_position(p->subsurface, x, y);

    wl_surface_commit(parent->sf.surface);

    //サブサーフェイス更新

    imagebuf_fill(p->sf.img, col);

    surface_update(&p->sf);
}

/* wl_surface からウィンドウ番号取得 */

static int _get_window_no(client_ex *p,struct wl_surface *surface)
{
    int i;

    for(i = 0; i < 2; i++)
    {
        if(p->subwin[i].sf.surface == surface)
            break;
    }

    return (i == 2)? -1: i;
}


//=======================
// wl_pointer
//=======================


static void _pointer_enter(void *data, struct wl_pointer *pointer,
    uint32_t serial, struct wl_surface *surface, wl_fixed_t x, wl_fixed_t y)
{
    client_ex *p = (client_ex *)data;

    p->enter_win = _get_window_no(p, surface);

    printf("<enter> win:%d, (%d, %d)\n",
        p->enter_win, x >> 8, y >> 8);

    //カーソルセット
    client_set_cursor(CLIENT(p), serial);
}

static void _pointer_leave(void *data, struct wl_pointer *pointer,
    uint32_t serial, struct wl_surface *surface)
{
    printf("<leave> win:%d\n", ((client_ex *)data)->enter_win);
}

static void _pointer_motion(void *data, struct wl_pointer *pointer,
    uint32_t time, wl_fixed_t x, wl_fixed_t y)
{
    printf("<motion> win:%d, (%d, %d)\n",
        ((client_ex *)data)->enter_win, x >> 8, y >> 8);
}

static void _pointer_button(void *data, struct wl_pointer *pointer,
    uint32_t serial, uint32_t time, uint32_t button, uint32_t state)
{
    client_ex *p = (client_ex *)data;

    if(state != WL_POINTER_BUTTON_STATE_PRESSED)
        return;

    switch(button)
    {
        //左ボタンで、1番目のサブサーフェスを親の背面に
        case BTN_LEFT:
            wl_subsurface_place_below(p->subwin[0].subsurface, p->win->sf.surface);
            wl_surface_commit(p->win->sf.surface);
            break;
        //右ボタンで、2番目のサブサーフェスの位置を変更
        case BTN_RIGHT:
            wl_subsurface_set_position(p->subwin[1].subsurface, 50, 50);
            wl_surface_commit(p->win->sf.surface);
            break;
        //中ボタンで終了
        case BTN_MIDDLE:
            p->b.finish_loop = 1;
            break;
    }
}

static void _pointer_axis(void *data, struct wl_pointer *pointer,
    uint32_t time, uint32_t axis, wl_fixed_t value)
{
}

static void _pointer_frame(void *data, struct wl_pointer *pointer)
{
}

static void _pointer_axis_source(void *data, struct wl_pointer *pointer, uint32_t axis_source)
{
}

static void _pointer_axis_stop(void *data, struct wl_pointer *pointer, uint32_t time, uint32_t axis)
{
}

static void _pointer_axis_discrete(void *data, struct wl_pointer *pointer, uint32_t axis, int32_t discrete)
{
}

//ver 5
static const struct wl_pointer_listener g_pointer_listener = {
    _pointer_enter, _pointer_leave, _pointer_motion, _pointer_button,
    _pointer_axis, _pointer_frame, _pointer_axis_source,
    _pointer_axis_stop, _pointer_axis_discrete
};


//=======================


static void _client_registry_global(client *p,
    struct wl_registry *reg,uint32_t id,const char *name,uint32_t ver)
{
    if(strcmp(name, "wl_subcompositor") == 0)
        ((client_ex *)p)->subcompositor = wl_registry_bind(reg, id, &wl_subcompositor_interface, 1);
}

static void _client_destroy(client *cl)
{
    client_ex *p = (client_ex *)cl;
    int i;

    for(i = 0; i < 2; i++)
        subwindow_destroy(p->subwin + i);

    wl_subcompositor_destroy(p->subcompositor);
}

/* main */

int main(void)
{
    client_ex *p;
    Toplevel *win;

    p = (client_ex *)client_new(sizeof(client_ex));

    p->b.init_flags = CLIENT_INIT_FLAGS_SEAT | CLIENT_INIT_FLAGS_POINTER
        | CLIENT_INIT_FLAGS_CREATE_CURSOR;

    p->b.destroy = _client_destroy;
    p->b.registry_global = _client_registry_global;
    p->b.pointer_listener = &g_pointer_listener;

    client_init(CLIENT(p));

    //ウィンドウ

    win = toplevel_create(CLIENT(p), 300, 300, NULL);

    imagebuf_fill(win->sf.img, 0xffff0000);

    p->win = win;

    //サブウィンドウ

    subwindow_create(p, p->subwin, win, -10, -10, 200, 200, 0xff00ff00);
    subwindow_create(p, p->subwin + 1, win, 150, 150, 200, 200, 0xff0000ff);

    wl_surface_commit(win->sf.surface);

    //

    client_loop_simple(CLIENT(p));

    //解放

    toplevel_destroy(win);

    client_destroy(CLIENT(p));

    return 0;
}