/* * This file is based on a port to the OLPC by Andrey Mirtchovski et. al. */ #include "dat.h"#include "fns.h"#include "../port/error.h"#include "framebuffer.h"#include "kernel.h"#include <linux/input.h> #include <draw.h>#include <memdraw.h>#include <cursor.h>#include <stdio.h>#include <unistd.h> Point mousexy(void); static ulong displaychannel = 0;static int screeninited = 0;static unsigned char* screendata = 0;static unsigned char* framebuffer = 0;static Point pointerposition = { 0, 0 };static Lock pointerlock;static uchar* pointer = 0;static int pointerheight = 0;static int pointerwidth = 0; static void initscreen ( int, int, ulong*, int* );void drawpointer ( int, int ); static int eventfd, mainbuttonfd, homebuttonfd, volbuttonfd;static int mousepid; static int b = 0;static int DblTime = 300000;static int x, y, p, dbl = 0;static int lastb; //for Nexus S//see below for Nook Colorstatic int xmin = 2;static int xadjust = 7; //shifts mouse leftstatic int lowx = 9; //should be xmin + xadjuststatic int ymin = 2;static int yadjust = -4; //shifts mouse up //negative value helps with keyboard at the bottom of the screenstatic int lowy = -2; //should be ymin + yadjust static char mainbuttoninput[19];static int on = 1;static int powerbuttonpress = 0;static int voluppress = 0;static int nopowerconserve = 0;static char emulator[67];static int oldbrightness = 255;static int sizeofbuf = 0;static char* buf[7]; static void touchscreenc(struct input_event* ev, int count){    int i;    static struct timeval lastt;     for (i=0; i < count; i++){	//printf("ev[%d]: type = 0x%x, code = 0x%x, value = 0x%x\n", i, ev[i].type, ev[i].code, ev[i].value);	/*if(0) {		fprint(2, "%d/%d [%d] ", i, count, ev[i].code);	}*/	switch(ev[i].type){	case EV_ABS:		switch(ev[i].code){		case 0x30:		// ABS_MT_TOUCH_MAJOR			if (ev[i].value) {				b = 1;			} else if (ev[i].value == 0) {				b = 0;			}			break;		case 0x36:		// ABS_MT_POSITION_X			if(!rotation_opt) {				if (ev[i].value > lowx)					x = ev[i].value - xadjust;				else					x = xmin;				break;			} else {				if (ev[i].value > lowy)					y = ev[i].value - yadjust;				else					y = ymin;				break;			}			break;		case 0x35:		//ABS_MT_POSITION_Y			if(!rotation_opt) {				if (Ysize-ev[i].value > lowy)					y = Ysize-ev[i].value - yadjust;				else					y = ymin;				break;			} else {				if (ev[i].value > lowx)					x = ev[i].value - xadjust;				else					x = xmin;				break;			}			break;			}			break;	case EV_SYN:	    mousetrack(b, x, y, 0);	    return;	}    }} static void touchscreene(struct input_event* ev, int count){    int i;    static struct timeval lastt;     for (i=0; i < count; i++){	//printf("ev[%d]: type = 0x%x, code = 0x%x, value = 0x%x\n", i, ev[i].type, ev[i].code, ev[i].value);	/*if(0) {		fprint(2, "%d/%d [%d] ", i, count, ev[i].code);	}*/	switch(ev[i].type){	case EV_ABS:		switch(ev[i].code){		case ABS_X:			x = ev[i].value;			break;		case ABS_Y:			y = ev[i].value;			break;			break;			}			break;	case EV_KEY:	    if (ev[i].value){		b = 1;		if(b==lastb && ev[i].time.tv_sec == lastt.tv_sec &&		   (ev[i].time.tv_usec-lastt.tv_usec) < DblTime)		    dbl = 1;		lastb = b;		lastt = ev[i].time;		if(dbl)		    b = b | 1<<8;	    } else {		lastb = b;		lastt = ev[i].time;		b = 0;	    }	    break;	case EV_SYN:	    mousetrack(b, x, y, 0);	    return;	}    }} static void touchscreens(struct input_event* ev, int count){    int i;    static struct timeval lastt;     for (i=0; i < count; i++){	//printf("ev[%d]: type = 0x%x, code = 0x%x, value = 0x%x\n", i, ev[i].type, ev[i].code, ev[i].value);	/*if(0) {		fprint(2, "%d/%d [%d] ", i, count, ev[i].code);	}*/	switch(ev[i].type){	case EV_ABS:		switch(ev[i].code){		case 0x30:		// ABS_MT_TOUCH_MAJOR			if (ev[i].value) {				b = 1;			} else if (ev[i].value == 0) {				b = 0;			}			break;		case 0x36:		// ABS_MT_POSITION_X			if(!rotation_opt) {				if ((ev[i].value * 800 / 1024) > lowy)					y = (ev[i].value * 800 /1024) - yadjust;				else					y = ymin;				break;			} else {				if ((ev[i].value * 800 / 1024) > lowx)					x = (ev[i].value * 800 / 1024) - xadjust;				else					x = xmin;				break;			}			break;		case 0x35:		//ABS_MT_POSITION_Y			if(!rotation_opt) {				if ((ev[i].value * 480 /1024) > lowx)					x = (ev[i].value * 480 /1024) - xadjust;				else					x = xmin;				break;			} else {				if ((Ysize-ev[i].value * 480 /1024) > lowy)					y = (Ysize-ev[i].value * 480 / 1024) - yadjust;				else					y = ymin;				break;			}			break;			}			break;	    break;	case EV_SYN:		mousetrack(b, x, y, 0);		return;	}    }} static void fbreadmouse(void* v){	void (*handler)(struct input_event*, int) = v;	int rd, value, size = sizeof(struct input_event);	struct input_event ev[64];	int i;	while (1){		if ((rd = read (eventfd, ev, sizeof(ev))) < size) {			print("read %d instead of %d\n", rd, size);			sleep(1);		} 		(*handler)(ev, (rd / size));	}} static void readbutton(void* v){	int rd, value, size = sizeof(struct input_event);	struct input_event ev[64];	int i;	while (1){		if ((rd = read (mainbuttonfd, ev, sizeof(ev))) < size) {			print("read %d instead of %d\n", rd, size);			sleep(1);		} 		for (i = 0; i < rd / size; i++) {			//print("ev[%d]: type = 0x%x, code = 0x%x, value = 0x%x\n", i, ev[i].type, ev[i].code, ev[i].value);			if (ev[i].code == 0x74) {				if (ev[i].value == 1) {					powerbuttonpress = 1;					if (voluppress == 1)						nopowerconserve = 1;				} else {					if (powerbuttonpress == 1 && nopowerconserve == 0) {						if (type == 'c') {							FILE * brightnessw;							brightnessw = fopen("/sys/devices/platform/omap_pwm_led/leds/lcd-backlight/brightness", "w");							if (on == 1) {								FILE * brightnessr;								brightnessr = fopen("/sys/devices/platform/omap_pwm_led/leds/lcd-backlight/brightness", "r");								sizeofbuf = fread(buf, 1, sizeof(buf), brightnessr);								fwrite("0\n", 1, 2, brightnessw);								printf("Warning: avoided changing power state; instead brightness changed\n");								on = 0;								fclose(brightnessr);							} else {								fwrite(buf, 1, sizeofbuf, brightnessw);								on = 1;							}							fclose(brightnessw);						} else {							FILE * power;							power = fopen("/sys/power/state", "w");							if (on == 1) {								fwrite("mem\n", 1, 4, power);								on = 0;							} else {								fwrite("on\n", 1, 3, power);								on = 1;							}							fclose(power);						}					}					powerbuttonpress = 0;					nopowerconserve = 0;				}			}		}	}} static void readhomebutton(void* v){	int rd, value, size = sizeof(struct input_event);	struct input_event ev[64];	int i;	while (1){		if ((rd = read (homebuttonfd, ev, sizeof(ev))) < size) {			print("read %d instead of %d\n", rd, size);			sleep(1);		}		for (i = 0; i < rd / size; i++) {			//print("ev[%d]: type = 0x%x, code = 0x%x, value = 0x%x\n", i, ev[i].type, ev[i].code, ev[i].value);			if (powerbuttonpress == 1 && ev[i].code == 0x66 /* && ev[i].value == 1 */) {				exit (1);			}		}    }} static void readvolbutton(void* v){	int rd, value, size = sizeof(struct input_event);	struct input_event ev[64];	int i;	while (1){		if ((rd = read (volbuttonfd, ev, sizeof(ev))) < size) {			print("read %d instead of %d\n", rd, size);			sleep(1);		}		for (i = 0; i < rd / size; i++) {			//print("ev[%d]: type = 0x%x, code = 0x%x, value = 0x%x\n", i, ev[i].type, ev[i].code, ev[i].value);			if (powerbuttonpress == 1 && ev[i].code == 0x72 /* && ev[i].value == 1 */) {				char* args[3] = {"/system/bin/reboot", "-p", NULL};				execve(args[0], args, NULL);			}			if (ev[i].code == 0x73) {				if (ev[i].value == 1) {					voluppress = 1;					if (powerbuttonpress == 1)						nopowerconserve = 1;				} else					voluppress = 0;			}		}    }} uchar* attachscreen ( Rectangle *rect, ulong *chan, int *depth, int *width, int *softscreen ){    Xsize &= ~0x3;	/* ensure multiple of 4 */    rect->min.x = 0;    rect->min.y = 0;    rect->max.x = Xsize;    rect->max.y = Ysize;     if ( !screeninited ) {	initscreen ( Xsize, Ysize, &displaychannel, &displaydepth );	screendata = malloc ( Xsize * Ysize * ( displaydepth / 8  ) );	if ( !screendata )	    fprint ( 2, "cannot allocate screen buffer" );    }     *chan = displaychannel;    *depth = displaydepth;     *width = ( Xsize / 4 ) * ( *depth / 8 );    *softscreen = 1;    if ( !screeninited ){	screeninited = 1;    } 	eventfd = open(mousefile, O_RDONLY);	if (type == 'c') {		//for Nook Color		kproc("readmouse", fbreadmouse, &touchscreenc, 0);	}	else if (type == 'e')		kproc("readmouse", fbreadmouse, &touchscreene, 0);	else		kproc("readmouse", fbreadmouse, &touchscreens, 0); 	sprintf(mainbuttoninput, "/dev/input/event%d", maineventnum);	mainbuttonfd = open(mainbuttoninput, O_RDONLY);	kproc("readbutton", readbutton, nil, 0); 	homebuttonfd = open(homedevice, O_RDONLY);	kproc("readhomebutton", readhomebutton, nil, 0); 	volbuttonfd = open(voldevice, O_RDONLY);	kproc("readvolbutton", readvolbutton, nil, 0); 	if (type == 's') {		xadjust = 3; //shifts mouse left		lowx = 5; //should be xmin + xadjust		yadjust = 15; //shifts mouse up		lowy = 17; //should be ymin + yadjust	}     return screendata;} void detachscreen (){    free ( screendata );    screendata = 0;    framebuffer_release_buffer ( framebuffer );    framebuffer = 0;    framebuffer_deinit ();} #define max(a,b) (((a)>(b))?(a):(b))#define min(a,b) (((a)<(b))?(a):(b)) void flushmemscreen ( Rectangle rect ){    if ( !framebuffer || !screendata )	return;    int depth = displaydepth / 8;    int bpl = Xsize * depth;    int i, j;    uchar* fb = framebuffer;    uchar* screen = screendata;    int width;    double angle = 3.14159265 / 2;    int x,y,u,v;     if ( rect.min.x < 0 )	rect.min.x = 0;    if ( rect.min.y < 0 )	rect.min.y = 0;    if ( rect.max.x > Xsize )	rect.max.x = Xsize;    if ( rect.max.y > Ysize )	rect.max.y = Ysize;     if ( ( rect.max.x < rect.min.x ) || ( rect.max.y < rect.min.y ) )		return;    if(rotation_opt) {		uchar *cur_col;		uchar *fb_begin = fb;		uchar *scr_begin = screen;		int fb_bpl = Ysize * depth;		int fb_startx, fb_starty;		fb_starty = Xsize - rect.min.x;		fb_startx = rect.min.y;		fb += fb_starty * fb_bpl + fb_startx * depth;		screen += rect.min.y * bpl + rect.min.x * depth;		cur_col = fb;		for(i = rect.min.y; i < rect.max.y; i++) {		    fb = cur_col;			for(j = rect.min.x; j < rect.max.x; j++) {				memcpy(fb, screen, depth);				fb -= fb_bpl;				screen += depth;	    	}			cur_col += depth;			screen += depth * ((Xsize - rect.max.x) + rect.min.x);		}    } else {		fb += rect.min.y * bpl + rect.min.x * depth;		screen += rect.min.y * bpl + rect.min.x * depth;		width = ( rect.max.x - rect.min.x ) * depth;	for ( i = rect.min.y; i < rect.max.y; i++ ) {	    memcpy ( fb, screen, width );	    fb += bpl;	    screen += bpl;	} 	if ( ( max ( rect.min.x, pointerposition.x ) > min (rect.max.x, pointerposition.x + pointerwidth ) ) ||	     ( max ( rect.min.y, pointerposition.y ) > min (rect.max.y, pointerposition.y + pointerheight ) ) )	    return; 	if ( canlock ( &pointerlock ) ) {	    drawpointer ( pointerposition.x , pointerposition.y );	    unlock ( &pointerlock );	}    }}#include "arrows.h" static void initscreen ( int aXSize, int aYSize, ulong *chan, int *depth ){    if ( framebuffer_init () )	return;     framebuffer = framebuffer_get_buffer ();    switch ( *depth ) {    case 16: //16bit RGB (2 bytes, red 5@11, green 6@5, blue 5@0) 		*chan = RGB16;		pointer = PointerRGB16;		pointerwidth = PointerRGB16Width;		pointerheight = PointerRGB16Height;		break;

Lines 1–500 of 604. Load more