#include <math.h>
#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include <dlfcn.h>
#include <stdint.h>
#include <sys/neutrino.h>
#include <sys/syspage.h>
#include <GLES/egl.h>
#include <GLES/gl.h>
#include <gf/gf.h>


static int find_rgb_format(gf_layer_t layer);


int main(int argc, char * argv[]) {

//device & display
gf_dev_t            gdev;
gf_dev_info_t       gdev_info;
gf_display_t        display;
gf_display_info_t   display_info;
int i;

//layer
gf_layer_t  layer;

//surface
gf_surface_t    surface;
unsigned height;
unsigned width;
gf_layer_info_t layer_info;

//context
gf_context_t context;


if (gf_dev_attach(&gdev, GF_DEVICE_INDEX(0), &gdev_info) != GF_ERR_OK) {
    printf("gf_dev_attach() failed\n");
	perror( "gf_dev_attach()" );
    return (-1);
}

printf("Number of displays: %d\n",gdev_info.ndisplays);

for (i = 0; i < gdev_info.ndisplays; i++) {
    printf("Display %d: ", i);
    if (gf_display_attach(&display, gdev, i, &display_info) == GF_ERR_OK) {
        printf("%dX%d, refresh = %dHz\n", display_info.xres,
            display_info.yres, display_info.refresh);
        printf("Number of layers: %d\n", display_info.nlayers);
    } else {
        printf("gf_display_attach() failed\n");
    	perror( "gf_display_attach()" );
		gf_dev_detach(gdev);

    }
}



if (display != NULL) {


    if (gf_layer_attach(&layer,display,display_info.main_layer_index, 0) == GF_ERR_OK) {
   // if(gf_layer_attach(&layer,display,atoi(argv[1]), 0) == GF_ERR_OK) {
		printf("Attaching to Layer : 2\n ");
    }
    else {
        printf("gf_layer_attach() failed\n");
		gf_dev_detach( gdev );
        return (-1);
    }
}



int ret_format = find_rgb_format(layer);
printf("Format returned by find_rgb_format = %d\n",ret_format);


if((gf_layer_query(layer,0,&layer_info))==GF_ERR_OK){
	printf("Layer is of Format %d\n",layer_info.format);
}
else{
	printf(" gf_layer_query() failed");
    return (-1);
}

width = display_info.xres;
height = display_info.yres;


if (gf_surface_create_layer(&surface, &layer, 1, 0,
width, height, layer_info.format, NULL, 0) == GF_ERR_OK) {
		printf("Succesfully created surface on top of layer\n");
        gf_layer_set_surfaces(layer, &surface, 1);

        /* draw stuff here */

    } else {
        printf("gf_surface_create_layer() failed\n");
        return (-1);
    }

if (gf_context_create(&context) != GF_ERR_OK) {
        fprintf(stderr, "gf_context_create failed\n");
        return -1;
    }

else{
printf(" Created the context succefully\n");
}

//if (gf_context_set_surface(context, surface[cursurf]) != GF_ERR_OK) {
if (gf_context_set_surface(context,surface)!= GF_ERR_OK) {
            fprintf(stderr, "gf_context_set_surface failed\n");
            return -1;
        }
 else{
        printf("Context Surface is Set Succesfully\n");
        }


gf_draw_begin(context);

	gf_context_set_fgcolor( context, 0xFFffFF );
	gf_context_set_bgcolor( context, 0xFFffFF );
	gf_context_set_penwidth(context, 1 );

	gf_draw_rect( context, 0, 0, width-1, height-1 );
	gf_draw_flush(context );


   gf_draw_end(context);

gf_layer_update( layer, 0 );

printf( "Press ENTER to continue\n" );
getchar();

gf_dev_detach(gdev);
return 0;
}



static int
find_rgb_format(gf_layer_t layer)
{
    gf_layer_info_t info;
    int i;

    for (i = 0;
        gf_layer_query(layer, i, &info) == GF_ERR_OK;
        ++i) {
        switch (info.format) {
            case GF_FORMAT_PKLE_ARGB1555:
            case GF_FORMAT_PKLE_RGB565:
            case GF_FORMAT_BGR888:
            case GF_FORMAT_BGRA8888:
                return info.format;
            default:
                continue;
        }
    }

    return -1;
}