#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <sys/time.h>
#define EGL_EGLEXT_PROTOTYPES
#define GL_GLEXT_PROTOTYPES
#include "EGL/egl.h"
#include "EGL/eglext.h"
#include "GL/gl.h"
#include "gbm.h"
#include <i915_drm.h>
#include <kos32sys.h>
#include <pixlib2.h>
static EGLImageKHR px_create_image(EGLDisplay display, EGLContext context,
int width, int height, int stride, int name, int depth);
int main()
{
struct gbm_device *gbm;
struct gbm_surface *gs;
EGLDisplay dpy;
EGLint major, minor;
EGLContext context;
EGLSurface surface;
EGLImageKHR fb_image;
EGLConfig config;
EGLint config_attribs[32];
EGLint num_configs, i;
GLint list;
GLuint *texture;
int fd;
fd = get_service("DISPLAY");
gbm = gbm_create_device(fd);
if( gbm == NULL){
printf("failed to initialize GBM device"); return 1;
};
init_pixlib(HW_BIT_BLIT);
dpy = eglGetDisplay((EGLNativeDisplayType)gbm);
if (!eglInitialize(dpy, &major, &minor))
printf("failed to initialize EGL display");
printf("EGL_VERSION = %s\n", eglQueryString
(dpy
, EGL_VERSION
)); printf("EGL_VENDOR = %s\n", eglQueryString
(dpy
, EGL_VENDOR
)); printf("EGL_EXTENSIONS = %s\n", eglQueryString
(dpy
, EGL_EXTENSIONS
)); printf("EGL_CLIENT_APIS = %s\n",eglQueryString
(dpy
, EGL_CLIENT_APIS
));
i = 0;
config_attribs[i++] = EGL_RED_SIZE;
config_attribs[i++] = 1;
config_attribs[i++] = EGL_GREEN_SIZE;
config_attribs[i++] = 1;
config_attribs[i++] = EGL_BLUE_SIZE;
config_attribs[i++] = 1;
config_attribs[i++] = EGL_DEPTH_SIZE;
config_attribs[i++] = 1;
config_attribs[i++] = EGL_SURFACE_TYPE;
config_attribs[i++] = EGL_WINDOW_BIT;
config_attribs[i++] = EGL_RENDERABLE_TYPE;
config_attribs[i++] = EGL_OPENGL_BIT;
config_attribs[i] = EGL_NONE;
if (!eglChooseConfig(dpy,config_attribs, &config, 1, &num_configs) || !num_configs)
printf("failed to choose a config");
eglBindAPI(EGL_OPENGL_API);
context = eglCreateContext(dpy, config, EGL_NO_CONTEXT, NULL);
if (!context)
printf("failed to create context");
gs = gbm_surface_create(gbm, 400, 300, GBM_BO_FORMAT_ARGB8888, GBM_BO_USE_RENDERING);
BeginDraw();
DrawWindow(20, 20, 400+9, 300+24, "gl-render", 0x000000, 0x74);
EndDraw();
sna_create_mask();
surface = eglCreateWindowSurface(dpy,config, (EGLNativeWindowType)gs, NULL);
if (surface == EGL_NO_SURFACE)
printf("failed to create surface");
if (!eglMakeCurrent(dpy, surface, surface, context))
printf("failed to make window current");
if(fd)
{
int ret;
struct drm_i915_fb_info fb;
struct drm_gem_open open_arg;
ret = drmIoctl(fd, SRV_FBINFO, &fb);
if( ret != 0 )
printf("failed to get framebuffer info\n");
memset(&open_arg
,0,sizeof(open_arg
)); open_arg.name = fb.name;
ret = drmIoctl(fd,DRM_IOCTL_GEM_OPEN,&open_arg);
if (ret != 0) {
printf("Couldn't reference framebuffer handle 0x%08x\n", fb.
name); }
asm volatile ("int3");
fb_image = px_create_image(dpy,context,fb.width,fb.height,
fb.pitch,open_arg.handle,32);
glGenTextures(1, texture);
glBindTexture(GL_TEXTURE_2D, *texture);
glTexParameteri(GL_TEXTURE_2D,GL_TEXTURE_MIN_FILTER,GL_NEAREST);
glTexParameteri(GL_TEXTURE_2D,GL_TEXTURE_MAG_FILTER,GL_NEAREST);
glEGLImageTargetTexture2DOES(GL_TEXTURE_2D,fb_image);
glBindTexture(GL_TEXTURE_2D, 0);
}
glClearColor( 0, 0, 0, 1);
list = glGenLists(1);
glNewList(list, GL_COMPILE);
/* XXX: this state-change will only be executed if list is called
* from outside a begin/end pair:
*/
glShadeModel( GL_FLAT );
glBegin(GL_TRIANGLES);
glColor3f(0,0,.7);
glVertex3f( -0.9, 0.9, -30.0);
glColor3f(0,.9,0);
glVertex3f( -0.9, -0.9, -30.0);
glColor3f(.8,0,0);
glVertex3f( 0.9, 0.0, -30.0);
glEnd();
/* This statechange is potentially NOT redundant:
*/
glShadeModel( GL_FLAT );
glBegin(GL_TRIANGLES);
glColor3f(0,1,0);
glVertex3f( -0.5, 0.5, -30.0);
glColor3f(0,0,1);
glVertex3f( -0.5, -0.5, -30.0);
glColor3f(1,0,0);
glVertex3f( 0.5, 0.0, -30.0);
glEnd();
glEndList();
asm volatile ("int3");
glDrawBuffer(GL_BACK);
glViewport(0, 0, (GLint)400, (GLint)300);
glMatrixMode(GL_PROJECTION);
glLoadIdentity();
glOrtho(-1.0, 1.0, -1.0, 1.0, -0.5, 100.0);
glMatrixMode(GL_MODELVIEW);
glClear(GL_COLOR_BUFFER_BIT);
glShadeModel( GL_SMOOTH );
glBegin(GL_TRIANGLES);
/* Note: call the list from inside a begin/end pair. The end is
* provided by the display list...
*/
glCallList(list);
glFlush();
eglSwapBuffers(dpy, surface);
glFinish();
eglMakeCurrent(dpy, EGL_NO_SURFACE, EGL_NO_SURFACE, EGL_NO_CONTEXT);
eglDestroySurface(dpy, surface);
gbm_surface_destroy(gs);
eglDestroyContext(dpy, context);
eglTerminate(dpy);
while(1)
{
delay(1);
}
return 0;
}
int drmIoctl(int fd, unsigned long request, void *arg)
{
ioctl_t io;
io.handle = fd;
io.io_code = request;
io.input = arg;
io.inp_size = 64;
io.output = NULL;
io.out_size = 0;
return call_service(&io);
}
static EGLImageKHR px_create_image(EGLDisplay display, EGLContext context,
int width, int height, int stride, int name, int depth)
{
EGLImageKHR image;
EGLint attribs[] = {
EGL_WIDTH, 0,
EGL_HEIGHT, 0,
EGL_DRM_BUFFER_STRIDE_MESA, 0,
EGL_DRM_BUFFER_FORMAT_MESA,
EGL_DRM_BUFFER_FORMAT_ARGB32_MESA,
EGL_DRM_BUFFER_USE_MESA,
EGL_DRM_BUFFER_USE_SHARE_MESA |
EGL_DRM_BUFFER_USE_SCANOUT_MESA,
EGL_NONE
};
attribs[1] = width;
attribs[3] = height;
attribs[5] = stride;
if (depth != 32 && depth != 24)
return EGL_NO_IMAGE_KHR;
image = eglCreateImageKHR(display, context, EGL_DRM_BUFFER_MESA,
(void *) (uintptr_t)name, attribs);
if (image == EGL_NO_IMAGE_KHR)
return EGL_NO_IMAGE_KHR;
return image;
}