home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #27 / NN_1992_27.iso / spool / fj / sources / 834 < prev    next >
Encoding:
Text File  |  1992-11-17  |  37.8 KB  |  1,355 lines
  1. Newsgroups: fj.sources
  2. Path: sparky!uunet!stanford.edu!sun-barr!sh.wide!wnoc-kyo!omrongw!yoki
  3. From: yoki@ari.ncl.omron.co.jp (OKI Yukihiro)
  4. Subject: X11 Release 5 Public Patch #18
  5. Message-ID: <YOKI.92Nov17185255@ultraman.ari.ncl.omron.co.jp>
  6. Sender: news@omrongw.wg.omron.co.jp (News Manager)
  7. Nntp-Posting-Host: ultraman.ari.ncl.omron.co.jp
  8. Organization: Advanced Systems Research Center, OMRON Corporation, Kyoto, Japan
  9. Distribution: fj
  10. Date: Tue, 17 Nov 1992 09:52:55 GMT
  11. Lines: 1342
  12.  
  13.  
  14. *****************************************************************************
  15.  
  16.               Release 5 Public Patch #18
  17.                MIT X Consortium
  18.  
  19. WARNING:
  20. This patch was previously released as an optional patch, in support of the
  21. X Test Suite, and was labeled "Release 5 XTEST Public Patch" (the file on
  22. expo was "/pub/XTEST/R5fix-xtest-1").  If you have already applied that patch,
  23. do not try to apply this one!  Proceed instead to apply public patch #19.
  24.  
  25. To apply this patch:
  26.  
  27. cd to the top of the source tree (to the directory containing the "mit"
  28. and "contrib" subdirectories) and do:
  29.     patch -p -s < ThisFile
  30. Patch will work silently unless an error occurs.  You will likely get
  31. the following warning messages, which can be ignored:
  32.     mkdir: mit: File exists
  33.     mkdir: mit/extensions: File exists
  34.     mkdir: mit/extensions/include: File exists
  35.     mkdir: mit: File exists
  36.     mkdir: mit/extensions: File exists
  37.     mkdir: mit/extensions/include: File exists
  38.     mkdir: mit: File exists
  39.     mkdir: mit/extensions: File exists
  40.     mkdir: mit/extensions/lib: File exists
  41.     mkdir: mit: File exists
  42.     mkdir: mit/extensions: File exists
  43.     mkdir: mit/extensions/lib: File exists
  44.     mkdir: mit/extensions/lib/xtest: File exists
  45.     mkdir: mit: File exists
  46.     mkdir: mit/extensions: File exists
  47.     mkdir: mit/extensions/server: File exists
  48.     mkdir: mit: File exists
  49.     mkdir: mit/extensions: File exists
  50.     mkdir: mit/extensions/server: File exists
  51. If you want to watch patch do its thing, leave out the "-s" argument to patch.
  52.  
  53. This patch creates the following new files:
  54.     mit/extensions/include/XTest.h
  55.     mit/extensions/include/xteststr.h
  56.     mit/extensions/lib/xtest/Imakefile
  57.     mit/extensions/lib/xtest/XTest.c
  58.     mit/extensions/server/sleepuntil.c
  59.     mit/extensions/server/xtest.c
  60. If you are using a symbolic link tree, you will need to create new links.
  61.  
  62. To build a server with the XTEST extension enabled, you will need to edit
  63. your vendor.cf or site.def file in mit/config/.  For most servers, you can
  64. insert the following line into the "AfterVendorCF" part of your site.def:
  65.  
  66. #define ExtensionOSDefines -DXTEST
  67.  
  68. If your vendor.cf already contains a #define for ExtensionOSDefines (e.g.,
  69. x386.cf does), then you can edit the .cf file and add -DXTEST to
  70. ExtensionOSDefines there.
  71.  
  72. Finally, to rebuild after applying this patch, cd to the "mit" subdirectory
  73. and do:
  74.     make Everything >& every.log
  75. Note: this will *not* "clean" your tree.
  76.  
  77. Brief notes on what this patch provides:
  78.  
  79. xtest: add implementation of XTEST extension
  80.  
  81. Prereq: 91/07/16
  82.  
  83. *** /tmp/,RCSt1016565    Wed Sep  9 15:41:50 1992
  84. --- mit/extensions/include/Imakefile    Wed Sep  9 15:41:51 1992
  85. ***************
  86. *** 1,4 ****
  87. ! XCOMM $XConsortium: Imakefile,v 1.24 91/07/16 23:08:47 gildea Exp $
  88.   #if BuildPexClients || BuildPexExt
  89.   #define IHaveSubdirs
  90.   #define PassCDebugFlags 'CDEBUGFLAGS=$(CDEBUGFLAGS)'
  91. --- 1,4 ----
  92. ! XCOMM $XConsortium: Imakefile,v 1.24.1.1 92/09/09 15:25:53 rws Exp $
  93.   #if BuildPexClients || BuildPexExt
  94.   #define IHaveSubdirs
  95.   #define PassCDebugFlags 'CDEBUGFLAGS=$(CDEBUGFLAGS)'
  96. ***************
  97. *** 6,12 ****
  98.   #endif
  99.   
  100.   HEADERS = Xext.h multibuf.h shape.h XShm.h MITMisc.h XI.h XInput.h XIproto.h \
  101. !     xtestext1.h
  102.   INSTALLFLAGS = $(INSTINCFLAGS)
  103.   
  104.   all::
  105. --- 6,12 ----
  106.   #endif
  107.   
  108.   HEADERS = Xext.h multibuf.h shape.h XShm.h MITMisc.h XI.h XInput.h XIproto.h \
  109. !     XTest.h xtestext1.h
  110.   INSTALLFLAGS = $(INSTINCFLAGS)
  111.   
  112.   all::
  113. *** /dev/null    Wed Sep  9 15:40:33 1992
  114. --- mit/extensions/include/XTest.h    Mon Apr 20 13:15:18 1992
  115. ***************
  116. *** 0 ****
  117. --- 1,126 ----
  118. + /* $XConsortium: XTest.h,v 1.4 92/04/20 13:13:54 rws Exp $ */
  119. + /*
  120. + 
  121. + Copyright 1992 by the Massachusetts Institute of Technology
  122. + 
  123. + Permission to use, copy, modify, distribute, and sell this software and its
  124. + documentation for any purpose is hereby granted without fee, provided that
  125. + the above copyright notice appear in all copies and that both that
  126. + copyright notice and this permission notice appear in supporting
  127. + documentation, and that the name of M.I.T. not be used in advertising or
  128. + publicity pertaining to distribution of the software without specific,
  129. + written prior permission.  M.I.T. makes no representations about the
  130. + suitability of this software for any purpose.  It is provided "as is"
  131. + without express or implied warranty.
  132. + 
  133. + */
  134. + 
  135. + #ifndef _XTEST_H_
  136. + #define _XTEST_H_
  137. + 
  138. + #include <X11/Xfuncproto.h>
  139. + 
  140. + #define X_XTestGetVersion    0
  141. + #define X_XTestCompareCursor    1
  142. + #define X_XTestFakeInput    2
  143. + 
  144. + #define XTestNumberEvents    0
  145. + 
  146. + #define XTestNumberErrors    0
  147. + 
  148. + #define XTestMajorVersion    2
  149. + #define XTestMinorVersion    1
  150. + 
  151. + #define XTestExtensionName    "XTEST"
  152. + 
  153. + #ifndef _XTEST_SERVER_
  154. + 
  155. + _XFUNCPROTOBEGIN
  156. + 
  157. + Bool XTestQueryExtension(
  158. + #if NeedFunctionPrototypes
  159. +     Display*        /* dpy */,
  160. +     int*        /* event_basep */,
  161. +     int*        /* error_basep */,
  162. +     int*        /* majorp */,
  163. +     int*        /* minorp */
  164. + #endif
  165. + );
  166. + 
  167. + Bool XTestCompareCursorWithWindow(
  168. + #if NeedFunctionPrototypes
  169. +     Display*        /* dpy */,
  170. +     Window        /* window */,
  171. +     Cursor        /* cursor */
  172. + #endif
  173. + );
  174. + 
  175. + Bool XTestCompareCurrentCursorWithWindow(
  176. + #if NeedFunctionPrototypes
  177. +     Display*        /* dpy */,
  178. +     Window        /* window */
  179. + #endif
  180. + );
  181. + 
  182. + extern XTestFakeKeyEvent(
  183. + #if NeedFunctionPrototypes
  184. +     Display*        /* dpy */,
  185. +     unsigned int    /* keycode */,
  186. +     Bool        /* is_press */,
  187. +     unsigned long    /* delay */
  188. + #endif
  189. + );
  190. + 
  191. + extern XTestFakeButtonEvent(
  192. + #if NeedFunctionPrototypes
  193. +     Display*        /* dpy */,
  194. +     unsigned int    /* button */,
  195. +     Bool        /* is_press */,
  196. +     unsigned long    /* delay */
  197. + #endif
  198. + );
  199. + 
  200. + extern XTestFakeMotionEvent(
  201. + #if NeedFunctionPrototypes
  202. +     Display*        /* dpy */,
  203. +     int            /* screen */,
  204. +     int            /* x */,
  205. +     int            /* y */,
  206. +     unsigned long    /* delay */
  207. + #endif
  208. + );
  209. + 
  210. + extern XTestFakeRelativeMotionEvent(
  211. + #if NeedFunctionPrototypes
  212. +     Display*        /* dpy */,
  213. +     int            /* x */,
  214. +     int            /* y */,
  215. +     unsigned long    /* delay */
  216. + #endif
  217. + );
  218. + 
  219. + void XTestSetGContextOfGC(
  220. + #if NeedFunctionPrototypes
  221. +     GC            /* gc */,
  222. +     GContext        /* gid */
  223. + #endif
  224. + );
  225. + 
  226. + void XTestSetVisualIDOfVisual(
  227. + #if NeedFunctionPrototypes
  228. +     Visual*        /* visual */,
  229. +     VisualID        /* visualid */
  230. + #endif
  231. + );
  232. + 
  233. + Status XTestDiscard(
  234. + #if NeedFunctionPrototypes
  235. +     Display*        /* dpy */
  236. + #endif
  237. + );
  238. + 
  239. + _XFUNCPROTOEND
  240. + 
  241. + #endif /* _XTEST_SERVER_ */
  242. + 
  243. + #endif
  244. *** /dev/null    Wed Sep  9 15:40:33 1992
  245. --- mit/extensions/include/xteststr.h    Mon Apr 20 13:15:45 1992
  246. ***************
  247. *** 0 ****
  248. --- 1,84 ----
  249. + /* $XConsortium: xteststr.h,v 1.5 92/04/20 13:14:15 rws Exp $ */
  250. + /*
  251. + 
  252. + Copyright 1992 by the Massachusetts Institute of Technology
  253. + 
  254. + Permission to use, copy, modify, distribute, and sell this software and its
  255. + documentation for any purpose is hereby granted without fee, provided that
  256. + the above copyright notice appear in all copies and that both that
  257. + copyright notice and this permission notice appear in supporting
  258. + documentation, and that the name of M.I.T. not be used in advertising or
  259. + publicity pertaining to distribution of the software without specific,
  260. + written prior permission.  M.I.T. makes no representations about the
  261. + suitability of this software for any purpose.  It is provided "as is"
  262. + without express or implied warranty.
  263. + 
  264. + */
  265. + 
  266. + #define XTestCurrentCursor ((Cursor)1)
  267. + 
  268. + typedef struct {
  269. +     CARD8    reqType;    /* always XTestReqCode */
  270. +     CARD8    xtReqType;    /* always X_XTestGetVersion */
  271. +     CARD16    length B16;
  272. +     CARD8    majorVersion;
  273. +     CARD8    pad;
  274. +     CARD16    minorVersion B16;
  275. + } xXTestGetVersionReq;
  276. + #define sz_xXTestGetVersionReq 8
  277. + 
  278. + typedef struct {
  279. +     BYTE    type;            /* X_Reply */
  280. +     CARD8    majorVersion;
  281. +     CARD16    sequenceNumber B16;
  282. +     CARD32    length B32;
  283. +     CARD16    minorVersion B16;
  284. +     CARD16    pad0 B16;
  285. +     CARD32    pad1 B32;
  286. +     CARD32    pad2 B32;
  287. +     CARD32    pad3 B32;
  288. +     CARD32    pad4 B32;
  289. +     CARD32    pad5 B32;
  290. + } xXTestGetVersionReply;
  291. + #define sz_xXTestGetVersionReply 32
  292. + 
  293. + typedef struct {
  294. +     CARD8    reqType;    /* always XTestReqCode */
  295. +     CARD8    xtReqType;    /* always X_XTestCompareCursor */
  296. +     CARD16    length B16;
  297. +     Window    window B32;
  298. +     Cursor    cursor B32;
  299. + } xXTestCompareCursorReq;
  300. + #define sz_xXTestCompareCursorReq 12
  301. + 
  302. + typedef struct {
  303. +     BYTE    type;            /* X_Reply */
  304. +     BOOL    same;
  305. +     CARD16    sequenceNumber B16;
  306. +     CARD32    length B32;
  307. +     CARD32    pad0 B32;
  308. +     CARD32    pad1 B32;
  309. +     CARD32    pad2 B32;
  310. +     CARD32    pad3 B32;
  311. +     CARD32    pad4 B32;
  312. +     CARD32    pad5 B32;
  313. + } xXTestCompareCursorReply;
  314. + #define sz_xXTestCompareCursorReply 32
  315. + 
  316. + /* used only on the client side */
  317. + typedef struct {
  318. +     CARD8    reqType;    /* always XTestReqCode */
  319. +     CARD8    xtReqType;    /* always X_XTestFakeInput */
  320. +     CARD16    length B16;
  321. +     BYTE    type;
  322. +     BYTE    detail;
  323. +     CARD16    pad0 B16;
  324. +     Time    time B32;
  325. +     Window    root B32;
  326. +     CARD32    pad1 B32;
  327. +     CARD32    pad2 B32;
  328. +     INT16    rootX B16, rootY B16;
  329. +     CARD32    pad3 B32;
  330. +     CARD32    pad4 B32;
  331. + } xXTestFakeInputReq;
  332. + #define sz_xXTestFakeInputReq 36
  333. *** /tmp/,RCSt1016576    Wed Sep  9 15:43:55 1992
  334. --- mit/extensions/lib/Imakefile    Wed Sep  9 15:43:56 1992
  335. ***************
  336. *** 1,4 ****
  337. ! XCOMM $XConsortium: Imakefile,v 1.33 91/07/22 22:56:37 rws Exp $
  338.   #define DoNormalLib NormalLibXext
  339.   #define DoSharedLib SharedLibXext
  340.   #define DoDebugLib DebugLibXext
  341. --- 1,4 ----
  342. ! XCOMM $XConsortium: Imakefile,v 1.33.1.1 92/09/09 15:29:32 rws Exp $
  343.   #define DoNormalLib NormalLibXext
  344.   #define DoSharedLib SharedLibXext
  345.   #define DoDebugLib DebugLibXext
  346. ***************
  347. *** 9,15 ****
  348.   REQUIREDLIBS = $(XLIBSRC)/libX11.a
  349.   #endif
  350.   
  351. - #if BuildXInputLib || BuildPexClients
  352.   #define IHaveSubdirs
  353.   #define PassCDebugFlags 'CDEBUGFLAGS=$(CDEBUGFLAGS)'
  354.   #if BuildXInputLib
  355. --- 9,14 ----
  356. ***************
  357. *** 18,25 ****
  358.   #if BuildPexClients
  359.         PEXDIRS = PEX
  360.   #endif
  361. !       SUBDIRS = $(XINPUTDIRS) $(PEXDIRS)
  362. ! #endif
  363.   
  364.   #if HasShm
  365.         SHMSRCS = XShm.c
  366. --- 17,23 ----
  367.   #if BuildPexClients
  368.         PEXDIRS = PEX
  369.   #endif
  370. !       SUBDIRS = $(XINPUTDIRS) $(PEXDIRS) xtest
  371.   
  372.   #if HasShm
  373.         SHMSRCS = XShm.c
  374. *** /dev/null    Wed Sep  9 15:40:33 1992
  375. --- mit/extensions/lib/xtest/Imakefile    Wed Sep  9 15:44:55 1992
  376. ***************
  377. *** 0 ****
  378. --- 1,49 ----
  379. + XCOMM $XConsortium: Imakefile,v 1.2.1.1 92/09/09 15:38:45 rws Exp $
  380. + #ifndef NormalLibXTest
  381. + #define NormalLibXTest YES
  382. + #endif
  383. + #define DoNormalLib NormalLibXTest
  384. + #define DoSharedLib SharedLibXTest
  385. + #define DoDebugLib DebugLibXTest
  386. + #define DoProfileLib ProfileLibXTest
  387. + #include <Library.tmpl>
  388. + 
  389. + #ifdef RsArchitecture
  390. + REQUIREDLIBS = $(EXTENSIONSRC)/lib/libXext.a $(XLIBSRC)/libX11.a
  391. + #endif
  392. + 
  393. + INCLUDES = -I$(TOP) -I$(XLIBSRC) -I../../include
  394. + 
  395. + SRCS = XTest.c
  396. + OBJS = XTest.o
  397. + 
  398. + LINTLIBS = $(LINTXLIB)
  399. + 
  400. + LibraryObjectRule()
  401. + 
  402. + #if DoSharedLib
  403. + #if DoNormalLib
  404. + SharedLibraryTarget(Xtst,$(SOXTESTREV),$(OBJS),shared,..)
  405. + #else
  406. + SharedLibraryTarget(Xtst,$(SOXTESTREV),$(OBJS),.,.)
  407. + #endif
  408. + InstallSharedLibrary(Xtst,$(SOXTESTREV),$(USRLIBDIR))
  409. + #endif
  410. + #if DoNormalLib
  411. + NormalLibraryTarget(Xtst,$(OBJS))
  412. + InstallLibrary(Xtst,$(USRLIBDIR))
  413. + #endif
  414. + #if DoProfileLib
  415. + ProfiledLibraryTarget(Xtst,$(OBJS))
  416. + InstallLibrary(Xtst_p,$(USRLIBDIR))
  417. + #endif
  418. + #if DoDebugLib
  419. + DebuggedLibraryTarget(Xtst,$(OBJS))
  420. + #endif
  421. + 
  422. + LintLibraryTarget(Xtst,$(SRCS))
  423. + InstallLintLibrary(Xtst,$(LINTLIBDIR))
  424. + 
  425. + DependTarget()
  426. + 
  427. + NormalLintTarget($(SRCS))
  428. *** /dev/null    Wed Sep  9 15:40:33 1992
  429. --- mit/extensions/lib/xtest/XTest.c    Mon Apr 20 13:16:12 1992
  430. ***************
  431. *** 0 ****
  432. --- 1,272 ----
  433. + /* $XConsortium: XTest.c,v 1.7 92/04/20 13:14:52 rws Exp $ */
  434. + /*
  435. + 
  436. + Copyright 1990, 1991 by UniSoft Group Limited
  437. + Copyright 1992 by the Massachusetts Institute of Technology
  438. + 
  439. + Permission to use, copy, modify, distribute, and sell this software and its
  440. + documentation for any purpose is hereby granted without fee, provided that
  441. + the above copyright notice appear in all copies and that both that
  442. + copyright notice and this permission notice appear in supporting
  443. + documentation, and that the name of M.I.T. not be used in advertising or
  444. + publicity pertaining to distribution of the software without specific,
  445. + written prior permission.  M.I.T. makes no representations about the
  446. + suitability of this software for any purpose.  It is provided "as is"
  447. + without express or implied warranty.
  448. + 
  449. + */
  450. + 
  451. + #define NEED_REPLIES
  452. + #include "Xlibint.h"
  453. + #include "XTest.h"
  454. + #include "xteststr.h"
  455. + #include "Xext.h"
  456. + #include "extutil.h"
  457. + 
  458. + static XExtensionInfo _xtest_info_data;
  459. + static XExtensionInfo *xtest_info = &_xtest_info_data;
  460. + static /* const */ char *xtest_extension_name = XTestExtensionName;
  461. + 
  462. + #define XTestCheckExtension(dpy,i,val) \
  463. +   XextCheckExtension (dpy, i, xtest_extension_name, val)
  464. + 
  465. + /*****************************************************************************
  466. +  *                                                                           *
  467. +  *               private utility routines                          *
  468. +  *                                                                           *
  469. +  *****************************************************************************/
  470. + 
  471. + static int close_display();
  472. + static /* const */ XExtensionHooks xtest_extension_hooks = {
  473. +     NULL,                /* create_gc */
  474. +     NULL,                /* copy_gc */
  475. +     NULL,                /* flush_gc */
  476. +     NULL,                /* free_gc */
  477. +     NULL,                /* create_font */
  478. +     NULL,                /* free_font */
  479. +     close_display,            /* close_display */
  480. +     NULL,                /* wire_to_event */
  481. +     NULL,                /* event_to_wire */
  482. +     NULL,                /* error */
  483. +     NULL                /* error_string */
  484. + };
  485. + 
  486. + static XEXT_GENERATE_FIND_DISPLAY (find_display, xtest_info,
  487. +                    xtest_extension_name, 
  488. +                    &xtest_extension_hooks, XTestNumberEvents,
  489. +                    NULL)
  490. + 
  491. + static XEXT_GENERATE_CLOSE_DISPLAY (close_display, xtest_info)
  492. + 
  493. + /*****************************************************************************
  494. +  *                                                                           *
  495. +  *            public routines                                *
  496. +  *                                                                           *
  497. +  *****************************************************************************/
  498. + 
  499. + Bool
  500. + XTestQueryExtension (dpy, event_basep, error_basep, majorp, minorp)
  501. +     Display *dpy;
  502. +     int *event_basep, *error_basep;
  503. +     int *majorp, *minorp;
  504. + {
  505. +     XExtDisplayInfo *info = find_display (dpy);
  506. +     register xXTestGetVersionReq *req;
  507. +     xXTestGetVersionReply rep;
  508. + 
  509. +     if (XextHasExtension(info)) {
  510. +     LockDisplay(dpy);
  511. +     GetReq(XTestGetVersion, req);
  512. +     req->reqType = info->codes->major_opcode;
  513. +     req->xtReqType = X_XTestGetVersion;
  514. +     req->majorVersion = XTestMajorVersion;
  515. +     req->minorVersion = XTestMinorVersion;
  516. +     if (!_XReply(dpy, (xReply *)&rep, 0, xFalse)) {
  517. +         UnlockDisplay(dpy);
  518. +         SyncHandle();
  519. +         return False;
  520. +     }
  521. +     UnlockDisplay(dpy);
  522. +     SyncHandle();
  523. +     *event_basep = info->codes->first_event;
  524. +     *error_basep = info->codes->first_error;
  525. +     *majorp = rep.majorVersion;
  526. +     *minorp = rep.minorVersion;
  527. +     return True;
  528. +     } else {
  529. +     return False;
  530. +     }
  531. + }
  532. + 
  533. + Bool
  534. + XTestCompareCursorWithWindow(dpy, window, cursor)
  535. +     Display *dpy;
  536. +     Window window;
  537. +     Cursor cursor;
  538. + {
  539. +     XExtDisplayInfo *info = find_display (dpy);
  540. +     register xXTestCompareCursorReq *req;
  541. +     xXTestCompareCursorReply rep;
  542. + 
  543. +     XTestCheckExtension (dpy, info, 0);
  544. + 
  545. +     LockDisplay(dpy);
  546. +     GetReq(XTestCompareCursor, req);
  547. +     req->reqType = info->codes->major_opcode;
  548. +     req->xtReqType = X_XTestCompareCursor;
  549. +     req->window = window;
  550. +     req->cursor = cursor;
  551. +     if (!_XReply(dpy, (xReply *)&rep, 0, xFalse)) {
  552. +     UnlockDisplay(dpy);
  553. +     SyncHandle();
  554. +     return False;
  555. +     }
  556. +     UnlockDisplay(dpy);
  557. +     SyncHandle();
  558. +     return rep.same;
  559. + }
  560. + 
  561. + Bool
  562. + XTestCompareCurrentCursorWithWindow(dpy, window)
  563. +     Display *dpy;
  564. +     Window window;
  565. + {
  566. +     return XTestCompareCursorWithWindow(dpy, window, XTestCurrentCursor);
  567. + }
  568. + 
  569. + XTestFakeKeyEvent(dpy, keycode, is_press, delay)
  570. +     Display *dpy;
  571. +     unsigned int keycode;
  572. +     Bool is_press;
  573. +     unsigned long delay;
  574. + {
  575. +     XExtDisplayInfo *info = find_display (dpy);
  576. +     register xXTestFakeInputReq *req;
  577. + 
  578. +     XTestCheckExtension (dpy, info, 0);
  579. + 
  580. +     LockDisplay(dpy);
  581. +     GetReq(XTestFakeInput, req);
  582. +     req->reqType = info->codes->major_opcode;
  583. +     req->xtReqType = X_XTestFakeInput;
  584. +     req->type = is_press ? KeyPress : KeyRelease;
  585. +     req->detail = keycode;
  586. +     req->time = delay;
  587. +     UnlockDisplay(dpy);
  588. +     SyncHandle();
  589. + }
  590. + 
  591. + XTestFakeButtonEvent(dpy, button, is_press, delay)
  592. +     Display *dpy;
  593. +     unsigned int button;
  594. +     Bool is_press;
  595. +     unsigned long delay;
  596. + {
  597. +     XExtDisplayInfo *info = find_display (dpy);
  598. +     register xXTestFakeInputReq *req;
  599. + 
  600. +     XTestCheckExtension (dpy, info, 0);
  601. + 
  602. +     LockDisplay(dpy);
  603. +     GetReq(XTestFakeInput, req);
  604. +     req->reqType = info->codes->major_opcode;
  605. +     req->xtReqType = X_XTestFakeInput;
  606. +     req->type = is_press ? ButtonPress : ButtonRelease;
  607. +     req->detail = button;
  608. +     req->time = delay;
  609. +     UnlockDisplay(dpy);
  610. +     SyncHandle();
  611. + }
  612. + 
  613. + XTestFakeMotionEvent(dpy, screen, x, y, delay)
  614. +     Display *dpy;
  615. +     int screen;
  616. +     int x, y;
  617. +     unsigned long delay;
  618. + {
  619. +     XExtDisplayInfo *info = find_display (dpy);
  620. +     register xXTestFakeInputReq *req;
  621. + 
  622. +     XTestCheckExtension (dpy, info, 0);
  623. + 
  624. +     LockDisplay(dpy);
  625. +     GetReq(XTestFakeInput, req);
  626. +     req->reqType = info->codes->major_opcode;
  627. +     req->xtReqType = X_XTestFakeInput;
  628. +     req->type = MotionNotify;
  629. +     req->detail = False;
  630. +     if (screen == -1)
  631. +     req->root = None;
  632. +     else
  633. +     req->root = RootWindow(dpy, screen);
  634. +     req->rootX = x;
  635. +     req->rootY = y;
  636. +     req->time = delay;
  637. +     UnlockDisplay(dpy);
  638. +     SyncHandle();
  639. + }
  640. + 
  641. + XTestFakeRelativeMotionEvent(dpy, dx, dy, delay)
  642. +     Display *dpy;
  643. +     int dx, dy;
  644. +     unsigned long delay;
  645. + {
  646. +     XExtDisplayInfo *info = find_display (dpy);
  647. +     register xXTestFakeInputReq *req;
  648. + 
  649. +     XTestCheckExtension (dpy, info, 0);
  650. + 
  651. +     LockDisplay(dpy);
  652. +     GetReq(XTestFakeInput, req);
  653. +     req->reqType = info->codes->major_opcode;
  654. +     req->xtReqType = X_XTestFakeInput;
  655. +     req->type = MotionNotify;
  656. +     req->detail = True;
  657. +     req->root = None;
  658. +     req->rootX = dx;
  659. +     req->rootY = dy;
  660. +     req->time = delay;
  661. +     UnlockDisplay(dpy);
  662. +     SyncHandle();
  663. + }
  664. + 
  665. + void
  666. + XTestSetGContextOfGC(gc, gid)
  667. +     GC gc;
  668. +     GContext gid;
  669. + {
  670. +     gc->gid = gid;
  671. + }
  672. + 
  673. + void
  674. + XTestSetVisualIDOfVisual(visual, visualid)
  675. +     Visual *visual;
  676. +     VisualID visualid;
  677. + {
  678. +     visual->visualid = visualid;
  679. + }
  680. + 
  681. + static xReq _dummy_request = {
  682. +     0, 0, 0
  683. + };
  684. + 
  685. + Status
  686. + XTestDiscard(dpy)
  687. +     Display *dpy;
  688. + {
  689. +     Bool something;
  690. +     register char *ptr;
  691. + 
  692. +     LockDisplay(dpy);
  693. +     if (something = (dpy->bufptr != dpy->buffer)) {
  694. +     for (ptr = dpy->buffer;
  695. +          ptr < dpy->bufptr;
  696. +          ptr += (((xReq *)ptr)->length << 2))
  697. +         dpy->request--;
  698. +     dpy->bufptr = dpy->buffer;
  699. +     dpy->last_req = (char *)&_dummy_request;
  700. +     }
  701. +     UnlockDisplay(dpy);
  702. +     SyncHandle();
  703. +     return something;
  704. + }
  705. *** /tmp/,RCSt1016593    Wed Sep  9 15:46:33 1992
  706. --- mit/extensions/server/Imakefile    Wed Sep  9 15:46:35 1992
  707. ***************
  708. *** 1,4 ****
  709. ! XCOMM $XConsortium: Imakefile,v 5.15 91/07/16 23:09:51 gildea Exp $
  710.   #include <Server.tmpl>
  711.   
  712.   #if BuildXInputExt || BuildPexExt || BuildPexClients
  713. --- 1,4 ----
  714. ! XCOMM $XConsortium: Imakefile,v 5.15.1.1 92/09/09 15:32:22 rws Exp $
  715.   #include <Server.tmpl>
  716.   
  717.   #if BuildXInputExt || BuildPexExt || BuildPexClients
  718. ***************
  719. *** 19,26 ****
  720.     SHMSRCS = shm.c
  721.     SHMOBJS = shm.o
  722.   #endif
  723. !        SRCS = shape.c $(SHMSRCS) multibuf.c mitmisc.c xtest1di.c xtest1dd.c
  724. !        OBJS = shape.o $(SHMOBJS) multibuf.o mitmisc.o xtest1di.o xtest1dd.o
  725.      INCLUDES = -I../include -I$(INCLUDESRC) -I$(SERVERSRC)/include
  726.      LINTLIBS = ../../server/dix/llib-ldix.ln ../../server/os/4.2bsd/llib-los.ln
  727.           SUBDIRS = $(XINPUTDIRS) $(PEXDIRS)
  728. --- 19,26 ----
  729.     SHMSRCS = shm.c
  730.     SHMOBJS = shm.o
  731.   #endif
  732. !        SRCS = shape.c $(SHMSRCS) multibuf.c mitmisc.c sleepuntil.c xtest.c xtest1di.c xtest1dd.c
  733. !        OBJS = shape.o $(SHMOBJS) multibuf.o mitmisc.o sleepuntil.o xtest.o xtest1di.o xtest1dd.o
  734.      INCLUDES = -I../include -I$(INCLUDESRC) -I$(SERVERSRC)/include
  735.      LINTLIBS = ../../server/dix/llib-ldix.ln ../../server/os/4.2bsd/llib-los.ln
  736.           SUBDIRS = $(XINPUTDIRS) $(PEXDIRS)
  737. *** /dev/null    Wed Sep  9 15:40:33 1992
  738. --- mit/extensions/server/sleepuntil.c    Mon Feb 24 19:02:47 1992
  739. ***************
  740. *** 0 ****
  741. --- 1,199 ----
  742. + /*
  743. +  * $XConsortium: sleepuntil.c,v 1.1 92/02/24 19:02:27 keith Exp $
  744. +  *
  745. +  * Copyright 1992 Massachusetts Institute of Technology
  746. +  *
  747. +  * Permission to use, copy, modify, distribute, and sell this software and its
  748. +  * documentation for any purpose is hereby granted without fee, provided that
  749. +  * the above copyright notice appear in all copies and that both that
  750. +  * copyright notice and this permission notice appear in supporting
  751. +  * documentation, and that the name of M.I.T. not be used in advertising or
  752. +  * publicity pertaining to distribution of the software without specific,
  753. +  * written prior permission.  M.I.T. makes no representations about the
  754. +  * suitability of this software for any purpose.  It is provided "as is"
  755. +  * without express or implied warranty.
  756. +  *
  757. +  * M.I.T. DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING ALL
  758. +  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL M.I.T.
  759. +  * BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
  760. +  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION
  761. +  * OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN 
  762. +  * CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
  763. +  *
  764. +  * Author:  Keith Packard, MIT X Consortium
  765. +  */
  766. + 
  767. + /* dixsleep.c - implement millisecond timeouts for X clients */
  768. + 
  769. + #include "X.h"
  770. + #include "Xmd.h"
  771. + #include "misc.h"
  772. + #include "windowstr.h"
  773. + #include "dixstruct.h"
  774. + #include "pixmapstr.h"
  775. + #include "scrnintstr.h"
  776. + 
  777. + typedef struct _Sertafied {
  778. +     struct _Sertafied    *next;
  779. +     TimeStamp        revive;
  780. +     ClientPtr        pClient;
  781. +     XID            id;
  782. +     void        (*notifyFunc)();
  783. +     pointer        closure;
  784. + } SertafiedRec, *SertafiedPtr;
  785. + 
  786. + static SertafiedPtr pPending;
  787. + static RESTYPE        SertafiedResType;
  788. + static Bool        BlockHandlerRegistered;
  789. + static int        SertafiedGeneration;
  790. + static void        WachetAuf();
  791. + static void        SertafiedDelete();
  792. + static void        SertafiedBlockHandler();
  793. + static void        SertafiedWakeupHandler();
  794. + 
  795. + ClientSleepUntil (client, revive, notifyFunc, closure)
  796. +     ClientPtr    client;
  797. +     TimeStamp    *revive;
  798. +     void    (*notifyFunc)();
  799. +     pointer    closure;
  800. + {
  801. +     SertafiedPtr    pRequest, pReq, pPrev;
  802. + 
  803. +     if (SertafiedGeneration != serverGeneration)
  804. +     {
  805. +     SertafiedResType = CreateNewResourceType (SertafiedDelete);
  806. +     if (!SertafiedResType)
  807. +         return FALSE;
  808. +     SertafiedGeneration = serverGeneration;
  809. +     BlockHandlerRegistered = FALSE;
  810. +     }
  811. +     pRequest = (SertafiedPtr) xalloc (sizeof (SertafiedRec));
  812. +     if (!pRequest)
  813. +     return FALSE;
  814. +     pRequest->pClient = client;
  815. +     pRequest->revive = *revive;
  816. +     pRequest->id = FakeClientID (client->index);
  817. +     pRequest->closure = closure;
  818. +     if (!BlockHandlerRegistered)
  819. +     {
  820. +     if (!RegisterBlockAndWakeupHandlers (SertafiedBlockHandler,
  821. +                          SertafiedWakeupHandler,
  822. +                          (pointer) 0))
  823. +     {
  824. +         xfree (pRequest);
  825. +         return FALSE;
  826. +     }
  827. +     BlockHandlerRegistered = TRUE;
  828. +     }
  829. +     pRequest->notifyFunc = 0;
  830. +     if (!AddResource (pRequest->id, SertafiedResType, (pointer) pRequest))
  831. +     return FALSE;
  832. +     if (!notifyFunc)
  833. +     notifyFunc = WachetAuf;
  834. +     pRequest->notifyFunc = notifyFunc;
  835. +     /* Insert into time-ordered queue, with earliest activation time coming first. */
  836. +     pPrev = 0;
  837. +     for (pReq = pPending; pReq; pReq = pReq->next)
  838. +     {
  839. +     if (CompareTimeStamps (pReq->revive, *revive) == LATER)
  840. +         break;
  841. +     pPrev = pReq;
  842. +     }
  843. +     if (pPrev)
  844. +     pPrev->next = pRequest;
  845. +     else
  846. +     pPending = pRequest;
  847. +     pRequest->next = pReq;
  848. +     IgnoreClient (client);
  849. +     return TRUE;
  850. + }
  851. + 
  852. + static void
  853. + WachetAuf (client, closure)
  854. +     ClientPtr    client;
  855. +     pointer    closure;
  856. + {
  857. +     if (!client->clientGone)
  858. +     AttendClient (client);
  859. + }
  860. + 
  861. + 
  862. + static void
  863. + SertafiedDelete (pRequest)
  864. +     SertafiedPtr    pRequest;
  865. + {
  866. +     SertafiedPtr    pReq, pPrev;
  867. + 
  868. +     pPrev = 0;
  869. +     for (pReq = pPending; pReq; pReq = pReq->next)
  870. +     if (pReq == pRequest)
  871. +     {
  872. +         if (pPrev)
  873. +         pPrev->next = pReq->next;
  874. +         else
  875. +         pPending = pReq->next;
  876. +         break;
  877. +     }
  878. +     if (pRequest->notifyFunc)
  879. +     (*pRequest->notifyFunc) (pRequest->pClient, pRequest->closure);
  880. +     xfree (pRequest);
  881. + }
  882. + 
  883. + static void
  884. + SertafiedBlockHandler (data, wt, LastSelectMask)
  885. +     pointer        data;        /* unused */
  886. +     pointer        wt;            /* wait time */
  887. +     long        *LastSelectMask;
  888. + {
  889. +     SertafiedPtr        pReq, pNext;
  890. +     unsigned long        newdelay, olddelay;
  891. +     TimeStamp            now;
  892. + 
  893. +     if (!pPending)
  894. +     return;
  895. +     now.milliseconds = GetTimeInMillis ();
  896. +     now.months = currentTime.months;
  897. +     if ((int) (now.milliseconds - currentTime.milliseconds) < 0)
  898. +     now.months++;
  899. +     for (pReq = pPending; pReq; pReq = pNext)
  900. +     {
  901. +     pNext = pReq->next;
  902. +     if (CompareTimeStamps (pReq->revive, now) == LATER)
  903. +         break;
  904. +     FreeResource (pReq->id, RT_NONE);
  905. +     }
  906. +     pReq = pPending;
  907. +     if (!pReq)
  908. +     return;
  909. +     newdelay = pReq->revive.milliseconds - now.milliseconds;
  910. +     AdjustWaitForDelay (wt, newdelay);
  911. + }
  912. + 
  913. + static void
  914. + SertafiedWakeupHandler (data, i, LastSelectMask)
  915. +     pointer        data;
  916. +     int            i;
  917. +     long        *LastSelectMask;
  918. + {
  919. +     SertafiedPtr    pReq, pNext;
  920. +     TimeStamp        now;
  921. + 
  922. +     now.milliseconds = GetTimeInMillis ();
  923. +     now.months = currentTime.months;
  924. +     if ((int) (now.milliseconds - currentTime.milliseconds) < 0)
  925. +     now.months++;
  926. +     for (pReq = pPending; pReq; pReq = pNext)
  927. +     {
  928. +     pNext = pReq->next;
  929. +     if (CompareTimeStamps (pReq->revive, now) == LATER)
  930. +         break;
  931. +     FreeResource (pReq->id, RT_NONE);
  932. +     }
  933. +     if (!pPending)
  934. +     {
  935. +     RemoveBlockAndWakeupHandlers (SertafiedBlockHandler,
  936. +                       SertafiedWakeupHandler,
  937. +                       (pointer) 0);
  938. +     BlockHandlerRegistered = FALSE;
  939. +     }
  940. + }
  941. *** /dev/null    Wed Sep  9 17:02:52 1992
  942. --- mit/extensions/server/xtest.c    Wed Sep  9 17:09:49 1992
  943. ***************
  944. *** 0 ****
  945. --- 1,358 ----
  946. + /* $XConsortium: xtest.c,v 1.12.1.1 92/09/09 17:08:16 rws Exp $ */
  947. + /*
  948. + 
  949. + Copyright 1992 by the Massachusetts Institute of Technology
  950. + 
  951. + Permission to use, copy, modify, distribute, and sell this software and its
  952. + documentation for any purpose is hereby granted without fee, provided that
  953. + the above copyright notice appear in all copies and that both that
  954. + copyright notice and this permission notice appear in supporting
  955. + documentation, and that the name of M.I.T. not be used in advertising or
  956. + publicity pertaining to distribution of the software without specific,
  957. + written prior permission.  M.I.T. makes no representations about the
  958. + suitability of this software for any purpose.  It is provided "as is"
  959. + without express or implied warranty.
  960. + 
  961. + */
  962. + 
  963. + #include "X.h"
  964. + #define NEED_EVENTS
  965. + #include "Xproto.h"
  966. + #include "misc.h"
  967. + #include "os.h"
  968. + #include "dixstruct.h"
  969. + #include "extnsionst.h"
  970. + #include "windowstr.h"
  971. + #include "inputstr.h"
  972. + #include "scrnintstr.h"
  973. + #define _XTEST_SERVER_
  974. + #include "XTest.h"
  975. + #include "xteststr.h"
  976. + 
  977. + static unsigned char XTestReqCode;
  978. + static int ProcXTestDispatch(), SProcXTestDispatch();
  979. + static void XTestResetProc();
  980. + static int XTestSwapFakeInput();
  981. + CursorPtr GetSpriteCursor();
  982. + WindowPtr GetCurrentRootWindow();
  983. + extern int screenIsSaved;
  984. + 
  985. + void
  986. + XTestExtensionInit()
  987. + {
  988. +     ExtensionEntry *extEntry, *AddExtension();
  989. + 
  990. +     if (extEntry = AddExtension(XTestExtensionName, 0, 0,
  991. +                  ProcXTestDispatch, SProcXTestDispatch,
  992. +                  XTestResetProc, StandardMinorOpcode))
  993. +     XTestReqCode = (unsigned char)extEntry->base;
  994. + }
  995. + 
  996. + /*ARGSUSED*/
  997. + static void
  998. + XTestResetProc (extEntry)
  999. + ExtensionEntry    *extEntry;
  1000. + {
  1001. + }
  1002. + 
  1003. + static int
  1004. + ProcXTestGetVersion(client)
  1005. +     register ClientPtr client;
  1006. + {
  1007. +     REQUEST(xXTestGetVersionReq);
  1008. +     xXTestGetVersionReply rep;
  1009. +     register int n;
  1010. + 
  1011. +     REQUEST_SIZE_MATCH(xXTestGetVersionReq);
  1012. +     rep.type = X_Reply;
  1013. +     rep.length = 0;
  1014. +     rep.sequenceNumber = client->sequence;
  1015. +     rep.majorVersion = XTestMajorVersion;
  1016. +     rep.minorVersion = XTestMinorVersion;
  1017. +     if (client->swapped) {
  1018. +         swaps(&rep.sequenceNumber, n);
  1019. +     swaps(&rep.minorVersion, n);
  1020. +     }
  1021. +     WriteToClient(client, sizeof(xXTestGetVersionReply), (char *)&rep);
  1022. +     return(client->noClientException);
  1023. + }
  1024. + 
  1025. + static int
  1026. + ProcXTestCompareCursor(client)
  1027. +     register ClientPtr client;
  1028. + {
  1029. +     REQUEST(xXTestCompareCursorReq);
  1030. +     xXTestCompareCursorReply rep;
  1031. +     WindowPtr pWin;
  1032. +     CursorPtr pCursor;
  1033. +     register int n;
  1034. + 
  1035. +     REQUEST_SIZE_MATCH(xXTestCompareCursorReq);
  1036. +     pWin = (WindowPtr)LookupWindow(stuff->window, client);
  1037. +     if (!pWin)
  1038. +         return(BadWindow);
  1039. +     if (stuff->cursor == None)
  1040. +     pCursor = NullCursor;
  1041. +     else if (stuff->cursor == XTestCurrentCursor)
  1042. +     pCursor = GetSpriteCursor();
  1043. +     else {
  1044. +     pCursor = (CursorPtr)LookupIDByType(stuff->cursor, RT_CURSOR);
  1045. +     if (!pCursor) 
  1046. +     {
  1047. +         client->errorValue = stuff->cursor;
  1048. +         return (BadCursor);
  1049. +     }
  1050. +     }
  1051. +     rep.type = X_Reply;
  1052. +     rep.length = 0;
  1053. +     rep.sequenceNumber = client->sequence;
  1054. +     rep.same = (wCursor(pWin) == pCursor);
  1055. +     if (client->swapped) {
  1056. +         swaps(&rep.sequenceNumber, n);
  1057. +     }
  1058. +     WriteToClient(client, sizeof(xXTestCompareCursorReply), (char *)&rep);
  1059. +     return(client->noClientException);
  1060. + }
  1061. + 
  1062. + static int
  1063. + ProcXTestFakeInput(client)
  1064. +     register ClientPtr client;
  1065. + {
  1066. +     REQUEST(xReq);
  1067. +     int nev;
  1068. +     int    n;
  1069. +     xEvent *ev;
  1070. +     DeviceIntPtr dev;
  1071. +     WindowPtr root;
  1072. + 
  1073. +     nev = (stuff->length << 2) - sizeof(xReq);
  1074. +     if (nev % sizeof(xEvent))
  1075. +     return BadLength;
  1076. +     nev /= sizeof(xEvent);
  1077. +     if (nev != 1)
  1078. +     return BadLength; /* for now */
  1079. +     UpdateCurrentTime();
  1080. +     ev = (xEvent *)&stuff[1];
  1081. +     switch (ev->u.u.type & 0177)
  1082. +     {
  1083. +     case KeyPress:
  1084. +     case KeyRelease:
  1085. +     case MotionNotify:
  1086. +     case ButtonPress:
  1087. +     case ButtonRelease:
  1088. +     break;
  1089. +     default:
  1090. +     client->errorValue = ev->u.u.type;
  1091. +     return BadValue;
  1092. +     }
  1093. +     if (ev->u.keyButtonPointer.time)
  1094. +     {
  1095. +     TimeStamp activateTime;
  1096. +     CARD32 ms;
  1097. + 
  1098. +     activateTime = currentTime;
  1099. +     ms = activateTime.milliseconds + ev->u.keyButtonPointer.time;
  1100. +     if (ms < activateTime.milliseconds)
  1101. +         activateTime.months++;
  1102. +     activateTime.milliseconds = ms;
  1103. +     ev->u.keyButtonPointer.time = 0;
  1104. +     /* swap the request back so we can simply re-execute it */
  1105. +     if (client->swapped)
  1106. +     {
  1107. +             (void) XTestSwapFakeInput(client, stuff);
  1108. +         swaps(&stuff->length, n);
  1109. +     }
  1110. +     ResetCurrentRequest (client);
  1111. +     client->sequence--;
  1112. +     if (!ClientSleepUntil(client, &activateTime, NULL, NULL))
  1113. +     {
  1114. +         /* 
  1115. +          * flush this request - must be in this order because
  1116. +          * ResetCurrentRequest adds the client back to 
  1117. +          * clientsWithInput which will cause the client to
  1118. +          * keep going, instead of waiting for the timeout.
  1119. +          */
  1120. +         (void) ReadRequestFromClient (client);
  1121. +         client->sequence++;
  1122. +         return BadAlloc;
  1123. +     }
  1124. +     return Success;
  1125. +     }
  1126. +     switch (ev->u.u.type & 0177)
  1127. +     {
  1128. +     case KeyPress:
  1129. +     case KeyRelease:
  1130. +     dev = (DeviceIntPtr)LookupKeyboardDevice();
  1131. +     if (ev->u.u.detail < dev->key->curKeySyms.minKeyCode ||
  1132. +         ev->u.u.detail > dev->key->curKeySyms.maxKeyCode)
  1133. +     {
  1134. +         client->errorValue = ev->u.u.detail;
  1135. +         return BadValue;
  1136. +     }
  1137. +     break;
  1138. +     case MotionNotify:
  1139. +     dev = (DeviceIntPtr)LookupPointerDevice();
  1140. +     if (ev->u.keyButtonPointer.root == None)
  1141. +         root = GetCurrentRootWindow();
  1142. +     else
  1143. +     {
  1144. +         root = LookupWindow(ev->u.keyButtonPointer.root, client);
  1145. +         if (!root)
  1146. +         return BadWindow;
  1147. +         if (root->parent)
  1148. +         {
  1149. +         client->errorValue = ev->u.keyButtonPointer.root;
  1150. +         return BadValue;
  1151. +         }
  1152. +     }
  1153. +     if (ev->u.u.detail == xTrue)
  1154. +     {
  1155. +         int x, y;
  1156. +         GetSpritePosition(&x, &y);
  1157. +         ev->u.keyButtonPointer.rootX += x;
  1158. +         ev->u.keyButtonPointer.rootY += y;
  1159. +     }
  1160. +     else if (ev->u.u.detail != xFalse)
  1161. +     {
  1162. +         client->errorValue = ev->u.u.detail;
  1163. +         return BadValue;
  1164. +     }
  1165. +     if (ev->u.keyButtonPointer.rootX < 0)
  1166. +         ev->u.keyButtonPointer.rootX = 0;
  1167. +     else if (ev->u.keyButtonPointer.rootX >= root->drawable.width)
  1168. +         ev->u.keyButtonPointer.rootX = root->drawable.width - 1;
  1169. +     if (ev->u.keyButtonPointer.rootY < 0)
  1170. +         ev->u.keyButtonPointer.rootY = 0;
  1171. +     else if (ev->u.keyButtonPointer.rootY >= root->drawable.height)
  1172. +         ev->u.keyButtonPointer.rootY = root->drawable.height - 1;
  1173. +     if (root != GetCurrentRootWindow())
  1174. +     {
  1175. +         NewCurrentScreen(root->drawable.pScreen,
  1176. +                  ev->u.keyButtonPointer.rootX,
  1177. +                  ev->u.keyButtonPointer.rootY);
  1178. +         return client->noClientException;
  1179. +     }
  1180. +     (*root->drawable.pScreen->SetCursorPosition)
  1181. +         (root->drawable.pScreen,
  1182. +          ev->u.keyButtonPointer.rootX,
  1183. +          ev->u.keyButtonPointer.rootY, FALSE);
  1184. +     break;
  1185. +     case ButtonPress:
  1186. +     case ButtonRelease:
  1187. +     dev = (DeviceIntPtr)LookupPointerDevice();
  1188. +     if (!ev->u.u.detail || ev->u.u.detail > dev->button->numButtons)
  1189. +     {
  1190. +         client->errorValue = ev->u.u.detail;
  1191. +         return BadValue;
  1192. +     }
  1193. +     break;
  1194. +     }
  1195. +     if (screenIsSaved == SCREEN_SAVER_ON)
  1196. +     SaveScreens(SCREEN_SAVER_OFF, ScreenSaverReset);
  1197. +     ev->u.keyButtonPointer.time = currentTime.milliseconds;
  1198. +     (*dev->public.processInputProc)(ev, (DevicePtr)dev, 1); 
  1199. +     return client->noClientException;
  1200. + }
  1201. + 
  1202. + static int
  1203. + ProcXTestDispatch (client)
  1204. +     register ClientPtr    client;
  1205. + {
  1206. +     REQUEST(xReq);
  1207. +     switch (stuff->data)
  1208. +     {
  1209. +     case X_XTestGetVersion:
  1210. +     return ProcXTestGetVersion(client);
  1211. +     case X_XTestCompareCursor:
  1212. +     return ProcXTestCompareCursor(client);
  1213. +     case X_XTestFakeInput:
  1214. +     return ProcXTestFakeInput(client);
  1215. +     default:
  1216. +     return BadRequest;
  1217. +     }
  1218. + }
  1219. + 
  1220. + static int
  1221. + SProcXTestGetVersion(client)
  1222. +     register ClientPtr    client;
  1223. + {
  1224. +     register int n;
  1225. +     REQUEST(xXTestGetVersionReq);
  1226. + 
  1227. +     swaps(&stuff->length, n);
  1228. +     REQUEST_SIZE_MATCH(xXTestGetVersionReq);
  1229. +     swaps(&stuff->minorVersion, n);
  1230. +     return ProcXTestGetVersion(client);
  1231. + }
  1232. + 
  1233. + static int
  1234. + SProcXTestCompareCursor(client)
  1235. +     register ClientPtr    client;
  1236. + {
  1237. +     register int n;
  1238. +     REQUEST(xXTestCompareCursorReq);
  1239. + 
  1240. +     swaps(&stuff->length, n);
  1241. +     REQUEST_SIZE_MATCH(xXTestCompareCursorReq);
  1242. +     swapl(&stuff->window, n);
  1243. +     swapl(&stuff->cursor, n);
  1244. +     return ProcXTestCompareCursor(client);
  1245. + }
  1246. + 
  1247. + static int
  1248. + XTestSwapFakeInput(client, req)
  1249. +     register ClientPtr    client;
  1250. +     xReq *req;
  1251. + {
  1252. +     register int nev;
  1253. +     register xEvent *ev;
  1254. +     xEvent sev;
  1255. +     void (*proc)(), NotImplemented();
  1256. + 
  1257. +     nev = ((req->length << 2) - sizeof(xReq)) / sizeof(xEvent);
  1258. +     for (ev = (xEvent *)&req[1]; --nev >= 0; ev++)
  1259. +     {
  1260. +         /* Swap event */
  1261. +         proc = EventSwapVector[ev->u.u.type & 0177];
  1262. +     /* no swapping proc; invalid event type? */
  1263. +         if (!proc || (int (*)()) proc == (int (*)()) NotImplemented) {
  1264. +         client->errorValue = ev->u.u.type;
  1265. +         return BadValue;
  1266. +     }
  1267. +         (*proc)(ev, &sev);
  1268. +     *ev = sev;
  1269. +     }
  1270. +     return Success;
  1271. + }
  1272. + 
  1273. + static int
  1274. + SProcXTestFakeInput(client)
  1275. +     register ClientPtr    client;
  1276. + {
  1277. +     register int n;
  1278. +     REQUEST(xReq);
  1279. + 
  1280. +     swaps(&stuff->length, n);
  1281. +     n = XTestSwapFakeInput(client, stuff);
  1282. +     if (n != Success)
  1283. +     return n;
  1284. +     return ProcXTestFakeInput(client);
  1285. + }
  1286. + 
  1287. + static int
  1288. + SProcXTestDispatch (client)
  1289. +     register ClientPtr    client;
  1290. + {
  1291. +     REQUEST(xReq);
  1292. +     switch (stuff->data)
  1293. +     {
  1294. +     case X_XTestGetVersion:
  1295. +     return SProcXTestGetVersion(client);
  1296. +     case X_XTestCompareCursor:
  1297. +     return SProcXTestCompareCursor(client);
  1298. +     case X_XTestFakeInput:
  1299. +     return SProcXTestFakeInput(client);
  1300. +     default:
  1301. +     return BadRequest;
  1302. +     }
  1303. + }
  1304. *** /tmp/,RCSt1016604    Wed Sep  9 15:47:54 1992
  1305. --- mit/server/ddx/mi/miinitext.c    Wed Sep  9 15:47:56 1992
  1306. ***************
  1307. *** 21,27 ****
  1308.   SOFTWARE.
  1309.   
  1310.   ******************************************************************/
  1311. ! /* $XConsortium: miinitext.c,v 1.15 90/08/15 08:42:23 rws Exp $ */
  1312.   
  1313.   #ifdef BEZIER
  1314.   extern void BezierExtensionInit();
  1315. --- 21,27 ----
  1316.   SOFTWARE.
  1317.   
  1318.   ******************************************************************/
  1319. ! /* $XConsortium: miinitext.c,v 1.15.1.1 92/09/09 15:34:45 rws Exp $ */
  1320.   
  1321.   #ifdef BEZIER
  1322.   extern void BezierExtensionInit();
  1323. ***************
  1324. *** 44,49 ****
  1325. --- 44,52 ----
  1326.   #ifdef XINPUT
  1327.   extern void XInputExtensionInit();
  1328.   #endif
  1329. + #ifdef XTEST
  1330. + extern void XTestExtensionInit();
  1331. + #endif
  1332.   #ifdef MITMISC
  1333.   extern void MITMiscExtensionInit();
  1334.   #endif
  1335. ***************
  1336. *** 77,82 ****
  1337. --- 80,88 ----
  1338.   #endif
  1339.   #ifdef XINPUT
  1340.       XInputExtensionInit();
  1341. + #endif
  1342. + #ifdef XTEST
  1343. +     XTestExtensionInit();
  1344.   #endif
  1345.   #ifdef MITMISC
  1346.       MITMiscExtensionInit();
  1347.  
  1348. *****************************************************************************
  1349.  
  1350. --
  1351. ;       $B2-(J  $B9,90(J                Email: yoki@ari.ncl.omron.co.jp
  1352. ;    $B8=:_(JKYSA$B8&=$Cf(J        Email:  oki@course.kysa.co.jp
  1353. ;       $B%*%`%m%s3t<02q<R(J        $B%7%9%F%`Am9g8&5f=j(J(RZB)        
  1354. ;       Phone: 075-951-5111 Ext.(3634) Fax:   075-956-7403
  1355.