lib/xf86misc/main.xs

#include "EXTERN.h"
#include "perl.h"
#include "XSUB.h"

#include <X11/Xlib.h>
#include <X11/extensions/xf86misc.h>

#include <term.h>
#undef max_colors

void initIMPS2() {
  unsigned char imps2_s1[] = { 243, 200, 243, 100, 243, 80, };
  unsigned char imps2_s2[] = { 246, 230, 244, 243, 100, 232, 3, };

  int fd = open("/dev/mouse", O_WRONLY);
  if (fd < 0) return;

  write (fd, imps2_s1, sizeof (imps2_s1));
  usleep (30000);
  write (fd, imps2_s2, sizeof (imps2_s2));
  usleep (30000);
  tcflush (fd, TCIFLUSH);
  tcdrain(fd);
}

MODULE = xf86misc::main         PACKAGE = xf86misc::main

PROTOTYPES: DISABLE


int
Xtest(display)
  char *display
  CODE:
  int pid;
  if ((pid = fork()) == 0) {
    Display *d = XOpenDisplay(display);
    if (d) {
      int child;
      /* keep a client until some window is created, otherwise X server blinks to hell */
      if ((child = fork()) == 0) {
        XEvent event;
        XSelectInput(d, DefaultRootWindow(d), SubstructureNotifyMask);
        do {
          XNextEvent(d, &event);
        } while (event.type != CreateNotify);
        XCloseDisplay(d);
        exit(0);
      }
    }
    _exit(d != NULL);
  }
  waitpid(pid, &RETVAL, 0);
  OUTPUT:
  RETVAL

void
setMouseLive(display, type, emulate3buttons)
  char *display
  int type
  int emulate3buttons
  CODE:
  {
    XF86MiscMouseSettings mseinfo;
    Display *d = XOpenDisplay(display);
    if (d) {
      if (XF86MiscGetMouseSettings(d, &mseinfo) == True) {
        mseinfo.type = type;
        mseinfo.flags |= MF_REOPEN;
        mseinfo.emulate3buttons = emulate3buttons;
        XF86MiscSetMouseSettings(d, &mseinfo);
        XFlush(d);
        if (type == MTYPE_IMPS2) initIMPS2();
      }
    }
  }
1	#include "EXTERN.h"
2	#include "perl.h"
3	#include "XSUB.h"
4
5	#include <X11/Xlib.h>
6	#include <X11/extensions/xf86misc.h>
7
8	#include <term.h>
9	#undef max_colors
10
11	void initIMPS2() {
12	unsigned char imps2_s1[] = { 243, 200, 243, 100, 243, 80, };
13	unsigned char imps2_s2[] = { 246, 230, 244, 243, 100, 232, 3, };
14
15	int fd = open("/dev/mouse", O_WRONLY);
16	if (fd < 0) return;
17
18	write (fd, imps2_s1, sizeof (imps2_s1));
19	usleep (30000);
20	write (fd, imps2_s2, sizeof (imps2_s2));
21	usleep (30000);
22	tcflush (fd, TCIFLUSH);
23	tcdrain(fd);
24	}
25
26	MODULE = xf86misc::main PACKAGE = xf86misc::main
27
28	PROTOTYPES: DISABLE
29
30
31	int
32	Xtest(display)
33	char *display
34	CODE:
35	int pid;
36	if ((pid = fork()) == 0) {
37	Display *d = XOpenDisplay(display);
38	if (d) {
39	int child;
40	/* keep a client until some window is created, otherwise X server blinks to hell */
41	if ((child = fork()) == 0) {
42	XEvent event;
43	XSelectInput(d, DefaultRootWindow(d), SubstructureNotifyMask);
44	do {
45	XNextEvent(d, &event);
46	} while (event.type != CreateNotify);
47	XCloseDisplay(d);
48	exit(0);
49	}
50	}
51	_exit(d != NULL);
52	}
53	waitpid(pid, &RETVAL, 0);
54	OUTPUT:
55	RETVAL
56
57	void
58	setMouseLive(display, type, emulate3buttons)
59	char *display
60	int type
61	int emulate3buttons
62	CODE:
63	{
64	XF86MiscMouseSettings mseinfo;
65	Display *d = XOpenDisplay(display);
66	if (d) {
67	if (XF86MiscGetMouseSettings(d, &mseinfo) == True) {
68	mseinfo.type = type;
69	mseinfo.flags \|= MF_REOPEN;
70	mseinfo.emulate3buttons = emulate3buttons;
71	XF86MiscSetMouseSettings(d, &mseinfo);
72	XFlush(d);
73	if (type == MTYPE_IMPS2) initIMPS2();
74	}
75	}
76	}