2 * Copyright © 2007 Peter Hutterer
3 * Copyright © 2009 Red Hat, Inc.
5 * Permission is hereby granted, free of charge, to any person obtaining a
6 * copy of this software and associated documentation files (the "Software"),
7 * to deal in the Software without restriction, including without limitation
8 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
9 * and/or sell copies of the Software, and to permit persons to whom the
10 * Software is furnished to do so, subject to the following conditions:
12 * The above copyright notice and this permission notice (including the next
13 * paragraph) shall be included in all copies or substantial portions of the
16 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
17 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
18 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
19 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
20 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
21 * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
22 * DEALINGS IN THE SOFTWARE.
29 #include <X11/Xatom.h>
30 #include <X11/extensions/XIproto.h>
34 static Atom
parse_atom(Display
*dpy
, char *name
) {
38 for (i
= 0; name
[i
] != '\0'; i
++) {
39 if (!isdigit(name
[i
])) {
48 return XInternAtom(dpy
, name
, False
);
52 print_property(Display
*dpy
, XDevice
* dev
, Atom property
)
57 unsigned long nitems
, bytes_after
;
58 unsigned char *data
, *ptr
;
59 int j
, done
= False
, size
= 0;
61 name
= XGetAtomName(dpy
, property
);
62 printf("\t%s (%ld):\t", name
, property
);
64 if (XGetDeviceProperty(dpy
, dev
, property
, 0, 1000, False
,
65 AnyPropertyType
, &act_type
, &act_format
,
66 &nitems
, &bytes_after
, &data
) == Success
)
68 Atom float_atom
= XInternAtom(dpy
, "FLOAT", True
);
77 case 8: size
= sizeof(char); break;
78 case 16: size
= sizeof(short); break;
79 case 32: size
= sizeof(long); break;
82 for (j
= 0; j
< nitems
; j
++)
90 printf("%d", *((char*)ptr
));
93 printf("%d", *((short*)ptr
));
96 printf("%ld", *((long*)ptr
));
103 printf("Unknown string format.\n");
107 printf("\"%s\"", ptr
);
108 j
+= strlen((char*)ptr
); /* The loop's j++ jumps over the
110 ptr
+= strlen((char*)ptr
); /* ptr += size below jumps over
115 Atom a
= *(Atom
*)ptr
;
116 printf("\"%s\" (%d)",
117 (a
) ? XGetAtomName(dpy
, a
) : "None",
122 if (float_atom
!= None
&& act_type
== float_atom
)
124 printf("%f", *((float*)ptr
));
128 printf("\t... of unknown type %s\n",
129 XGetAtomName(dpy
, act_type
));
144 printf("\tFetch failure\n");
149 list_props_xi1(Display
*dpy
, int argc
, char** argv
, char* name
, char *desc
)
159 fprintf(stderr
, "Usage: xinput %s %s\n", name
, desc
);
163 for (i
= 0; i
< argc
; i
++)
165 info
= find_device_info(dpy
, argv
[i
], False
);
168 fprintf(stderr
, "unable to find device %s\n", argv
[i
]);
172 dev
= XOpenDevice(dpy
, info
->id
);
175 fprintf(stderr
, "unable to open device '%s'\n", info
->name
);
179 props
= XListDeviceProperties(dpy
, dev
, &nprops
);
182 printf("Device '%s' does not report any properties.\n", info
->name
);
186 printf("Device '%s':\n", info
->name
);
189 print_property(dpy
, dev
, props
[nprops
]);
193 XCloseDevice(dpy
, dev
);
199 int watch_props(Display
*dpy
, int argc
, char** argv
, char* n
, char *desc
)
204 XDevicePropertyNotifyEvent
*dpev
;
207 XEventClass cls_prop
;
209 if (list_props(dpy
, argc
, argv
, n
, desc
) != EXIT_SUCCESS
)
212 info
= find_device_info(dpy
, argv
[0], False
);
215 fprintf(stderr
, "unable to find device %s\n", argv
[0]);
219 dev
= XOpenDevice(dpy
, info
->id
);
222 fprintf(stderr
, "unable to open device '%s'\n", info
->name
);
226 DevicePropertyNotify(dev
, type_prop
, cls_prop
);
227 XSelectExtensionEvent(dpy
, DefaultRootWindow(dpy
), &cls_prop
, 1);
231 XNextEvent(dpy
, &ev
);
233 dpev
= (XDevicePropertyNotifyEvent
*)&ev
;
234 if (dpev
->type
!= type_prop
)
237 name
= XGetAtomName(dpy
, dpev
->atom
);
238 printf("Property '%s' changed.\n", name
);
239 print_property(dpy
, dev
, dpev
->atom
);
242 XCloseDevice(dpy
, dev
);
246 delete_prop_xi1(Display
*dpy
, int argc
, char** argv
, char* n
, char *desc
)
253 info
= find_device_info(dpy
, argv
[0], False
);
256 fprintf(stderr
, "unable to find device %s\n", argv
[0]);
260 dev
= XOpenDevice(dpy
, info
->id
);
263 fprintf(stderr
, "unable to open device '%s'\n", info
->name
);
269 prop
= parse_atom(dpy
, name
);
271 XDeleteDeviceProperty(dpy
, dev
, prop
);
273 XCloseDevice(dpy
, dev
);
278 do_set_prop_xi1(Display
*dpy
, Atom type
, int format
, int argc
, char **argv
, char *n
, char *desc
)
287 int old_format
, nelements
= 0;
288 unsigned long act_nitems
, bytes_after
;
299 fprintf(stderr
, "Usage: xinput %s %s\n", n
, desc
);
303 info
= find_device_info(dpy
, argv
[0], False
);
306 fprintf(stderr
, "unable to find device %s\n", argv
[0]);
310 dev
= XOpenDevice(dpy
, info
->id
);
313 fprintf(stderr
, "unable to open device %s\n", argv
[0]);
319 prop
= parse_atom(dpy
, name
);
322 fprintf(stderr
, "invalid property %s\n", name
);
326 float_atom
= XInternAtom(dpy
, "FLOAT", False
);
328 nelements
= argc
- 2;
329 if (type
== None
|| format
== 0) {
330 if (XGetDeviceProperty(dpy
, dev
, prop
, 0, 0, False
, AnyPropertyType
,
331 &old_type
, &old_format
, &act_nitems
,
332 &bytes_after
, &data
.c
) != Success
) {
333 fprintf(stderr
, "failed to get property type and format for %s\n",
347 fprintf(stderr
, "property %s doesn't exist, you need to specify "
348 "its type and format\n", name
);
352 data
.c
= calloc(nelements
, sizeof(long));
354 for (i
= 0; i
< nelements
; i
++)
356 if (type
== XA_INTEGER
) {
360 data
.c
[i
] = atoi(argv
[2 + i
]);
363 data
.s
[i
] = atoi(argv
[2 + i
]);
366 data
.l
[i
] = atoi(argv
[2 + i
]);
369 fprintf(stderr
, "unexpected size for property %s", name
);
372 } else if (type
== float_atom
) {
374 fprintf(stderr
, "unexpected format %d for property %s\n",
378 *(float *)(data
.l
+ i
) = strtod(argv
[2 + i
], &endptr
);
379 if (endptr
== argv
[2 + i
]) {
380 fprintf(stderr
, "argument %s could not be parsed\n", argv
[2 + i
]);
383 } else if (type
== XA_ATOM
) {
385 fprintf(stderr
, "unexpected format %d for property %s\n",
389 data
.a
[i
] = parse_atom(dpy
, argv
[2 + i
]);
391 fprintf(stderr
, "unexpected type for property %s\n", name
);
396 XChangeDeviceProperty(dpy
, dev
, prop
, type
, format
, PropModeReplace
,
399 XCloseDevice(dpy
, dev
);
405 print_property_xi2(Display
*dpy
, int deviceid
, Atom property
)
410 unsigned long nitems
, bytes_after
;
411 unsigned char *data
, *ptr
;
414 name
= XGetAtomName(dpy
, property
);
415 printf("\t%s (%ld):\t", name
, property
);
417 if (XIGetProperty(dpy
, deviceid
, property
, 0, 1000, False
,
418 AnyPropertyType
, &act_type
, &act_format
,
419 &nitems
, &bytes_after
, &data
) == Success
)
421 Atom float_atom
= XInternAtom(dpy
, "FLOAT", True
);
426 printf("<no items>");
428 for (j
= 0; j
< nitems
; j
++)
436 printf("%d", *((int8_t*)ptr
));
439 printf("%d", *((int16_t*)ptr
));
442 printf("%d", *((int32_t*)ptr
));
449 printf("Unknown string format.\n");
453 printf("\"%s\"", ptr
);
454 j
+= strlen((char*)ptr
); /* The loop's j++ jumps over the
456 ptr
+= strlen((char*)ptr
); /* ptr += size below jumps over
461 Atom a
= *(uint32_t*)ptr
;
462 printf("\"%s\" (%ld)",
463 (a
) ? XGetAtomName(dpy
, a
) : "None",
469 if (float_atom
!= None
&& act_type
== float_atom
)
471 printf("%f", *((float*)ptr
));
475 printf("\t... of unknown type %s\n",
476 XGetAtomName(dpy
, act_type
));
491 printf("\tFetch failure\n");
496 list_props_xi2(Display
*dpy
, int argc
, char** argv
, char* name
, char *desc
)
505 fprintf(stderr
, "Usage: xinput %s %s\n", name
, desc
);
509 for (i
= 0; i
< argc
; i
++)
511 info
= xi2_find_device_info(dpy
, argv
[i
]);
514 fprintf(stderr
, "unable to find device %s\n", argv
[i
]);
518 props
= XIListProperties(dpy
, info
->deviceid
, &nprops
);
521 printf("Device '%s' does not report any properties.\n", info
->name
);
525 printf("Device '%s':\n", info
->name
);
528 print_property_xi2(dpy
, info
->deviceid
, props
[nprops
]);
537 delete_prop_xi2(Display
*dpy
, int argc
, char** argv
, char* n
, char *desc
)
543 info
= xi2_find_device_info(dpy
, argv
[0]);
546 fprintf(stderr
, "unable to find device %s\n", argv
[0]);
552 prop
= parse_atom(dpy
, name
);
554 XIDeleteProperty(dpy
, info
->deviceid
, prop
);
560 do_set_prop_xi2(Display
*dpy
, Atom type
, int format
, int argc
, char **argv
, char *n
, char *desc
)
568 int old_format
, nelements
= 0;
569 unsigned long act_nitems
, bytes_after
;
579 fprintf(stderr
, "Usage: xinput %s %s\n", n
, desc
);
583 info
= xi2_find_device_info(dpy
, argv
[0]);
586 fprintf(stderr
, "unable to find device %s\n", argv
[0]);
592 prop
= parse_atom(dpy
, name
);
595 fprintf(stderr
, "invalid property %s\n", name
);
599 float_atom
= XInternAtom(dpy
, "FLOAT", False
);
601 nelements
= argc
- 2;
602 if (type
== None
|| format
== 0) {
603 if (XIGetProperty(dpy
, info
->deviceid
, prop
, 0, 0, False
,
604 AnyPropertyType
, &old_type
, &old_format
, &act_nitems
,
605 &bytes_after
, &data
.c
) != Success
) {
606 fprintf(stderr
, "failed to get property type and format for %s\n",
620 fprintf(stderr
, "property %s doesn't exist, you need to specify "
621 "its type and format\n", name
);
625 data
.c
= calloc(nelements
, sizeof(int32_t));
627 for (i
= 0; i
< nelements
; i
++)
629 if (type
== XA_INTEGER
) {
633 data
.c
[i
] = atoi(argv
[2 + i
]);
636 data
.s
[i
] = atoi(argv
[2 + i
]);
639 data
.l
[i
] = atoi(argv
[2 + i
]);
642 fprintf(stderr
, "unexpected size for property %s", name
);
645 } else if (type
== float_atom
) {
647 fprintf(stderr
, "unexpected format %d for property %s\n",
651 *(float *)(data
.l
+ i
) = strtod(argv
[2 + i
], &endptr
);
652 if (endptr
== argv
[2 + i
]) {
653 fprintf(stderr
, "argument %s could not be parsed\n", argv
[2 + i
]);
656 } else if (type
== XA_ATOM
) {
658 fprintf(stderr
, "unexpected format %d for property %s\n",
662 data
.l
[i
] = parse_atom(dpy
, argv
[2 + i
]);
664 fprintf(stderr
, "unexpected type for property %s\n", name
);
669 XIChangeProperty(dpy
, info
->deviceid
, prop
, type
, format
, PropModeReplace
,
676 int list_props(Display
*display
, int argc
, char *argv
[], char *name
,
680 if (xinput_version(display
) == XI_2_Major
)
681 return list_props_xi2(display
, argc
, argv
, name
, desc
);
683 return list_props_xi1(display
, argc
, argv
, name
, desc
);
687 int delete_prop(Display
*display
, int argc
, char *argv
[], char *name
,
691 if (xinput_version(display
) == XI_2_Major
)
692 return delete_prop_xi2(display
, argc
, argv
, name
, desc
);
694 return delete_prop_xi1(display
, argc
, argv
, name
, desc
);
699 do_set_prop(Display
*display
, Atom type
, int format
, int argc
, char *argv
[], char *name
, char *desc
)
702 if (xinput_version(display
) == XI_2_Major
)
703 return do_set_prop_xi2(display
, type
, format
, argc
, argv
, name
, desc
);
705 return do_set_prop_xi1(display
, type
, format
, argc
, argv
, name
, desc
);
709 set_atom_prop(Display
*dpy
, int argc
, char** argv
, char* n
, char *desc
)
711 return do_set_prop(dpy
, XA_ATOM
, 32, argc
, argv
, n
, desc
);
715 set_int_prop(Display
*dpy
, int argc
, char** argv
, char* n
, char *desc
)
722 fprintf(stderr
, "Usage: xinput %s %s\n", n
, desc
);
726 format
= atoi(argv
[2]);
727 if (format
!= 8 && format
!= 16 && format
!= 32)
729 fprintf(stderr
, "Invalid format %d\n", format
);
733 for (i
= 3; i
< argc
; i
++)
734 argv
[i
- 1] = argv
[i
];
736 return do_set_prop(dpy
, XA_INTEGER
, format
, argc
- 1, argv
, n
, desc
);
740 set_float_prop(Display
*dpy
, int argc
, char** argv
, char* n
, char *desc
)
742 Atom float_atom
= XInternAtom(dpy
, "FLOAT", False
);
744 if (sizeof(float) != 4)
746 fprintf(stderr
, "sane FP required\n");
750 return do_set_prop(dpy
, float_atom
, 32, argc
, argv
, n
, desc
);
753 int set_prop(Display
*display
, int argc
, char *argv
[], char *name
,
761 char *option
= strchr(argv
[i
], '=');
762 /* skip non-option arguments */
763 if (strncmp(argv
[i
], "--", 2) || !option
) {
768 if (!strncmp(argv
[i
], "--type=", strlen("--type="))) {
769 if (!strcmp(option
+ 1, "int")) {
771 } else if (!strcmp(option
+ 1, "float")) {
772 type
= XInternAtom(display
, "FLOAT", False
);
774 } else if (!strcmp(option
+ 1, "atom")) {
778 fprintf(stderr
, "unknown property type %s\n", option
+ 1);
781 } else if (!strncmp(argv
[i
], "--format=", strlen("--format="))) {
782 format
= atoi(option
+ 1);
783 if (format
!= 8 && format
!= 16 && format
!= 32) {
784 fprintf(stderr
, "invalid property format %s\n", option
+ 1);
788 fprintf(stderr
, "invalid option %s\n", argv
[i
]);
792 for (j
= i
; j
+ 1 < argc
; j
++)
793 argv
[j
] = argv
[j
+ 1];
797 return do_set_prop(display
, type
, format
, argc
, argv
, name
, desc
);