xlab-980917mine/ 42775 71506 1605 0 6762516130 12576 5ustar hildebinstallxlab-980917mine/CVS/ 42775 71506 1605 0 6745313376 13241 5ustar hildebinstallxlab-980917mine/CVS/Root100664 71506 1605 23 6745313376 14135 0ustar hildebinstall/usr/local/cvsroot xlab-980917mine/CVS/Repository100664 71506 1605 42 6745313376 15372 0ustar hildebinstall/usr/local/cvsroot/xlab-soft/xlab xlab-980917mine/CVS/Entries100664 71506 1605 1705 6745313376 14673 0ustar hildebinstall/Changelog/1.5/Sat Aug 1 07:18:28 1998// /INSTALL/1.1/Thu Jun 4 05:02:28 1998// /Makefile.noimake/1.2/Thu Jun 4 04:53:24 1998// /common.c/1.6/Fri Jul 31 20:00:25 1998// /common.h/1.1/Fri Jul 24 11:59:13 1998// /decode11.c/1.4/Fri Jul 24 11:59:13 1998// /decode11.h/1.1/Fri Jul 24 11:59:13 1998// /fd.c/1.4/Fri Jul 24 11:59:14 1998// /fd.h/1.4/Fri Jul 24 11:59:14 1998// /parse.l/1.4/Fri Jul 24 11:59:14 1998// /parse.y/1.4/Fri Jul 24 11:59:15 1998// /print11.c/1.4/Fri Jul 24 11:59:15 1998// /print11.h/1.2/Sat Aug 1 07:29:05 1998// /prtype.c/1.3/Fri Jul 24 11:59:16 1998// /record.c/1.8/Fri Jul 24 11:59:16 1998// /record.h/1.3/Fri Jul 24 11:59:17 1998// /scope.c/1.5/Fri Jul 31 20:01:34 1998// /scope.h/1.4/Fri Jul 24 11:59:18 1998// /server.c/1.4/Fri Jul 24 11:59:18 1998// /server.h/1.1/Fri Jul 24 11:59:19 1998// /table11.c/1.3/Fri Jul 24 11:59:19 1998// /table11.h/1.1/Fri Jul 24 11:59:19 1998// /x11.h/1.3/Fri Jul 24 11:59:20 1998// D/doc//// D/test//// xlab-980917mine/Changelog100664 71506 1605 3353 6745313376 14517 0ustar hildebinstallXlab 0.8.4 ------------------------ . scope.c: don't reopen standard input after EOF has been received on it, as it may crash xlab. . beautify common.c . server.c: fix a problem of reply length. . record.c: first working version of automatic window capture at replay. Xlab 0.8.3 24-july-1998 ------------------------ All files have been affected in that release: . A lot of corrections from Liora Maron (liora@ilogix.com.il) to allow xlab to replay correctly Motif Drag&Drop. Those improvements should help for a lot of others operations too. Replay Synchronisation mecanism, based on window mapping detection is working now. . Change the way of Recording/Replay of Keyboard events. This should allow Keyboard events to replay correctly on Sun (Success report), and hopefully SGI plateforms. . Change the way of generating Sequence Number in X protocol Replies from server, to avoid "Xlib: sequence lost" messages. It seems to be OK for replies now, but still some problems for some events (Entry Notify) and some Error reports. . Major code review to suppress compilation warnings, make the code C ANSI compliant (but still compatible with old style), and with a consistent presentation (K&R coding style). Xlab 0.8.2 04-june-1998 ------------------------ . scope.c and common.c: allow xlab to restart immediately after shutdown (Stuart Cunningham) . Imakefile added. Thanks to Aidas Kasparas for reporting the problem with Solaris. . record.c, OpenFile(): remove UsingFD call, as it is not used, and the resource never released. . INSTALL file and ChangeLog File now part of distribution. . work begins towards C ansi compliance and elimination of warnings. Xlab 0.8.1 24-may-1998 ------------------------- First general release. xlab-980917mine/common.h100664 71506 1605 732 6745313376 14324 0ustar hildebinstall#if __STDC__ || defined(__cplusplus) #define P_(s) s #else #define P_(s) () #endif /* common.c */ char *Malloc P_((long n)); void SignalURG P_((int n)); void SignalPIPE P_((int n)); void SignalINT P_((int n)); void SignalQUIT P_((int n)); void SignalTERM P_((int n)); void SignalTSTP P_((int n)); void SignalCONT P_((int n)); void SignalUSR1 P_((int n)); void SignalHUP P_((int n)); void SetSignalHandling P_((void)); void SetUpConnectionSocket P_((int iport)); #undef P_ xlab-980917mine/INSTALL100664 71506 1605 376 6745313376 13720 0ustar hildebinstall# $Id: INSTALL,v 1.1 1998/06/04 05:02:28 marc Exp $ # # Install file. (c) Marc Vertes, 1998 # Just do 'xmkmf', then 'make depend', then 'make', then 'make install'. If your system doesn't support Imakefiles, a default Makefile is provided. Good luck. xlab-980917mine/Makefile.noimake100664 71506 1605 63105 6745313376 16010 0ustar hildebinstall# Makefile generated by imake - do not edit! # $XConsortium: imake.c /main/90 1996/11/13 14:43:23 lehors $ # ---------------------------------------------------------------------- # Makefile generated from "Imake.tmpl" and # $TOG: Imake.tmpl /main/245 1997/05/20 10:05:47 kaleb $ # # # # # $XFree86: xc/config/cf/Imake.tmpl,v 3.32.2.4 1997/05/21 15:49:24 dawes Exp $ # all:: .SUFFIXES: .i # $XConsortium: Imake.cf /main/26 1996/09/28 16:05:09 rws $ # $XFree86: xc/config/cf/Imake.cf,v 3.34 1997/01/05 11:49:28 dawes Exp $ # ----------------------------------------------------------------------- # site-specific configuration parameters that need to come before # the platform-specific parameters - edit site.def to change # site: $XConsortium: site.def /main/revisionist/4 1996/12/31 08:02:07 kaleb $ # site: $XFree86: xc/config/cf/site.def,v 3.17 1997/01/14 22:12:40 dawes Exp $ # $XFree86: xc/config/cf/xf86site.def,v 3.101.2.10 1997/05/24 13:38:10 dawes Exp $ # ---------------------------------------------------------------------- # platform-specific configuration parameters - edit linux.cf to change # platform: $XConsortium: linux.cf /main/27 1996/12/26 08:52:44 kaleb $ # platform: $XFree86: xc/config/cf/linux.cf,v 3.57.2.6 1997/05/27 06:22:10 dawes Exp $ # operating system: Linux 2.0.30 i586 [ELF] (2.0.30) # $XConsortium: lnxLib.rules /main/13 1996/09/28 16:11:01 rws $ # $XFree86: xc/config/cf/lnxLib.rules,v 3.28.2.2 1997/05/24 08:35:53 dawes Exp $ # $XFree86: xc/config/cf/xfree86.cf,v 3.129.2.13 1997/06/02 01:44:09 dawes Exp $ # $XConsortium: xfree86.cf /main/34 1996/12/06 11:45:18 rws $ LINKKITDIR = $(USRLIBDIR)/Server XF98LINKKITDIR = $(USRLIBDIR)/Server XF86SRC = $(SERVERSRC)/hw/xfree86 XF86ACCELSRC = $(XF86SRC)/accel XF86COMSRC = $(XF86SRC)/common XF86CONFIGSRC = $(XF86COMSRC) XF86HWSRC = $(XF86SRC)/common_hw XF86OSSRC = $(XF86SRC)/os-support VGADRIVERSRC = $(XF86SRC)/vga256/drivers VGA16DRIVERSRC = $(XF86SRC)/vga16/drivers VGA2DRIVERSRC = $(XF86SRC)/vga2/drivers MONODRIVERSRC = $(XF86SRC)/mono/drivers S3DRIVERSRC = $(XF86SRC)/accel/s3/drivers S3VDRIVERSRC = $(XF86SRC)/accel/s3_virge/drivers XF68SRC = $(SERVERSRC)/hw/xfree68 XF68COMSRC = $(XF68SRC)/common XF68CONFIGSRC = $(XF68COMSRC) XF68OSSRC = $(XF68SRC)/os-support XF98SRC = $(SERVERSRC)/hw/xfree98 XF98ACCELSRC = $(XF98SRC)/accel XF98COMSRC = $(XF98SRC)/common XF98CONFIGSRC = $(XF98COMSRC) XF98HWSRC = $(XF98SRC)/common_hw/generic XF98HWNECSRC = $(XF98SRC)/common_hw/nec XF98HWPWSKBSRC = $(XF98SRC)/common_hw/pwskb XF98HWPWLBSRC = $(XF98SRC)/common_hw/pwlb XF98HWGA968SRC = $(XF98SRC)/common_hw/ga968 XF98OSSRC = $(XF98SRC)/os-support XF98VGADRIVERSRC = $(XF98SRC)/vga256/drivers XF98VGA16DRIVERSRC = $(XF98SRC)/vga16/drivers XF98VGA2DRIVERSRC = $(XF98SRC)/vga2/drivers XF98MONODRIVERSRC = $(XF98SRC)/mono/drivers XF98NECS3DRIVERSRC = $(XF98SRC)/accel/s3nec/drivers XF98PWSKBDRIVERSRC = $(XF98SRC)/accel/s3pwskb/drivers XF98PWLBDRIVERSRC = $(XF98SRC)/accel/s3pwlb/drivers XF98GA968DRIVERSRC = $(XF98SRC)/accel/s3ga968/drivers XFREE86DOCDIR = $(LIBDIR)/doc XFREE86PSDOCDIR = $(XFREE86DOCDIR)/PostScript XFREE86HTMLDOCDIR = $(XFREE86DOCDIR)/html XFREE86JAPANESEDOCDIR = $(XFREE86DOCDIR)/Japanese # $XConsortium: xf86.rules /main/9 1996/10/31 14:54:26 kaleb $ # $XFree86: xc/config/cf/xf86.rules,v 3.16.2.1 1997/05/18 12:00:01 dawes Exp $ # ---------------------------------------------------------------------- # site-specific configuration parameters that go after # the platform-specific parameters - edit site.def to change # site: $XConsortium: site.def /main/revisionist/4 1996/12/31 08:02:07 kaleb $ # site: $XFree86: xc/config/cf/site.def,v 3.17 1997/01/14 22:12:40 dawes Exp $ # --------------------------------------------------------------------- # Imake rules for building libraries, programs, scripts, and data files # rules: $TOG: Imake.rules /main/218 1997/02/13 13:54:11 kaleb $ # rules: $XFree86: xc/config/cf/Imake.rules,v 3.33.2.2 1997/05/11 05:04:02 dawes Exp $ _NULLCMD_ = @ echo -n TKLIBNAME = TKLIBDIR = TCLLIBNAME = TCLIBDIR = PATHSEP = / SHELL = /bin/sh TOP = . CURRENT_DIR = . IMAKE = imake DEPEND = gccmakedep MKDIRHIER = mkdir -p EXPORTLISTGEN = CONFIGSRC = $(TOP)/config IMAKESRC = $(CONFIGSRC)/imake DEPENDSRC = $(CONFIGSRC)/util INCROOT = /usr/X11R6/include USRLIBDIR = /usr/X11R6/lib VARLIBDIR = /var/lib SHLIBDIR = /usr/X11R6/lib LINTLIBDIR = $(USRLIBDIR)/lint MANPATH = /usr/X11R6/man MANSOURCEPATH = $(MANPATH)/man MANDIR = $(MANSOURCEPATH)1 LIBMANDIR = $(MANSOURCEPATH)3 FILEMANDIR = $(MANSOURCEPATH)5 AR = ar clq BOOTSTRAPCFLAGS = CC = gcc AS = as .SUFFIXES: .cc CXX = c++ CXXFILT = c++filt CXXLIB = CXXDEBUGFLAGS = -O2 -fno-strength-reduce CXXDEPENDINCLUDES = CXXEXTRA_DEFINES = CXXEXTRA_INCLUDES = CXXSTD_DEFINES = -D_POSIX_SOURCE -D_BSD_SOURCE -D_SVID_SOURCE -Dlinux -D__i386__ -DX_LOCALE $(CXXPROJECT_DEFINES) CXXOPTIONS = CXXINCLUDES = $(INCLUDES) $(TOP_INCLUDES) $(CXXEXTRA_INCLUDES) CXXDEFINES = $(CXXINCLUDES) $(CXXSTD_DEFINES) $(THREADS_CXXDEFINES) $(CXXEXTRA_DEFINES) $(DEFINES) CXXFLAGS = $(CXXDEBUGFLAGS) $(CXXOPTIONS) $(THREADS_CXXFLAGS) $(CXXDEFINES) COMPRESS = compress GZIPCMD = gzip CPP = /lib/cpp $(STD_CPP_DEFINES) PREPROCESSCMD = gcc -E $(STD_CPP_DEFINES) INSTALL = install INSTALLFLAGS = -c LD = ld LEX = flex -l LEXLIB = -lfl YACC = bison -y CCYACC = bison -y LINT = lint LINTLIBFLAG = -C LINTOPTS = -axz LN = ln -s MAKE = make MV = mv -f CP = cp RANLIB = ranlib RANLIBINSTFLAGS = RM = rm -f MANSUFFIX = 1x LIBMANSUFFIX = 3x FILEMANSUFFIX = 5x TROFF = psroff NROFF = nroff MSMACROS = -ms MANMACROS = -man TBL = tbl EQN = eqn NEQN = neqn COL = col DVIPS = dvips LATEX = latex STD_INCLUDES = STD_CPP_DEFINES = -traditional -D_POSIX_SOURCE -D_BSD_SOURCE -D_SVID_SOURCE -Dlinux -D__i386__ -DX_LOCALE $(PROJECT_DEFINES) STD_DEFINES = -D_POSIX_SOURCE -D_BSD_SOURCE -D_SVID_SOURCE -Dlinux -D__i386__ -DX_LOCALE $(PROJECT_DEFINES) EXTRA_LOAD_FLAGS = EXTRA_LDOPTIONS = EXTRA_LIBRARIES = TAGS = ctags PARALLELMFLAGS = SHAREDCODEDEF = SHLIBDEF = SHLIBLDFLAGS = -shared PICFLAGS = -fPIC CXXPICFLAGS = -fPIC PROTO_DEFINES = -DFUNCPROTO=15 -DNARROWPROTO INSTPGMFLAGS = -s INSTBINFLAGS = -m 0755 INSTUIDFLAGS = -m 4711 INSTLIBFLAGS = -m 0644 INSTINCFLAGS = -m 0444 INSTMANFLAGS = -m 0444 INSTDATFLAGS = -m 0444 INSTKMEMFLAGS = -m 4711 PROJECTROOT = /usr/X11R6 CDEBUGFLAGS = -O2 -fno-strength-reduce CCOPTIONS = ALLINCLUDES = $(INCLUDES) $(EXTRA_INCLUDES) $(TOP_INCLUDES) $(STD_INCLUDES) ALLDEFINES = $(ALLINCLUDES) $(STD_DEFINES) $(EXTRA_DEFINES) $(PROTO_DEFINES) $(THREADS_DEFINES) $(DEFINES) CFLAGS = $(CDEBUGFLAGS) $(CCOPTIONS) $(THREADS_CFLAGS) $(ALLDEFINES) LINTFLAGS = $(LINTOPTS) -DLINT $(ALLDEFINES) $(DEPEND_DEFINES) LDPRELIB = -L$(USRLIBDIR) LDPOSTLIB = LDOPTIONS = $(CDEBUGFLAGS) $(CCOPTIONS) $(EXTRA_LDOPTIONS) $(THREADS_LDFLAGS) $(LOCAL_LDFLAGS) $(LDPRELIBS) CXXLDOPTIONS = $(CXXDEBUGFLAGS) $(CXXOPTIONS) $(EXTRA_LDOPTIONS) $(THREADS_CXXLDFLAGS) $(LOCAL_LDFLAGS) $(LDPRELIBS) LDLIBS = $(LDPOSTLIBS) $(THREADS_LIBS) $(SYS_LIBRARIES) $(EXTRA_LIBRARIES) CCLINK = $(CC) CXXLINK = $(CXX) LDSTRIPFLAGS = -x LDCOMBINEFLAGS = -r DEPENDFLAGS = # Not sure this belongs here TKLIBDIR = TKINCDIR = TKLIBNAME = TKLIBRARY = -L$(TKLIBDIR) -l$(TKLIBNAME) TCLLIBDIR = TCLINCDIR = TCLLIBNAME = TCLLIBRARY = -L$(TCLLIBDIR) -l$(TCLLIBNAME) MACROFILE = linux.cf RM_CMD = $(RM) IMAKE_DEFINES = IRULESRC = $(CONFIGDIR) IMAKE_CMD = $(IMAKE) -DUseInstalled -I$(IRULESRC) $(IMAKE_DEFINES) ICONFIGFILES = $(IRULESRC)/Imake.tmpl $(IRULESRC)/X11.tmpl $(IRULESRC)/site.def $(IRULESRC)/$(MACROFILE) $(IRULESRC)/xfree86.cf $(IRULESRC)/xf86.rules $(IRULESRC)/xf86site.def $(IRULESRC)/host.def $(EXTRA_ICONFIGFILES) # $XConsortium: X11.rules /main/2 1996/12/04 10:13:00 swick $ # ---------------------------------------------------------------------- # X Window System Build Parameters and Rules # $TOG: X11.tmpl /main/292 1997/05/20 10:05:59 kaleb $ # # # # # $XFree86: xc/config/cf/X11.tmpl,v 1.8.2.3 1997/05/21 15:02:13 dawes Exp $ # ----------------------------------------------------------------------- # X Window System make variables; these need to be coordinated with rules XTOP = $(TOP) BINDIR = /usr/X11R6/bin BUILDINCROOT = $(TOP)/exports BUILDINCDIR = $(BUILDINCROOT)/include BUILDINCTOP = ../.. BUILDLIBDIR = $(TOP)/exports/lib BUILDLIBTOP = ../.. BUILDBINDIR = $(TOP)/exports/bin BUILDBINTOP = ../.. XBUILDINCROOT = $(XTOP)/exports XBUILDINCDIR = $(XBUILDINCROOT)/include/X11 XBUILDINCTOP = ../../.. XBUILDBINDIR = $(XBUILDINCROOT)/bin INCDIR = $(INCROOT) ADMDIR = /usr/adm LIBDIR = $(USRLIBDIR)/X11 TOP_X_INCLUDES = FONTDIR = $(LIBDIR)/fonts XINITDIR = $(LIBDIR)/xinit XDMDIR = $(LIBDIR)/xdm XDMVARDIR = $(VARLIBDIR)/xdm TWMDIR = $(LIBDIR)/twm XSMDIR = $(LIBDIR)/xsm NLSDIR = $(LIBDIR)/nls XLOCALEDIR = $(LIBDIR)/locale PEXAPIDIR = $(LIBDIR)/PEX LBXPROXYDIR = $(LIBDIR)/lbxproxy PROXYMANAGERDIR = $(LIBDIR)/proxymngr XPRINTDIR = $(LIBDIR) XAPPLOADDIR = $(LIBDIR)/app-defaults FONTCFLAGS = -t INSTAPPFLAGS = $(INSTDATFLAGS) RGB = rgb FONTC = bdftopcf MKFONTDIR = mkfontdir DOCUTILSRC = $(XTOP)/doc/util CLIENTSRC = $(TOP)/clients DEMOSRC = $(TOP)/demos XDOCMACROS = $(DOCUTILSRC)/macros.t XIDXMACROS = $(DOCUTILSRC)/indexmacros.t PROGRAMSRC = $(TOP)/programs LIBSRC = $(XTOP)/lib FONTSRC = $(XTOP)/fonts INCLUDESRC = $(BUILDINCROOT)/include XINCLUDESRC = $(INCLUDESRC)/X11 SERVERSRC = $(XTOP)/programs/Xserver CONTRIBSRC = $(XTOP)/../contrib UNSUPPORTEDSRC = $(XTOP)/unsupported DOCSRC = $(XTOP)/doc RGBSRC = $(XTOP)/programs/rgb BDFTOPCFSRC = $(PROGRAMSRC)/bdftopcf MKFONTDIRSRC = $(PROGRAMSRC)/mkfontdir FONTSERVERSRC = $(PROGRAMSRC)/xfs FONTINCSRC = $(XTOP)/include/fonts EXTINCSRC = $(XTOP)/include/extensions TRANSCOMMSRC = $(LIBSRC)/xtrans TRANS_INCLUDES = -I$(TRANSCOMMSRC) XENVLIBDIR = $(USRLIBDIR) CLIENTENVSETUP = LD_LIBRARY_PATH=$(XENVLIBDIR) # $XConsortium: lnxLib.tmpl,v 1.5 95/01/11 21:44:44 kaleb Exp $ # $XFree86: xc/config/cf/lnxLib.tmpl,v 3.9 1996/02/24 04:32:52 dawes Exp $ XLIBSRC = $(LIBSRC)/X11 SOXLIBREV = 6.1 DEPXONLYLIB = XONLYLIB = -lX11 LINTXONLY = $(LINTLIBDIR)/llib-lX11.ln XLIBONLY = $(XONLYLIB) XEXTLIBSRC = $(LIBSRC)/Xext SOXEXTREV = 6.3 DEPEXTENSIONLIB = EXTENSIONLIB = -lXext LINTEXTENSION = $(LINTLIBDIR)/llib-lXext.ln LINTEXTENSIONLIB = $(LINTEXTENSION) DEPXLIB = $(DEPEXTENSIONLIB) $(DEPXONLYLIB) XLIB = $(EXTENSIONLIB) $(XONLYLIB) LINTXLIB = $(LINTXONLYLIB) XSSLIBSRC = $(LIBSRC)/Xss DEPXSSLIB = $(USRLIBDIR)/libXss.a XSSLIB = -lXss LINTXSS = $(LINTLIBDIR)/llib-lXss.ln XXF86MISCLIBSRC = $(LIBSRC)/Xxf86misc DEPXXF86MISCLIB = $(USRLIBDIR)/libXxf86misc.a XXF86MISCLIB = -lXxf86misc LINTXXF86MISC = $(LINTLIBDIR)/llib-lXxf86misc.ln XXF86VMLIBSRC = $(LIBSRC)/Xxf86vm DEPXXF86VMLIB = $(USRLIBDIR)/libXxf86vm.a XXF86VMLIB = -lXxf86vm LINTXXF86VM = $(LINTLIBDIR)/llib-lXxf86vm.ln XXF86DGALIBSRC = $(LIBSRC)/Xxf86dga DEPXXF86DGALIB = $(USRLIBDIR)/libXxf86dga.a XXF86DGALIB = -lXxf86dga LINTXXF86DGA = $(LINTLIBDIR)/llib-lXxf86dga.ln XDPMSLIBSRC = $(LIBSRC)/Xdpms DEPXDPMSLIB = $(USRLIBDIR)/libXdpms.a XDPMSLIB = -lXdpms LINTXDPMS = $(LINTLIBDIR)/llib-lXdpms.ln XAUTHSRC = $(LIBSRC)/Xau DEPXAUTHLIB = $(USRLIBDIR)/libXau.a XAUTHLIB = -lXau LINTXAUTH = $(LINTLIBDIR)/llib-lXau.ln XDMCPLIBSRC = $(LIBSRC)/Xdmcp DEPXDMCPLIB = $(USRLIBDIR)/libXdmcp.a XDMCPLIB = -lXdmcp LINTXDMCP = $(LINTLIBDIR)/llib-lXdmcp.ln XMUSRC = $(LIBSRC)/Xmu SOXMUREV = 6.0 DEPXMULIB = XMULIB = -lXmu LINTXMU = $(LINTLIBDIR)/llib-lXmu.ln OLDXLIBSRC = $(LIBSRC)/oldX DEPOLDXLIB = $(USRLIBDIR)/liboldX.a OLDXLIB = -loldX LINTOLDX = $(LINTLIBDIR)/llib-loldX.ln XPLIBSRC = $(LIBSRC)/Xp SOXPREV = 6.2 DEPXPLIB = XPLIB = -lXp LINTXP = $(LINTLIBDIR)/llib-lXp.ln TOOLKITSRC = $(LIBSRC)/Xt SOXTREV = 6.0 DEPXTOOLONLYLIB = XTOOLONLYLIB = -lXt LINTXTOOLONLY = $(LINTLIBDIR)/llib-lXt.ln DEPXTOOLLIB = $(DEPXTOOLONLYLIB) $(DEPSMLIB) $(DEPICELIB) XTOOLLIB = $(XTOOLONLYLIB) $(SMLIB) $(ICELIB) LINTXTOOLLIB = $(LINTXTOOLONLYLIB) XALIBSRC = $(LIBSRC)/Xa SOXAREV = 1.0 DEPXALIB = XALIB = -lXa LINTXA = $(LINTLIBDIR)/llib-lXa.ln AWIDGETSRC = $(LIBSRC)/Xaw SOXAWREV = 6.1 DEPXAWLIB = XAWLIB = -lXaw LINTXAW = $(LINTLIBDIR)/llib-lXaw.ln XILIBSRC = $(LIBSRC)/Xi SOXINPUTREV = 6.0 DEPXILIB = XILIB = -lXi LINTXI = $(LINTLIBDIR)/llib-lXi.ln XTESTLIBSRC = $(LIBSRC)/Xtst SOXTESTREV = 6.1 DEPXTESTLIB = XTESTLIB = -lXtst LINTXTEST = $(LINTLIBDIR)/llib-lXtst.ln PEXLIBSRC = $(LIBSRC)/PEX5 SOPEXREV = 6.0 DEPPEXLIB = PEXLIB = -lPEX5 LINTPEX = $(LINTLIBDIR)/llib-lPEX5.ln XIELIBSRC = $(LIBSRC)/XIE SOXIEREV = 6.0 DEPXIELIB = XIELIB = -lXIE LINTXIE = $(LINTLIBDIR)/llib-lXIE.ln PHIGSLIBSRC = $(LIBSRC)/PHIGS DEPPHIGSLIB = $(USRLIBDIR)/libphigs.a PHIGSLIB = -lphigs LINTPHIGS = $(LINTLIBDIR)/llib-lphigs.ln DEPXBSDLIB = $(USRLIBDIR)/libXbsd.a XBSDLIB = -lXbsd LINTXBSD = $(LINTLIBDIR)/llib-lXbsd.ln ICESRC = $(LIBSRC)/ICE SOICEREV = 6.3 DEPICELIB = ICELIB = -lICE LINTICE = $(LINTLIBDIR)/llib-lICE.ln SMSRC = $(LIBSRC)/SM SOSMREV = 6.0 DEPSMLIB = SMLIB = -lSM LINTSM = $(LINTLIBDIR)/llib-lSM.ln XKEYSRC = $(LIBSRC)/Xkey SOXKEYREV = 6.0 DEPXKEYLIB = XKEYLIB = -lXkey LINTXKEY = $(LINTLIBDIR)/llib-lXkey.ln FSLIBSRC = $(LIBSRC)/FS DEPFSLIB = $(USRLIBDIR)/libFS.a FSLIB = -lFS LINTFS = $(LINTLIBDIR)/llib-lFS.ln FONTLIBSRC = $(LIBSRC)/font DEPFONTLIB = $(USRLIBDIR)/libfont.a FONTLIB = -lfont LINTFONT = $(LINTLIBDIR)/llib-lfont.ln XPMLIBSRC = $(LIBSRC)/Xpm DEPXPMLIB = $(USRLIBDIR)/libXpm.a XPMLIB = -lXpm LINTXPM = $(LINTLIBDIR)/llib-lXpm.ln XKBFILELIBSRC = $(LIBSRC)/xkbfile DEPXKBFILELIB = $(USRLIBDIR)/libxkbfile.a XKBFILELIB = -lxkbfile LINTXKBFILE = $(LINTLIBDIR)/llib-lxkbfile.ln XKBCOMPCMD = xkbcomp XKBUILIBSRC = $(LIBSRC)/xkbui DEPXKBUILIB = $(USRLIBDIR)/libxkbui.a XKBUILIB = -lxkbui LINTXKBUI = $(LINTLIBDIR)/llib-lxkbui.ln DEPLIBS = $(DEPXAWLIB) $(DEPXMULIB) $(DEPXTOOLLIB) $(DEPXLIB) DEPLIBS1 = $(DEPLIBS) DEPLIBS2 = $(DEPLIBS) DEPLIBS3 = $(DEPLIBS) DEPLIBS4 = $(DEPLIBS) DEPLIBS5 = $(DEPLIBS) DEPLIBS6 = $(DEPLIBS) DEPLIBS7 = $(DEPLIBS) DEPLIBS8 = $(DEPLIBS) DEPLIBS9 = $(DEPLIBS) DEPLIBS10 = $(DEPLIBS) XMULIBONLY = -lXmu XMULIB = $(XMULIBONLY) $(XTOOLLIB) $(XLIB) CONFIGDIR = $(LIBDIR)/config USRLIBDIRPATH = $(USRLIBDIR) LDPRELIBS = -L$(USRLIBDIR) LDPOSTLIBS = TOP_INCLUDES = -I$(INCROOT) $(TOP_X_INCLUDES) PROJECT_DEFINES = CXXPROJECT_DEFINES = # ---------------------------------------------------------------------- # start of Imakefile # # Imakefile for Xlab. Copyright 1998 Marc Vertes # $Id: Makefile.noimake,v 1.2 1998/06/04 04:53:24 marc Exp $ # # CCOPTIONS = -g -Wall -ansi SYS_LIBRARIES = DEPLIBS = $(DEPXLIB) LOCAL_LIBRARIES = $(XLIB) SRCS = prtype.c print11.c table11.c decode11.c server.c fd.c common.c scope.c record.c parse.y parse.l OBJS = scope.o common.o fd.o server.o decode11.o table11.o print11.o prtype.o record.o y.tab.o lex.yy.o PROGRAM = xlab all:: xlab xlab: $(OBJS) $(DEPLIBS) $(RM) $@ $(CCLINK) -o $@ $(LDOPTIONS) $(OBJS) $(LOCAL_LIBRARIES) $(LDLIBS) $(EXTRA_LOAD_FLAGS) install:: xlab @if [ -d $(DESTDIR)$(BINDIR) ]; then set +x; \ else (set -x; $(MKDIRHIER) $(DESTDIR)$(BINDIR)); fi $(INSTALL) $(INSTALLFLAGS) $(INSTPGMFLAGS) xlab $(DESTDIR)$(BINDIR)/xlab install.man:: xlab.man @if [ -d $(DESTDIR)$(MANDIR) ]; then set +x; \ else (set -x; $(MKDIRHIER) $(DESTDIR)$(MANDIR)); fi $(INSTALL) $(INSTALLFLAGS) $(INSTMANFLAGS) xlab.man $(DESTDIR)$(MANDIR)/xlab.$(MANSUFFIX) depend:: $(DEPEND) $(DEPENDFLAGS) -- $(ALLDEFINES) $(DEPEND_DEFINES) -- $(SRCS) lint: $(LINT) $(LINTFLAGS) $(SRCS) $(LINTLIBS) lint1: $(LINT) $(LINTFLAGS) $(FILE) $(LINTLIBS) clean:: $(RM) xlab # # common.o: $(_NOOP_) $(RM) $@ $(CC) -c $(CFLAGS) $(SIGNAL_DEFINES) $*.c scope.c: y.tab.h y.tab.h: parse.y yacc -d parse.y y.tab.o: parse.y $(CC) $(CFLAGS) -c y.tab.c lex.yy.o: parse.l lex parse.l $(CC) $(CFLAGS) -c lex.yy.c clean:: $(RM) lex.yy.c y.tab.h y.tab.c # ---------------------------------------------------------------------- # common rules for all Makefiles - do not edit .c.i: $(RM) $@ $(CC) -E $(CFLAGS) $(_NOOP_) $*.c > $@ emptyrule:: clean:: $(RM) *.CKP *.ln *.BAK *.bak *.o core errs ,* *~ *.a .emacs_* tags TAGS make.log MakeOut "#"* Makefile:: -@if [ -f Makefile ]; then set -x; \ $(RM) Makefile.bak; $(MV) Makefile Makefile.bak; \ else exit 0; fi $(IMAKE_CMD) -DTOPDIR=$(TOP) -DCURDIR=$(CURRENT_DIR) tags:: $(TAGS) -w *.[ch] $(TAGS) -xw *.[ch] > TAGS man_keywords:: # ---------------------------------------------------------------------- # empty rules for directories that do not have SUBDIRS - do not edit install:: @echo "install in $(CURRENT_DIR) done" install.man:: @echo "install.man in $(CURRENT_DIR) done" install.linkkit:: @echo "install.linkkit in $(CURRENT_DIR) done" Makefiles:: includes:: depend:: # ---------------------------------------------------------------------- # dependencies generated by makedepend # DO NOT DELETE prtype.o: prtype.c scope.h /usr/X11R6/include/X11/Xos.h \ /usr/X11R6/include/X11/Xosdefs.h /usr/include/sys/types.h \ /usr/include/linux/types.h /usr/include/linux/posix_types.h \ /usr/include/asm/posix_types.h /usr/include/asm/types.h \ /usr/include/sys/bitypes.h /usr/include/string.h \ /usr/include/features.h /usr/include/sys/cdefs.h \ /usr/lib/gcc-lib/i486-linux/2.7.2.1/include/stddef.h \ /usr/include/fcntl.h /usr/include/gnu/types.h \ /usr/include/linux/fcntl.h /usr/include/asm/fcntl.h \ /usr/include/unistd.h /usr/include/posix_opt.h \ /usr/include/confname.h /usr/include/sys/time.h \ /usr/include/linux/time.h /usr/include/time.h /usr/include/stdio.h \ /usr/include/libio.h /usr/include/_G_config.h fd.h x11.h print11.o: print11.c scope.h /usr/X11R6/include/X11/Xos.h \ /usr/X11R6/include/X11/Xosdefs.h /usr/include/sys/types.h \ /usr/include/linux/types.h /usr/include/linux/posix_types.h \ /usr/include/asm/posix_types.h /usr/include/asm/types.h \ /usr/include/sys/bitypes.h /usr/include/string.h \ /usr/include/features.h /usr/include/sys/cdefs.h \ /usr/lib/gcc-lib/i486-linux/2.7.2.1/include/stddef.h \ /usr/include/fcntl.h /usr/include/gnu/types.h \ /usr/include/linux/fcntl.h /usr/include/asm/fcntl.h \ /usr/include/unistd.h /usr/include/posix_opt.h \ /usr/include/confname.h /usr/include/sys/time.h \ /usr/include/linux/time.h /usr/include/time.h /usr/include/stdio.h \ /usr/include/libio.h /usr/include/_G_config.h fd.h x11.h table11.o: table11.c scope.h /usr/X11R6/include/X11/Xos.h \ /usr/X11R6/include/X11/Xosdefs.h /usr/include/sys/types.h \ /usr/include/linux/types.h /usr/include/linux/posix_types.h \ /usr/include/asm/posix_types.h /usr/include/asm/types.h \ /usr/include/sys/bitypes.h /usr/include/string.h \ /usr/include/features.h /usr/include/sys/cdefs.h \ /usr/lib/gcc-lib/i486-linux/2.7.2.1/include/stddef.h \ /usr/include/fcntl.h /usr/include/gnu/types.h \ /usr/include/linux/fcntl.h /usr/include/asm/fcntl.h \ /usr/include/unistd.h /usr/include/posix_opt.h \ /usr/include/confname.h /usr/include/sys/time.h \ /usr/include/linux/time.h /usr/include/time.h /usr/include/stdio.h \ /usr/include/libio.h /usr/include/_G_config.h fd.h x11.h decode11.o: decode11.c scope.h /usr/X11R6/include/X11/Xos.h \ /usr/X11R6/include/X11/Xosdefs.h /usr/include/sys/types.h \ /usr/include/linux/types.h /usr/include/linux/posix_types.h \ /usr/include/asm/posix_types.h /usr/include/asm/types.h \ /usr/include/sys/bitypes.h /usr/include/string.h \ /usr/include/features.h /usr/include/sys/cdefs.h \ /usr/lib/gcc-lib/i486-linux/2.7.2.1/include/stddef.h \ /usr/include/fcntl.h /usr/include/gnu/types.h \ /usr/include/linux/fcntl.h /usr/include/asm/fcntl.h \ /usr/include/unistd.h /usr/include/posix_opt.h \ /usr/include/confname.h /usr/include/sys/time.h \ /usr/include/linux/time.h /usr/include/time.h /usr/include/stdio.h \ /usr/include/libio.h /usr/include/_G_config.h fd.h x11.h server.o: server.c scope.h /usr/X11R6/include/X11/Xos.h \ /usr/X11R6/include/X11/Xosdefs.h /usr/include/sys/types.h \ /usr/include/linux/types.h /usr/include/linux/posix_types.h \ /usr/include/asm/posix_types.h /usr/include/asm/types.h \ /usr/include/sys/bitypes.h /usr/include/string.h \ /usr/include/features.h /usr/include/sys/cdefs.h \ /usr/lib/gcc-lib/i486-linux/2.7.2.1/include/stddef.h \ /usr/include/fcntl.h /usr/include/gnu/types.h \ /usr/include/linux/fcntl.h /usr/include/asm/fcntl.h \ /usr/include/unistd.h /usr/include/posix_opt.h \ /usr/include/confname.h /usr/include/sys/time.h \ /usr/include/linux/time.h /usr/include/time.h /usr/include/stdio.h \ /usr/include/libio.h /usr/include/_G_config.h fd.h record.h \ /usr/X11R6/include/X11/Xlib.h /usr/X11R6/include/X11/X.h \ /usr/X11R6/include/X11/Xfuncproto.h x11.h fd.o: fd.c scope.h /usr/X11R6/include/X11/Xos.h \ /usr/X11R6/include/X11/Xosdefs.h /usr/include/sys/types.h \ /usr/include/linux/types.h /usr/include/linux/posix_types.h \ /usr/include/asm/posix_types.h /usr/include/asm/types.h \ /usr/include/sys/bitypes.h /usr/include/string.h \ /usr/include/features.h /usr/include/sys/cdefs.h \ /usr/lib/gcc-lib/i486-linux/2.7.2.1/include/stddef.h \ /usr/include/fcntl.h /usr/include/gnu/types.h \ /usr/include/linux/fcntl.h /usr/include/asm/fcntl.h \ /usr/include/unistd.h /usr/include/posix_opt.h \ /usr/include/confname.h /usr/include/sys/time.h \ /usr/include/linux/time.h /usr/include/time.h /usr/include/stdio.h \ /usr/include/libio.h /usr/include/_G_config.h fd.h \ /usr/include/errno.h /usr/include/linux/errno.h \ /usr/include/asm/errno.h common.o: common.c /usr/include/stdlib.h /usr/include/features.h \ /usr/include/sys/cdefs.h \ /usr/lib/gcc-lib/i486-linux/2.7.2.1/include/stddef.h \ /usr/include/errno.h /usr/include/linux/errno.h \ /usr/include/asm/errno.h /usr/include/alloca.h /usr/include/fcntl.h \ /usr/include/sys/types.h /usr/include/linux/types.h \ /usr/include/linux/posix_types.h /usr/include/asm/posix_types.h \ /usr/include/asm/types.h /usr/include/sys/bitypes.h \ /usr/include/gnu/types.h /usr/include/linux/fcntl.h \ /usr/include/asm/fcntl.h scope.h /usr/X11R6/include/X11/Xos.h \ /usr/X11R6/include/X11/Xosdefs.h /usr/include/string.h \ /usr/include/unistd.h /usr/include/posix_opt.h \ /usr/include/confname.h /usr/include/sys/time.h \ /usr/include/linux/time.h /usr/include/time.h /usr/include/stdio.h \ /usr/include/libio.h /usr/include/_G_config.h fd.h \ /usr/include/signal.h /usr/include/linux/signal.h \ /usr/include/asm/signal.h /usr/include/sys/uio.h \ /usr/include/linux/socket.h /usr/include/asm/socket.h \ /usr/include/asm/sockios.h /usr/include/linux/sockios.h \ /usr/include/linux/uio.h /usr/include/sys/socket.h \ /usr/include/sys/ioctl.h /usr/include/linux/ioctl.h \ /usr/include/asm/ioctl.h /usr/include/termios.h \ /usr/include/linux/termios.h /usr/include/asm/termios.h \ /usr/include/asm/termbits.h /usr/include/asm/ioctls.h \ /usr/include/sys/socketio.h /usr/include/netinet/in.h \ /usr/include/linux/in.h /usr/include/asm/byteorder.h \ /usr/include/netdb.h /usr/include/paths.h record.o: record.c /usr/include/stdio.h /usr/include/features.h \ /usr/include/sys/cdefs.h /usr/include/libio.h \ /usr/include/_G_config.h /usr/include/stdlib.h \ /usr/lib/gcc-lib/i486-linux/2.7.2.1/include/stddef.h \ /usr/include/errno.h /usr/include/linux/errno.h \ /usr/include/asm/errno.h /usr/include/alloca.h \ /usr/X11R6/include/X11/Xlib.h /usr/include/sys/types.h \ /usr/include/linux/types.h /usr/include/linux/posix_types.h \ /usr/include/asm/posix_types.h /usr/include/asm/types.h \ /usr/include/sys/bitypes.h /usr/X11R6/include/X11/X.h \ /usr/X11R6/include/X11/Xfuncproto.h /usr/X11R6/include/X11/Xosdefs.h \ /usr/X11R6/include/X11/Xutil.h /usr/X11R6/include/X11/keysym.h \ /usr/X11R6/include/X11/keysymdef.h scope.h \ /usr/X11R6/include/X11/Xos.h /usr/include/string.h \ /usr/include/fcntl.h /usr/include/gnu/types.h \ /usr/include/linux/fcntl.h /usr/include/asm/fcntl.h \ /usr/include/unistd.h /usr/include/posix_opt.h \ /usr/include/confname.h /usr/include/sys/time.h \ /usr/include/linux/time.h /usr/include/time.h fd.h record.h x11.h \ server.h xlab-980917mine/common.c100664 71506 1605 15026 6745347757 14373 0ustar hildebinstall/* * $Id: common.c,v 1.6 1998/07/31 20:00:25 marc Exp $ * * Common support routines for sockets * * James L. Peterson * (c) Copyright MCC, 1987 * (c) Marc Vertes 1996, 1997, 1998 * */ #include #include #include "scope.h" /*----------------------------------------------------------------------*/ /* * Debugging forms of memory management */ char *Malloc(n) long n; { char *p; p = (char *) malloc((unsigned int) n); debug(64, (stderr, "%lx = malloc(%ld)\n", (long) p, n)); if (p == NULL) panic("no more malloc space"); return (p); } /*----------------------------------------------------------------------*/ /* * Signal Handling support. */ #include #ifdef SIGNALRETURNSINT #define SIGVAL int #else #define SIGVAL void #endif /*----------------------------------------------------------------------*/ SIGVAL SignalURG(n) int n; { debug(1, (stderr, "==> SIGURG received\n")); } /*----------------------------------------------------------------------*/ SIGVAL SignalPIPE(n) int n; { debug(1, (stderr, "==> SIGPIPE received\n")); } /*----------------------------------------------------------------------*/ SIGVAL SignalINT(n) int n; { debug(1, (stderr, "==> SIGINT received\n")); exit(1); } /*----------------------------------------------------------------------*/ SIGVAL SignalQUIT(n) int n; { debug(1, (stderr, "==> SIGQUIT received\n")); exit(1); } /*----------------------------------------------------------------------*/ SIGVAL SignalTERM(n) int n; { debug(1, (stderr, "==> SIGTERM received\n")); exit(1); } /*----------------------------------------------------------------------*/ SIGVAL SignalTSTP(n) int n; { debug(1, (stderr, "==> SIGTSTP received\n")); } /*----------------------------------------------------------------------*/ SIGVAL SignalCONT(n) int n; { debug(1, (stderr, "==> SIGCONT received\n")); } /*----------------------------------------------------------------------*/ SIGVAL SignalUSR1(n) int n; { extern char ScopeEnabled; debug(1, (stderr, "==> SIGUSR1 received\n")); ScopeEnabled = !ScopeEnabled; debug(1, (stderr, "ScopeEnabled = %d\n", ScopeEnabled)); } /*----------------------------------------------------------------------*/ SIGVAL SignalHUP(n) int n; { debug(1, (stderr, "==> SIGHUP received\n")); SetUpStdin(); } /*----------------------------------------------------------------------*/ void SetSignalHandling() { extern char HandleSIGUSR1; enterprocedure("SetSignalHandling"); (void) signal(SIGURG, SignalURG); (void) signal(SIGPIPE, SignalPIPE); (void) signal(SIGINT, SignalINT); (void) signal(SIGQUIT, SignalQUIT); (void) signal(SIGTERM, SignalTERM); (void) signal(SIGTSTP, SignalTSTP); (void) signal(SIGCONT, SignalCONT); (void) signal(SIGHUP, SignalHUP); if (HandleSIGUSR1) (void) signal(SIGUSR1, SignalUSR1); } /*----------------------------------------------------------------------*/ /* * Create a socket for a service to listen for clients */ #include /* for struct iovec, used by socket.h */ #include /* for AF_INET, SOCK_STREAM, ... */ #include /* for FIONCLEX, FIONBIO, ... */ #ifdef SVR4 #include #endif #include /* struct sockaddr_in */ #include /* struct servent * and struct hostent * */ #ifndef linux static int ON = 1; /* used in ioctl */ #endif #define BACKLOG 5 /*----------------------------------------------------------------------*/ void SetUpConnectionSocket(iport) int iport; { FD ConnectionSocket; struct sockaddr_in sin; short port; int reuse_addr = 1; #ifndef SO_DONTLINGER struct linger linger; #endif /* SO_DONTLINGER */ enterprocedure("SetUpConnectionSocket"); /* create the connection socket and set its parameters of use */ ConnectionSocket = socket(AF_INET, SOCK_STREAM, 0); if (ConnectionSocket < 0) { perror("socket"); exit(-1); } (void) setsockopt(ConnectionSocket, SOL_SOCKET, SO_REUSEADDR, &reuse_addr, 0); #ifndef linux (void) setsockopt(ConnectionSocket, SOL_SOCKET, SO_USELOOPBACK, (char *) NULL, 0); #endif #ifdef SO_DONTLINGER (void) setsockopt(ConnectionSocket, SOL_SOCKET, SO_DONTLINGER, (char *) NULL, 0); #else /* SO_DONTLINGER */ linger.l_onoff = 0; linger.l_linger = 0; (void) setsockopt(ConnectionSocket, SOL_SOCKET, SO_LINGER, (char *) &linger, sizeof linger); #endif /* SO_DONTLINGER */ /* define the name and port to be used with the connection socket */ bzero((char *) &sin, sizeof(sin)); sin.sin_family = AF_INET; /* * The address of the socket is composed of two parts: the host machine and * the port number. We need the host machine address for the current host. */ { /* define the host part of the address */ char MyHostName[256]; struct hostent *hp; (void) gethostname(MyHostName, sizeof(MyHostName)); ScopeHost = (char *) Malloc(1 + (long) strlen(MyHostName)); (void) strcpy(ScopeHost, MyHostName); hp = gethostbyname(MyHostName); if (hp == NULL) panic("No address for our host"); bcopy((char *) hp->h_addr, (char *) &sin.sin_addr, hp->h_length); } /* * New code -- INADDR_ANY should be better than using the name of the * host machine. The host machine may have several different network * addresses. INADDR_ANY should work with all of them at once. */ sin.sin_addr.s_addr = INADDR_ANY; port = (short) iport; sin.sin_port = htons(port); ScopePort = port; /* bind the name and port number to the connection socket */ if (bind(ConnectionSocket, (struct sockaddr *) &sin, sizeof(sin)) < 0) { perror("bind"); exit(-1); } debug(4, (stderr, "Socket is FD %d for %s,%d\n", ConnectionSocket, ScopeHost, ScopePort)); /* now activate the named connection socket to get messages */ if (listen(ConnectionSocket, BACKLOG) < 0) { perror("listen"); exit(-1); } /* a few more parameter settings */ #ifdef FD_CLOEXEC (void) fcntl(ConnectionSocket, F_SETFD, FD_CLOEXEC); #else (void) ioctl(ConnectionSocket, FIOCLEX, 0); #endif /* ultrix reads hang on Unix sockets, hpux reads fail */ #if defined(O_NONBLOCK) && (!defined(ultrix) && !defined(hpux)) (void) fcntl(ConnectionSocket, F_SETFL, O_NONBLOCK); #else #ifdef FIOSNBIO (void) ioctl(ConnectionSocket, FIOSNBIO, &ON); #else (void) fcntl(ConnectionSocket, F_SETFL, FNDELAY); #endif #endif debug(4, (stderr, "Listening on FD %d\n", ConnectionSocket)); UsingFD(ConnectionSocket, (int (*)()) NewConnection); } xlab-980917mine/doc/ 42775 71506 1605 0 6745313377 13354 5ustar hildebinstallxlab-980917mine/doc/CVS/ 42775 71506 1605 0 6745313377 14007 5ustar hildebinstallxlab-980917mine/doc/CVS/Root100664 71506 1605 23 6745313376 14702 0ustar hildebinstall/usr/local/cvsroot xlab-980917mine/doc/CVS/Repository100664 71506 1605 46 6745313376 16143 0ustar hildebinstall/usr/local/cvsroot/xlab-soft/xlab/doc xlab-980917mine/doc/CVS/Entries100664 71506 1605 57 6745313377 15400 0ustar hildebinstall/xlab.man/1.1.1.1/Sun Mar 16 06:39:08 1997// D xlab-980917mine/doc/xlab.man100664 71506 1605 22555 6745313377 15123 0ustar hildebinstall.TH XLAB 1 "28 FEB 1997" "X Version 11" .SH NAME xlab - X Window System Script Recording and Playback .SH SYNOPSIS .B xlab [ options ] ... .SH DESCRIPTION .I xlab is a program which sits between an X client and an X server, monitors the events flowing from the server to the client, and records events in a script file. The script file name for recording is specified using the -r option. .I xlab is useful as part of a regression test system, as it can automate the playing of fixed sequences of operations into an application program based on X. .I xlab can play back events from a script file (specified using the -p option) to a client. .PP .I xlab can detect application-program failures during playback. To do so, it detects the failure of windows to appear as necessary for playback, and reports errors when windows do not appear within one second of when they are expected. A failure of a window to appear is symptomatic of several classes of application failures, including failure of a popup to appear and an application crash. .PP \fIxlab\fP functions as a protocol interposition process. It attaches to the X server as if it were a client, and a client attaches to \fIxlab\fP as if it were an X server. This allows \fIxlab\fP to be used for testing standard unmodified client application programs. .PP By adjusting the host and/or display number, clients can be made to attach to \fIxlab\fP instead of the X server. .PP server <-----> xlab <-----> client(s) .PP All bytes from the server are sent to \fIxlab\fP which sends them on to the client. All bytes from the client are sent to \fIxlab\fP which passes them on to the server. \fIxlab\fP is transparent to both the server and the client. .SH OPTIONS .PP .TP 10 .B \-r Requests the recording of a session and defines the script file to be written during recording. .PP .TP 10 .B \-p Requests the playback of a session and defines the script file to be played back. The beginning of playback is deferred until the client program attaches. .PP .TP 10 .B \-t Specifies the percent time contraction to be used during playback. -t50 plays back a session at 50% speed, and -t200 plays it back at double speed. Changing playback speeds may foul up the client's detection of double clicks. The default time contraction is 100 percent (1:1 playback:record). .PP .TP 10 .B \-c Specifies the double-click-time in milliseconds. During playback when time is contracted or expanded, ButtonPress events with short delays from the previous event are handled specially so that they do not get misrecognized by the client. .PP .TP 10 .B \-w Specifies the number of seconds to wait between the time the client attaches and the first event is played back. This allows complex clients to complete drawing before playback begins. The default is five seconds. .PP .TP 10 .B \-d Defines the display number. The display number is added to the input and output port to give the actual ports which are used by \fIxlab\fP. .PP .TP 10 .B \-h Specifies the hostname on which \fIxlab\fP should look for its X server. .PP .PP .TP 10 .B \-h Prints a help message. .PP .TP 10 .B \-o Determines the port that \fIxlab\fP will use to connect to the server (default is 0). For example, if \fIxlab\fP were run with the options "-hlaser -o0" it would connect to the DISPLAY named "laser:0". In the normal case it is not necessary to specify \-h or \-o options: \fIxlab\fP connects, via TCP, to the local host's zeroth display. .PP .TP 10 .B \-i Specify the port that \fIxlab\fP will use to take requests from clients (default is 1). For example, if \fIxlab\fP were running on the host named "hobie," and the option \-i3 were specified, clients for recording or playback would attach to the DISPLAY named "hobie:3". Normally, it is not necessary to specify the \-i option, and clients should be made to connect via TCP to "localhost:1". .PP .TP 10 .B \-q Quiet output mode. Gives only the names of requests, replies, errors, and events, but does not indicate contents. .PP .TP 10 .B \-v Determines the level of verbosity which \fIxlab\fP will provide. The print-level can be 0 (same as quiet mode), 1, 2, 3, 4. The larger numbers give more and more output. For example, a successful setup returns a string which is the name of the vendor of the X server. At level 1, the explicit field giving the length of the string is suppressed since it can be inferred from the string. At level 2 and above the length is explicitly printed. .PP .TP 10 .B \-G Determines the grab timeout. If any active grab (server, pointer, or keyboard) originating from the program under test lasts longer than this time (default 30 seconds) the xlab program terminates, releasing the grab. This feature is handy for use in debugging situations in which grabs deadlock the server. .SH COMMANDS \fIxlab\fP has a command interpreter, which allows to read commands at any time from the keyboard, a pipe (for GUI interaction) or a file (for complete automation). .PP .TP 5 \fIexit\fP Terminates the program. If some clients are still connected on xlab, they will be terminated as well. .PP .TP 5 \fIrecord filename\fP Starts recording user input XEvents (keyboard and mouse) in the specified filename (same as -r option). .PP .TP 5 \fIreplay filename\fP Starts replaying events from the specified filename (same as -p option). .PP .TP 5 \fIstop record\fP Stop the current recording. .TP 5 \fIstop replay\fP Stop the current replay. .SH OPERATION When running with \fIxlab\fP, three processes are involved, potentially all on different machines: .PP .TP 5 \fIX server\fP The X server will run on machine (or host) "A", display "B". ("A" is a machine name; "B" is a display number). .PP .TP 5 \fIxlab \fP \fIxlab\fP must be told where the X server is (what machine and what display), and, in addition, the \fIport-number\fP on which to listen for X clients. The options for \fIxlab\fP are "-h" and "-d". In this example, -hA and -dB. Typically the \fIdisplay-number\fP is not given. \fIxlab\fP will not try to connect to the server until the client connects to \fIxlab\fP. .PP .TP 5 \fIX client\fP The client should connect to \fIxlab\fP rather than to the server. To avoid changing the code for the client, \fIxlab\fP listens on the same port as the server for connecting clients. If the server and \fIxlab\fP are on different machines, this works well. However, if the server and \fIxlab\fP are on the same machine, this creates a port conflict. To resolve this conflict, \fIxlab\fP can be given a different input or output port number, as necessary, to avoid the port that the server is listening to. The client must connect to this offset port number. The input port for \fIxlab\fP is set by \fI-i\fP; the output port is set by \fI-o.\fP The default input port is 1; the default output port is 0. These ports are offset by the X11 base (6000) and the display number. The client attaches to \fIxlab\fP by changing its display number by the port offset. .SH EXAMPLES .LP .B "xlab -hbagel -r/tmp/record" .PP The X server would be expected to be found on "bagel", display 0 (the default). \fIxlab\fP and the client would both be running on "cleo". The client program would think it was connecting to an X server on "cleo:1". This X server is actually \fIxlab\fP, which would record events and pass through requests and events to the real X server running on "bagel:0". .PP server (bagel:0) <---> xlab -hbagel <---> client -d cleo:1 .PP As it runs, \fIxlab\fP records input events for the client to the file /tmp/record. .LP .B "xlab -p/tmp/record" .PP The X server would be expected to be found on the local host, display 0 (the default). \fIxlab\fP and the client would be running on the same local host. The client would connect to "localhost:1", the \fIxlab\fP program, which in turn would connect to the real X server on "localhost:0". .PP server (localhost:0) <---> xlab <---> client -display localhost:1 .PP As it runs, \fIxlab\fP plays back pre-recorded events for the client from the file /tmp/record. If all is well, the recorded session should be reproduced. .SH LIMITATIONS The X Version 11 is the only protocol recognized. .PP The error-detection scheme on playback is extremely limited. At this time xlab can be confused if the client behaves differently at the replay (window id matching scheme), but may be fixed soon. .PP The assumptions made about the similarity between the recorded and played back client sessions are easy to break. Two modes have to be supported: strict respect of recorded delays, and synchronization according to the protocol instead of timers. .PP The number of available commands from is still limited (only record, replay, stop). Command interpreter will not work well if commands are read from a file. It's ok if commands are read from keyboard or a pipe. .PP A second replay in the same session doesn't work well. It is necessary to exit from xlab and restart. .PP Image capture function (for comparison between recording and replay) not yet implemented. .PP GUI not yet available. .PP Recorded file not yet compressed. .SH SEE ALSO X(1), X11 and PEX Protocol documents .SH AUTHOR .PP Marc Vertes, initially derived from a work from James Peterson (xscope), and Oliver Jones (xscript). Others have contributed, as Liora Maron, who helped to fix replay synchronisation. xlab-980917mine/doc/xlab.ps100664 71506 1605 53412 6745313377 14766 0ustar hildebinstall%!PS-Adobe-3.0 %%Creator: groff version 1.11 %%CreationDate: Sun Jun 27 13:03:20 1999 %%DocumentNeededResources: font Times-Roman %%+ font Times-Bold %%+ font Times-Italic %%DocumentSuppliedResources: procset grops 1.11 0 %%Pages: 3 %%PageOrder: Ascend %%Orientation: Portrait %%EndComments %%BeginProlog %%BeginResource: procset grops 1.11 0 /setpacking where{ pop currentpacking true setpacking }if /grops 120 dict dup begin /SC 32 def /A/show load def /B{0 SC 3 -1 roll widthshow}bind def /C{0 exch ashow}bind def /D{0 exch 0 SC 5 2 roll awidthshow}bind def /E{0 rmoveto show}bind def /F{0 rmoveto 0 SC 3 -1 roll widthshow}bind def /G{0 rmoveto 0 exch ashow}bind def /H{0 rmoveto 0 exch 0 SC 5 2 roll awidthshow}bind def /I{0 exch rmoveto show}bind def /J{0 exch rmoveto 0 SC 3 -1 roll widthshow}bind def /K{0 exch rmoveto 0 exch ashow}bind def /L{0 exch rmoveto 0 exch 0 SC 5 2 roll awidthshow}bind def /M{rmoveto show}bind def /N{rmoveto 0 SC 3 -1 roll widthshow}bind def /O{rmoveto 0 exch ashow}bind def /P{rmoveto 0 exch 0 SC 5 2 roll awidthshow}bind def /Q{moveto show}bind def /R{moveto 0 SC 3 -1 roll widthshow}bind def /S{moveto 0 exch ashow}bind def /T{moveto 0 exch 0 SC 5 2 roll awidthshow}bind def /SF{ findfont exch [exch dup 0 exch 0 exch neg 0 0]makefont dup setfont [exch/setfont cvx]cvx bind def }bind def /MF{ findfont [5 2 roll 0 3 1 roll neg 0 0]makefont dup setfont [exch/setfont cvx]cvx bind def }bind def /level0 0 def /RES 0 def /PL 0 def /LS 0 def /MANUAL{ statusdict begin/manualfeed true store end }bind def /PLG{ gsave newpath clippath pathbbox grestore exch pop add exch pop }bind def /BP{ /level0 save def 1 setlinecap 1 setlinejoin 72 RES div dup scale LS{ 90 rotate }{ 0 PL translate }ifelse 1 -1 scale }bind def /EP{ level0 restore showpage }bind def /DA{ newpath arcn stroke }bind def /SN{ transform .25 sub exch .25 sub exch round .25 add exch round .25 add exch itransform }bind def /DL{ SN moveto SN lineto stroke }bind def /DC{ newpath 0 360 arc closepath }bind def /TM matrix def /DE{ TM currentmatrix pop translate scale newpath 0 0 .5 0 360 arc closepath TM setmatrix }bind def /RC/rcurveto load def /RL/rlineto load def /ST/stroke load def /MT/moveto load def /CL/closepath load def /FL{ currentgray exch setgray fill setgray }bind def /BL/fill load def /LW/setlinewidth load def /RE{ findfont dup maxlength 1 index/FontName known not{1 add}if dict begin { 1 index/FID ne{def}{pop pop}ifelse }forall /Encoding exch def dup/FontName exch def currentdict end definefont pop }bind def /DEFS 0 def /EBEGIN{ moveto DEFS begin }bind def /EEND/end load def /CNT 0 def /level1 0 def /PBEGIN{ /level1 save def translate div 3 1 roll div exch scale neg exch neg exch translate 0 setgray 0 setlinecap 1 setlinewidth 0 setlinejoin 10 setmiterlimit []0 setdash /setstrokeadjust where{ pop false setstrokeadjust }if /setoverprint where{ pop false setoverprint }if newpath /CNT countdictstack def userdict begin /showpage{}def }bind def /PEND{ clear countdictstack CNT sub{end}repeat level1 restore }bind def end def /setpacking where{ pop setpacking }if %%EndResource %%IncludeResource: font Times-Roman %%IncludeResource: font Times-Bold %%IncludeResource: font Times-Italic grops begin/DEFS 1 dict def DEFS begin/u{.001 mul}bind def end/RES 72 def/PL 792 def/LS false def/ENC0[/asciicircum/asciitilde/Scaron/Zcaron /scaron/zcaron/Ydieresis/trademark/quotesingle/.notdef/.notdef/.notdef /.notdef/.notdef/.notdef/.notdef/.notdef/.notdef/.notdef/.notdef/.notdef /.notdef/.notdef/.notdef/.notdef/.notdef/.notdef/.notdef/.notdef/.notdef /.notdef/.notdef/space/exclam/quotedbl/numbersign/dollar/percent /ampersand/quoteright/parenleft/parenright/asterisk/plus/comma/hyphen /period/slash/zero/one/two/three/four/five/six/seven/eight/nine/colon /semicolon/less/equal/greater/question/at/A/B/C/D/E/F/G/H/I/J/K/L/M/N/O /P/Q/R/S/T/U/V/W/X/Y/Z/bracketleft/backslash/bracketright/circumflex /underscore/quoteleft/a/b/c/d/e/f/g/h/i/j/k/l/m/n/o/p/q/r/s/t/u/v/w/x/y /z/braceleft/bar/braceright/tilde/.notdef/quotesinglbase/guillemotleft /guillemotright/bullet/florin/fraction/perthousand/dagger/daggerdbl /endash/emdash/ff/fi/fl/ffi/ffl/dotlessi/dotlessj/grave/hungarumlaut /dotaccent/breve/caron/ring/ogonek/quotedblleft/quotedblright/oe/lslash /quotedblbase/OE/Lslash/.notdef/exclamdown/cent/sterling/currency/yen /brokenbar/section/dieresis/copyright/ordfeminine/guilsinglleft /logicalnot/minus/registered/macron/degree/plusminus/twosuperior /threesuperior/acute/mu/paragraph/periodcentered/cedilla/onesuperior /ordmasculine/guilsinglright/onequarter/onehalf/threequarters /questiondown/Agrave/Aacute/Acircumflex/Atilde/Adieresis/Aring/AE /Ccedilla/Egrave/Eacute/Ecircumflex/Edieresis/Igrave/Iacute/Icircumflex /Idieresis/Eth/Ntilde/Ograve/Oacute/Ocircumflex/Otilde/Odieresis /multiply/Oslash/Ugrave/Uacute/Ucircumflex/Udieresis/Yacute/Thorn /germandbls/agrave/aacute/acircumflex/atilde/adieresis/aring/ae/ccedilla /egrave/eacute/ecircumflex/edieresis/igrave/iacute/icircumflex/idieresis /eth/ntilde/ograve/oacute/ocircumflex/otilde/odieresis/divide/oslash /ugrave/uacute/ucircumflex/udieresis/yacute/thorn/ydieresis]def /Times-Italic@0 ENC0/Times-Italic RE/Times-Bold@0 ENC0/Times-Bold RE /Times-Roman@0 ENC0/Times-Roman RE %%EndProlog %%Page: 1 1 %%BeginPageSetup BP %%EndPageSetup /F0 10/Times-Roman@0 SF 387.74(XLAB\(1\) XLAB\(1\))72 48 R/F1 9 /Times-Bold@0 SF -.18(NA)72 84 S(ME).18 E F0(xlab - X W)108 96 Q(indo) -.4 E 2.5(wS)-.25 G(ystem Script Recording and Playback)-2.5 E F1 (SYNOPSIS)72 112.8 Q/F2 10/Times-Bold@0 SF(xlab)108 124.8 Q F0 2.5([o) 2.5 G(ptions ] ...)-2.5 E F1(DESCRIPTION)72 141.6 Q/F3 10/Times-Italic@0 SF(xlab)108 153.6 Q F0 1.049 (is a program which sits between an X client and an X serv)3.549 F(er) -.15 E 3.549(,m)-.4 G 1.049(onitors the e)-3.549 F -.15(ve)-.25 G 1.049 (nts \215o).15 F 1.049(wing from the)-.25 F(serv)108 165.6 Q .562 (er to the client, and records e)-.15 F -.15(ve)-.25 G .562(nts in a sc\ ript \214le. The script \214le name for recording is speci\214ed using) .15 F 1.382(the -r option.)108 177.6 R F3(xlab)6.382 E F0 1.382 (is useful as part of a re)3.882 F 1.381 (gression test system, as it can automate the playing of \214x)-.15 F (ed)-.15 E .718 (sequences of operations into an application program based on X.)108 189.6 R F3(xlab)5.718 E F0 .718(can play back e)3.218 F -.15(ve)-.25 G .719(nts from a script).15 F (\214le \(speci\214ed using the -p option\) to a client.)108 201.6 Q F3 (xlab)108 218.4 Q F0 .191(can detect application-program f)2.691 F .191 (ailures during playback.)-.1 F 1.791 -.8(To d)5.191 H 2.691(os).8 G .19 (o, it detects the f)-2.691 F .19(ailure of windo)-.1 F .19(ws to)-.25 F 1.207(appear as necessary for playback, and reports errors when windo) 108 230.4 R 1.207(ws do not appear within one second of)-.25 F .627 (when the)108 242.4 R 3.127(ya)-.15 G .627(re e)-3.127 F 3.127 (xpected. A)-.15 F -.1(fa)3.127 G .627(ilure of a windo).1 F 3.126(wt) -.25 G 3.126(oa)-3.126 G .626(ppear is symptomatic of se)-3.126 F -.15 (ve)-.25 G .626(ral classes of application).15 F -.1(fa)108 254.4 S (ilures, including f).1 E (ailure of a popup to appear and an application crash.)-.1 E F3(xlab)108 271.2 Q F0 .931(functions as a protocol interposition process.)3.431 F .931(It attaches to the X serv)5.931 F .931 (er as if it were a client, and a)-.15 F .179(client attaches to)108 283.2 R F3(xlab)2.679 E F0 .179(as if it were an X serv)2.679 F(er)-.15 E 5.178(.T)-.55 G .178(his allo)-5.178 F(ws)-.25 E F3(xlab)2.678 E F0 .178(to be used for testing standard unmodi\214ed)2.678 F (client application programs.)108 295.2 Q (By adjusting the host and/or display number)108 312 Q 2.5(,c)-.4 G (lients can be made to attach to)-2.5 E F3(xlab)2.5 E F0 (instead of the X serv)2.5 E(er)-.15 E(.)-.55 E(serv)144 328.8 Q (er <-----> xlab <-----> client\(s\))-.15 E .594 (All bytes from the serv)108 345.6 R .595(er are sent to)-.15 F F3(xlab) 3.095 E F0 .595(which sends them on to the client.)3.095 F .595 (All bytes from the client are)5.595 F(sent to)108 357.6 Q F3(xlab)2.5 E F0(which passes them on to the serv)2.5 E(er)-.15 E(.)-.55 E F3(xlab)5 E F0(is transparent to both the serv)2.5 E(er and the client.)-.15 E F1 (OPTIONS)72 374.4 Q F2(\255r)108 386.4 Q F0(Request\ s the recording of a session and de\214nes the script \214le to be writ\ ten during recording.)158 398.4 Q F2(\255p)108 420 Q F0 .173(Requests the playback of a session and de\214nes the script \ \214le to be played back.)158 432 R .172(The be)5.172 F(ginning)-.15 E (of playback is deferred until the client program attaches.)158 444 Q F2 (\255t)-.18 E F0 .304 (Speci\214es the percent time contraction to be used during playback.) 158 477.6 R .304(-t50 plays back a session at)5.304 F .841 (50% speed, and -t200 plays it back at double speed.)158 489.6 R .84 (Changing playback speeds may foul up)5.841 F .828(the client')158 501.6 R 3.328(sd)-.55 G .828(etection of double clicks.)-3.328 F .829(The def) 5.828 F .829(ault time contraction is 100 percent \(1:1 play-)-.1 F (back:record\).)158 513.6 Q F2(\255c)108 535.2 Q F0 1.019(Speci\214es the double-click-time in milliseconds.)158 547.2 R 1.019(During playback when time is contracted or)6.019 F -.15(ex)158 559.2 S .665(panded, ButtonPress e).15 F -.15(ve)-.25 G .665 (nts with short delays from the pre).15 F .665(vious e)-.25 F -.15(ve) -.25 G .665(nt are handled specially).15 F(so that the)158 571.2 Q 2.5 (yd)-.15 G 2.5(on)-2.5 G(ot get misrecognized by the client.)-2.5 E F2 (\255w)-.18 E F0 .299 (Speci\214es the number of seconds to w)158 604.8 R .299 (ait between the time the client attaches and the \214rst e)-.1 F -.15 (ve)-.25 G(nt).15 E .233(is played back.)158 616.8 R .234(This allo) 5.234 F .234(ws comple)-.25 F 2.734(xc)-.15 G .234 (lients to complete dra)-2.734 F .234(wing before playback be)-.15 F 2.734(gins. The)-.15 F(def)158 628.8 Q(ault is \214v)-.1 E 2.5(es)-.15 G (econds.)-2.5 E F2(\255d)108 650.4 Q F0 .534 (De\214nes the display number)158 662.4 R 5.533(.T)-.55 G .533 (he display number is added to the input and output port to gi)-5.533 F -.15(ve)-.25 G(the actual ports which are used by)158 674.4 Q F3(xlab) 2.5 E F0(.)A F2(\255h)108 696 Q F0 (Speci\214es the hostname on which)9.56 E F3(xlab)2.5 E F0 (should look for its X serv)2.5 E(er)-.15 E(.)-.55 E 2.5(XV)72 768 S (ersion 11)-3.61 E(28 FEB 1997)154.56 E(1)202.33 E EP %%Page: 2 2 %%BeginPageSetup BP %%EndPageSetup /F0 10/Times-Roman@0 SF 387.74(XLAB\(1\) XLAB\(1\))72 48 R/F1 10 /Times-Bold@0 SF108 84 Q F0(Prints a help message.)38.74 E F1 (\255o)108 105.6 Q F0 .66(Determines the port that)158 117.6 R/F2 10/Times-Italic@0 SF(xlab)3.16 E F0 .66 (will use to connect to the serv)3.16 F .66(er \(def)-.15 F .66 (ault is 0\).)-.1 F -.15(Fo)8.16 G 3.16(re).15 G .66(xample, if)-3.31 F F2(xlab)158 129.6 Q F0 2.82 (were run with the options "-hlaser -o0" it w)5.32 F 2.82 (ould connect to the DISPLA)-.1 F 5.32(Yn)-1.05 G(amed)-5.32 E 2.751 ("laser:0". In)158 141.6 R .252 (the normal case it is not necessary to specify \255h or \255o options:) 2.751 F F2(xlab)2.752 E F0 .252(connects, via)2.752 F(TCP)158 153.6 Q 2.5(,t)-1.11 G 2.5(ot)-2.5 G(he local host')-2.5 E 2.5(sz)-.55 G (eroth display)-2.5 E(.)-.65 E F1(\255i)108 175.2 Q F0 .575 (Specify the port that)158 187.2 R F2(xlab)3.075 E F0 .575 (will use to tak)3.075 F 3.075(er)-.1 G .575(equests from clients \(def) -3.075 F .574(ault is 1\).)-.1 F -.15(Fo)5.574 G 3.074(re).15 G .574 (xample, if)-3.224 F F2(xlab)158 199.2 Q F0 1.161(were running on the h\ ost named "hobie," and the option \255i3 were speci\214ed, clients for) 3.661 F .149(recording or playback w)158 211.2 R .149 (ould attach to the DISPLA)-.1 F 2.649(Yn)-1.05 G .148(amed "hobie:3".) -2.649 F(Normally)5.148 E 2.648(,i)-.65 G 2.648(ti)-2.648 G 2.648(sn) -2.648 G .148(ot nec-)-2.648 F .097(essary to specify the \255i option,\ and clients should be made to connect via TCP to "localhost:1".)158 223.2 R F1108 244.8 Q F0 .444(Quiet output mode.)38.74 F(Gi)5.444 E -.15(ve)-.25 G 2.944(so).15 G .444 (nly the names of requests, replies, errors, and e)-2.944 F -.15(ve)-.25 G .444(nts, b).15 F .444(ut does not)-.2 F(indicate contents.)158 256.8 Q F1(\255v).1 E F0 .785 (Determines the le)158 290.4 R -.15(ve)-.25 G 3.285(lo).15 G 3.285(fv) -3.285 G .785(erbosity which)-3.435 F F2(xlab)3.285 E F0 .785(will pro) 3.285 F 3.285(vide. The)-.15 F(print-le)3.285 E -.15(ve)-.25 G 3.286(lc) .15 G .786(an be 0 \(same as)-3.286 F .696(quiet mode\), 1, 2, 3, 4.)158 302.4 R .696(The lar)5.696 F .696(ger numbers gi)-.18 F .996 -.15(ve m) -.25 H .696(ore and more output.).15 F -.15(Fo)5.696 G 3.196(re).15 G .695(xample, a suc-)-3.346 F .642 (cessful setup returns a string which is the name of the v)158 314.4 R .643(endor of the X serv)-.15 F(er)-.15 E 5.643(.A)-.55 G 3.143(tl) -5.643 G -2.15 -.25(ev e)-3.143 H 3.143(l1).25 G 3.143(,t)-3.143 G(he) -3.143 E -.15(ex)158 326.4 S 1.577(plicit \214eld gi).15 F 1.576(ving t\ he length of the string is suppressed since it can be inferred from the) -.25 F 2.5(string. At)158 338.4 R(le)2.5 E -.15(ve)-.25 G 2.5(l2a).15 G (nd abo)-2.5 E .3 -.15(ve t)-.15 H(he length is e).15 E (xplicitly printed.)-.15 E F1(\255G)108 360 Q F0 .273 (Determines the grab timeout.)158 372 R .274(If an)5.274 F 2.774(ya)-.15 G(cti)-2.774 E .574 -.15(ve g)-.25 H .274(rab \(serv).15 F(er)-.15 E 2.774(,p)-.4 G(ointer)-2.774 E 2.774(,o)-.4 G 2.774(rk)-2.774 G -.15(ey) -2.874 G .274(board\) originating from).15 F .348 (the program under test lasts longer than this time \(def)158 384 R .347 (ault 30 seconds\) the xlab program termi-)-.1 F .473 (nates, releasing the grab)158 396 R 5.473(.T)-.4 G .473 (his feature is handy for use in deb)-5.473 F .474 (ugging situations in which grabs)-.2 F(deadlock the serv)158 408 Q(er) -.15 E(.)-.55 E/F3 9/Times-Bold@0 SF(COMMANDS)72 424.8 Q F2(xlab)108 436.8 Q F0 .175(has a command interpreter)2.675 F 2.675(,w)-.4 G .175 (hich allo)-2.675 F .174(ws to read commands at an)-.25 F 2.674(yt)-.15 G .174(ime from the k)-2.674 F -.15(ey)-.1 G .174(board, a pipe \(for) .15 F(GUI interaction\) or a \214le \(for complete automation\).)108 448.8 Q F2 -.2(ex)108 470.4 S(it).2 E F0 -.7(Te)10.76 G (rminates the program. If some clients are still connected on xlab, the) .7 E 2.5(yw)-.15 G(ill be terminated as well.)-2.5 E F2 -.37(re)108 492 S(cor).37 E 2.5<648c>-.37 G(lename)-2.5 E F0 1.882 (Starts recording user input XEv)133 504 R 1.883(ents \(k)-.15 F -.15 (ey)-.1 G 1.883 (board and mouse\) in the speci\214ed \214lename \(same as -r).15 F (option\).)133 516 Q F2 -.37(re)108 537.6 S(play \214lename).37 E F0 (Starts replaying e)133 549.6 Q -.15(ve)-.25 G (nts from the speci\214ed \214lename \(same as -p option\).).15 E F2 (stop r)108 571.2 Q(ecor)-.37 E(d)-.37 E F0(Stop the current recording.) 133 583.2 Q F2(stop r)108 600 Q(eplay)-.37 E F0(Stop the current replay) 133 612 Q(.)-.65 E F3(OPERA)72 628.8 Q(TION)-.855 E F0 (When running with)108 640.8 Q F2(xlab)2.5 E F0 2.5(,t)C (hree processes are in)-2.5 E -.2(vo)-.4 G(lv).2 E (ed, potentially all on dif)-.15 E(ferent machines:)-.25 E F2 2.5(Xs)108 662.4 S(erver)-2.5 E F0 .492(The X serv)133 674.4 R .492 (er will run on machine \(or host\) "A", display "B".)-.15 F .492 (\("A" is a machine name; "B" is a dis-)5.492 F(play number\).)133 686.4 Q F2 5.28(xlab xlab)108 708 R F0 .446(must be told where the X serv) 2.946 F .447 (er is \(what machine and what display\), and, in addition, the)-.15 F F2(port-)2.947 E(number)133 720 Q F0 3.427 (on which to listen for X clients.)5.927 F 3.426(The options for)8.426 F F2(xlab)5.926 E F0 3.426(are "-h" and)-.2 F 2.5(XV)72 768 S(ersion 11)-3.61 E(28 FEB 1997)154.56 E(2)202.33 E EP %%Page: 3 3 %%BeginPageSetup BP %%EndPageSetup /F0 10/Times-Roman@0 SF 387.74(XLAB\(1\) XLAB\(1\))72 48 R 3.847 ("-d". In)133 84 R 1.347(this e)3.847 F 1.347 (xample, -hA and -dB.)-.15 F -.8(Ty)6.348 G 1.348(pically the).8 F/F1 10 /Times-Italic@0 SF(display-number)3.848 E F0 1.348(is not gi)3.848 F -.15(ve)-.25 G(n.).15 E F1(xlab)133 96 Q F0(will not try to)2.5 E (connect to the serv)5 E(er until the client connects to)-.15 E F1(xlab) 2.5 E F0(.)A F1 2.5(Xc)108 117.6 S(lient)-2.5 E F0 .206 (The client should connect to)133 129.6 R F1(xlab)2.706 E F0 .206 (rather than to the serv)2.706 F(er)-.15 E 5.205(.T)-.55 G 2.705(oa) -6.005 G -.2(vo)-2.905 G .205(id changing the code for the client,).2 F F1(xlab)133 141.6 Q F0 .223(listens on the same port as the serv)2.723 F .223(er for connecting clients.)-.15 F .223(If the serv)5.223 F .223 (er and)-.15 F F1(xlab)2.723 E F0 .224(are on dif)2.724 F(fer)-.25 E(-) -.2 E .298(ent machines, this w)133 153.6 R .298(orks well.)-.1 F(Ho) 5.298 E(we)-.25 E -.15(ve)-.25 G 1.098 -.4(r, i).15 H 2.798(ft).4 G .298 (he serv)-2.798 F .298(er and)-.15 F F1(xlab)2.798 E F0 .297 (are on the same machine, this creates)2.798 F 2.941(ap)133 165.6 S .441 (ort con\215ict.)-2.941 F 2.041 -.8(To r)5.441 H(esolv).8 E 2.941(et) -.15 G .441(his con\215ict,)-2.941 F F1(xlab)2.941 E F0 .441(can be gi) 2.941 F -.15(ve)-.25 G 2.941(nad).15 G(if)-2.941 E .441 (ferent input or output port number)-.25 F 2.942(,a)-.4 G(s)-2.942 E (necessary)133 177.6 Q 2.988(,t)-.65 G 2.988(oa)-2.988 G -.2(vo)-3.188 G .487(id the port that the serv).2 F .487(er is listening to.)-.15 F .487 (The client must connect to this of)5.487 F .487(fset port)-.25 F (number)133 189.6 Q 5.805(.T)-.55 G .805(he input port for)-5.805 F F1 (xlab)3.305 E F0 .805(is set by)3.305 F F1(-i)3.305 E F0 3.305(;t)C .805(he output port is set by)-3.305 F F1(-o.)133 201.6 Q F0 .177(The def)5.177 F .177 (ault input port is 1; the def)-.1 F .177(ault output port is 0.)-.1 F .176(These ports are of)5.176 F .176(fset by the X11 base)-.25 F 1.065 (\(6000\) and the display number)133 213.6 R 6.065(.T)-.55 G 1.065 (he client attaches to)-6.065 F F1(xlab)3.565 E F0 1.065 (by changing its display number by the)3.565 F(port of)133 225.6 Q (fset.)-.25 E/F2 9/Times-Bold@0 SF(EXAMPLES)72 242.4 Q/F3 10 /Times-Bold@0 SF(xlab -hbagel -r/tmp/r)108 254.4 Q(ecord)-.18 E F0 .443 (The X serv)108 271.2 R .443(er w)-.15 F .443(ould be e)-.1 F .443 (xpected to be found on "bagel", display 0 \(the def)-.15 F(ault\).)-.1 E F1(xlab)5.442 E F0 .442(and the client w)2.942 F(ould)-.1 E .723 (both be running on "cleo".)108 283.2 R .724(The client program w)5.724 F .724(ould think it w)-.1 F .724(as connecting to an X serv)-.1 F .724 (er on "cleo:1".)-.15 F .529(This X serv)108 295.2 R .529 (er is actually)-.15 F F1(xlab)3.029 E F0 3.029(,w)C .529(hich w)-3.029 F .529(ould record e)-.1 F -.15(ve)-.25 G .529 (nts and pass through requests and e).15 F -.15(ve)-.25 G .528 (nts to the real).15 F 2.5(Xs)108 307.2 S(erv)-2.5 E (er running on "bagel:0".)-.15 E(serv)113 324 Q (er \(bagel:0\) <---> xlab -hbagel <---> client -d cleo:1)-.15 E (As it runs,)108 340.8 Q F1(xlab)2.5 E F0(records input e)2.5 E -.15(ve) -.25 G(nts for the client to the \214le /tmp/record.).15 E F3 (xlab -p/tmp/r)108 357.6 Q(ecord)-.18 E F0 .615(The X serv)108 374.4 R .615(er w)-.15 F .615(ould be e)-.1 F .615 (xpected to be found on the local host, display 0 \(the def)-.15 F (ault\).)-.1 E F1(xlab)5.615 E F0 .615(and the client)3.115 F -.1(wo)108 386.4 S 1.297(uld be running on the same local host.).1 F 1.297 (The client w)6.297 F 1.297(ould connect to "localhost:1", the)-.1 F F1 (xlab)3.796 E F0(program,)3.796 E(which in turn w)108 398.4 Q (ould connect to the real X serv)-.1 E(er on "localhost:0".)-.15 E(serv) 113 415.2 Q(er \(localhost:0\) <---> xlab)-.15 E (<---> client -display localhost:1)5 E .905(As it runs,)108 432 R F1 (xlab)3.405 E F0 .905(plays back pre-recorded e)3.405 F -.15(ve)-.25 G .905(nts for the client from the \214le /tmp/record.).15 F .906 (If all is well, the)5.906 F(recorded session should be reproduced.)108 444 Q F2(LIMIT)72 460.8 Q -.855(AT)-.81 G(IONS).855 E F0(The X V)108 472.8 Q(ersion 11 is the only protocol recognized.)-1.11 E .11 (The error)108 489.6 R .11(-detection scheme on playback is e)-.2 F .11 (xtremely limited. At this time xlab can be confused if the client)-.15 F(beha)108 501.6 Q -.15(ve)-.2 G 2.5(sd).15 G(if)-2.5 E (ferently at the replay \(windo)-.25 E 2.5(wi)-.25 G 2.5(dm)-2.5 G (atching scheme\), b)-2.5 E(ut may be \214x)-.2 E(ed soon.)-.15 E .639(\ The assumptions made about the similarity between the recorded and play\ ed back client sessions are easy)108 518.4 R .205(to break. T)108 530.4 R .405 -.1(wo m)-.8 H .205(odes ha).1 F .505 -.15(ve t)-.2 H 2.705(ob) .15 G 2.705(es)-2.705 G .204(upported: strict respect of recorded delay\ s, and synchronization according)-2.705 F (to the protocol instead of timers.)108 542.4 Q .88(The number of a)108 559.2 R -.25(va)-.2 G .88 (ilable commands from is still limited \(only record, replay).25 F 3.38 (,s)-.65 G .88(top\). Command interpreter)-3.38 F .236(will not w)108 571.2 R .235(ork well if commands are read from a \214le. It')-.1 F 2.735(so)-.55 G 2.735(ki)-2.735 G 2.735(fc)-2.735 G .235 (ommands are read from k)-2.735 F -.15(ey)-.1 G .235(board or a pipe.) .15 F 2.5(As)108 588 S(econd replay in the same session doesn')-2.5 E 2.5(tw)-.18 G(ork well. It is necessary to e)-2.6 E (xit from xlab and restart.)-.15 E(Image capture function \(for compari\ son between recording and replay\) not yet implemented.)108 604.8 Q (GUI not yet a)108 621.6 Q -.25(va)-.2 G(ilable.).25 E (Recorded \214le not yet compressed.)108 638.4 Q F2(SEE ALSO)72 655.2 Q F0(X\(1\), X11 and PEX Protocol documents)108 667.2 Q F2 -.45(AU)72 684 S(THOR).45 E F0 .051(Marc V)108 696 R .051(ertes, initially deri)-1.11 F -.15(ve)-.25 G 2.551(df).15 G .051(rom a w)-2.551 F .051 (ork from James Peterson \(xscope\), and Oli)-.1 F -.15(ve)-.25 G 2.552 (rJ).15 G .052(ones \(xscript\). Others)-2.552 F(ha)108 708 Q .3 -.15 (ve c)-.2 H(ontrib).15 E (uted, as Liora Maron, who helped to \214x replay synchronisation.)-.2 E 2.5(XV)72 768 S(ersion 11)-3.61 E(28 FEB 1997)154.56 E(3)202.33 E EP %%Trailer end %%EOF xlab-980917mine/decode11.c100664 71506 1605 67560 6745313377 14471 0ustar hildebinstall/* * $Id: decode11.c,v 1.4 1998/07/24 11:59:13 marc Exp $ * * Decoding and switching routines for the X11 protocol * * James Peterson, 1988 * (c) Copyright MCC, 1988 * (c) Marc Vertes, 1998 * */ #include "scope.h" #include "x11.h" #include "print11.h" #include "server.h" #include "record.h" #include "common.h" /* * There are 4 types of things in X11: requests, replies, errors, and events. * * Each of them has a format defined by a small integer that defines * the type of the thing. * * Requests have an opcode in the first byte. * Events have a code in the first byte. * Errors have a code in the second byte (the first byte is 0) * Replies ... * * Replies have a sequence number in bytes 2 and 3. The sequence * number should be used to identify the request that was sent, and * from that request we can determine the type of the reply. */ /*----------------------------------------------------------------------*/ /* * We need to keep the sequence number for a request to match it with * an expected reply. The sequence number is associated only with the * particular connection that we have. We would expect these replies * to be handled as a FIFO queue. */ struct QueueEntry { struct QueueEntry *Next; long SequenceNumber; short Request; }; /* free space list of Q entries */ static struct QueueEntry *FreeQEntries = NULL; /* define a queue of entries for each FD */ struct QueueHeader { struct QueueEntry *Head; struct QueueEntry *Tail; }; struct QueueHeader ReplyQ[StaticMaxFD]; /*----------------------------------------------------------------------*/ struct QueueEntry *NewQEntry(SequenceNumber, Request) long SequenceNumber; short Request; { struct QueueEntry *p; /* Get a Queue Entry */ if (FreeQEntries == NULL) { /* create new queue entry */ p = (struct QueueEntry *) Malloc((long) (sizeof(*p))); } else { /* reuse an old queue entry */ p = FreeQEntries; FreeQEntries = FreeQEntries->Next; } /* fill in its values */ p->Next = NULL; p->SequenceNumber = SequenceNumber; p->Request = Request; return (p); } /*----------------------------------------------------------------------*/ void InitReplyQ() { short i; for (i = 0; i < StaticMaxFD; i++) { ReplyQ[i].Head = NULL; ReplyQ[i].Tail = NULL; } } /*----------------------------------------------------------------------*/ void FlushReplyQ(fd) FD fd; { struct QueueEntry *p; struct QueueEntry *NextQEntry; /* go down the reply queue and free all entries */ for (p = ReplyQ[fd].Head; p != NULL; p = NextQEntry) { NextQEntry = p->Next; /* put freed entry on list of free entries (for later reuse) */ p->Next = FreeQEntries; FreeQEntries = p; } ReplyQ[fd].Head = NULL; ReplyQ[fd].Tail = NULL; } /*----------------------------------------------------------------------*/ void DumpReplyQ(fd) FD fd; { fprintf(stderr, "ReplyQ[%ld] = { Head 0x%lx; Tail 0x%lx }\n", (long) fd, (long) ReplyQ[fd].Head, (long) ReplyQ[fd].Tail); { struct QueueEntry *p; for (p = ReplyQ[fd].Head; p != NULL; p = p->Next) fprintf(stderr, "0x%lx = { Next 0x%lx; SequenceNumber %ld; Request %d }\n", (long) p, (long) p->Next, p->SequenceNumber, p->Request); } } /*----------------------------------------------------------------------*/ /* A reply is expected to the type of request given for the fd associated * with this one */ void SequencedReplyExpected(fd, SequenceNumber, RequestType) FD fd; long SequenceNumber; short RequestType; { struct QueueEntry *p; debug(8, (stderr, "Reply expected: sequence %ld and request type %d for fd %d\n", SequenceNumber, RequestType, fd)); /* create a new queue entry */ p = NewQEntry(SequenceNumber, RequestType); /* find the server associated with this client */ fd = FDPair(fd); if (fd < 0 || fd >= StaticMaxFD) return; /* attach the new queue entry to the end of the queue for the Server */ if (ReplyQ[fd].Tail != NULL) (ReplyQ[fd].Tail)->Next = p; else ReplyQ[fd].Head = p; ReplyQ[fd].Tail = p; debug(8, (stderr, "Save sequence %ld and request type %d for fd %d\n", p->SequenceNumber, p->Request, fd)); } /*----------------------------------------------------------------------*/ static FD Lastfd; static long LastSequenceNumber; static short LastReplyType; /* * Search for the type of request that is associated with a reply * to the given sequence number for this fd */ short CheckReplyTable(fd, SequenceNumber) FD fd; short SequenceNumber; { struct QueueEntry *p; struct QueueEntry *trailer; if (debuglevel & 128) DumpReplyQ(fd); for (trailer = NULL, p = ReplyQ[fd].Head; p != NULL; trailer = p, p = p->Next) { /* look for matching sequence number in queue of this fd */ if (SequenceNumber == ((short) (0xFFFF & p->SequenceNumber))) { /* save the Request type */ Lastfd = fd; LastSequenceNumber = p->SequenceNumber; LastReplyType = p->Request; /* pull the queue entry out of the queue for this fd */ if (trailer == NULL) ReplyQ[fd].Head = p->Next; else trailer->Next = p->Next; if (ReplyQ[fd].Tail == p) ReplyQ[fd].Tail = trailer; /* put freed entry on list of free entries (for later reuse) */ p->Next = FreeQEntries; FreeQEntries = p; debug(8, (stderr, "Reply on fd %d for sequence %d is type %d\n", fd, SequenceNumber, LastReplyType)); return (LastReplyType); } } /* not expecting a reply for that sequence number */ debug(8, (stderr, "Reply on fd %d for sequence %d is not found\n", fd, SequenceNumber)); return (0); } /*----------------------------------------------------------------------*/ /* * A reply is expected to the type of request given for the * sequence number associated with this fd. */ void ReplyExpected(fd, Request) FD fd; short Request; { SequencedReplyExpected(fd, CS[fd].SequenceNumber, Request); } /*----------------------------------------------------------------------*/ /* * Another reply is expected for the same reply as we just had * This is only used with ListFontsWithInfo */ void KeepLastReplyExpected() { SequencedReplyExpected(Lastfd, LastSequenceNumber, LastReplyType); } /*----------------------------------------------------------------------*/ void DecodeRequest(fd, buf, n) FD fd; unsigned char *buf; long n; { short Request = IByte(&buf[0]); char error_str[40]; bcopy((char *) &(CS[fd].SequenceNumber), (char *) SBf, sizeof(long)); SetIndentLevel(PRINTCLIENT); if (Verbose > 3) DumpItem("Request", fd, buf, n); if (Request <= 0 || 127 < Request) { /* if (Request == 130 || Request == 128) { */ sprintf(error_str, "Extended request opcode %d", Request); warn(error_str); } else switch (Request) { case 1: CreateWindow(buf); break; case 2: ChangeWindowAttributes(buf); break; case 3: GetWindowAttributes(buf); ReplyExpected(fd, Request); break; case 4: DestroyWindow(buf); break; case 5: DestroySubwindows(buf); break; case 6: ChangeSaveSet(buf); break; case 7: ReparentWindow(buf); break; case 8: MapWindow(buf); break; case 9: MapSubwindows(buf); break; case 10: UnmapWindow(buf); break; case 11: UnmapSubwindows(buf); break; case 12: ConfigureWindow(buf); break; case 13: CirculateWindow(buf); break; case 14: GetGeometry(buf); ReplyExpected(fd, Request); break; case 15: QueryTree(buf); ReplyExpected(fd, Request); break; case 16: InternAtom(buf); ReplyExpected(fd, Request); break; case 17: GetAtomName(buf); ReplyExpected(fd, Request); break; case 18: ChangeProperty(buf); break; case 19: DeleteProperty(buf); break; case 20: GetProperty(buf); ReplyExpected(fd, Request); break; case 21: ListProperties(buf); ReplyExpected(fd, Request); break; case 22: SetSelectionOwner(buf); break; case 23: GetSelectionOwner(buf); ReplyExpected(fd, Request); break; case 24: ConvertSelection(buf); break; case 25: SendEvent(buf); break; case 26: GrabPointer(buf); ReplyExpected(fd, Request); break; case 27: UngrabPointer(buf); break; case 28: GrabButton(buf); break; case 29: UngrabButton(buf); break; case 30: ChangeActivePointerGrab(buf); break; case 31: GrabKeyboard(buf); ReplyExpected(fd, Request); break; case 32: UngrabKeyboard(buf); break; case 33: GrabKey(buf); break; case 34: UngrabKey(buf); break; case 35: AllowEvents(buf); break; case 36: GrabServer(buf); break; case 37: UngrabServer(buf); break; case 38: QueryPointer(buf); ReplyExpected(fd, Request); break; case 39: GetMotionEvents(buf); ReplyExpected(fd, Request); break; case 40: TranslateCoordinates(buf); ReplyExpected(fd, Request); break; case 41: WarpPointer(buf); break; case 42: SetInputFocus(buf); break; case 43: GetInputFocus(buf); ReplyExpected(fd, Request); break; case 44: QueryKeymap(buf); ReplyExpected(fd, Request); break; case 45: OpenFont(buf); break; case 46: CloseFont(buf); break; case 47: QueryFont(buf); ReplyExpected(fd, Request); break; case 48: QueryTextExtents(buf); ReplyExpected(fd, Request); break; case 49: ListFonts(buf); ReplyExpected(fd, Request); break; case 50: ListFontsWithInfo(buf); ReplyExpected(fd, Request); break; case 51: SetFontPath(buf); break; case 52: GetFontPath(buf); ReplyExpected(fd, Request); break; case 53: CreatePixmap(buf); break; case 54: FreePixmap(buf); break; case 55: CreateGC(buf); break; case 56: ChangeGC(buf); break; case 57: CopyGC(buf); break; case 58: SetDashes(buf); break; case 59: SetClipRectangles(buf); break; case 60: FreeGC(buf); break; case 61: ClearArea(buf); break; case 62: CopyArea(buf); break; case 63: CopyPlane(buf); break; case 64: PolyPoint(buf); break; case 65: PolyLine(buf); break; case 66: PolySegment(buf); break; case 67: PolyRectangle(buf); break; case 68: PolyArc(buf); break; case 69: FillPoly(buf); break; case 70: PolyFillRectangle(buf); break; case 71: PolyFillArc(buf); break; case 72: PutImage(buf); break; case 73: GetImage(buf); ReplyExpected(fd, Request); break; case 74: PolyText8(buf); break; case 75: PolyText16(buf); break; case 76: ImageText8(buf); break; case 77: ImageText16(buf); break; case 78: CreateColormap(buf); break; case 79: FreeColormap(buf); break; case 80: CopyColormapAndFree(buf); break; case 81: InstallColormap(buf); break; case 82: UninstallColormap(buf); break; case 83: ListInstalledColormaps(buf); ReplyExpected(fd, Request); break; case 84: AllocColor(buf); ReplyExpected(fd, Request); break; case 85: AllocNamedColor(buf); ReplyExpected(fd, Request); break; case 86: AllocColorCells(buf); ReplyExpected(fd, Request); break; case 87: AllocColorPlanes(buf); ReplyExpected(fd, Request); break; case 88: FreeColors(buf); break; case 89: StoreColors(buf); break; case 90: StoreNamedColor(buf); break; case 91: QueryColors(buf); ReplyExpected(fd, Request); break; case 92: LookupColor(buf); ReplyExpected(fd, Request); break; case 93: CreateCursor(buf); break; case 94: CreateGlyphCursor(buf); break; case 95: FreeCursor(buf); break; case 96: RecolorCursor(buf); break; case 97: QueryBestSize(buf); ReplyExpected(fd, Request); break; case 98: QueryExtension(buf); ReplyExpected(fd, Request); break; case 99: ListExtensions(buf); ReplyExpected(fd, Request); break; case 100: ChangeKeyboardMapping(buf); break; case 101: GetKeyboardMapping(buf); ReplyExpected(fd, Request); break; case 102: ChangeKeyboardControl(buf); break; case 103: GetKeyboardControl(buf); ReplyExpected(fd, Request); break; case 104: Bell(buf); break; case 105: ChangePointerControl(buf); break; case 106: GetPointerControl(buf); ReplyExpected(fd, Request); break; case 107: SetScreenSaver(buf); break; case 108: GetScreenSaver(buf); ReplyExpected(fd, Request); break; case 109: ChangeHosts(buf); break; case 110: ListHosts(buf); ReplyExpected(fd, Request); break; case 111: SetAccessControl(buf); break; case 112: SetCloseDownMode(buf); break; case 113: KillClient(buf); break; case 114: RotateProperties(buf); break; case 115: ForceScreenSaver(buf); break; case 116: SetPointerMapping(buf); ReplyExpected(fd, Request); break; case 117: GetPointerMapping(buf); ReplyExpected(fd, Request); break; case 118: SetModifierMapping(buf); ReplyExpected(fd, Request); break; case 119: GetModifierMapping(buf); ReplyExpected(fd, Request); break; case 127: NoOperation(buf); break; default: warn("Unimplemented request opcode"); break; } } /*----------------------------------------------------------------------*/ int GrabTimeoutProc(timer, message) TimerID timer; char *message; { extern unsigned long int GrabTimeout; fprintf(stderr, "xlab: deadlock prevention feature activated.\n"); fprintf(stderr, "xlab: %s: %ld-second timeout expired; aborting.\n", message, GrabTimeout); fprintf(stderr, "xlab: to change timeout, rerun with -G option.\n"); exit(1); } /*----------------------------------------------------------------------*/ int whichGrab = -1; int status = -1; void ProcessGrab(fd, buf, n) FD fd; unsigned char *buf; long n; { static TimerID blastGrabTimer[3] = {0, 0, 0}; extern unsigned long int GrabTimeout; char *message = (char *)NULL; short Request = IByte(&buf[0]); int i; int j; switch (Request) { case 26: /* GrabPointer */ whichGrab = 1; status = 1; message = "GrabPointer"; break; case 27: /* UngrabPointer */ whichGrab = 1; status = 0; break; case 31: /* GrabKeyboard */ whichGrab = 2; status = 1; message = "GrabKeyboard"; break; case 32: /* UngrabKeyboard */ whichGrab = 2; status = 0; break; case 35: /* AllowEvents */ { short mode = IByte(&buf[1]); switch (mode) { case 0: /* AsyncPointer */ whichGrab = 1; status = 0; break; case 1: /* SyncPointer */ whichGrab = 1; status = 1; message = "AllowEvents(SyncPointer)"; break; case 2: /* ReplayPointer */ whichGrab = 1; status = 0; break; case 3: /* AsyncKeyboard */ whichGrab = 2; status = 0; break; case 4: /* SyncKeyboard */ whichGrab = 2; status = 1; message = "AllowEvents(SyncKeyboard)"; break; case 5: /* ReplayKeyboard */ whichGrab = 2; status = 0; break; case 6: /* AsyncBoth */ whichGrab = 3; status = 0; break; case 7: /* SyncBoth */ whichGrab = 3; status = 1; message = "AllowEvents(SyncBoth)"; break; } } break; case 36: /* GrabServer */ whichGrab = 4; status = 1; message = "GrabServer"; break; case 37: /* UngrabServer */ whichGrab = 4; status = 0; break; } if (status >= 0) { for (i = 0; i <= 2; i++) { j = 1 & (whichGrab >> i); if (j) { switch (status) { case 1: /* start a grab */ if (blastGrabTimer[i]) DeleteTimer(blastGrabTimer[i]); blastGrabTimer[i] = CreateTimer(1000 * GrabTimeout, (void (*)()) GrabTimeoutProc, message); break; case 0: /* end a grab */ if (blastGrabTimer[i]) { DeleteTimer(blastGrabTimer[i]); blastGrabTimer[i] = 0; } break; } } } } } /*----------------------------------------------------------------------*/ /* * This function is activated during replay to avoid lost sequence * messages due to Xlib requests buffering. */ void FixReplySeq(fd, buf, n) FD fd; unsigned char *buf; long n; { static unsigned short last_rep_seq = 0; unsigned short SequenceNumber = IShort(&buf[2]); /* unsigned short Request = CheckReplyTable(fd, SequenceNumber); */ FD pairfd = FDPair(fd); unsigned short int seq = 0; /* obtain the sequence number from the client-side CS structure */ if (pairfd >= StaticMaxFD) pairfd = -1; if (pairfd >= 0) seq = CS[pairfd].SequenceNumber; CS[pairfd].SequenceNumber = IShort(&buf[2]); fprintf(stderr, "Reply seq %x <--> CS.req %x, last %x\n", SequenceNumber, seq, last_rep_seq); last_rep_seq = SequenceNumber; } /*----------------------------------------------------------------------*/ void DecodeReply(fd, buf, n) FD fd; unsigned char *buf; long n; { short SequenceNumber = IShort(&buf[2]); short Request = CheckReplyTable(fd, SequenceNumber); if (Request == 0) { warn("Unexpected reply"); return; } SetIndentLevel(PRINTSERVER); RBf[0] = Request /* for the PrintField in the Reply procedure */ ; if (Verbose > 3) DumpItem("Reply", fd, buf, n); if (Request == 130 || Request == 128) { warn("Extended reply opcode"); } else if (Request <= 0 || 127 < Request) warn("Extended reply opcode"); else switch (Request) { case 3: GetWindowAttributesReply(buf); break; case 14: GetGeometryReply(buf); break; case 15: QueryTreeReply(buf); break; case 16: InternAtomReply(buf); break; case 17: GetAtomNameReply(buf); break; case 20: GetPropertyReply(buf); break; case 21: ListPropertiesReply(buf); break; case 23: GetSelectionOwnerReply(buf); break; case 26: GrabPointerReply(buf); break; case 31: GrabKeyboardReply(buf); break; case 38: QueryPointerReply(buf); break; case 39: GetMotionEventsReply(buf); break; case 40: TranslateCoordinatesReply(buf); break; case 43: GetInputFocusReply(buf); break; case 44: QueryKeymapReply(buf); break; case 47: QueryFontReply(buf); break; case 48: QueryTextExtentsReply(buf); break; case 49: ListFontsReply(buf); break; case 50: ListFontsWithInfoReply(buf); break; case 52: GetFontPathReply(buf); break; case 73: GetImageReply(buf); break; case 83: ListInstalledColormapsReply(buf); break; case 84: AllocColorReply(buf); break; case 85: AllocNamedColorReply(buf); break; case 86: AllocColorCellsReply(buf); break; case 87: AllocColorPlanesReply(buf); break; case 91: QueryColorsReply(buf); break; case 92: LookupColorReply(buf); break; case 97: QueryBestSizeReply(buf); break; case 98: QueryExtensionReply(buf); break; case 99: ListExtensionsReply(buf); break; case 101: GetKeyboardMappingReply(buf); break; case 103: GetKeyboardControlReply(buf); break; case 106: GetPointerControlReply(buf); break; case 108: GetScreenSaverReply(buf); break; case 110: ListHostsReply(buf); break; case 116: SetPointerMappingReply(buf); break; case 117: GetPointerMappingReply(buf); break; case 118: SetModifierMappingReply(buf); break; case 119: GetModifierMappingReply(buf); break; default: warn("Unimplemented reply opcode"); break; } } /*----------------------------------------------------------------------*/ void DecodeError(fd, buf, n) FD fd; unsigned char *buf; long n; { short Error = IByte(&buf[1]); SetIndentLevel(PRINTSERVER); if (Verbose > 3) DumpItem("Error", fd, buf, n); (void) CheckReplyTable(fd, (short) IShort(&buf[2])); if (Error < 1 || Error > 17) warn("Extended Error code"); else switch (Error) { case 1: RequestError(buf); break; case 2: ValueError(buf); break; case 3: WindowError(buf); break; case 4: PixmapError(buf); break; case 5: AtomError(buf); break; case 6: CursorError(buf); break; case 7: FontError(buf); break; case 8: MatchError(buf); break; case 9: DrawableError(buf); break; case 10: AccessError(buf); break; case 11: AllocError(buf); break; case 12: ColormapError(buf); break; case 13: GContextError(buf); break; case 14: IDChoiceError(buf); break; case 15: NameError(buf); break; case 16: LengthError(buf); break; case 17: ImplementationError(buf); break; default: warn("Unimplemented error code"); break; } } /*----------------------------------------------------------------------*/ void DecodeEvent(fd, buf, n) FD fd; unsigned char *buf; long n; { short Event = IByte(&buf[0]); SetIndentLevel(PRINTSERVER); if (Verbose > 3) DumpItem("Event", fd, buf, n); /* high-order bit means SendEvent generated */ if (Event & 0x80) { debug(8, (stderr, "SendEvent generated event 0x%x\n", Event)); Event = Event & 0x7F; } if (Event < 2 || Event > 34) warn("Extended Event code"); else switch (Event) { case 2: KeyPressEvent(buf); break; case 3: KeyReleaseEvent(buf); break; case 4: ButtonPressEvent(buf); break; case 5: ButtonReleaseEvent(buf); break; case 6: MotionNotifyEvent(buf); break; case 7: EnterNotifyEvent(buf); break; case 8: LeaveNotifyEvent(buf); break; case 9: FocusInEvent(buf); break; case 10: FocusOutEvent(buf); break; case 11: KeymapNotifyEvent(buf); break; case 12: ExposeEvent(buf); break; case 13: GraphicsExposureEvent(buf); break; case 14: NoExposureEvent(buf); break; case 15: VisibilityNotifyEvent(buf); break; case 16: CreateNotifyEvent(buf); break; case 17: DestroyNotifyEvent(buf); break; case 18: UnmapNotifyEvent(buf); break; case 19: MapNotifyEvent(buf); break; case 20: MapRequestEvent(buf); break; case 21: ReparentNotifyEvent(buf); break; case 22: ConfigureNotifyEvent(buf); break; case 23: ConfigureRequestEvent(buf); break; case 24: GravityNotifyEvent(buf); break; case 25: ResizeRequestEvent(buf); break; case 26: CirculateNotifyEvent(buf); break; case 27: CirculateRequestEvent(buf); break; case 28: PropertyNotifyEvent(buf); break; case 29: SelectionClearEvent(buf); break; case 30: SelectionRequestEvent(buf); break; case 31: SelectionNotifyEvent(buf); break; case 32: ColormapNotifyEvent(buf); break; case 33: ClientMessageEvent(buf); break; case 34: MappingNotifyEvent(buf); break; default: warn("Unimplemented event code"); break; } } /*----------------------------------------------------------------------*/ /* * MonitorEvent is used during playback * for four purposes: * (1) to watch for particular window ids to show up * in the protocol stream, indicating that they're * ready to start receiving synthesized played back events. * (2) to watch for a timestamp from the server so * this protocol interposer process can synthesize reasonably * correct timestamps in synthetic events. * (3) to tweak the sequence numbers to avoid sequence-lost errors * on the client. * (4) to let us decide whether the event should be passed along * (during playback we synthesize button, key, and motion * events, so we suppress the real events. */ Boolean MonitorEvent(fd, buf, n) FD fd; unsigned char *buf; long n; { Boolean result; short Event = IByte(&buf[0]); Event &= 0x7F; /* watch for references to windows in events */ switch (Event) { case 2: case 3: case 4: case 5: case 6: case 7: case 8: WindowStatusAnnounce (fd, buf, 12, RES_Mapped); WindowStatusAnnounce (fd, buf, 16, RES_Mapped); break; case 9: WindowStatusAnnounce (fd, buf, 4, RES_Mapped); break; case 10: WindowStatusAnnounce (fd, buf, 4, RES_Mapped); break; case 12: case 15: WindowStatusAnnounce (fd, buf, 4, RES_Mapped); break; case 16: WindowStatusAnnounce (fd, buf, 8, RES_Unmapped); break; case 17: WindowStatusAnnounce (fd, buf, 8, RES_Unseen); break; case 18: WindowStatusAnnounce (fd, buf, 8, RES_Unmapped); break; case 19: WindowStatusAnnounce (fd, buf, 8, RES_Mapped); break; default: break; } /* watch for a timestamp */ if (CS[fd].TimeInitialized == 0) { int saw_time = 0; unsigned long int time = 0; switch (Event) { case 2: case 3: case 4: case 5: case 6: case 7: case 8: saw_time = 1; time = ILong(&buf[4]); break; /* MV 02-oct-97 Why care for property? case 28: saw_time = 1; time = ILong (&buf[4]); break; */ default: break; } if (saw_time) { struct timeval tv; unsigned long int t; CS[fd].TimeInitialized = 1; gettimeofday(&tv, 0); t = tv.tv_sec * 1000; t += tv.tv_usec / 1000; CS[fd].TimeOffset = time - t; } } /* * tweak the sequence numbers (based on stuff from client) */ switch (Event) { case 11: /* this one has no sequence number, skip */ break; case 2: case 3: case 4: case 5: case 6: case 7: case 8: case 9: case 10: case 12: case 13: case 14: case 15: case 16: case 17: case 18: case 19: case 20: case 21: case 22: case 23: case 24: case 25: case 26: case 27: case 28: case 29: case 30: case 31: case 32: case 33: case 34: { FD pairfd = FDPair(fd); unsigned short int seq = 0; /* obtain the sequence number from the client-side CS structure */ if (pairfd >= StaticMaxFD) pairfd = -1; if (pairfd >= 0) seq = CS[pairfd].SequenceNumber; OShort(&buf[2], seq); /* sequence number */ } break; } /* If we got a DestroyNotify, we may want to update our Windows * association table, to handle a later creation for that window. */ if (Event == 17) { SetNewid(ILong(&buf[8]), 0L); } /* * make the decision whether to pass this event * along to the client after receiving it from * the server. */ switch (Event) { case 2: case 3: case 4: case 5: case 6: result = 0; break; default: result = 1; break; } return result; } xlab-980917mine/decode11.h100664 71506 1605 2146 6745313377 14443 0ustar hildebinstall/* * $Id: decode11.h,v 1.1 1998/07/24 11:59:13 marc Exp $ * * Prototypes for functions implemented in decode11.c * * (c) Copyright Marc Vertes, 1998 * */ #ifndef _DECODE11_H_ #define _DECODE11_H_ #if __STDC__ || defined(__cplusplus) #define P_(s) s #else #define P_(s) () #endif /* decode11.c */ struct QueueEntry *NewQEntry P_((long SequenceNumber, int Request)); void InitReplyQ P_((void)); void FlushReplyQ P_((FD fd)); void DumpReplyQ P_((FD fd)); void SequencedReplyExpected P_((FD fd, long SequenceNumber, int RequestType)); short CheckReplyTable P_((FD fd, int SequenceNumber)); void ReplyExpected P_((FD fd, int Request)); void KeepLastReplyExpected P_((void)); void DecodeRequest P_((FD fd, unsigned char *buf, long n)); int GrabTimeoutProc P_((TimerID timer, char *message)); void ProcessGrab P_((FD fd, unsigned char *buf, long n)); void DecodeReply P_((FD fd, unsigned char *buf, long n)); void DecodeError P_((FD fd, unsigned char *buf, long n)); void DecodeEvent P_((FD fd, unsigned char *buf, long n)); short MonitorEvent P_((FD fd, unsigned char *buf, long n)); #undef P_ #endif /* _DECODE11_H_ */ xlab-980917mine/fd.c100664 71506 1605 25003 6745313377 13457 0ustar hildebinstall/* * $Id: fd.c,v 1.4 1998/07/24 11:59:14 marc Exp $ * * Support routines for file descriptors (FD) * * James Peterson, 1987 * (c) Copyright MCC, 1987 * (c) Copyright Marc Vertes, 1998 * */ #include #include #include /* for EINTR, EADDRINUSE, ... */ #include #include #include #include "scope.h" #include "common.h" struct FDDescriptor *FDD; /* array of FD descriptors */ short MaxFD; /* maximum number of FD's possible */ short nFDsInUse; /* number of FD's actually in use */ long ReadDescriptors; /* bit map of FD's in use -- for select */ short HighestFD; /* highest FD in use -- for select */ /* * All of this code is to support the handling of file descriptors (FD). * The idea is to keep a table of the FDs that are in use and why. * For each FD that is open for input, we keep the name of a procedure * to call if input arrives for that FD. When an FD is created * (by an open, pipe, socket, ...) declare that by calling UsingFD. * When it is no longer in use (close ...), call NotUsingFD. */ /*----------------------------------------------------------------------*/ /* * timer subsystem * The timer queue is a list of Timer structures * kept in order soonest first. * * The TimerID data type is simply a counter, assigned * serially to timers as they're created. */ typedef struct Timer { struct Timer *next; /* link */ struct timeval time; /* time to fire */ TimerID timer; /* ident of timer */ void (*handler) (); /* handler to call */ void *user_data; /* user data to pass */ } Timer; /* next timer id */ static TimerID nextTimerID = 0; /* timer queue header */ static Timer *timerQueue = 0; /*----------------------------------------------------------------------*/ static void add_millisecs(delta, time) unsigned long int delta; struct timeval *time; { unsigned long int secs = delta / 1000; unsigned long int msecs = delta - (secs * 1000); time->tv_usec += msecs * 1000; time->tv_sec += secs; while (time->tv_usec > 1000000) { time->tv_sec++; time->tv_usec -= 1000000; } } /*----------------------------------------------------------------------*/ static int time_compare(t1, t2) register struct timeval *t1; register struct timeval *t2; { if (t1->tv_sec > t2->tv_sec) return 1; if (t1->tv_sec < t2->tv_sec) return -1; if (t1->tv_usec > t2->tv_usec) return 1; if (t1->tv_usec < t2->tv_usec) return -1; return 0; } /*----------------------------------------------------------------------*/ static int time_subtract(out, t1, t2) register struct timeval *out; register struct timeval *t1; register struct timeval *t2; { register i = time_compare(t1, t2); if (i == 0) { out->tv_sec = 0; out->tv_usec = 0; return 0; } if (i > 0) { out->tv_sec = t1->tv_sec - t2->tv_sec; out->tv_usec = t1->tv_usec - t2->tv_usec; } else { out->tv_sec = t2->tv_sec - t1->tv_sec; out->tv_usec = t2->tv_usec - t1->tv_usec; } if (out->tv_usec > 1000000) { out->tv_sec++; out->tv_usec -= 1000000; } if (out->tv_usec < 0) { out->tv_sec--; out->tv_usec += 1000000; } return i; } /*----------------------------------------------------------------------*/ TimerID CreateTimer(delay, handler, user_data) unsigned long int delay; void (*handler) (); void *user_data; { TimerID result = ++nextTimerID; register Timer *t = (Timer *) Malloc(sizeof(Timer)); register Timer **p; register Timer *n; /* turn the delta-time specified into absolute time */ (void) gettimeofday(&t->time, 0); debug(128, (stderr, "insert %ld %ld %d %d\n", result, delay, t->time.tv_sec, t->time.tv_usec)); add_millisecs(delay, &t->time); debug(128, (stderr, "insert time to fire %d %d\n", t->time.tv_sec, t->time.tv_usec)); /* set up the list element */ t->timer = result; t->handler = handler; t->user_data = user_data; /* * search the queue looking for the right place for this timer. * notice that the right place is immediately AFTER all * previously enqueued events with this time */ p = &timerQueue; n = *p; while (n) { if (time_compare(&n->time, &t->time) > 0) { /* the one in the queue is later than the new one */ break; } p = &(n->next); n = n->next; } /* insert t in the list right before n */ t->next = n; *p = t; return result; } /*----------------------------------------------------------------------*/ void DeleteTimer(timer) TimerID timer; { register Timer **p; register Timer *n; p = &timerQueue; n = *p; /* search for a timer element */ while (n) { if (n->timer == timer) { /* found the one */ /* break the link */ *p = n->next; /* drop the data structure */ Free(n); break; } p = &(n->next); n = n->next; } /* if we didn't find it, don't do anything */ } /*----------------------------------------------------------------------*/ static struct timeval *handleTimers() { struct timeval now; register Timer *t; static struct timeval diff; /* pointer to this gets returned */ /* timers */ (void) gettimeofday(&now, 0); debug(128, (stderr, "main loop time now %d %d\n", now.tv_sec, now.tv_usec)); /* handle all events on the queue whose time has come */ t = timerQueue; while (t && (time_compare(&t->time, &now) <= 0)) { /* time to handle this event */ /* point the timer queue to the next event */ debug(128, (stderr, "deliver %ld %d %d\n", t->timer, t->time.tv_sec, t->time.tv_usec)); timerQueue = t->next; (t->handler) (t->timer, t->user_data); Free(t); t = timerQueue; } /* * is there still something in the queue? * if so, figure out how long til it fires */ if (t) { int i = time_subtract(&diff, &t->time, &now); if (i <= 0) panic("cant happen in HandleTimers"); debug(128, (stderr, "waitfor %d %d\n", diff.tv_sec, diff.tv_usec)); return &diff; /* delta timeval */ } else return 0; /* No timers, null timeval */ } /*----------------------------------------------------------------------*/ void InitializeFD() { register short i; enterprocedure("InitializeFD"); /* get the number of file descriptors the system will let us use */ #if defined(hpux) || defined(SVR4) MaxFD = _NFILE - 1; #else MaxFD = getdtablesize(); #endif if (MaxFD > StaticMaxFD) { fprintf(stderr, "Recompile with larger StaticMaxFD value %d\n", MaxFD); MaxFD = StaticMaxFD; } /* allocate space for a File Descriptor (FD) Table */ FDD = (struct FDDescriptor *) Malloc((long) (MaxFD * sizeof(struct FDDescriptor))); /* be sure all fd's are closed and marked not busy */ for (i = 0; i < MaxFD; i++) { /* 0, 1, 2 are special (stdin, stdout, stderr) */ if (i > 2) (void) close(i); FDD[i].Busy = false; } /* save one FD for single file input or output like debugging */ /* also the getservbyname call is currently using an FD */ MaxFD -= 4; nFDsInUse = 0 /* stdin, stdout, stderr */ ; ReadDescriptors = 0; HighestFD = 0; UsingFD(fileno(stdin), (int (*)()) NULL); UsingFD(fileno(stdout), (int (*)()) NULL); UsingFD(fileno(stderr), (int (*)()) NULL); } /*----------------------------------------------------------------------*/ void UsingFD(fd, Handler) FD fd; int (*Handler) (); { if (FDD[fd].Busy) NotUsingFD(fd); nFDsInUse += 1; FDD[fd].Busy = true; FDD[fd].InputHandler = Handler; if (Handler == NULL) ReadDescriptors &= ~(1 << fd) /* clear fd bit */ ; else ReadDescriptors |= 1 << fd /* set fd bit */ ; if (fd > HighestFD) HighestFD = fd; if (nFDsInUse >= MaxFD) panic("no more FDs"); debug(128, (stderr, "Using FD %d, %d of %d in use\n", fd, nFDsInUse, MaxFD)); } /*----------------------------------------------------------------------*/ void NotUsingFD(fd) FD fd; { debug(128, (stderr, "Not Using FD %d\n", fd)); if (FDD[fd].Busy) nFDsInUse -= 1; FDD[fd].Busy = false; ReadDescriptors &= ~(1 << fd) /* clear fd bit */ ; while (!FDD[HighestFD].Busy && HighestFD > 0) HighestFD -= 1; debug(128, (stderr, "Highest FD %d, in use %d\n", HighestFD, nFDsInUse)); } /*----------------------------------------------------------------------*/ void EOFonFD(fd) FD fd; { enterprocedure("EOFonFD"); debug(128, (stderr, "EOF on %d\n", fd)); (void) close(fd); NotUsingFD(fd); } /*----------------------------------------------------------------------*/ /* Main Loop -- wait for input from any source and Process */ extern int errno; #define XLAB_PROMPT "(xlab) " void MainLoop() { int fd_stdin = fileno(stdin); int stdin_isatty = isatty(fd_stdin); enterprocedure("MainLoop"); if (stdin_isatty) { fprintf(stdout, XLAB_PROMPT); fflush(stdout); } while (true) { int rfds, wfds, xfds; short nfds; short fd; struct timeval *time; /* wait for something */ rfds = ReadDescriptors; wfds = 0; xfds = rfds; time = handleTimers(); debug(128, (stderr, "select %d, rfds = 0%o\n", HighestFD + 1, rfds)); nfds = select(HighestFD + 1, (fd_set *) & rfds, (fd_set *) & wfds, (fd_set *) & xfds, time); debug(128, (stderr, "select nfds = 0%o, rfds = 0%o, 0%o, xfds 0%o\n", nfds, rfds, wfds, xfds)); if (nfds < 0) { if (errno == EINTR) continue /* to end of while loop */ ; debug(1, (stderr, "Bad select - errno = %d\n", errno)); if (errno == EBADF) { /* one of the bits in rfds is invalid, close down files until it goes away */ EOFonFD(HighestFD); continue; } panic("Select returns error"); continue /* to end of while loop */ ; } if (nfds == 0) { time = handleTimers(); continue; } /* check each fd to see if it has input */ for (fd = 0; 0 < nfds && fd <= HighestFD; fd++) { /* * Check all returned fd's; this prevents * starvation of later clients by earlier clients */ if ((rfds & (1 << fd)) == 0) continue; nfds -= 1; if (FDD[fd].InputHandler == NULL) { panic("FD selected with no handler"); debug(1, (stderr, "FD %d has NULL handler\n", fd)); } else (FDD[fd].InputHandler) (fd); /* * If the standard input is a tty (vs a file/pipe), issue a nice prompt */ if (fd == fd_stdin && stdin_isatty) { fprintf(stdout, XLAB_PROMPT); fflush(stdout); } } } } xlab-980917mine/fd.h100664 71506 1605 2447 6745313377 13453 0ustar hildebinstall/* * $Id: fd.h,v 1.4 1998/07/24 11:59:14 marc Exp $ * * header file file descriptor (FD) code * * James Peterson, 1987 * (c) Copyright MCC, 1987 * (c) Copyright Marc Vertes 1998 */ #ifndef _FD_H_ #define _FD_H_ #define Boolean short #define true 1 #define false 0 /* * the following structure remembers for each file descriptor its * state. In particular, we need to know if it is busy or free * and if it is in use, by whom. */ typedef int FD; struct FDDescriptor { Boolean Busy; int (*InputHandler)(); }; extern struct FDDescriptor *FDD; /* array of FD descriptors */ extern short MaxFD; /* maximum number of FD's possible */ extern short nFDsInUse; /* number of FD's actually in use */ extern long ReadDescriptors;/* bit map of FD's in use -- for select */ extern short HighestFD; /* highest FD in use -- for select */ typedef unsigned long int TimerID; #if __STDC__ || defined(__cplusplus) #define P_(s) s #else #define P_(s) () #endif /* fd.c */ TimerID CreateTimer P_((unsigned long int delay, void (*handler)(void), void *user_data)); void DeleteTimer P_((TimerID timer)); void InitializeFD P_((void)); void UsingFD P_((FD fd, int (*Handler)(void))); void NotUsingFD P_((FD fd)); void EOFonFD P_((FD fd)); void MainLoop P_((void)); #undef P_ #endif /* _FD_H_ */ xlab-980917mine/parse.l100664 71506 1605 3032 6745313377 14167 0ustar hildebinstall/* * $Id: parse.l,v 1.4 1998/07/24 11:59:14 marc Exp $ * * xlab command lexical analyzer * * (c) Marc Vertes 1997 * */ /* option for flex only */ /* new flex version */ %option noyywrap /* #define yywrap() {return 1;} old flex version */ %{ #include #include "y.tab.h" /* * flex: redefine YY_INPUT to parse a buffer instead of standard input * to do: make it portable for other lex flavors */ extern char *mystring; #undef YY_INPUT #define YY_INPUT(buf, result, max_size) \ { \ int c = *mystring++; \ result = (c == EOF) ? YY_NULL : (buf[0] = c, 1); \ } %} ws [ \t]+ nl \n natural [0-9]+ sysstr ![[:print:]]+\n qstring \"[^\"\n]*[\"\n] filename [A-Za-z0-9/$:.\-\_]+ %% {ws} ; record { return RECORD; } replay { return REPLAY; } stop { return STOP; } set { return SET; } debug { return DEBUG; } trace { return TRACE; } speed { return SPEED; } exit { return EXIT; } {sysstr} { yylval.string = (char *)strdup(yytext+1); /* skip exclamation mark (!) */ return SYSSTR; } {qstring} { yylval.string = (char *)strdup(yytext+1); /* skip open quote */ if (yylval.string[yyleng - 2] != '"') printf("Unterminated character string"); else yylval.string[yyleng - 2] = ' '; /* remove close quote */ return QSTRING; } {natural} { yylval.intval = atoi(yytext); return NATURAL; } {filename} { yylval.name = (char *)strdup(yytext); return FILENAME; } . { return yytext[0]; } xlab-980917mine/parse.y100664 71506 1605 4011 6745313377 14202 0ustar hildebinstall/* * $Id: parse.y,v 1.4 1998/07/24 11:59:15 marc Exp $ * * xlab command parser grammar * * (c) Marc Vertes 1997 * */ /* Definitions section */ %{ #include #include #include "fd.h" #include "record.h" #include "scope.h" #if __STDC__ || defined(__cplusplus) #define P_(s) s #else #define P_(s) () #endif int yylex P_((void)); int yyerror P_((char *)); #undef P_ extern int replay_counter; %} %union { char *string; /* quoted string (quotes removed by lex scanner) */ char *name; /* filename */ int intval; /* integer */ } %token EXIT %token RECORD %token REPLAY %token EXTREP %token STOP %token SET %token TRACE %token DEBUG %token SPEED %token NL %token FILENAME %token SYSSTR %token QSTRING %token NATURAL %% /* Rules section */ command: exit_command | set_command | record_command | replay_command | stop_record_command | stop_replay_command | shell_command ; set_command: set_speed_command | set_trace_command | set_debug_command ; set_speed_command: SET SPEED NATURAL { printf("speed: %d\n", $3); } ; set_debug_command: SET DEBUG NATURAL { printf("debug: %d\n", $3); } ; set_trace_command: SET TRACE NATURAL { printf("trace: %d\n", $3); } ; exit_command: EXIT { printf("Bye!\n"); ReportAndExit(); } ; record_command: RECORD FILENAME { start_record($2); } ; replay_command: REPLAY FILENAME { printf("Start replay\n"); replay_counter = 1; start_replay($2); } | REPLAY FILENAME NATURAL { printf("Start replay\n"); replay_counter = $3; start_replay($2); } ; stop_record_command: STOP RECORD { printf("Stop record\n"); stop_record(); } ; stop_replay_command: STOP REPLAY { printf("command: stop replay\n"); } ; shell_command: SYSSTR { printf("%s\n", $1); system($1); } ; /* null_command: NL {printf("> "); fflush(stdout); }; */ %% /* user subroutines section */ int yyerror(s) char *s; { fprintf(stderr, "%s\n", s); return(0); } xlab-980917mine/print11.c100664 71506 1605 404573 6745313377 14421 0ustar hildebinstall/* * $Id: print11.c,v 1.4 1998/07/24 11:59:15 marc Exp $ * * Request, Reply, Event, Error Printing * * James Peterson, 1988 * (c) Copyright MCC, 1988 * Adapted for use in xscript * (c) Copyright 1993, Oliver Jones * Fixed for clean compile * (c) Copyright 1998 Marc Vertes */ #include "scope.h" #include "x11.h" #include "server.h" #include "decode11.h" #include "print11.h" /* Reply Buffer: Pseudo-buffer used to provide the opcode for the request to which this is a reply: Set by DecodeReply and used in the PrintField of the Reply procedure */ unsigned char RBf[2]; /* Sequence Buffer: Pseudo-buffer used to provide the sequence number for a request: Set by DecodeReply and used in a PrintField of the Request procedure */ unsigned char SBf[4]; /*----------------------------------------------------------------------*/ /* * In printing the contents of the fields of the X11 packets, some * fields are of obvious value, and others are of lesser value. To * control the amount of output, we generate our output according * to the level of Verbose-ness that was selected by the user. * * Verbose = 0 == Headers only, time and request/reply/... names. * Verbose = 1 == Very useful content fields. * Verbose = 2 == Almost everything. * Verbose = 3 == Every single bit and byte. */ /* * To aid in making the choice between level 1 and level 2, we * use *_1up and *_2up versions of printing macros. */ /* * DONTPRINT gets defined for versions of this module * which don't need output display. Setting DONTPRINT * saves a lot of space in the object and executable. */ /* #define DONTPRINT */ #ifdef DONTPRINT #define print_field_2up(a,b,c,d,e) #define print_field_1up(a,b,c,d,e) #define print_list_1up(a,b,c,d) (0) #define print_list_2up(a,b,c,d) (0) #define print_list_str_1up(a,b,c) #define print_str8_1up(a,b,c) #define print_str16_1up(a,b,c) #define print_text_list8_1up(a,b,c) #define print_text_list16_1up(a,b,c) #define print_bytes_1up(a,b,c) #define print_values_1up(a,b,c,d,e) #define print_set_indent_level(a) #else /* conventional definitions (from xscope) */ #define print_field_2up(a,b,c,d,e) if (Verbose > 1) PrintField(a,b,c,d,e) #define print_field_1up(a,b,c,d,e) PrintField(a,b,c,d,e) #define print_list_1up(a,b,c,d) PrintList(a,b,c,d) #define print_list_2up(a,b,c,d) if (Verbose > 1) PrintList(a,b,c,d) #define print_list_str_1up(a,b,c) PrintListSTR(a,b,c) #define print_str8_1up(a,b,c) PrintString8(a,b,c) #define print_str16_1up(a,b,c) PrintString16(a,b,c) #define print_text_list8_1up(a,b,c) PrintTextList8(a,b,c) #define print_text_list16_1up(a,b,c) PrintTextList16(a,b,c) #define print_bytes_1up(a,b,c) PrintBytes(a,b,c) #define print_values_1up(a,b,c,d,e) PrintValues(a,b,c,d,e) #define print_set_indent_level(a) SetIndentLevel(a) #endif /*----------------------------------------------------------------------*/ void PrintSetUpMessage(buf) unsigned char *buf; { short n; short d; enterprocedure("PrintSetUpMessage"); if (Verbose < 1) return; print_set_indent_level(PRINTCLIENT); print_field_1up(buf, 0, 1, BYTEMODE, "byte-order"); print_field_1up(buf, 2, 2, CARD16, "major-version"); print_field_1up(buf, 4, 2, CARD16, "minor-version"); print_field_2up(buf, 6, 2, DVALUE2(n), "length of name"); n = IShort(&buf[6]); print_field_2up(buf, 8, 2, DVALUE2(d), "length of data"); d = IShort(&buf[8]); print_str8_1up(&buf[12], (long) n, "authorization-protocol-name"); print_str8_1up(&buf[pad((long) (12 + n))], (long) d, "authorization-protocol-data"); } /*----------------------------------------------------------------------*/ void PrintFailedSetUpReply(buf) unsigned char *buf; { short n; print_field_1up(buf, 0, 1, 0, "SetUp Failed"); if (Verbose < 1) return; print_field_2up(buf, 1, 1, DVALUE1(n), "length of reason in bytes"); n = IByte(&buf[1]); print_field_1up(buf, 2, 2, CARD16, "major-version"); print_field_1up(buf, 4, 2, CARD16, "minor-version"); print_field_2up(buf, 6, 2, DVALUE2((n + p) / 4), "length of data"); print_str8_1up(&buf[8], (long) n, "reason"); } /*----------------------------------------------------------------------*/ void PrintSuccessfulSetUpReply(buf) unsigned char *buf; { short v; short n; short m; if (Verbose < 1) return; print_field_1up(buf, 2, 2, CARD16, "protocol-major-version"); print_field_1up(buf, 4, 2, CARD16, "protocol-minor-version"); print_field_2up(buf, 6, 2, DVALUE2(8 + 2 * n + (v + p + m) / 4), "length of data"); print_field_1up(buf, 8, 4, CARD32, "release-number"); print_field_1up(buf, 12, 4, CARD32, "resource-id-base"); print_field_1up(buf, 16, 4, CARD32, "resource-id-mask"); print_field_1up(buf, 20, 4, CARD32, "motion-buffer-size"); print_field_2up(buf, 24, 2, DVALUE2(v), "length of vendor"); v = IShort(&buf[24]); print_field_2up(buf, 26, 2, CARD16, "maximum-request-length"); print_field_2up(buf, 28, 1, CARD8, "number of roots"); m = IByte(&buf[28]); print_field_2up(buf, 29, 1, DVALUE1(n), "number of pixmap-formats"); n = IByte(&buf[29]); print_field_1up(buf, 30, 1, BYTEORDER, "image-byte-order"); print_field_1up(buf, 31, 1, BYTEORDER, "bitmap-format-bit-order"); print_field_1up(buf, 32, 1, CARD8, "bitmap-format-scanline-unit"); print_field_1up(buf, 33, 1, CARD8, "bitmap-format-scanline-pad"); print_field_1up(buf, 34, 1, KEYCODE, "min-keycode"); print_field_1up(buf, 35, 1, KEYCODE, "max-keycode"); print_str8_1up(&buf[40], (long) v, "vendor"); (void) print_list_1up(&buf[pad((long) (40 + v))], (long) n, FORMAT, "pixmap-formats"); (void) print_list_1up(&buf[pad((long) (40 + v) + 8 * n)], (long) m, SCREEN, "roots"); } /*----------------------------------------------------------------------*/ void PrintSetUpReply(buf) unsigned char *buf; { enterprocedure("PrintSetUpReply"); print_set_indent_level(PRINTSERVER); if (IByte(&buf[0])) PrintSuccessfulSetUpReply(buf); else PrintFailedSetUpReply(buf); } /*----------------------------------------------------------------------*/ static char *REQUESTHEADER = "............REQUEST"; static char *EVENTHEADER = "..............EVENT"; static char *ERRORHEADER = "..............ERROR"; static char *REPLYHEADER = "..............REPLY"; /*----------------------------------------------------------------------*/ /* Error Printing procedures */ void RequestError(buf) unsigned char *buf; { print_field_1up(buf, 1, 1, ERROR, ERRORHEADER); /* Request */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 8, 2, CARD16, "minor opcode"); print_field_1up(buf, 10, 1, CARD8, "major opcode"); } /*----------------------------------------------------------------------*/ void ValueError(buf) unsigned char *buf; { print_field_1up(buf, 1, 1, ERROR, ERRORHEADER); /* Value */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 4, 4, INT32, "bad value"); print_field_1up(buf, 8, 2, CARD16, "minor opcode"); print_field_1up(buf, 10, 1, CARD8, "major opcode"); } /*----------------------------------------------------------------------*/ void WindowError(buf) unsigned char *buf; { print_field_1up(buf, 1, 1, ERROR, ERRORHEADER); /* Window */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 4, 4, CARD32, "bad resource id"); print_field_1up(buf, 8, 2, CARD16, "minor opcode"); print_field_1up(buf, 10, 1, CARD8, "major opcode"); } /*----------------------------------------------------------------------*/ void PixmapError(buf) unsigned char *buf; { print_field_1up(buf, 1, 1, ERROR, ERRORHEADER); /* Pixmap */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 4, 4, CARD32, "bad resource id"); print_field_1up(buf, 8, 2, CARD16, "minor opcode"); print_field_1up(buf, 10, 1, CARD8, "major opcode"); } /*----------------------------------------------------------------------*/ void AtomError(buf) unsigned char *buf; { print_field_1up(buf, 1, 1, ERROR, ERRORHEADER); /* Atom */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 4, 4, CARD32, "bad atom id"); print_field_1up(buf, 8, 2, CARD16, "minor opcode"); print_field_1up(buf, 10, 1, CARD8, "major opcode"); } /*----------------------------------------------------------------------*/ void CursorError(buf) unsigned char *buf; { print_field_1up(buf, 1, 1, ERROR, ERRORHEADER); /* Cursor */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 4, 4, CARD32, "bad resource id"); print_field_1up(buf, 8, 2, CARD16, "minor opcode"); print_field_1up(buf, 10, 1, CARD8, "major opcode"); } /*----------------------------------------------------------------------*/ void FontError(buf) unsigned char *buf; { print_field_1up(buf, 1, 1, ERROR, ERRORHEADER); /* Font */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 4, 4, CARD32, "bad resource id"); print_field_1up(buf, 8, 2, CARD16, "minor opcode"); print_field_1up(buf, 10, 1, CARD8, "major opcode"); } /*----------------------------------------------------------------------*/ void MatchError(buf) unsigned char *buf; { print_field_1up(buf, 1, 1, ERROR, ERRORHEADER); /* Match */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 8, 2, CARD16, "minor opcode"); print_field_1up(buf, 10, 1, CARD8, "major opcode"); } /*----------------------------------------------------------------------*/ void DrawableError(buf) unsigned char *buf; { print_field_1up(buf, 1, 1, ERROR, ERRORHEADER); /* Drawable */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 4, 4, CARD32, "bad resource id"); print_field_1up(buf, 8, 2, CARD16, "minor opcode"); print_field_1up(buf, 10, 1, CARD8, "major opcode"); } /*----------------------------------------------------------------------*/ void AccessError(buf) unsigned char *buf; { print_field_1up(buf, 1, 1, ERROR, ERRORHEADER); /* Access */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 8, 2, CARD16, "minor opcode"); print_field_1up(buf, 10, 1, CARD8, "major opcode"); } /*----------------------------------------------------------------------*/ void AllocError(buf) unsigned char *buf; { print_field_1up(buf, 1, 1, ERROR, ERRORHEADER); /* Alloc */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 8, 2, CARD16, "minor opcode"); print_field_1up(buf, 10, 1, CARD8, "major opcode"); } /*----------------------------------------------------------------------*/ void ColormapError(buf) unsigned char *buf; { print_field_1up(buf, 1, 1, ERROR, ERRORHEADER); /* Colormap */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 4, 4, CARD32, "bad resource id"); print_field_1up(buf, 8, 2, CARD16, "minor opcode"); print_field_1up(buf, 10, 1, CARD8, "major opcode"); } /*----------------------------------------------------------------------*/ void GContextError(buf) unsigned char *buf; { print_field_1up(buf, 1, 1, ERROR, ERRORHEADER); /* GContext */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 4, 4, CARD32, "bad resource id"); print_field_1up(buf, 8, 2, CARD16, "minor opcode"); print_field_1up(buf, 10, 1, CARD8, "major opcode"); } /*----------------------------------------------------------------------*/ void IDChoiceError(buf) unsigned char *buf; { print_field_1up(buf, 1, 1, ERROR, ERRORHEADER); /* IDChoice */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 4, 4, CARD32, "bad resource id"); print_field_1up(buf, 8, 2, CARD16, "minor opcode"); print_field_1up(buf, 10, 1, CARD8, "major opcode"); } /*----------------------------------------------------------------------*/ void NameError(buf) unsigned char *buf; { print_field_1up(buf, 1, 1, ERROR, ERRORHEADER); /* Name */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 8, 2, CARD16, "minor opcode"); print_field_1up(buf, 10, 1, CARD8, "major opcode"); } /*----------------------------------------------------------------------*/ void LengthError(buf) unsigned char *buf; { print_field_1up(buf, 1, 1, ERROR, ERRORHEADER); /* Length */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 8, 2, CARD16, "minor opcode"); print_field_1up(buf, 10, 1, CARD8, "major opcode"); } /*----------------------------------------------------------------------*/ void ImplementationError(buf) unsigned char *buf; { print_field_1up(buf, 1, 1, ERROR, ERRORHEADER); /* Implementation */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 8, 2, CARD16, "minor opcode"); print_field_1up(buf, 10, 1, CARD8, "major opcode"); } /*----------------------------------------------------------------------*/ /* Event Printing procedures */ void KeyPressEvent(buf) unsigned char *buf; { print_field_1up(buf, 0, 1, EVENT, EVENTHEADER); /* KeyPress */ if (Verbose < 1) return; print_field_1up(buf, 1, 1, KEYCODE, "detail"); print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 4, 4, TIMESTAMP, "time"); print_field_1up(buf, 8, 4, WINDOW, "root"); print_field_1up(buf, 12, 4, WINDOW, "event"); print_field_1up(buf, 16, 4, WINDOW, "child"); print_field_1up(buf, 20, 2, INT16, "root-x"); print_field_1up(buf, 22, 2, INT16, "root-y"); print_field_1up(buf, 24, 2, INT16, "event-x"); print_field_1up(buf, 26, 2, INT16, "event-y"); print_field_1up(buf, 28, 2, SETofKEYBUTMASK, "state"); print_field_1up(buf, 30, 1, BOOL, "same-screen"); } /*----------------------------------------------------------------------*/ void KeyReleaseEvent(buf) unsigned char *buf; { print_field_1up(buf, 0, 1, EVENT, EVENTHEADER); /* KeyRelease */ if (Verbose < 1) return; print_field_1up(buf, 1, 1, KEYCODE, "detail"); print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 4, 4, TIMESTAMP, "time"); print_field_1up(buf, 8, 4, WINDOW, "root"); print_field_1up(buf, 12, 4, WINDOW, "event"); print_field_1up(buf, 16, 4, WINDOW, "child"); print_field_1up(buf, 20, 2, INT16, "root-x"); print_field_1up(buf, 22, 2, INT16, "root-y"); print_field_1up(buf, 24, 2, INT16, "event-x"); print_field_1up(buf, 26, 2, INT16, "event-y"); print_field_1up(buf, 28, 2, SETofKEYBUTMASK, "state"); print_field_1up(buf, 30, 1, BOOL, "same-screen"); } /*----------------------------------------------------------------------*/ void ButtonPressEvent(buf) unsigned char *buf; { print_field_1up(buf, 0, 1, EVENT, EVENTHEADER); /* ButtonPress */ if (Verbose < 1) return; print_field_1up(buf, 1, 1, BUTTON, "detail"); print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 4, 4, TIMESTAMP, "time"); print_field_1up(buf, 8, 4, WINDOW, "root"); print_field_1up(buf, 12, 4, WINDOW, "event"); print_field_1up(buf, 16, 4, WINDOW, "child"); print_field_1up(buf, 20, 2, INT16, "root-x"); print_field_1up(buf, 22, 2, INT16, "root-y"); print_field_1up(buf, 24, 2, INT16, "event-x"); print_field_1up(buf, 26, 2, INT16, "event-y"); print_field_1up(buf, 28, 2, SETofKEYBUTMASK, "state"); print_field_1up(buf, 30, 1, BOOL, "same-screen"); } /*----------------------------------------------------------------------*/ void ButtonReleaseEvent(buf) unsigned char *buf; { print_field_1up(buf, 0, 1, EVENT, EVENTHEADER); /* ButtonRelease */ if (Verbose < 1) return; print_field_1up(buf, 1, 1, BUTTON, "detail"); print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 4, 4, TIMESTAMP, "time"); print_field_1up(buf, 8, 4, WINDOW, "root"); print_field_1up(buf, 12, 4, WINDOW, "event"); print_field_1up(buf, 16, 4, WINDOW, "child"); print_field_1up(buf, 20, 2, INT16, "root-x"); print_field_1up(buf, 22, 2, INT16, "root-y"); print_field_1up(buf, 24, 2, INT16, "event-x"); print_field_1up(buf, 26, 2, INT16, "event-y"); print_field_1up(buf, 28, 2, SETofKEYBUTMASK, "state"); print_field_1up(buf, 30, 1, BOOL, "same-screen"); } /*----------------------------------------------------------------------*/ void MotionNotifyEvent(buf) unsigned char *buf; { print_field_1up(buf, 0, 1, EVENT, EVENTHEADER); /* MotionNotify */ if (Verbose < 1) return; print_field_1up(buf, 1, 1, MOTIONDETAIL, "detail"); print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 4, 4, TIMESTAMP, "time"); print_field_1up(buf, 8, 4, WINDOW, "root"); print_field_1up(buf, 12, 4, WINDOW, "event"); print_field_1up(buf, 16, 4, WINDOW, "child"); print_field_1up(buf, 20, 2, INT16, "root-x"); print_field_1up(buf, 22, 2, INT16, "root-y"); print_field_1up(buf, 24, 2, INT16, "event-x"); print_field_1up(buf, 26, 2, INT16, "event-y"); print_field_1up(buf, 28, 2, SETofKEYBUTMASK, "state"); print_field_1up(buf, 30, 1, BOOL, "same-screen"); } /*----------------------------------------------------------------------*/ void EnterNotifyEvent(buf) unsigned char *buf; { print_field_1up(buf, 0, 1, EVENT, EVENTHEADER); /* EnterNotify */ if (Verbose < 1) return; print_field_1up(buf, 1, 1, ENTERDETAIL, "detail"); print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 4, 4, TIMESTAMP, "time"); print_field_1up(buf, 8, 4, WINDOW, "root"); print_field_1up(buf, 12, 4, WINDOW, "event"); print_field_1up(buf, 16, 4, WINDOW, "child"); print_field_1up(buf, 20, 2, INT16, "root-x"); print_field_1up(buf, 22, 2, INT16, "root-y"); print_field_1up(buf, 24, 2, INT16, "event-x"); print_field_1up(buf, 26, 2, INT16, "event-y"); print_field_1up(buf, 28, 2, SETofKEYBUTMASK, "state"); print_field_1up(buf, 30, 1, BUTTONMODE, "mode"); print_field_1up(buf, 31, 1, SCREENFOCUS, "same-screen, focus"); } /*----------------------------------------------------------------------*/ void LeaveNotifyEvent(buf) unsigned char *buf; { print_field_1up(buf, 0, 1, EVENT, EVENTHEADER); /* LeaveNotify */ if (Verbose < 1) return; print_field_1up(buf, 1, 1, ENTERDETAIL, "detail"); print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 4, 4, TIMESTAMP, "time"); print_field_1up(buf, 8, 4, WINDOW, "root"); print_field_1up(buf, 12, 4, WINDOW, "event"); print_field_1up(buf, 16, 4, WINDOW, "child"); print_field_1up(buf, 20, 2, INT16, "root-x"); print_field_1up(buf, 22, 2, INT16, "root-y"); print_field_1up(buf, 24, 2, INT16, "event-x"); print_field_1up(buf, 26, 2, INT16, "event-y"); print_field_1up(buf, 28, 2, SETofKEYBUTMASK, "state"); print_field_1up(buf, 30, 1, BUTTONMODE, "mode"); print_field_1up(buf, 31, 1, SCREENFOCUS, "same-screen, focus"); } /*----------------------------------------------------------------------*/ void FocusInEvent(buf) unsigned char *buf; { print_field_1up(buf, 0, 1, EVENT, EVENTHEADER); /* FocusIn */ if (Verbose < 1) return; print_field_1up(buf, 1, 1, ENTERDETAIL, "detail"); print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 4, 4, WINDOW, "event"); print_field_1up(buf, 8, 1, BUTTONMODE, "mode"); } /*----------------------------------------------------------------------*/ void FocusOutEvent(buf) unsigned char *buf; { print_field_1up(buf, 0, 1, EVENT, EVENTHEADER); /* FocusOut */ if (Verbose < 1) return; print_field_1up(buf, 1, 1, ENTERDETAIL, "detail"); print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 4, 4, WINDOW, "event"); print_field_1up(buf, 8, 1, BUTTONMODE, "mode"); } /*----------------------------------------------------------------------*/ void KeymapNotifyEvent(buf) unsigned char *buf; { print_field_1up(buf, 0, 1, EVENT, EVENTHEADER); /* KeymapNotify */ if (Verbose < 1) return; print_bytes_1up(&buf[1], (long) 31, "keys"); } /*----------------------------------------------------------------------*/ void ExposeEvent(buf) unsigned char *buf; { print_field_1up(buf, 0, 1, EVENT, EVENTHEADER); /* Expose */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 4, 4, WINDOW, "window"); print_field_1up(buf, 8, 2, CARD16, "x"); print_field_1up(buf, 10, 2, CARD16, "y"); print_field_1up(buf, 12, 2, CARD16, "width"); print_field_1up(buf, 14, 2, CARD16, "height"); print_field_1up(buf, 16, 2, CARD16, "count"); } /*----------------------------------------------------------------------*/ void GraphicsExposureEvent(buf) unsigned char *buf; { print_field_1up(buf, 0, 1, EVENT, EVENTHEADER); /* GraphicsExposure */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 4, 4, DRAWABLE, "drawable"); print_field_1up(buf, 8, 2, CARD16, "x"); print_field_1up(buf, 10, 2, CARD16, "y"); print_field_1up(buf, 12, 2, CARD16, "width"); print_field_1up(buf, 14, 2, CARD16, "height"); print_field_1up(buf, 16, 2, CARD16, "minor-opcode"); print_field_1up(buf, 18, 2, CARD16, "count"); print_field_1up(buf, 20, 1, CARD8, "major-opcode"); } /*----------------------------------------------------------------------*/ void NoExposureEvent(buf) unsigned char *buf; { print_field_1up(buf, 0, 1, EVENT, EVENTHEADER); /* NoExposure */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 4, 4, DRAWABLE, "drawable"); print_field_1up(buf, 8, 2, CARD16, "minor-opcode"); print_field_1up(buf, 10, 1, CARD8, "major-opcode"); } /*----------------------------------------------------------------------*/ void VisibilityNotifyEvent(buf) unsigned char *buf; { print_field_1up(buf, 0, 1, EVENT, EVENTHEADER); /* VisibilityNotify */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 4, 4, WINDOW, "window"); print_field_1up(buf, 8, 1, VISIBLE, "state"); } /*----------------------------------------------------------------------*/ void CreateNotifyEvent(buf) unsigned char *buf; { print_field_1up(buf, 0, 1, EVENT, EVENTHEADER); /* CreateNotify */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 4, 4, WINDOW, "parent"); print_field_1up(buf, 8, 4, WINDOW, "window"); print_field_1up(buf, 12, 2, INT16, "x"); print_field_1up(buf, 14, 2, INT16, "y"); print_field_1up(buf, 16, 2, CARD16, "width"); print_field_1up(buf, 18, 2, CARD16, "height"); print_field_1up(buf, 20, 2, CARD16, "border-width"); print_field_1up(buf, 22, 1, BOOL, "override-redirect"); } /*----------------------------------------------------------------------*/ void DestroyNotifyEvent(buf) unsigned char *buf; { print_field_1up(buf, 0, 1, EVENT, EVENTHEADER); /* DestroyNotify */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 4, 4, WINDOW, "event"); print_field_1up(buf, 8, 4, WINDOW, "window"); } /*----------------------------------------------------------------------*/ void UnmapNotifyEvent(buf) unsigned char *buf; { print_field_1up(buf, 0, 1, EVENT, EVENTHEADER); /* UnmapNotify */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 4, 4, WINDOW, "event"); print_field_1up(buf, 8, 4, WINDOW, "window"); print_field_1up(buf, 12, 1, BOOL, "from-configure"); } /*----------------------------------------------------------------------*/ void MapNotifyEvent(buf) unsigned char *buf; { print_field_1up(buf, 0, 1, EVENT, EVENTHEADER); /* MapNotify */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 4, 4, WINDOW, "event"); print_field_1up(buf, 8, 4, WINDOW, "window"); print_field_1up(buf, 12, 1, BOOL, "override-redirect"); } /*----------------------------------------------------------------------*/ void MapRequestEvent(buf) unsigned char *buf; { print_field_1up(buf, 0, 1, EVENT, EVENTHEADER); /* MapRequest */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 4, 4, WINDOW, "parent"); print_field_1up(buf, 8, 4, WINDOW, "window"); } /*----------------------------------------------------------------------*/ void ReparentNotifyEvent(buf) unsigned char *buf; { print_field_1up(buf, 0, 1, EVENT, EVENTHEADER); /* ReparentNotify */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 4, 4, WINDOW, "event"); print_field_1up(buf, 8, 4, WINDOW, "window"); print_field_1up(buf, 12, 4, WINDOW, "parent"); print_field_1up(buf, 16, 2, INT16, "x"); print_field_1up(buf, 18, 2, INT16, "y"); print_field_1up(buf, 20, 1, BOOL, "override-redirect"); } /*----------------------------------------------------------------------*/ void ConfigureNotifyEvent(buf) unsigned char *buf; { print_field_1up(buf, 0, 1, EVENT, EVENTHEADER); /* ConfigureNotify */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 4, 4, WINDOW, "event"); print_field_1up(buf, 8, 4, WINDOW, "window"); print_field_1up(buf, 12, 4, WINDOW, "above-sibling"); print_field_1up(buf, 16, 2, INT16, "x"); print_field_1up(buf, 18, 2, INT16, "y"); print_field_1up(buf, 20, 2, CARD16, "width"); print_field_1up(buf, 22, 2, CARD16, "height"); print_field_1up(buf, 24, 2, CARD16, "border-width"); print_field_1up(buf, 26, 1, BOOL, "override-redirect"); } /*----------------------------------------------------------------------*/ void ConfigureRequestEvent(buf) unsigned char *buf; { print_field_1up(buf, 0, 1, EVENT, EVENTHEADER); /* ConfigureRequest */ if (Verbose < 1) return; print_field_1up(buf, 1, 1, STACKMODE, "stack-mode"); print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 4, 4, WINDOW, "parent"); print_field_1up(buf, 8, 4, WINDOW, "window"); print_field_1up(buf, 12, 4, WINDOW, "sibling"); print_field_1up(buf, 16, 2, INT16, "x"); print_field_1up(buf, 18, 2, INT16, "y"); print_field_1up(buf, 20, 2, CARD16, "width"); print_field_1up(buf, 22, 2, CARD16, "height"); print_field_1up(buf, 24, 2, CARD16, "border-width"); print_field_1up(buf, 26, 2, CONFIGURE_BITMASK, "value-mask"); } /*----------------------------------------------------------------------*/ void GravityNotifyEvent(buf) unsigned char *buf; { print_field_1up(buf, 0, 1, EVENT, EVENTHEADER); /* GravityNotify */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 4, 4, WINDOW, "event"); print_field_1up(buf, 8, 4, WINDOW, "window"); print_field_1up(buf, 12, 2, INT16, "x"); print_field_1up(buf, 14, 2, INT16, "y"); } /*----------------------------------------------------------------------*/ void ResizeRequestEvent(buf) unsigned char *buf; { print_field_1up(buf, 0, 1, EVENT, EVENTHEADER); /* ResizeRequest */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 4, 4, WINDOW, "window"); print_field_1up(buf, 8, 2, CARD16, "width"); print_field_1up(buf, 10, 2, CARD16, "height"); } /*----------------------------------------------------------------------*/ void CirculateNotifyEvent(buf) unsigned char *buf; { print_field_1up(buf, 0, 1, EVENT, EVENTHEADER); /* CirculateNotify */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 4, 4, WINDOW, "event"); print_field_1up(buf, 8, 4, WINDOW, "window"); print_field_1up(buf, 12, 4, WINDOW, "parent"); print_field_1up(buf, 16, 1, CIRSTAT, "place"); } /*----------------------------------------------------------------------*/ void CirculateRequestEvent(buf) unsigned char *buf; { print_field_1up(buf, 0, 1, EVENT, EVENTHEADER); /* CirculateRequest */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 4, 4, WINDOW, "parent"); print_field_1up(buf, 8, 4, WINDOW, "window"); print_field_1up(buf, 16, 1, CIRSTAT, "place"); } /*----------------------------------------------------------------------*/ void PropertyNotifyEvent(buf) unsigned char *buf; { print_field_1up(buf, 0, 1, EVENT, EVENTHEADER); /* PropertyNotify */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 4, 4, WINDOW, "window"); print_field_1up(buf, 8, 4, ATOM, "atom"); print_field_1up(buf, 12, 4, TIMESTAMP, "time"); print_field_1up(buf, 16, 1, PROPCHANGE, "state"); } /*----------------------------------------------------------------------*/ void SelectionClearEvent(buf) unsigned char *buf; { print_field_1up(buf, 0, 1, EVENT, EVENTHEADER); /* SelectionClear */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 4, 4, TIMESTAMP, "time"); print_field_1up(buf, 8, 4, WINDOW, "owner"); print_field_1up(buf, 12, 4, ATOM, "selection"); } /*----------------------------------------------------------------------*/ void SelectionRequestEvent(buf) unsigned char *buf; { print_field_1up(buf, 0, 1, EVENT, EVENTHEADER); /* SelectionRequest */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 4, 4, TIMESTAMP, "time"); print_field_1up(buf, 8, 4, WINDOW, "owner"); print_field_1up(buf, 12, 4, WINDOW, "requestor"); print_field_1up(buf, 16, 4, ATOM, "selection"); print_field_1up(buf, 20, 4, ATOM, "target"); print_field_1up(buf, 24, 4, ATOM, "property"); } /*----------------------------------------------------------------------*/ void SelectionNotifyEvent(buf) unsigned char *buf; { print_field_1up(buf, 0, 1, EVENT, EVENTHEADER); /* SelectionNotify */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 4, 4, TIMESTAMP, "time"); print_field_1up(buf, 8, 4, WINDOW, "requestor"); print_field_1up(buf, 12, 4, ATOM, "selection"); print_field_1up(buf, 16, 4, ATOM, "target"); print_field_1up(buf, 20, 4, ATOM, "property"); } /*----------------------------------------------------------------------*/ void ColormapNotifyEvent(buf) unsigned char *buf; { print_field_1up(buf, 0, 1, EVENT, EVENTHEADER); /* ColormapNotify */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 4, 4, WINDOW, "window"); print_field_1up(buf, 8, 4, COLORMAP, "colormap"); print_field_1up(buf, 12, 1, BOOL, "new"); print_field_1up(buf, 13, 1, CMAPCHANGE, "state"); } /*----------------------------------------------------------------------*/ void ClientMessageEvent(buf) unsigned char *buf; { short format; long type; print_field_1up(buf, 0, 1, EVENT, EVENTHEADER); /* ClientMessage */ if (Verbose < 1) return; print_field_1up(buf, 1, 1, CARD8, "format"); format = IByte(&buf[1]); print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 4, 4, WINDOW, "window"); print_field_1up(buf, 8, 4, ATOM, "type"); type = ILong(&buf[8]); if (type == 31 /* string */ ) print_str8_1up(&buf[12], 20L, "data"); else if (format == 16) (void) print_list_1up(&buf[12], 10L, INT16, "data"); else if (format == 32) (void) print_list_1up(&buf[12], 5L, INT32, "data"); else print_bytes_1up(&buf[12], 20L, "data"); } /*----------------------------------------------------------------------*/ void MappingNotifyEvent(buf) unsigned char *buf; { print_field_1up(buf, 0, 1, EVENT, EVENTHEADER); /* MappingNotify */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_1up(buf, 4, 1, MAPOBJECT, "request"); print_field_1up(buf, 5, 1, KEYCODE, "first-keycode"); print_field_1up(buf, 6, 1, CARD8, "count"); } /*----------------------------------------------------------------------*/ /* Request and Reply Printing procedures */ void CreateWindow(buf) unsigned char *buf; { /* Request CreateWindow is opcode 1 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* CreateWindow */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_1up(buf, 1, 1, CARD8, "depth"); print_field_2up(buf, 2, 2, DVALUE2(8 + n), "request length"); print_field_1up(buf, 4, 4, WINDOW, "wid"); print_field_1up(buf, 8, 4, WINDOW, "parent"); print_field_1up(buf, 12, 2, INT16, "x"); print_field_1up(buf, 14, 2, INT16, "y"); print_field_1up(buf, 16, 2, CARD16, "width"); print_field_1up(buf, 18, 2, CARD16, "height"); print_field_1up(buf, 20, 2, CARD16, "border-width"); print_field_1up(buf, 22, 2, WINDOWCLASS, "class"); print_field_1up(buf, 24, 4, VISUALIDC, "visual"); print_field_1up(buf, 28, 4, WINDOW_BITMASK, "value-mask"); print_values_1up(&buf[28], 4, WINDOW_BITMASK, &buf[32], "value-list"); } /*----------------------------------------------------------------------*/ void ChangeWindowAttributes(buf) unsigned char *buf; { /* Request ChangeWindowAttributes is opcode 2 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* ChangeWindowAttributes */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, DVALUE2(3 + n), "request length"); print_field_1up(buf, 4, 4, WINDOW, "window"); print_field_1up(buf, 8, 4, WINDOW_BITMASK, "value-mask"); print_values_1up(&buf[8], 4, WINDOW_BITMASK, &buf[12], "value-list"); } /*----------------------------------------------------------------------*/ void GetWindowAttributes(buf) unsigned char *buf; { /* Request GetWindowAttributes is opcode 3 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* GetWindowAttributes */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(2), "request length"); print_field_1up(buf, 4, 4, WINDOW, "window"); } /*----------------------------------------------------------------------*/ void GetWindowAttributesReply(buf) unsigned char *buf; { print_field_1up(RBf, 0, 1, REPLY, REPLYHEADER); /* GetWindowAttributes */ if (Verbose < 1) return; print_field_1up(buf, 1, 1, BACKSTORE, "backing-store"); print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_2up(buf, 4, 4, CONST4(3), "reply length"); print_field_1up(buf, 8, 4, VISUALID, "visual"); print_field_1up(buf, 12, 2, WINDOWCLASS, "class"); print_field_1up(buf, 14, 1, BITGRAVITY, "bit-gravity"); print_field_1up(buf, 15, 1, WINGRAVITY, "win-gravity"); print_field_1up(buf, 16, 4, CARD32, "backing-planes"); print_field_1up(buf, 20, 4, CARD32, "backing-pixel"); print_field_1up(buf, 24, 1, BOOL, "save-under"); print_field_1up(buf, 25, 1, BOOL, "map-is-installed"); print_field_1up(buf, 26, 1, MAPSTATE, "map-state"); print_field_1up(buf, 27, 1, BOOL, "override-redirect"); print_field_1up(buf, 28, 4, COLORMAP, "colormap"); print_field_1up(buf, 32, 4, SETofEVENT, "all-event-masks"); print_field_1up(buf, 36, 4, SETofEVENT, "your-event-mask"); print_field_1up(buf, 40, 2, SETofDEVICEEVENT, "do-not-propagate-mask"); } /*----------------------------------------------------------------------*/ void DestroyWindow(buf) unsigned char *buf; { /* Request DestroyWindow is opcode 4 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* DestroyWindow */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(2), "request length"); print_field_1up(buf, 4, 4, WINDOW, "window"); } /*----------------------------------------------------------------------*/ void DestroySubwindows(buf) unsigned char *buf; { /* Request DestroySubwindows is opcode 5 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* DestroySubwindows */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(2), "request length"); print_field_1up(buf, 4, 4, WINDOW, "window"); } /*----------------------------------------------------------------------*/ void ChangeSaveSet(buf) unsigned char *buf; { /* Request ChangeSaveSet is opcode 6 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* ChangeSaveSet */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_1up(buf, 1, 1, INS_DEL, "mode"); print_field_2up(buf, 2, 2, CONST2(2), "request length"); print_field_1up(buf, 4, 4, WINDOW, "window"); } /*----------------------------------------------------------------------*/ void ReparentWindow(buf) unsigned char *buf; { /* Request ReparentWindow is opcode 7 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* ReparentWindow */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(4), "request length"); print_field_1up(buf, 4, 4, WINDOW, "window"); print_field_1up(buf, 8, 4, WINDOW, "parent"); print_field_1up(buf, 12, 2, INT16, "x"); print_field_1up(buf, 14, 2, INT16, "y"); } /*----------------------------------------------------------------------*/ void MapWindow(buf) unsigned char *buf; { /* Request MapWindow is opcode 8 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* MapWindow */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(2), "request length"); print_field_1up(buf, 4, 4, WINDOW, "window"); } /*----------------------------------------------------------------------*/ void MapSubwindows(buf) unsigned char *buf; { /* Request MapSubwindows is opcode 9 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* MapSubwindows */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(2), "request length"); print_field_1up(buf, 4, 4, WINDOW, "window"); } /*----------------------------------------------------------------------*/ void UnmapWindow(buf) unsigned char *buf; { /* Request UnmapWindow is opcode 10 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* UnmapWindow */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(2), "request length"); print_field_1up(buf, 4, 4, WINDOW, "window"); } /*----------------------------------------------------------------------*/ void UnmapSubwindows(buf) unsigned char *buf; { /* Request UnmapSubwindows is opcode 11 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* UnmapSubwindows */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(2), "request length"); print_field_1up(buf, 4, 4, WINDOW, "window"); } /*----------------------------------------------------------------------*/ void ConfigureWindow(buf) unsigned char *buf; { /* Request ConfigureWindow is opcode 12 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* ConfigureWindow */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, DVALUE2(3 + n), "request length"); print_field_1up(buf, 4, 4, WINDOW, "window"); print_field_1up(buf, 8, 2, CONFIGURE_BITMASK, "value-mask"); print_values_1up(&buf[8], 2, CONFIGURE_BITMASK, &buf[12], "value-list"); } /*----------------------------------------------------------------------*/ void CirculateWindow(buf) unsigned char *buf; { /* Request CirculateWindow is opcode 13 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* CirculateWindow */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_1up(buf, 1, 1, CIRMODE, "direction"); print_field_2up(buf, 2, 2, CONST2(2), "request length"); print_field_1up(buf, 4, 4, WINDOW, "window"); } /*----------------------------------------------------------------------*/ void GetGeometry(buf) unsigned char *buf; { /* Request GetGeometry is opcode 14 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* GetGeometry */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(2), "request length"); print_field_1up(buf, 4, 4, DRAWABLE, "drawable"); } /*----------------------------------------------------------------------*/ void GetGeometryReply(buf) unsigned char *buf; { print_field_1up(RBf, 0, 1, REPLY, REPLYHEADER); /* GetGeometry */ if (Verbose < 1) return; print_field_1up(buf, 1, 1, CARD8, "depth"); print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_2up(buf, 4, 4, CONST4(0), "reply length"); print_field_1up(buf, 8, 4, WINDOW, "root"); print_field_1up(buf, 12, 2, INT16, "x"); print_field_1up(buf, 14, 2, INT16, "y"); print_field_1up(buf, 16, 2, CARD16, "width"); print_field_1up(buf, 18, 2, CARD16, "height"); print_field_1up(buf, 20, 2, CARD16, "border-width"); } /*----------------------------------------------------------------------*/ void QueryTree(buf) unsigned char *buf; { /* Request QueryTree is opcode 15 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* QueryTree */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(2), "request length"); print_field_1up(buf, 4, 4, WINDOW, "window"); } /*----------------------------------------------------------------------*/ void QueryTreeReply(buf) unsigned char *buf; { short n; print_field_1up(RBf, 0, 1, REPLY, REPLYHEADER); /* QueryTree */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_2up(buf, 4, 4, DVALUE4(n), "reply length"); print_field_1up(buf, 8, 4, WINDOW, "root"); print_field_1up(buf, 12, 4, WINDOW, "parent"); print_field_2up(buf, 16, 2, DVALUE2(n), "number of children"); n = IShort(&buf[16]); (void) print_list_1up(&buf[32], (long) n, WINDOW, "children"); } /*----------------------------------------------------------------------*/ void InternAtom(buf) unsigned char *buf; { short n; /* Request InternAtom is opcode 16 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* InternAtom */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_1up(buf, 1, 1, BOOL, "only-if-exists"); print_field_2up(buf, 2, 2, DVALUE2(2 + (n + p) / 4), "request length"); print_field_2up(buf, 4, 2, DVALUE2(n), "length of name"); n = IShort(&buf[4]); print_str8_1up(&buf[8], (long) n, "name"); } /*----------------------------------------------------------------------*/ void InternAtomReply(buf) unsigned char *buf; { print_field_1up(RBf, 0, 1, REPLY, REPLYHEADER); /* InternAtom */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_2up(buf, 4, 4, CONST4(0), "reply length"); print_field_1up(buf, 8, 4, ATOM, "atom"); } /*----------------------------------------------------------------------*/ void GetAtomName(buf) unsigned char *buf; { /* Request GetAtomName is opcode 17 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* GetAtomName */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(2), "request length"); print_field_1up(buf, 4, 4, ATOM, "atom"); } /*----------------------------------------------------------------------*/ void GetAtomNameReply(buf) unsigned char *buf; { short n; print_field_1up(RBf, 0, 1, REPLY, REPLYHEADER); /* GetAtomName */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_2up(buf, 4, 4, DVALUE4((n + p) / 4), "reply length"); print_field_2up(buf, 8, 2, DVALUE2(n), "length of name"); n = IShort(&buf[8]); print_str8_1up(&buf[32], (long) n, "name"); } /*----------------------------------------------------------------------*/ void ChangeProperty(buf) unsigned char *buf; { long n; short format; long type; n = ILong(&buf[20]); type = ILong(&buf[12]); format = IByte(&buf[16]); /* Request ChangeProperty is opcode 18 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* ChangeProperty */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_1up(buf, 1, 1, CHANGEMODE, "mode"); print_field_2up(buf, 2, 2, DVALUE2(6 + (n + p) / 4), "request length"); print_field_1up(buf, 4, 4, WINDOW, "window"); print_field_1up(buf, 8, 4, ATOM, "property"); print_field_1up(buf, 12, 4, ATOM, "type"); print_field_1up(buf, 16, 1, CARD8, "format"); print_field_2up(buf, 20, 4, CARD32, "length of data"); if (type == 31 /* string */ ) { if (Verbose >= 3 || n < 40) { /* print entire string */ print_str8_1up(&buf[24], n * format / 8, "data"); } else { /* print truncated string -- shortening */ n = 40; print_str8_1up(&buf[24], n * format / 8, "data(partial)"); } } else if (format == 16) (void) print_list_1up(&buf[24], n, INT16, "data"); else if (format == 32) (void) print_list_1up(&buf[24], n, INT32, "data"); else print_bytes_1up(&buf[24], n * format / 8, "data"); } /*----------------------------------------------------------------------*/ void DeleteProperty(buf) unsigned char *buf; { /* Request DeleteProperty is opcode 19 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* DeleteProperty */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(3), "request length"); print_field_1up(buf, 4, 4, WINDOW, "window"); print_field_1up(buf, 8, 4, ATOM, "property"); } /*----------------------------------------------------------------------*/ void GetProperty(buf) unsigned char *buf; { /* Request GetProperty is opcode 20 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* GetProperty */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_1up(buf, 1, 1, BOOL, "delete"); print_field_2up(buf, 2, 2, CONST2(6), "request length"); print_field_1up(buf, 4, 4, WINDOW, "window"); print_field_1up(buf, 8, 4, ATOM, "property"); print_field_1up(buf, 12, 4, ATOMT, "type"); print_field_1up(buf, 16, 4, CARD32, "long-offset"); print_field_2up(buf, 20, 4, CARD32, "long-length"); } /*----------------------------------------------------------------------*/ void GetPropertyReply(buf) unsigned char *buf; { long n; short format; long type; type = ILong(&buf[8]); format = IByte(&buf[1]); n = ILong(&buf[16]); print_field_1up(RBf, 0, 1, REPLY, REPLYHEADER); /* GetProperty */ if (Verbose < 1) return; print_field_1up(buf, 1, 1, CARD8, "format"); print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_2up(buf, 4, 4, DVALUE4((n + p) / 4), "reply length"); print_field_1up(buf, 8, 4, ATOM, "type"); print_field_1up(buf, 12, 4, CARD32, "bytes-after"); print_field_2up(buf, 16, 4, CARD32, "length of value"); if (type == 31 /* string */ ) { if (Verbose >= 3 || n < 40) { /* print entire string */ print_str8_1up(&buf[32], n * format / 8, "data"); } else { /* print truncated string -- shortening */ n = 40; print_str8_1up(&buf[32], n * format / 8, "data(partial)"); } } else if (format == 16) (void) print_list_1up(&buf[32], n, INT16, "data"); else if (format == 32) (void) print_list_1up(&buf[32], n, INT32, "data"); else print_bytes_1up(&buf[32], n * format / 8, "data"); } /*----------------------------------------------------------------------*/ void ListProperties(buf) unsigned char *buf; { /* Request ListProperties is opcode 21 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* ListProperties */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(2), "request length"); print_field_1up(buf, 4, 4, WINDOW, "window"); } /*----------------------------------------------------------------------*/ void ListPropertiesReply(buf) unsigned char *buf; { short n; print_field_1up(RBf, 0, 1, REPLY, REPLYHEADER); /* ListProperties */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_2up(buf, 4, 4, DVALUE4(n), "reply length"); print_field_2up(buf, 8, 2, DVALUE2(n), "number of atoms"); n = IShort(&buf[8]); (void) print_list_1up(&buf[32], (long) n, ATOM, "atoms"); } /*----------------------------------------------------------------------*/ void SetSelectionOwner(buf) unsigned char *buf; { /* Request SetSelectionOwner is opcode 22 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* SetSelectionOwner */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(4), "request length"); print_field_1up(buf, 4, 4, WINDOW, "owner"); print_field_1up(buf, 8, 4, ATOM, "selection"); print_field_1up(buf, 12, 4, TIMESTAMP, "time"); } /*----------------------------------------------------------------------*/ void GetSelectionOwner(buf) unsigned char *buf; { /* Request GetSelectionOwner is opcode 23 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* GetSelectionOwner */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(2), "request length"); print_field_1up(buf, 4, 4, ATOM, "selection"); } /*----------------------------------------------------------------------*/ void GetSelectionOwnerReply(buf) unsigned char *buf; { print_field_1up(RBf, 0, 1, REPLY, REPLYHEADER); /* GetSelectionOwner */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_2up(buf, 4, 4, CONST4(0), "reply length"); print_field_1up(buf, 8, 4, WINDOW, "owner"); } /*----------------------------------------------------------------------*/ void ConvertSelection(buf) unsigned char *buf; { /* Request ConvertSelection is opcode 24 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* ConvertSelection */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(6), "request length"); print_field_1up(buf, 4, 4, WINDOW, "requestor"); print_field_1up(buf, 8, 4, ATOM, "selection"); print_field_1up(buf, 12, 4, ATOM, "target"); print_field_1up(buf, 16, 4, ATOM, "property"); print_field_1up(buf, 20, 4, TIMESTAMP, "time"); } /*----------------------------------------------------------------------*/ void SendEvent(buf) unsigned char *buf; { /* Request SendEvent is opcode 25 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* SendEvent */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_1up(buf, 1, 1, BOOL, "propagate"); print_field_2up(buf, 2, 2, CONST2(11), "request length"); print_field_1up(buf, 4, 4, WINDOWD, "destination"); print_field_1up(buf, 8, 4, SETofEVENT, "event-mask"); print_field_1up(buf, 12, 32, EVENTFORM, "event"); } /*----------------------------------------------------------------------*/ void GrabPointer(buf) unsigned char *buf; { /* Request GrabPointer is opcode 26 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* GrabPointer */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_1up(buf, 1, 1, BOOL, "owner-events"); print_field_2up(buf, 2, 2, CONST2(6), "request length"); print_field_1up(buf, 4, 4, WINDOW, "grab-window"); print_field_1up(buf, 8, 2, SETofPOINTEREVENT, "event-mask"); print_field_1up(buf, 10, 1, PK_MODE, "pointer-mode"); print_field_1up(buf, 11, 1, PK_MODE, "keyboard-mode"); print_field_1up(buf, 12, 4, WINDOW, "confine-to"); print_field_1up(buf, 16, 4, CURSOR, "cursor"); print_field_1up(buf, 20, 4, TIMESTAMP, "time"); } /*----------------------------------------------------------------------*/ void GrabPointerReply(buf) unsigned char *buf; { print_field_1up(RBf, 0, 1, REPLY, REPLYHEADER); /* GrabPointer */ if (Verbose < 1) return; print_field_1up(buf, 1, 1, GRABSTAT, "status"); print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_2up(buf, 4, 4, CONST4(0), "reply length"); } /*----------------------------------------------------------------------*/ void UngrabPointer(buf) unsigned char *buf; { /* Request UngrabPointer is opcode 27 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* UngrabPointer */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(2), "request length"); print_field_1up(buf, 4, 4, TIMESTAMP, "time"); } /*----------------------------------------------------------------------*/ void GrabButton(buf) unsigned char *buf; { /* Request GrabButton is opcode 28 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* GrabButton */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_1up(buf, 1, 1, BOOL, "owner-events"); print_field_2up(buf, 2, 2, CONST2(6), "request length"); print_field_1up(buf, 4, 4, WINDOW, "grab-window"); print_field_1up(buf, 8, 2, SETofPOINTEREVENT, "event-mask"); print_field_1up(buf, 10, 1, PK_MODE, "pointer-mode"); print_field_1up(buf, 11, 1, PK_MODE, "keyboard-mode"); print_field_1up(buf, 12, 4, WINDOW, "confine-to"); print_field_1up(buf, 16, 4, CURSOR, "cursor"); print_field_1up(buf, 20, 1, BUTTONA, "button"); print_field_1up(buf, 22, 2, SETofKEYMASK, "modifiers"); } /*----------------------------------------------------------------------*/ void UngrabButton(buf) unsigned char *buf; { /* Request UngrabButton is opcode 29 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* UngrabButton */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_1up(buf, 1, 1, BUTTONA, "button"); print_field_2up(buf, 2, 2, CONST2(3), "request length"); print_field_1up(buf, 4, 4, WINDOW, "grab-window"); print_field_1up(buf, 8, 2, SETofKEYMASK, "modifiers"); } /*----------------------------------------------------------------------*/ void ChangeActivePointerGrab(buf) unsigned char *buf; { /* Request ChangeActivePointerGrab is opcode 30 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* ChangeActivePointerGrab */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(4), "request length"); print_field_1up(buf, 4, 4, CURSOR, "cursor"); print_field_1up(buf, 8, 4, TIMESTAMP, "time"); print_field_1up(buf, 12, 2, SETofPOINTEREVENT, "event-mask"); } /*----------------------------------------------------------------------*/ void GrabKeyboard(buf) unsigned char *buf; { /* Request GrabKeyboard is opcode 31 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* GrabKeyboard */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_1up(buf, 1, 1, BOOL, "owner-events"); print_field_2up(buf, 2, 2, CONST2(4), "request length"); print_field_1up(buf, 4, 4, WINDOW, "grab-window"); print_field_1up(buf, 8, 4, TIMESTAMP, "time"); print_field_1up(buf, 12, 1, PK_MODE, "pointer-mode"); print_field_1up(buf, 13, 1, PK_MODE, "keyboard-mode"); } /*----------------------------------------------------------------------*/ void GrabKeyboardReply(buf) unsigned char *buf; { print_field_1up(RBf, 0, 1, REPLY, REPLYHEADER); /* GrabKeyboard */ if (Verbose < 1) return; print_field_1up(buf, 1, 1, GRABSTAT, "status"); print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_2up(buf, 4, 4, CONST4(0), "reply length"); } /*----------------------------------------------------------------------*/ void UngrabKeyboard(buf) unsigned char *buf; { /* Request UngrabKeyboard is opcode 32 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* UngrabKeyboard */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(2), "request length"); print_field_1up(buf, 4, 4, TIMESTAMP, "time"); } /*----------------------------------------------------------------------*/ void GrabKey(buf) unsigned char *buf; { /* Request GrabKey is opcode 33 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* GrabKey */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_1up(buf, 1, 1, BOOL, "owner-events"); print_field_2up(buf, 2, 2, CONST2(4), "request length"); print_field_1up(buf, 4, 4, WINDOW, "grab-window"); print_field_1up(buf, 8, 2, SETofKEYMASK, "modifiers"); print_field_1up(buf, 10, 1, KEYCODEA, "key"); print_field_1up(buf, 11, 1, PK_MODE, "pointer-mode"); print_field_1up(buf, 12, 1, PK_MODE, "keyboard-mode"); } /*----------------------------------------------------------------------*/ void UngrabKey(buf) unsigned char *buf; { /* Request UngrabKey is opcode 34 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* UngrabKey */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_1up(buf, 1, 1, KEYCODEA, "key"); print_field_2up(buf, 2, 2, CONST2(3), "request length"); print_field_1up(buf, 4, 4, WINDOW, "grab-window"); print_field_1up(buf, 8, 2, SETofKEYMASK, "modifiers"); } /*----------------------------------------------------------------------*/ void AllowEvents(buf) unsigned char *buf; { /* Request AllowEvents is opcode 35 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* AllowEvents */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_1up(buf, 1, 1, EVENTMODE, "mode"); print_field_2up(buf, 2, 2, CONST2(2), "request length"); print_field_1up(buf, 4, 4, TIMESTAMP, "time"); } /*----------------------------------------------------------------------*/ void GrabServer(buf) unsigned char *buf; { /* Request GrabServer is opcode 36 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* GrabServer */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(1), "request length"); } /*----------------------------------------------------------------------*/ void UngrabServer(buf) unsigned char *buf; { /* Request UngrabServer is opcode 37 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* UngrabServer */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(1), "request length"); } /*----------------------------------------------------------------------*/ void QueryPointer(buf) unsigned char *buf; { /* Request QueryPointer is opcode 38 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* QueryPointer */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(2), "request length"); print_field_1up(buf, 4, 4, WINDOW, "window"); } /*----------------------------------------------------------------------*/ void QueryPointerReply(buf) unsigned char *buf; { print_field_1up(RBf, 0, 1, REPLY, REPLYHEADER); /* QueryPointer */ if (Verbose < 1) return; print_field_1up(buf, 1, 1, BOOL, "same-screen"); print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_2up(buf, 4, 4, CONST4(0), "reply length"); print_field_1up(buf, 8, 4, WINDOW, "root"); print_field_1up(buf, 12, 4, WINDOW, "child"); print_field_1up(buf, 16, 2, INT16, "root-x"); print_field_1up(buf, 18, 2, INT16, "root-y"); print_field_1up(buf, 20, 2, INT16, "win-x"); print_field_1up(buf, 22, 2, INT16, "win-y"); print_field_1up(buf, 24, 2, SETofKEYBUTMASK, "mask"); } /*----------------------------------------------------------------------*/ void GetMotionEvents(buf) unsigned char *buf; { /* Request GetMotionEvents is opcode 39 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* GetMotionEvents */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(4), "request length"); print_field_1up(buf, 4, 4, WINDOW, "window"); print_field_1up(buf, 8, 4, TIMESTAMP, "start"); print_field_1up(buf, 12, 4, TIMESTAMP, "stop"); } /*----------------------------------------------------------------------*/ void GetMotionEventsReply(buf) unsigned char *buf; { long n; print_field_1up(RBf, 0, 1, REPLY, REPLYHEADER); /* GetMotionEvents */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_2up(buf, 4, 4, DVALUE4(2 * n), "reply length"); print_field_2up(buf, 8, 4, DVALUE4(n), "number of events"); n = ILong(&buf[8]); (void) print_list_1up(&buf[32], n, TIMECOORD, "events"); } /*----------------------------------------------------------------------*/ void TranslateCoordinates(buf) unsigned char *buf; { /* Request TranslateCoordinates is opcode 40 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* TranslateCoordinates */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(4), "request length"); print_field_1up(buf, 4, 4, WINDOW, "src-window"); print_field_1up(buf, 8, 4, WINDOW, "dst-window"); print_field_1up(buf, 12, 2, INT16, "src-x"); print_field_1up(buf, 14, 2, INT16, "src-y"); } /*----------------------------------------------------------------------*/ void TranslateCoordinatesReply(buf) unsigned char *buf; { print_field_1up(RBf, 0, 1, REPLY, REPLYHEADER); /* TranslateCoordinates */ if (Verbose < 1) return; print_field_1up(buf, 1, 1, BOOL, "same-screen"); print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_2up(buf, 4, 4, CONST4(0), "reply length"); print_field_1up(buf, 8, 4, WINDOW, "child"); print_field_1up(buf, 12, 2, INT16, "dst-x"); print_field_1up(buf, 14, 2, INT16, "dst-y"); } /*----------------------------------------------------------------------*/ void WarpPointer(buf) unsigned char *buf; { /* Request WarpPointer is opcode 41 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* WarpPointer */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(6), "request length"); print_field_1up(buf, 4, 4, WINDOW, "src-window"); print_field_1up(buf, 8, 4, WINDOW, "dst-window"); print_field_1up(buf, 12, 2, INT16, "src-x"); print_field_1up(buf, 14, 2, INT16, "src-y"); print_field_1up(buf, 16, 2, CARD16, "src-width"); print_field_1up(buf, 18, 2, CARD16, "src-height"); print_field_1up(buf, 20, 2, INT16, "dst-x"); print_field_1up(buf, 22, 2, INT16, "dst-y"); } /*----------------------------------------------------------------------*/ void SetInputFocus(buf) unsigned char *buf; { /* Request SetInputFocus is opcode 42 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* SetInputFocus */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_1up(buf, 1, 1, FOCUSAGENT, "revert-to"); print_field_2up(buf, 2, 2, CONST2(3), "request length"); print_field_1up(buf, 4, 4, WINDOWNR, "focus"); print_field_1up(buf, 8, 4, TIMESTAMP, "time"); } /*----------------------------------------------------------------------*/ void GetInputFocus(buf) unsigned char *buf; { /* Request GetInputFocus is opcode 43 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* GetInputFocus */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(1), "request length"); } /*----------------------------------------------------------------------*/ void GetInputFocusReply(buf) unsigned char *buf; { print_field_1up(RBf, 0, 1, REPLY, REPLYHEADER); /* GetInputFocus */ if (Verbose < 1) return; print_field_1up(buf, 1, 1, FOCUSAGENT, "revert-to"); print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_2up(buf, 4, 4, CONST4(0), "reply length"); print_field_1up(buf, 8, 4, WINDOWNR, "focus"); } /*----------------------------------------------------------------------*/ void QueryKeymap(buf) unsigned char *buf; { /* Request QueryKeymap is opcode 44 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* QueryKeymap */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(1), "request length"); } /*----------------------------------------------------------------------*/ void QueryKeymapReply(buf) unsigned char *buf; { print_field_1up(RBf, 0, 1, REPLY, REPLYHEADER); /* QueryKeymap */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_2up(buf, 4, 4, CONST4(2), "reply length"); print_bytes_1up(&buf[8], 32L, "keys"); } /*----------------------------------------------------------------------*/ void OpenFont(buf) unsigned char *buf; { short n; /* Request OpenFont is opcode 45 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* OpenFont */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, DVALUE2(3 + (n + p) / 4), "request length"); print_field_1up(buf, 4, 4, FONT, "font-id"); print_field_2up(buf, 8, 2, DVALUE2(n), "length of name"); n = IShort(&buf[8]); print_str8_1up(&buf[12], (long) n, "name"); } /*----------------------------------------------------------------------*/ void CloseFont(buf) unsigned char *buf; { /* Request CloseFont is opcode 46 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* CloseFont */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(2), "request length"); print_field_1up(buf, 4, 4, FONT, "font"); } /*----------------------------------------------------------------------*/ void QueryFont(buf) unsigned char *buf; { /* Request QueryFont is opcode 47 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* QueryFont */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(2), "request length"); print_field_1up(buf, 4, 4, FONTABLE, "font"); } /*----------------------------------------------------------------------*/ void QueryFontReply(buf) unsigned char *buf; { short n; long m; long k; print_field_1up(RBf, 0, 1, REPLY, REPLYHEADER); /* QueryFont */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_2up(buf, 4, 4, DVALUE4(7 + 2 * n + 3 * m), "reply length"); print_field_1up(buf, 8, 12, CHARINFO, "min-bounds"); print_field_1up(buf, 24, 12, CHARINFO, "max-bounds"); print_field_1up(buf, 40, 2, CARD16, "min-char-or-byte2"); print_field_1up(buf, 42, 2, CARD16, "max-char-or-byte2"); print_field_1up(buf, 44, 2, CARD16, "default-char"); print_field_2up(buf, 46, 2, DVALUE2(n), "number of FONTPROPs"); n = IShort(&buf[46]); print_field_1up(buf, 48, 1, DIRECT, "draw-direction"); print_field_1up(buf, 49, 1, CARD8, "min-byte1"); print_field_1up(buf, 50, 1, CARD8, "max-byte1"); print_field_1up(buf, 51, 1, BOOL, "all-chars-exist"); print_field_1up(buf, 52, 2, INT16, "font-ascent"); print_field_1up(buf, 54, 2, INT16, "font-descent"); print_field_2up(buf, 56, 4, DVALUE4(m), "number of CHARINFOs"); if (Verbose >= 3) { m = ILong(&buf[56]); k = print_list_1up(&buf[60], (long) n, FONTPROP, "properties"); (void) print_list_1up(&buf[60 + k], (long) m, CHARINFO, "char-infos"); } } /*----------------------------------------------------------------------*/ void QueryTextExtents(buf) unsigned char *buf; { short n; /* Request QueryTextExtents is opcode 48 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* QueryTextExtents */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 1, 1, BOOL, "odd length?"); print_field_2up(buf, 2, 2, DVALUE2(2 + (2 * n + p) / 4), "request length"); n = (IShort(&buf[2]) - 2) * 4 / 2; if (IBool(&buf[1])) n -= 1; print_field_1up(buf, 4, 4, FONTABLE, "font"); print_str16_1up(&buf[8], (long) n, "string"); } /*----------------------------------------------------------------------*/ void QueryTextExtentsReply(buf) unsigned char *buf; { print_field_1up(RBf, 0, 1, REPLY, REPLYHEADER); /* QueryTextExtents */ if (Verbose < 1) return; print_field_1up(buf, 1, 1, DIRECT, "draw-direction"); print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_2up(buf, 4, 4, CONST4(0), "reply length"); print_field_1up(buf, 8, 2, INT16, "font-ascent"); print_field_1up(buf, 10, 2, INT16, "font-descent"); print_field_1up(buf, 12, 2, INT16, "overall-ascent"); print_field_1up(buf, 14, 2, INT16, "overall-descent"); print_field_1up(buf, 16, 4, INT32, "overall-width"); print_field_1up(buf, 20, 4, INT32, "overall-left"); print_field_1up(buf, 24, 4, INT32, "overall-right"); } /*----------------------------------------------------------------------*/ void ListFonts(buf) unsigned char *buf; { short n; /* Request ListFonts is opcode 49 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* ListFonts */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, DVALUE2(2 + (n + p) / 4), "request length"); print_field_1up(buf, 4, 2, CARD16, "max-names"); print_field_2up(buf, 6, 2, DVALUE2(n), "length of pattern"); n = IShort(&buf[6]); print_str8_1up(&buf[8], (long) n, "pattern"); } /*----------------------------------------------------------------------*/ void ListFontsReply(buf) unsigned char *buf; { short n; print_field_1up(RBf, 0, 1, REPLY, REPLYHEADER); /* ListFonts */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_2up(buf, 4, 4, DVALUE4((n + p) / 4), "reply length"); print_field_2up(buf, 8, 2, CARD16, "number of names"); n = IShort(&buf[8]); print_list_str_1up(&buf[32], (long) n, "names"); } /*----------------------------------------------------------------------*/ void ListFontsWithInfo(buf) unsigned char *buf; { short n; /* Request ListFontsWithInfo is opcode 50 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* ListFontsWithInfo */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, DVALUE2(2 + (n + p) / 4), "request length"); print_field_1up(buf, 4, 2, CARD16, "max-names"); print_field_2up(buf, 6, 2, DVALUE2(n), "length of pattern"); n = IShort(&buf[6]); print_str8_1up(&buf[8], (long) n, "pattern"); } /*----------------------------------------------------------------------*/ void ListFontsWithInfoReply(buf) unsigned char *buf; { short which; print_field_1up(RBf, 0, 1, REPLY, REPLYHEADER); /* ListFontsWithInfo */ if (Verbose < 1) return; which = IByte(&buf[1]); if (which != 0) { ListFontsWithInfoReply1(buf); KeepLastReplyExpected(); } else ListFontsWithInfoReply2(buf); } /*----------------------------------------------------------------------*/ void ListFontsWithInfoReply1(buf) unsigned char *buf; { short n; short m; print_field_2up(buf, 1, 1, DVALUE1(n), "length of name in bytes"); n = IByte(&buf[1]); print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_2up(buf, 4, 4, DVALUE4(7 + 2 * m + (n + p) / 4), "reply length"); print_field_1up(buf, 8, 12, CHARINFO, "min-bounds"); print_field_1up(buf, 24, 12, CHARINFO, "max-bounds"); print_field_1up(buf, 40, 2, CARD16, "min-char-or-byte2"); print_field_1up(buf, 42, 2, CARD16, "max-char-or-byte2"); print_field_1up(buf, 44, 2, CARD16, "default-char"); print_field_2up(buf, 46, 2, DVALUE2(m), "number of FONTPROPs"); m = IShort(&buf[46]); print_field_1up(buf, 48, 1, DIRECT, "draw-direction"); print_field_1up(buf, 49, 1, CARD8, "min-byte1"); print_field_1up(buf, 50, 1, CARD8, "max-byte1"); print_field_1up(buf, 51, 1, BOOL, "all-chars-exist"); print_field_1up(buf, 52, 2, INT16, "font-ascent"); print_field_1up(buf, 54, 2, INT16, "font-descent"); print_field_1up(buf, 56, 4, CARD32, "replies-hint"); (void) print_list_1up(&buf[60], (long) m, FONTPROP, "properties"); print_str8_1up(&buf[60 + 8 * m], (long) n, "name"); } /*----------------------------------------------------------------------*/ void ListFontsWithInfoReply2(buf) unsigned char *buf; { print_field_1up(buf, 1, 1, CONST1(0), "last-reply indicator"); print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_2up(buf, 4, 4, CONST4(7), "reply length"); } /*----------------------------------------------------------------------*/ void SetFontPath(buf) unsigned char *buf; { short n; /* Request SetFontPath is opcode 51 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* SetFontPath */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, DVALUE2(2 + (n + p) / 4), "request length"); print_field_2up(buf, 4, 2, CARD16, "number of paths"); n = IShort(&buf[4]); print_list_str_1up(&buf[8], (long) n, "paths"); } /*----------------------------------------------------------------------*/ void GetFontPath(buf) unsigned char *buf; { /* Request GetFontPath is opcode 52 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* GetFontPath */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_1up(buf, 2, 2, CONST2(1), "request list"); } /*----------------------------------------------------------------------*/ void GetFontPathReply(buf) unsigned char *buf; { short n; print_field_1up(RBf, 0, 1, REPLY, REPLYHEADER); /* GetFontPath */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_2up(buf, 4, 4, DVALUE4((n + p) / 4), "reply length"); print_field_2up(buf, 8, 2, CARD16, "number of paths"); n = IShort(&buf[8]); print_list_str_1up(&buf[32], (long) n, "paths"); } /*----------------------------------------------------------------------*/ void CreatePixmap(buf) unsigned char *buf; { /* Request CreatePixmap is opcode 53 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* CreatePixmap */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_1up(buf, 1, 1, CARD8, "depth"); print_field_2up(buf, 2, 2, CONST2(4), "request length"); print_field_1up(buf, 4, 4, PIXMAP, "pixmap-id"); print_field_1up(buf, 8, 4, DRAWABLE, "drawable"); print_field_1up(buf, 12, 2, CARD16, "width"); print_field_1up(buf, 14, 2, CARD16, "height"); } /*----------------------------------------------------------------------*/ void FreePixmap(buf) unsigned char *buf; { /* Request FreePixmap is opcode 54 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* FreePixmap */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(2), "request length"); print_field_1up(buf, 4, 4, PIXMAP, "pixmap"); } /*----------------------------------------------------------------------*/ void CreateGC(buf) unsigned char *buf; { /* Request CreateGC is opcode 55 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* CreateGC */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, DVALUE2(4 + n), "request length"); print_field_1up(buf, 4, 4, GCONTEXT, "graphic-context-id"); print_field_1up(buf, 8, 4, DRAWABLE, "drawable"); print_field_1up(buf, 12, 4, GC_BITMASK, "value-mask"); print_values_1up(&buf[12], 4, GC_BITMASK, &buf[16], "value-list"); } /*----------------------------------------------------------------------*/ void ChangeGC(buf) unsigned char *buf; { /* Request ChangeGC is opcode 56 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* ChangeGC */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, DVALUE2(3 + n), "request length"); print_field_1up(buf, 4, 4, GCONTEXT, "gc"); print_field_1up(buf, 8, 4, GC_BITMASK, "value-mask"); print_values_1up(&buf[8], 4, GC_BITMASK, &buf[12], "value-list"); } /*----------------------------------------------------------------------*/ void CopyGC(buf) unsigned char *buf; { /* Request CopyGC is opcode 57 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* CopyGC */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(4), "request length"); print_field_1up(buf, 4, 4, GCONTEXT, "src-gc"); print_field_1up(buf, 8, 4, GCONTEXT, "dst-gc"); print_field_1up(buf, 12, 4, GC_BITMASK, "value-mask"); } /*----------------------------------------------------------------------*/ void SetDashes(buf) unsigned char *buf; { short n; /* Request SetDashes is opcode 58 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* SetDashes */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, DVALUE2(3 + (n + p) / 4), "request length"); print_field_1up(buf, 4, 4, GCONTEXT, "gc"); print_field_1up(buf, 8, 2, CARD16, "dash-offset"); print_field_2up(buf, 10, 2, DVALUE2(n), "length of dashes"); n = IShort(&buf[10]); print_bytes_1up(&buf[12], (long) n, "dashes"); } /*----------------------------------------------------------------------*/ void SetClipRectangles(buf) unsigned char *buf; { short n; /* Request SetClipRectangles is opcode 59 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* SetClipRectangles */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_1up(buf, 1, 1, RECTORDER, "ordering"); print_field_2up(buf, 2, 2, DVALUE2(3 + 2 * n), "request length"); n = (IShort(&buf[2]) - 3) / 2; print_field_1up(buf, 4, 4, GCONTEXT, "gc"); print_field_1up(buf, 8, 2, INT16, "clip-x-origin"); print_field_1up(buf, 10, 2, INT16, "clip-y-origin"); (void) print_list_1up(&buf[12], (long) n, RECTANGLE, "rectangles"); } /*----------------------------------------------------------------------*/ void FreeGC(buf) unsigned char *buf; { /* Request FreeGC is opcode 60 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* FreeGC */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(2), "request length"); print_field_1up(buf, 4, 4, GCONTEXT, "gc"); } /*----------------------------------------------------------------------*/ void ClearArea(buf) unsigned char *buf; { /* Request ClearArea is opcode 61 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* ClearArea */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_1up(buf, 1, 1, BOOL, "exposures"); print_field_2up(buf, 2, 2, CONST2(4), "request length"); print_field_1up(buf, 4, 4, WINDOW, "window"); print_field_1up(buf, 8, 2, INT16, "x"); print_field_1up(buf, 10, 2, INT16, "y"); print_field_1up(buf, 12, 2, CARD16, "width"); print_field_1up(buf, 14, 2, CARD16, "height"); } /*----------------------------------------------------------------------*/ void CopyArea(buf) unsigned char *buf; { /* Request CopyArea is opcode 62 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* CopyArea */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(7), "request length"); print_field_1up(buf, 4, 4, DRAWABLE, "src-drawable"); print_field_1up(buf, 8, 4, DRAWABLE, "dst-drawable"); print_field_1up(buf, 12, 4, GCONTEXT, "gc"); print_field_1up(buf, 16, 2, INT16, "src-x"); print_field_1up(buf, 18, 2, INT16, "src-y"); print_field_1up(buf, 20, 2, INT16, "dst-x"); print_field_1up(buf, 22, 2, INT16, "dst-y"); print_field_1up(buf, 24, 2, CARD16, "width"); print_field_1up(buf, 26, 2, CARD16, "height"); } /*----------------------------------------------------------------------*/ void CopyPlane(buf) unsigned char *buf; { /* Request CopyPlane is opcode 63 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* CopyPlane */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(8), "request length"); print_field_1up(buf, 4, 4, DRAWABLE, "src-drawable"); print_field_1up(buf, 8, 4, DRAWABLE, "dst-drawable"); print_field_1up(buf, 12, 4, GCONTEXT, "gc"); print_field_1up(buf, 16, 2, INT16, "src-x"); print_field_1up(buf, 18, 2, INT16, "src-y"); print_field_1up(buf, 20, 2, INT16, "dst-x"); print_field_1up(buf, 22, 2, INT16, "dst-y"); print_field_1up(buf, 24, 2, CARD16, "width"); print_field_1up(buf, 26, 2, CARD16, "height"); print_field_1up(buf, 28, 4, CARD32, "bit-plane"); } /*----------------------------------------------------------------------*/ void PolyPoint(buf) unsigned char *buf; { short n; /* Request PolyPoint is opcode 64 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* PolyPoint */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_1up(buf, 1, 1, COORMODE, "coordinate-mode"); print_field_2up(buf, 2, 2, DVALUE2(3 + n), "request length"); n = (IShort(&buf[2]) - 3); print_field_1up(buf, 4, 4, DRAWABLE, "drawable"); print_field_1up(buf, 8, 4, GCONTEXT, "gc"); (void) print_list_1up(&buf[12], (long) n, POINT, "points"); } /*----------------------------------------------------------------------*/ void PolyLine(buf) unsigned char *buf; { short n; /* Request PolyLine is opcode 65 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* PolyLine */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_1up(buf, 1, 1, COORMODE, "coordinate-mode"); print_field_2up(buf, 2, 2, DVALUE2(3 + n), "request length"); n = (IShort(&buf[2]) - 3); print_field_1up(buf, 4, 4, DRAWABLE, "drawable"); print_field_1up(buf, 8, 4, GCONTEXT, "gc"); (void) print_list_1up(&buf[12], (long) n, POINT, "points"); } /*----------------------------------------------------------------------*/ void PolySegment(buf) unsigned char *buf; { short n; /* Request PolySegment is opcode 66 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* PolySegment */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, DVALUE2(3 + 2 * n), "request length"); n = (IShort(&buf[2]) - 3) / 2; print_field_1up(buf, 4, 4, DRAWABLE, "drawable"); print_field_1up(buf, 8, 4, GCONTEXT, "gc"); (void) print_list_1up(&buf[12], (long) n, SEGMENT, "segments"); } /*----------------------------------------------------------------------*/ void PolyRectangle(buf) unsigned char *buf; { short n; /* Request PolyRectangle is opcode 67 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* PolyRectangle */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, DVALUE2(3 + 2 * n), "request length"); n = (IShort(&buf[2]) - 3) / 2; print_field_1up(buf, 4, 4, DRAWABLE, "drawable"); print_field_1up(buf, 8, 4, GCONTEXT, "gc"); (void) print_list_1up(&buf[12], (long) n, RECTANGLE, "rectangles"); } /*----------------------------------------------------------------------*/ void PolyArc(buf) unsigned char *buf; { short n; /* Request PolyArc is opcode 68 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* PolyArc */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, DVALUE2(3 + 3 * n), "request length"); n = (IShort(&buf[2]) - 3) / 3; print_field_1up(buf, 4, 4, DRAWABLE, "drawable"); print_field_1up(buf, 8, 4, GCONTEXT, "gc"); (void) print_list_1up(&buf[12], (long) n, ARC, "arcs"); } /*----------------------------------------------------------------------*/ void FillPoly(buf) unsigned char *buf; { short n; /* Request FillPoly is opcode 69 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* FillPoly */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, DVALUE2(4 + n), "request length"); n = (IShort(&buf[2]) - 4); print_field_1up(buf, 4, 4, DRAWABLE, "drawable"); print_field_1up(buf, 8, 4, GCONTEXT, "gc"); print_field_1up(buf, 12, 1, POLYSHAPE, "shape"); print_field_1up(buf, 13, 1, COORMODE, "coordinate-mode"); (void) print_list_1up(&buf[16], (long) n, POINT, "points"); } /*----------------------------------------------------------------------*/ void PolyFillRectangle(buf) unsigned char *buf; { short n; /* Request PolyFillRectangle is opcode 70 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* PolyFillRectangle */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, DVALUE2(3 + 2 * n), "request length"); n = (IShort(&buf[2]) - 3) / 2; print_field_1up(buf, 4, 4, DRAWABLE, "drawable"); print_field_1up(buf, 8, 4, GCONTEXT, "gc"); (void) print_list_1up(&buf[12], (long) n, RECTANGLE, "rectangles"); } /*----------------------------------------------------------------------*/ void PolyFillArc(buf) unsigned char *buf; { short n; /* Request PolyFillArc is opcode 71 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* PolyFillArc */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, DVALUE2(3 + 3 * n), "request length"); n = (IShort(&buf[2]) - 3) / 3; print_field_1up(buf, 4, 4, DRAWABLE, "drawable"); print_field_1up(buf, 8, 4, GCONTEXT, "gc"); (void) print_list_1up(&buf[12], (long) n, ARC, "arcs"); } /*----------------------------------------------------------------------*/ void PutImage(buf) unsigned char *buf; { short n; /* Request PutImage is opcode 72 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* PutImage */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_1up(buf, 1, 1, IMAGEMODE, "format"); print_field_2up(buf, 2, 2, DVALUE2(6 + (n + p) / 4), "request length"); /* * The size of the Image is overestimated by the following computation of n, * because we ignore that padding of the request to a multiple of 4 bytes. * The image may not be a multiple of 4 bytes. The actual size of the image * is determined as follows: for format = Bitmap or format = XYPixmap, the * size is (left-pad + width) [ pad to multiple of bitmap-scanline-pad from * SetUpReply ] divide by 8 to get bytes times height times depth for format * = ZPixmap, take the depth and use it to find the bits-per-pixel and * scanline-pad given in one of the SetUpReply DEPTH records. width * * bits-per-pixel pad to multiple of scanline-pad divide by 8 to get bytes * times height times depth For simplicity, we ignore all this and just use * the request length to (over)estimate the size of the image */ n = (IShort(&buf[2]) - 6) * 4; print_field_1up(buf, 4, 4, DRAWABLE, "drawable"); print_field_1up(buf, 8, 4, GCONTEXT, "gc"); print_field_1up(buf, 12, 2, CARD16, "width"); print_field_1up(buf, 14, 2, CARD16, "height"); print_field_1up(buf, 16, 2, INT16, "dst-x"); print_field_1up(buf, 18, 2, INT16, "dst-y"); print_field_1up(buf, 20, 1, CARD8, "left-pad"); print_field_1up(buf, 21, 1, CARD8, "depth"); print_bytes_1up(&buf[24], (long) n, "data"); } /*----------------------------------------------------------------------*/ void GetImage(buf) unsigned char *buf; { /* Request GetImage is opcode 73 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* GetImage */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_1up(buf, 1, 1, IMAGEMODE, "format"); print_field_2up(buf, 2, 2, CONST2(5), "request length"); print_field_1up(buf, 4, 4, DRAWABLE, "drawable"); print_field_1up(buf, 8, 2, INT16, "x"); print_field_1up(buf, 10, 2, INT16, "y"); print_field_1up(buf, 12, 2, CARD16, "width"); print_field_1up(buf, 14, 2, CARD16, "height"); print_field_1up(buf, 16, 4, CARD32, "plane-mask"); } /*----------------------------------------------------------------------*/ void GetImageReply(buf) unsigned char *buf; { long n; print_field_1up(RBf, 0, 1, REPLY, REPLYHEADER); /* GetImage */ if (Verbose < 1) return; print_field_1up(buf, 1, 1, CARD8, "depth"); print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_2up(buf, 4, 4, DVALUE4((n + p) / 4), "reply length"); /* to properly compute the actual size of the image, we have to remember the width and height values from the request. Again, we (over)estimate its length from the length of the reply */ n = ILong(&buf[4]) * 4; print_field_1up(buf, 8, 4, VISUALID, "visual"); print_bytes_1up(&buf[32], n, "data"); } /*----------------------------------------------------------------------*/ void PolyText8(buf) unsigned char *buf; { short n; /* Request PolyText8 is opcode 74 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* PolyText8 */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, DVALUE2(4 + (n + p) / 4), "request length"); n = (IShort(&buf[2]) - 4) * 4; print_field_1up(buf, 4, 4, DRAWABLE, "drawable"); print_field_1up(buf, 8, 4, GCONTEXT, "gc"); print_field_1up(buf, 12, 2, INT16, "x"); print_field_1up(buf, 14, 2, INT16, "y"); print_text_list8_1up(&buf[16], n, "items"); } /*----------------------------------------------------------------------*/ void PolyText16(buf) unsigned char *buf; { short n; /* Request PolyText16 is opcode 75 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* PolyText16 */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, DVALUE2(4 + (n + p) / 4), "request length"); n = (IShort(&buf[2]) - 4) * 4; print_field_1up(buf, 4, 4, DRAWABLE, "drawable"); print_field_1up(buf, 8, 4, GCONTEXT, "gc"); print_field_1up(buf, 12, 2, INT16, "x"); print_field_1up(buf, 14, 2, INT16, "y"); print_text_list16_1up(&buf[16], n, "items"); } /*----------------------------------------------------------------------*/ void ImageText8(buf) unsigned char *buf; { short n; /* Request ImageText8 is opcode 76 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* ImageText8 */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 1, 1, DVALUE1(n), "length of string"); n = IByte(&buf[1]); print_field_2up(buf, 2, 2, DVALUE2(4 + (n + p) / 4), "request length"); print_field_1up(buf, 4, 4, DRAWABLE, "drawable"); print_field_1up(buf, 8, 4, GCONTEXT, "gc"); print_field_1up(buf, 12, 2, INT16, "x"); print_field_1up(buf, 14, 2, INT16, "y"); print_str8_1up(&buf[16], (long) n, "string"); } /*----------------------------------------------------------------------*/ void ImageText16(buf) unsigned char *buf; { short n; /* Request ImageText16 is opcode 77 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* ImageText16 */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 1, 1, DVALUE1(n), "length of string"); n = IByte(&buf[1]); print_field_2up(buf, 2, 2, DVALUE2(4 + (2 * n + p) / 4), "request length"); print_field_1up(buf, 4, 4, DRAWABLE, "drawable"); print_field_1up(buf, 8, 4, GCONTEXT, "gc"); print_field_1up(buf, 12, 2, INT16, "x"); print_field_1up(buf, 14, 2, INT16, "y"); print_str16_1up(&buf[16], (long) n, "string"); } /*----------------------------------------------------------------------*/ void CreateColormap(buf) unsigned char *buf; { /* Request CreateColormap is opcode 78 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* CreateColormap */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_1up(buf, 1, 1, ALLORNONE, "alloc"); print_field_2up(buf, 2, 2, CONST2(4), "request length"); print_field_1up(buf, 4, 4, COLORMAP, "color-map-id"); print_field_1up(buf, 8, 4, WINDOW, "window"); print_field_1up(buf, 12, 4, VISUALID, "visual"); } /*----------------------------------------------------------------------*/ void FreeColormap(buf) unsigned char *buf; { /* Request FreeColormap is opcode 79 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* FreeColormap */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(2), "request length"); print_field_1up(buf, 4, 4, COLORMAP, "cmap"); } /*----------------------------------------------------------------------*/ void CopyColormapAndFree(buf) unsigned char *buf; { /* Request CopyColormapAndFree is opcode 80 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* CopyColormapAndFree */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(3), "request length"); print_field_1up(buf, 4, 4, COLORMAP, "color-map-id"); print_field_1up(buf, 8, 4, COLORMAP, "src-cmap"); } /*----------------------------------------------------------------------*/ void InstallColormap(buf) unsigned char *buf; { /* Request InstallColormap is opcode 81 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* InstallColormap */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(2), "request length"); print_field_1up(buf, 4, 4, COLORMAP, "cmap"); } /*----------------------------------------------------------------------*/ void UninstallColormap(buf) unsigned char *buf; { /* Request UninstallColormap is opcode 82 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* UninstallColormap */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(2), "request length"); print_field_1up(buf, 4, 4, COLORMAP, "cmap"); } /*----------------------------------------------------------------------*/ void ListInstalledColormaps(buf) unsigned char *buf; { /* Request ListInstalledColormaps is opcode 83 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* ListInstalledColormaps */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(2), "request length"); print_field_1up(buf, 4, 4, WINDOW, "window"); } /*----------------------------------------------------------------------*/ void ListInstalledColormapsReply(buf) unsigned char *buf; { short n; print_field_1up(RBf, 0, 1, REPLY, REPLYHEADER); /* ListInstalledColormaps */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_2up(buf, 4, 4, DVALUE4(n), "reply length"); print_field_2up(buf, 8, 2, DVALUE2(n), "number of cmaps"); n = IShort(&buf[8]); (void) print_list_1up(&buf[32], (long) n, COLORMAP, "cmaps"); } /*----------------------------------------------------------------------*/ void AllocColor(buf) unsigned char *buf; { /* Request AllocColor is opcode 84 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* AllocColor */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(4), "request length"); print_field_1up(buf, 4, 4, COLORMAP, "cmap"); print_field_1up(buf, 8, 2, CARD16, "red"); print_field_1up(buf, 10, 2, CARD16, "green"); print_field_1up(buf, 12, 2, CARD16, "blue"); } /*----------------------------------------------------------------------*/ void AllocColorReply(buf) unsigned char *buf; { print_field_1up(RBf, 0, 1, REPLY, REPLYHEADER); /* AllocColor */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_2up(buf, 4, 4, CONST4(0), "reply length"); print_field_1up(buf, 8, 2, CARD16, "red"); print_field_1up(buf, 10, 2, CARD16, "green"); print_field_1up(buf, 12, 2, CARD16, "blue"); print_field_1up(buf, 16, 4, CARD32, "pixel"); } /*----------------------------------------------------------------------*/ void AllocNamedColor(buf) unsigned char *buf; { short n; /* Request AllocNamedColor is opcode 85 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* AllocNamedColor */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, DVALUE2(3 + (n + p) / 4), "request length"); print_field_1up(buf, 4, 4, COLORMAP, "cmap"); print_field_2up(buf, 8, 2, DVALUE2(n), "length of name"); n = IShort(&buf[8]); print_str8_1up(&buf[12], (long) n, "name"); } /*----------------------------------------------------------------------*/ void AllocNamedColorReply(buf) unsigned char *buf; { print_field_1up(RBf, 0, 1, REPLY, REPLYHEADER); /* AllocNamedColor */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_2up(buf, 4, 4, CONST4(0), "reply length"); print_field_1up(buf, 8, 4, CARD32, "pixel"); print_field_1up(buf, 12, 2, CARD16, "exact-red"); print_field_1up(buf, 14, 2, CARD16, "exact-green"); print_field_1up(buf, 16, 2, CARD16, "exact-blue"); print_field_1up(buf, 18, 2, CARD16, "visual-red"); print_field_1up(buf, 20, 2, CARD16, "visual-green"); print_field_1up(buf, 22, 2, CARD16, "visual-blue"); } /*----------------------------------------------------------------------*/ void AllocColorCells(buf) unsigned char *buf; { /* Request AllocColorCells is opcode 86 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* AllocColorCells */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_1up(buf, 1, 1, BOOL, "contiguous"); print_field_2up(buf, 2, 2, CONST2(3), "request length"); print_field_1up(buf, 4, 4, COLORMAP, "cmap"); print_field_1up(buf, 8, 2, CARD16, "colors"); print_field_1up(buf, 10, 2, CARD16, "planes"); } /*----------------------------------------------------------------------*/ void AllocColorCellsReply(buf) unsigned char *buf; { short n; short m; short k; print_field_1up(RBf, 0, 1, REPLY, REPLYHEADER); /* AllocColorCells */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_2up(buf, 4, 4, DVALUE4(n + m), "reply length"); print_field_2up(buf, 8, 2, DVALUE2(n), "number of pixels"); n = IShort(&buf[8]); print_field_2up(buf, 10, 2, DVALUE2(m), "number of masks"); m = IShort(&buf[10]); k = print_list_1up(&buf[32], (long) n, CARD32, "pixels"); (void) print_list_1up(&buf[32 + k], (long) m, CARD32, "masks"); } /*----------------------------------------------------------------------*/ void AllocColorPlanes(buf) unsigned char *buf; { /* Request AllocColorPlanes is opcode 87 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* AllocColorPlanes */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_1up(buf, 1, 1, BOOL, "contiguous"); print_field_2up(buf, 2, 2, CONST2(4), "request length"); print_field_1up(buf, 4, 4, COLORMAP, "cmap"); print_field_1up(buf, 8, 2, CARD16, "colors"); print_field_1up(buf, 10, 2, CARD16, "reds"); print_field_1up(buf, 12, 2, CARD16, "greens"); print_field_1up(buf, 14, 2, CARD16, "blues"); } /*----------------------------------------------------------------------*/ void AllocColorPlanesReply(buf) unsigned char *buf; { short n; print_field_1up(RBf, 0, 1, REPLY, REPLYHEADER); /* AllocColorPlanes */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_2up(buf, 4, 4, DVALUE4(n), "reply length"); print_field_2up(buf, 8, 2, DVALUE2(n), "number of pixels"); n = IShort(&buf[8]); print_field_1up(buf, 12, 4, CARD32, "red-mask"); print_field_1up(buf, 16, 4, CARD32, "green-mask"); print_field_1up(buf, 20, 4, CARD32, "blue-mask"); (void) print_list_1up(&buf[32], (long) n, CARD32, "pixels"); } /*----------------------------------------------------------------------*/ void FreeColors(buf) unsigned char *buf; { short n; /* Request FreeColors is opcode 88 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* FreeColors */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, DVALUE2(3 + n), "request length"); n = IShort(&buf[2]) - 3; print_field_1up(buf, 4, 4, COLORMAP, "cmap"); print_field_1up(buf, 8, 4, CARD32, "plane-mask"); (void) print_list_1up(&buf[12], (long) n, CARD32, "pixels"); } /*----------------------------------------------------------------------*/ void StoreColors(buf) unsigned char *buf; { short n; /* Request StoreColors is opcode 89 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* StoreColors */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, DVALUE2(2 + 3 * n), "request length"); n = (IShort(&buf[2]) - 2) / 3; print_field_1up(buf, 4, 4, COLORMAP, "cmap"); (void) print_list_1up(&buf[8], (long) n, COLORITEM, "items"); } /*----------------------------------------------------------------------*/ void StoreNamedColor(buf) unsigned char *buf; { short n; /* Request StoreNamedColor is opcode 90 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* StoreNamedColor */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_1up(buf, 1, 1, COLORMASK, "which colors?"); print_field_2up(buf, 2, 2, DVALUE2(4 + (n + p) / 4), "request length"); print_field_1up(buf, 4, 4, COLORMAP, "cmap"); print_field_1up(buf, 8, 4, CARD32, "pixel"); print_field_2up(buf, 12, 2, DVALUE2(n), "length of name"); n = IShort(&buf[12]); print_str8_1up(&buf[16], (long) n, "name"); } /*----------------------------------------------------------------------*/ void QueryColors(buf) unsigned char *buf; { short n; /* Request QueryColors is opcode 91 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* QueryColors */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, DVALUE2(2 + n), "request length"); n = IShort(&buf[2]) - 2; print_field_1up(buf, 4, 4, COLORMAP, "cmap"); (void) print_list_1up(&buf[8], (long) n, CARD32, "pixels"); } /*----------------------------------------------------------------------*/ void QueryColorsReply(buf) unsigned char *buf; { short n; print_field_1up(RBf, 0, 1, REPLY, REPLYHEADER); /* QueryColors */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_2up(buf, 4, 4, DVALUE4(2 * n), "reply length"); print_field_2up(buf, 8, 2, DVALUE2(n), "number of colors"); n = IShort(&buf[8]); (void) print_list_1up(&buf[32], (long) n, RGB, "colors"); } /*----------------------------------------------------------------------*/ void LookupColor(buf) unsigned char *buf; { short n; /* Request LookupColor is opcode 92 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* LookupColor */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, DVALUE2(3 + (n + p) / 4), "request length"); print_field_1up(buf, 4, 4, COLORMAP, "cmap"); print_field_2up(buf, 8, 2, DVALUE2(n), "length of name"); n = IShort(&buf[8]); print_str8_1up(&buf[12], (long) n, "name"); } /*----------------------------------------------------------------------*/ void LookupColorReply(buf) unsigned char *buf; { print_field_1up(RBf, 0, 1, REPLY, REPLYHEADER); /* LookupColor */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_2up(buf, 4, 4, CONST4(0), "reply length"); print_field_1up(buf, 8, 2, CARD16, "exact-red"); print_field_1up(buf, 10, 2, CARD16, "exact-green"); print_field_1up(buf, 12, 2, CARD16, "exact-blue"); print_field_1up(buf, 14, 2, CARD16, "visual-red"); print_field_1up(buf, 16, 2, CARD16, "visual-green"); print_field_1up(buf, 18, 2, CARD16, "visual-blue"); } /*----------------------------------------------------------------------*/ void CreateCursor(buf) unsigned char *buf; { /* Request CreateCursor is opcode 93 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* CreateCursor */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(8), "request length"); print_field_1up(buf, 4, 4, CURSOR, "cursor-id"); print_field_1up(buf, 8, 4, PIXMAP, "source"); print_field_1up(buf, 12, 4, PIXMAP, "mask"); print_field_1up(buf, 16, 2, CARD16, "fore-red"); print_field_1up(buf, 18, 2, CARD16, "fore-green"); print_field_1up(buf, 20, 2, CARD16, "fore-blue"); print_field_1up(buf, 22, 2, CARD16, "back-red"); print_field_1up(buf, 24, 2, CARD16, "back-green"); print_field_1up(buf, 26, 2, CARD16, "back-blue"); print_field_1up(buf, 28, 2, CARD16, "x"); print_field_1up(buf, 30, 2, CARD16, "y"); } /*----------------------------------------------------------------------*/ void CreateGlyphCursor(buf) unsigned char *buf; { /* Request CreateGlyphCursor is opcode 94 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* CreateGlyphCursor */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(8), "request length"); print_field_1up(buf, 4, 4, CURSOR, "cursor-id"); print_field_1up(buf, 8, 4, FONT, "source-font"); print_field_1up(buf, 12, 4, FONT, "mask-font"); print_field_1up(buf, 16, 2, CARD16, "source-char"); print_field_1up(buf, 18, 2, CARD16, "mask-char"); print_field_1up(buf, 20, 2, CARD16, "fore-red"); print_field_1up(buf, 22, 2, CARD16, "fore-green"); print_field_1up(buf, 24, 2, CARD16, "fore-blue"); print_field_1up(buf, 26, 2, CARD16, "back-red"); print_field_1up(buf, 28, 2, CARD16, "back-green"); print_field_1up(buf, 30, 2, CARD16, "back-blue"); } /*----------------------------------------------------------------------*/ void FreeCursor(buf) unsigned char *buf; { /* Request FreeCursor is opcode 95 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* FreeCursor */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(2), "request length"); print_field_1up(buf, 4, 4, CURSOR, "cursor"); } /*----------------------------------------------------------------------*/ void RecolorCursor(buf) unsigned char *buf; { /* Request RecolorCursor is opcode 96 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* RecolorCursor */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(5), "request length"); print_field_1up(buf, 4, 4, CURSOR, "cursor"); print_field_1up(buf, 8, 2, CARD16, "fore-red"); print_field_1up(buf, 10, 2, CARD16, "fore-green"); print_field_1up(buf, 12, 2, CARD16, "fore-blue"); print_field_1up(buf, 14, 2, CARD16, "back-red"); print_field_1up(buf, 16, 2, CARD16, "back-green"); print_field_1up(buf, 18, 2, CARD16, "back-blue"); } /*----------------------------------------------------------------------*/ void QueryBestSize(buf) unsigned char *buf; { /* Request QueryBestSize is opcode 97 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* QueryBestSize */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_1up(buf, 1, 1, OBJECTCLASS, "class"); print_field_2up(buf, 2, 2, CONST2(3), "request length"); print_field_1up(buf, 4, 4, DRAWABLE, "drawable"); print_field_1up(buf, 8, 2, CARD16, "width"); print_field_1up(buf, 10, 2, CARD16, "height"); } /*----------------------------------------------------------------------*/ void QueryBestSizeReply(buf) unsigned char *buf; { print_field_1up(RBf, 0, 1, REPLY, REPLYHEADER); /* QueryBestSize */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_2up(buf, 4, 4, CONST4(0), "reply length"); print_field_1up(buf, 8, 2, CARD16, "width"); print_field_1up(buf, 10, 2, CARD16, "height"); } /*----------------------------------------------------------------------*/ void QueryExtension(buf) unsigned char *buf; { short n; /* Request QueryExtension is opcode 98 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* QueryExtension */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, DVALUE2(2 + (n + p) / 4), "request length"); print_field_2up(buf, 4, 2, DVALUE2(n), "length of name"); n = IShort(&buf[4]); print_str8_1up(&buf[8], (long) n, "name"); } /*----------------------------------------------------------------------*/ void QueryExtensionReply(buf) unsigned char *buf; { print_field_1up(RBf, 0, 1, REPLY, REPLYHEADER); /* QueryExtension */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_2up(buf, 4, 4, CONST4(0), "reply length"); print_field_1up(buf, 8, 1, BOOL, "present"); print_field_1up(buf, 9, 1, CARD8, "major-opcode"); print_field_1up(buf, 10, 1, CARD8, "first-event"); print_field_1up(buf, 11, 1, CARD8, "first-error"); } /*----------------------------------------------------------------------*/ void ListExtensions(buf) unsigned char *buf; { /* Request ListExtensions is opcode 99 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* ListExtensions */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(1), "request length"); } /*----------------------------------------------------------------------*/ void ListExtensionsReply(buf) unsigned char *buf; { short n; print_field_1up(RBf, 0, 1, REPLY, REPLYHEADER); /* ListExtensions */ if (Verbose < 1) return; print_field_2up(buf, 1, 1, CARD8, "number names"); n = IByte(&buf[1]); print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_2up(buf, 4, 4, DVALUE4((n + p) / 4), "reply length"); print_list_str_1up(&buf[32], (long) n, "names"); } /*----------------------------------------------------------------------*/ void ChangeKeyboardMapping(buf) unsigned char *buf; { short n; short m; /* Request ChangeKeyboardMapping is opcode 100 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* ChangeKeyboardMapping */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_1up(buf, 1, 1, DVALUE1(n), "keycode-count"); n = IByte(&buf[1]); print_field_2up(buf, 2, 2, DVALUE2(2 + nm), "request length"); print_field_1up(buf, 4, 1, KEYCODE, "first-keycode"); print_field_1up(buf, 5, 1, DVALUE1(m), "keysyms-per-keycode"); m = IByte(&buf[5]); (void) print_list_1up(&buf[8], (long) (n * m), KEYSYM, "keysyms"); } /*----------------------------------------------------------------------*/ void GetKeyboardMapping(buf) unsigned char *buf; { /* Request GetKeyboardMapping is opcode 101 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* GetKeyboardMapping */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(2), "request length"); print_field_1up(buf, 4, 1, KEYCODE, "first-keycode"); print_field_1up(buf, 5, 1, CARD8, "count"); } /*----------------------------------------------------------------------*/ void GetKeyboardMappingReply(buf) unsigned char *buf; { long n; print_field_1up(RBf, 0, 1, REPLY, REPLYHEADER); /* GetKeyboardMapping */ if (Verbose < 1) return; print_field_1up(buf, 1, 1, DVALUE1(n), "keysyms-per-keycode"); print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_2up(buf, 4, 4, DVALUE4(n * m), "reply length"); n = ILong(&buf[4]); print_list_2up(&buf[32], n, KEYSYM, "keysyms"); } /*----------------------------------------------------------------------*/ void ChangeKeyboardControl(buf) unsigned char *buf; { /* Request ChangeKeyboardControl is opcode 102 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* ChangeKeyboardControl */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, DVALUE2(2 + n), "request length"); print_field_1up(buf, 4, 4, KEYBOARD_BITMASK, "value-mask"); print_values_1up(&buf[4], 4, KEYBOARD_BITMASK, &buf[8], "value-list"); } /*----------------------------------------------------------------------*/ void GetKeyboardControl(buf) unsigned char *buf; { /* Request GetKeyboardControl is opcode 103 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* GetKeyboardControl */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(1), "request length"); } /*----------------------------------------------------------------------*/ void GetKeyboardControlReply(buf) unsigned char *buf; { print_field_1up(RBf, 0, 1, REPLY, REPLYHEADER); /* GetKeyboardControl */ if (Verbose < 1) return; print_field_1up(buf, 1, 1, OFF_ON, "global-auto-repeat"); print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_2up(buf, 4, 4, CONST4(5), "reply length"); print_field_1up(buf, 8, 4, CARD32, "led-mask"); print_field_1up(buf, 12, 1, CARD8, "key-click-percent"); print_field_1up(buf, 13, 1, CARD8, "bell-percent"); print_field_1up(buf, 14, 2, CARD16, "bell-pitch"); print_field_1up(buf, 16, 2, CARD16, "bell-duration"); print_bytes_1up(&buf[20], 32L, "auto-repeats"); } /*----------------------------------------------------------------------*/ void Bell(buf) unsigned char *buf; { /* Request Bell is opcode 104 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* Bell */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_1up(buf, 1, 1, INT8, "percent"); print_field_2up(buf, 2, 2, CONST2(1), "request length"); } /*----------------------------------------------------------------------*/ void ChangePointerControl(buf) unsigned char *buf; { /* Request ChangePointerControl is opcode 105 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* ChangePointerControl */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(3), "request length"); print_field_1up(buf, 4, 2, INT16, "acceleration-numerator"); print_field_1up(buf, 6, 2, INT16, "acceleration-denominator"); print_field_1up(buf, 8, 2, INT16, "threshold"); print_field_1up(buf, 10, 1, BOOL, "do-acceleration"); print_field_1up(buf, 11, 1, BOOL, "do-threshold"); } /*----------------------------------------------------------------------*/ void GetPointerControl(buf) unsigned char *buf; { /* Request GetPointerControl is opcode 106 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* GetPointerControl */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(1), "request length"); } /*----------------------------------------------------------------------*/ void GetPointerControlReply(buf) unsigned char *buf; { print_field_1up(RBf, 0, 1, REPLY, REPLYHEADER); /* GetPointerControl */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_2up(buf, 4, 4, CONST4(0), "reply length"); print_field_1up(buf, 8, 2, CARD16, "acceleration-numerator"); print_field_1up(buf, 10, 2, CARD16, "acceleration-denominator"); print_field_1up(buf, 12, 2, CARD16, "threshold"); } /*----------------------------------------------------------------------*/ void SetScreenSaver(buf) unsigned char *buf; { /* Request SetScreenSaver is opcode 107 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* SetScreenSaver */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(3), "request length"); print_field_1up(buf, 4, 2, INT16, "timeout"); print_field_1up(buf, 6, 2, INT16, "interval"); print_field_1up(buf, 8, 1, NO_YES, "prefer-blanking"); print_field_1up(buf, 9, 1, NO_YES, "allow-exposures"); } /*----------------------------------------------------------------------*/ void GetScreenSaver(buf) unsigned char *buf; { /* Request GetScreenSaver is opcode 108 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* GetScreenSaver */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(1), "request length"); } /*----------------------------------------------------------------------*/ void GetScreenSaverReply(buf) unsigned char *buf; { print_field_1up(RBf, 0, 1, REPLY, REPLYHEADER); /* GetScreenSaver */ if (Verbose < 1) return; print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_2up(buf, 4, 4, CONST4(0), "reply length"); print_field_1up(buf, 8, 2, CARD16, "timeout"); print_field_1up(buf, 10, 2, CARD16, "interval"); print_field_1up(buf, 12, 1, NO_YES, "prefer-blanking"); print_field_1up(buf, 13, 1, NO_YES, "allow-exposures"); } /*----------------------------------------------------------------------*/ void ChangeHosts(buf) unsigned char *buf; { short n; /* Request ChangeHosts is opcode 109 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* ChangeHosts */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_1up(buf, 1, 1, INS_DEL, "mode"); print_field_2up(buf, 2, 2, DVALUE2(2 + (n + p) / 4), "request length"); print_field_1up(buf, 4, 1, HOSTFAMILY, "family"); print_field_2up(buf, 6, 2, CARD16, "length of address"); n = IShort(&buf[6]); print_bytes_1up(&buf[8], (long) n, "address"); } /*----------------------------------------------------------------------*/ void ListHosts(buf) unsigned char *buf; { /* Request ListHosts is opcode 110 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* ListHosts */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(1), "request length"); } /*----------------------------------------------------------------------*/ void ListHostsReply(buf) unsigned char *buf; { short n; print_field_1up(RBf, 0, 1, REPLY, REPLYHEADER); /* ListHosts */ if (Verbose < 1) return; print_field_1up(buf, 1, 1, DIS_EN, "mode"); print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_2up(buf, 4, 4, DVALUE4(n / 4), "reply length"); print_field_2up(buf, 8, 2, CARD16, "number of hosts"); n = IShort(&buf[8]); (void) print_list_1up(&buf[32], (long) n, HOST, "hosts"); } /*----------------------------------------------------------------------*/ void SetAccessControl(buf) unsigned char *buf; { /* Request SetAccessControl is opcode 111 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* SetAccessControl */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_1up(buf, 1, 1, DIS_EN, "mode"); print_field_2up(buf, 2, 2, CONST2(1), "request length"); } /*----------------------------------------------------------------------*/ void SetCloseDownMode(buf) unsigned char *buf; { /* Request SetCloseDownMode is opcode 112 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* SetCloseDownMode */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_1up(buf, 1, 1, CLOSEMODE, "mode"); print_field_2up(buf, 2, 2, CONST2(1), "request length"); } /*----------------------------------------------------------------------*/ void KillClient(buf) unsigned char *buf; { /* Request KillClient is opcode 113 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* KillClient */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(2), "request length"); print_field_1up(buf, 4, 4, RESOURCEID, "resource"); } /*----------------------------------------------------------------------*/ void RotateProperties(buf) unsigned char *buf; { short n; /* Request RotateProperties is opcode 114 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* RotateProperties */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, DVALUE2(3 + n), "request length"); print_field_1up(buf, 4, 4, WINDOW, "window"); print_field_2up(buf, 8, 2, DVALUE2(n), "number of properties"); n = IShort(&buf[8]); print_field_1up(buf, 10, 2, INT16, "delta"); (void) print_list_1up(&buf[12], (long) n, ATOM, "properties"); } /*----------------------------------------------------------------------*/ void ForceScreenSaver(buf) unsigned char *buf; { /* Request ForceScreenSaver is opcode 115 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* ForceScreenSaver */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_1up(buf, 1, 1, SAVEMODE, "mode"); print_field_2up(buf, 2, 2, CONST2(1), "request length"); } /*----------------------------------------------------------------------*/ void SetPointerMapping(buf) unsigned char *buf; { short n; /* Request SetPointerMapping is opcode 116 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* SetPointerMapping */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 1, 1, DVALUE1(n), "length of map"); n = IByte(&buf[1]); print_field_2up(buf, 2, 2, DVALUE2(1 + (n + p) / 4), "request length"); print_bytes_1up(&buf[4], (long) n, "map"); } /*----------------------------------------------------------------------*/ void SetPointerMappingReply(buf) unsigned char *buf; { print_field_1up(RBf, 0, 1, REPLY, REPLYHEADER); /* SetPointerMapping */ if (Verbose < 1) return; print_field_1up(buf, 1, 1, RSTATUS, "status"); print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_2up(buf, 4, 4, CONST4(0), "reply length"); } /*----------------------------------------------------------------------*/ void GetPointerMapping(buf) unsigned char *buf; { /* Request GetPointerMapping is opcode 117 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* GetPointerMapping */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(1), "request length"); } /*----------------------------------------------------------------------*/ void GetPointerMappingReply(buf) unsigned char *buf; { short n; print_field_1up(RBf, 0, 1, REPLY, REPLYHEADER); /* GetPointerMapping */ if (Verbose < 1) return; print_field_2up(buf, 1, 1, DVALUE1(n), "length of map"); n = IByte(&buf[1]); print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_2up(buf, 4, 4, DVALUE4((n + p) / 4), "reply length"); print_bytes_1up(&buf[32], (long) n, "map"); } /*----------------------------------------------------------------------*/ void SetModifierMapping(buf) unsigned char *buf; { short n; /* Request SetModifierMapping is opcode 118 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* SetModifierMapping */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_1up(buf, 1, 1, DVALUE1(n), "keycodes-per-modifier"); n = IByte(&buf[1]); print_field_2up(buf, 2, 2, DVALUE2(1 + 2 * n), "request length"); print_bytes_1up(&buf[4 + 0 * n], (long) n, "Shift keycodes"); print_bytes_1up(&buf[4 + 1 * n], (long) n, "Lock keycodes"); print_bytes_1up(&buf[4 + 2 * n], (long) n, "Control keycodes"); print_bytes_1up(&buf[4 + 3 * n], (long) n, "Mod1 keycodes"); print_bytes_1up(&buf[4 + 4 * n], (long) n, "Mod2 keycodes"); print_bytes_1up(&buf[4 + 5 * n], (long) n, "Mod3 keycodes"); print_bytes_1up(&buf[4 + 6 * n], (long) n, "Mod4 keycodes"); print_bytes_1up(&buf[4 + 7 * n], (long) n, "Mod5 keycodes"); } /*----------------------------------------------------------------------*/ void SetModifierMappingReply(buf) unsigned char *buf; { print_field_1up(RBf, 0, 1, REPLY, REPLYHEADER); /* SetModifierMapping */ if (Verbose < 1) return; print_field_1up(buf, 1, 1, RSTATUS, "status"); print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_2up(buf, 4, 4, CONST4(0), "reply length"); } /*----------------------------------------------------------------------*/ void GetModifierMapping(buf) unsigned char *buf; { /* Request GetModifierMapping is opcode 119 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* GetModifierMapping */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(1), "request length"); } /*----------------------------------------------------------------------*/ void GetModifierMappingReply(buf) unsigned char *buf; { short n; print_field_1up(RBf, 0, 1, REPLY, REPLYHEADER); /* GetModifierMapping */ if (Verbose < 1) return; print_field_1up(buf, 1, 1, DVALUE1(n), "keycodes-per-modifier"); n = IByte(&buf[1]); print_field_2up(buf, 2, 2, CARD16, "sequence number"); print_field_2up(buf, 4, 4, DVALUE4(2 * n), "reply length"); (void) print_list_1up(&buf[32], (long) n, KEYCODE, "keycodes"); } /*----------------------------------------------------------------------*/ void NoOperation(buf) unsigned char *buf; { /* Request NoOperation is opcode 127 */ print_field_1up(buf, 0, 1, REQUEST, REQUESTHEADER); /* NoOperation */ if (Verbose < 1) return; if (Verbose > 1) print_field_1up(SBf, 0, 4, CARD32, "sequence number"); print_field_2up(buf, 2, 2, CONST2(1), "request length"); } xlab-980917mine/print11.h100664 71506 1605 24170 6745313377 14375 0ustar hildebinstall/* * $Id: print11.h,v 1.2 1998/08/01 07:29:05 marc Exp $ * * Prototypes of printing routines implemented in print11.c * * (c) Marc Vertes 1998 */ #if __STDC__ || defined(__cplusplus) #define P_(s) s #else #define P_(s) () #endif /* print11.c */ void PrintSetUpMessage P_((unsigned char *buf)); void PrintFailedSetUpReply P_((unsigned char *buf)); void PrintSuccessfulSetUpReply P_((unsigned char *buf)); void PrintSetUpReply P_((unsigned char *buf)); void RequestError P_((unsigned char *buf)); void ValueError P_((unsigned char *buf)); void WindowError P_((unsigned char *buf)); void PixmapError P_((unsigned char *buf)); void AtomError P_((unsigned char *buf)); void CursorError P_((unsigned char *buf)); void FontError P_((unsigned char *buf)); void MatchError P_((unsigned char *buf)); void DrawableError P_((unsigned char *buf)); void AccessError P_((unsigned char *buf)); void AllocError P_((unsigned char *buf)); void ColormapError P_((unsigned char *buf)); void GContextError P_((unsigned char *buf)); void IDChoiceError P_((unsigned char *buf)); void NameError P_((unsigned char *buf)); void LengthError P_((unsigned char *buf)); void ImplementationError P_((unsigned char *buf)); void KeyPressEvent P_((unsigned char *buf)); void KeyReleaseEvent P_((unsigned char *buf)); void ButtonPressEvent P_((unsigned char *buf)); void ButtonReleaseEvent P_((unsigned char *buf)); void MotionNotifyEvent P_((unsigned char *buf)); void EnterNotifyEvent P_((unsigned char *buf)); void LeaveNotifyEvent P_((unsigned char *buf)); void FocusInEvent P_((unsigned char *buf)); void FocusOutEvent P_((unsigned char *buf)); void KeymapNotifyEvent P_((unsigned char *buf)); void ExposeEvent P_((unsigned char *buf)); void GraphicsExposureEvent P_((unsigned char *buf)); void NoExposureEvent P_((unsigned char *buf)); void VisibilityNotifyEvent P_((unsigned char *buf)); void CreateNotifyEvent P_((unsigned char *buf)); void DestroyNotifyEvent P_((unsigned char *buf)); void UnmapNotifyEvent P_((unsigned char *buf)); void MapNotifyEvent P_((unsigned char *buf)); void MapRequestEvent P_((unsigned char *buf)); void ReparentNotifyEvent P_((unsigned char *buf)); void ConfigureNotifyEvent P_((unsigned char *buf)); void ConfigureRequestEvent P_((unsigned char *buf)); void GravityNotifyEvent P_((unsigned char *buf)); void ResizeRequestEvent P_((unsigned char *buf)); void CirculateNotifyEvent P_((unsigned char *buf)); void CirculateRequestEvent P_((unsigned char *buf)); void PropertyNotifyEvent P_((unsigned char *buf)); void SelectionClearEvent P_((unsigned char *buf)); void SelectionRequestEvent P_((unsigned char *buf)); void SelectionNotifyEvent P_((unsigned char *buf)); void ColormapNotifyEvent P_((unsigned char *buf)); void ClientMessageEvent P_((unsigned char *buf)); void MappingNotifyEvent P_((unsigned char *buf)); void CreateWindow P_((unsigned char *buf)); void ChangeWindowAttributes P_((unsigned char *buf)); void GetWindowAttributes P_((unsigned char *buf)); void GetWindowAttributesReply P_((unsigned char *buf)); void DestroyWindow P_((unsigned char *buf)); void DestroySubwindows P_((unsigned char *buf)); void ChangeSaveSet P_((unsigned char *buf)); void ReparentWindow P_((unsigned char *buf)); void MapWindow P_((unsigned char *buf)); void MapSubwindows P_((unsigned char *buf)); void UnmapWindow P_((unsigned char *buf)); void UnmapSubwindows P_((unsigned char *buf)); void ConfigureWindow P_((unsigned char *buf)); void CirculateWindow P_((unsigned char *buf)); void GetGeometry P_((unsigned char *buf)); void GetGeometryReply P_((unsigned char *buf)); void QueryTree P_((unsigned char *buf)); void QueryTreeReply P_((unsigned char *buf)); void InternAtom P_((unsigned char *buf)); void InternAtomReply P_((unsigned char *buf)); void GetAtomName P_((unsigned char *buf)); void GetAtomNameReply P_((unsigned char *buf)); void ChangeProperty P_((unsigned char *buf)); void DeleteProperty P_((unsigned char *buf)); void GetProperty P_((unsigned char *buf)); void GetPropertyReply P_((unsigned char *buf)); void ListProperties P_((unsigned char *buf)); void ListPropertiesReply P_((unsigned char *buf)); void SetSelectionOwner P_((unsigned char *buf)); void GetSelectionOwner P_((unsigned char *buf)); void GetSelectionOwnerReply P_((unsigned char *buf)); void ConvertSelection P_((unsigned char *buf)); void SendEvent P_((unsigned char *buf)); void GrabPointer P_((unsigned char *buf)); void GrabPointerReply P_((unsigned char *buf)); void UngrabPointer P_((unsigned char *buf)); void GrabButton P_((unsigned char *buf)); void UngrabButton P_((unsigned char *buf)); void ChangeActivePointerGrab P_((unsigned char *buf)); void GrabKeyboard P_((unsigned char *buf)); void GrabKeyboardReply P_((unsigned char *buf)); void UngrabKeyboard P_((unsigned char *buf)); void GrabKey P_((unsigned char *buf)); void UngrabKey P_((unsigned char *buf)); void AllowEvents P_((unsigned char *buf)); void GrabServer P_((unsigned char *buf)); void UngrabServer P_((unsigned char *buf)); void QueryPointer P_((unsigned char *buf)); void QueryPointerReply P_((unsigned char *buf)); void GetMotionEvents P_((unsigned char *buf)); void GetMotionEventsReply P_((unsigned char *buf)); void TranslateCoordinates P_((unsigned char *buf)); void TranslateCoordinatesReply P_((unsigned char *buf)); void WarpPointer P_((unsigned char *buf)); void SetInputFocus P_((unsigned char *buf)); void GetInputFocus P_((unsigned char *buf)); void GetInputFocusReply P_((unsigned char *buf)); void QueryKeymap P_((unsigned char *buf)); void QueryKeymapReply P_((unsigned char *buf)); void OpenFont P_((unsigned char *buf)); void CloseFont P_((unsigned char *buf)); void QueryFont P_((unsigned char *buf)); void QueryFontReply P_((unsigned char *buf)); void QueryTextExtents P_((unsigned char *buf)); void QueryTextExtentsReply P_((unsigned char *buf)); void ListFonts P_((unsigned char *buf)); void ListFontsReply P_((unsigned char *buf)); void ListFontsWithInfo P_((unsigned char *buf)); void ListFontsWithInfoReply P_((unsigned char *buf)); void ListFontsWithInfoReply1 P_((unsigned char *buf)); void ListFontsWithInfoReply2 P_((unsigned char *buf)); void SetFontPath P_((unsigned char *buf)); void GetFontPath P_((unsigned char *buf)); void GetFontPathReply P_((unsigned char *buf)); void CreatePixmap P_((unsigned char *buf)); void FreePixmap P_((unsigned char *buf)); void CreateGC P_((unsigned char *buf)); void ChangeGC P_((unsigned char *buf)); void CopyGC P_((unsigned char *buf)); void SetDashes P_((unsigned char *buf)); void SetClipRectangles P_((unsigned char *buf)); void FreeGC P_((unsigned char *buf)); void ClearArea P_((unsigned char *buf)); void CopyArea P_((unsigned char *buf)); void CopyPlane P_((unsigned char *buf)); void PolyPoint P_((unsigned char *buf)); void PolyLine P_((unsigned char *buf)); void PolySegment P_((unsigned char *buf)); void PolyRectangle P_((unsigned char *buf)); void PolyArc P_((unsigned char *buf)); void FillPoly P_((unsigned char *buf)); void PolyFillRectangle P_((unsigned char *buf)); void PolyFillArc P_((unsigned char *buf)); void PutImage P_((unsigned char *buf)); void GetImage P_((unsigned char *buf)); void GetImageReply P_((unsigned char *buf)); void PolyText8 P_((unsigned char *buf)); void PolyText16 P_((unsigned char *buf)); void ImageText8 P_((unsigned char *buf)); void ImageText16 P_((unsigned char *buf)); void CreateColormap P_((unsigned char *buf)); void FreeColormap P_((unsigned char *buf)); void CopyColormapAndFree P_((unsigned char *buf)); void InstallColormap P_((unsigned char *buf)); void UninstallColormap P_((unsigned char *buf)); void ListInstalledColormaps P_((unsigned char *buf)); void ListInstalledColormapsReply P_((unsigned char *buf)); void AllocColor P_((unsigned char *buf)); void AllocColorReply P_((unsigned char *buf)); void AllocNamedColor P_((unsigned char *buf)); void AllocNamedColorReply P_((unsigned char *buf)); void AllocColorCells P_((unsigned char *buf)); void AllocColorCellsReply P_((unsigned char *buf)); void AllocColorPlanes P_((unsigned char *buf)); void AllocColorPlanesReply P_((unsigned char *buf)); void FreeColors P_((unsigned char *buf)); void StoreColors P_((unsigned char *buf)); void StoreNamedColor P_((unsigned char *buf)); void QueryColors P_((unsigned char *buf)); void QueryColorsReply P_((unsigned char *buf)); void LookupColor P_((unsigned char *buf)); void LookupColorReply P_((unsigned char *buf)); void CreateCursor P_((unsigned char *buf)); void CreateGlyphCursor P_((unsigned char *buf)); void FreeCursor P_((unsigned char *buf)); void RecolorCursor P_((unsigned char *buf)); void QueryBestSize P_((unsigned char *buf)); void QueryBestSizeReply P_((unsigned char *buf)); void QueryExtension P_((unsigned char *buf)); void QueryExtensionReply P_((unsigned char *buf)); void ListExtensions P_((unsigned char *buf)); void ListExtensionsReply P_((unsigned char *buf)); void ChangeKeyboardMapping P_((unsigned char *buf)); void GetKeyboardMapping P_((unsigned char *buf)); void GetKeyboardMappingReply P_((unsigned char *buf)); void ChangeKeyboardControl P_((unsigned char *buf)); void GetKeyboardControl P_((unsigned char *buf)); void GetKeyboardControlReply P_((unsigned char *buf)); void Bell P_((unsigned char *buf)); void ChangePointerControl P_((unsigned char *buf)); void GetPointerControl P_((unsigned char *buf)); void GetPointerControlReply P_((unsigned char *buf)); void SetScreenSaver P_((unsigned char *buf)); void GetScreenSaver P_((unsigned char *buf)); void GetScreenSaverReply P_((unsigned char *buf)); void ChangeHosts P_((unsigned char *buf)); void ListHosts P_((unsigned char *buf)); void ListHostsReply P_((unsigned char *buf)); void SetAccessControl P_((unsigned char *buf)); void SetCloseDownMode P_((unsigned char *buf)); void KillClient P_((unsigned char *buf)); void RotateProperties P_((unsigned char *buf)); void ForceScreenSaver P_((unsigned char *buf)); void SetPointerMapping P_((unsigned char *buf)); void SetPointerMappingReply P_((unsigned char *buf)); void GetPointerMapping P_((unsigned char *buf)); void GetPointerMappingReply P_((unsigned char *buf)); void SetModifierMapping P_((unsigned char *buf)); void SetModifierMappingReply P_((unsigned char *buf)); void GetModifierMapping P_((unsigned char *buf)); void GetModifierMappingReply P_((unsigned char *buf)); void NoOperation P_((unsigned char *buf)); #undef P_ xlab-980917mine/prtype.c100664 71506 1605 55237 6745313377 14425 0ustar hildebinstall/* * $Id: prtype.c,v 1.3 1998/07/24 11:59:16 marc Exp $ * * Type Printing for X11 protocol * * James Peterson, 1988 * (c) Copyright MCC, 1988 * (c) Copyright Marc Vertes, 1998 */ #include "scope.h" #include "decode11.h" #include "x11.h" extern int littleEndian; /* * For each of the types we need a way to print that type. * Types are of varieties: * * (1) BUILTIN -- we have a separate routine to interpret and print * each built-in type. * (2) ENUMERATED, SET -- we have one routine which prints, given the * data and the list of values. * (3) RECORDS -- a separate routine for each to print each field. */ /*----------------------------------------------------------------------*/ /* * print representation of a character for debugging */ char *printrep(c) unsigned short c; { static char pr[8]; if (c < 32) { /* control characters */ pr[0] = '^'; pr[1] = c + 64; pr[2] = '\0'; } else if (c < 127) { /* printing characters */ pr[0] = c; pr[1] = '\0'; } else if (c == 127) return (""); else if (c <= 0377) { /* upper 128 codes from 128 to 255; print as \ooo - octal */ pr[0] = '\\'; pr[3] = '0' + (c & 7); c = c >> 3; pr[2] = '0' + (c & 7); c = c >> 3; pr[1] = '0' + (c & 3); pr[4] = '\0'; } else { /* very large number -- print as 0xffff - 4 digit hex */ (void) sprintf(pr, "0x%04x", c); } return (pr); } /*----------------------------------------------------------------------*/ /* * we use indentation for two purposes: * * (1) To show substructure of records inside records ... * (2) To separate the bytes from the client (on the left) from * those from the server (on the right). * * Each indention level is one tab (8 spaces). */ #define MaxIndent 10 static char Leader[MaxIndent + 1]; static short CurrentLevel = 0; void SetIndentLevel(which) short which; { short i; if (which > MaxIndent) which = MaxIndent; if (which < 0) which = 0; if (which == CurrentLevel) return; /* * set the indent level to -> set the Print Leader to tabs */ for (i = 0; i < which; i++) Leader[i] = '\t'; Leader[which] = '\0'; CurrentLevel = which; } /*----------------------------------------------------------------------*/ void ModifyIndentLevel(amount) short amount; { SetIndentLevel(CurrentLevel + amount); } /*----------------------------------------------------------------------*/ short SizeofLeader() { return (CurrentLevel * 8); } /*----------------------------------------------------------------------*/ /* * if we want verbose enough output, we will dump the buffer in hex */ void DumpItem(name, fd, buf, n) char *name; FD fd; unsigned char *buf; long n; { if (n == 0) return; fprintf(stdout, "%s%20s (fd %d): ", Leader, name, fd); DumpHexBuffer(buf, n); fprintf(stdout, "\n"); } /*----------------------------------------------------------------------*/ int PrintINT8(buf) unsigned char *buf; { short n = IByte(buf); /* print a INT8 -- 8-bit signed integer */ if (n > 127) n = 256 - n; fprintf(stdout, "%d", n); return 1; } /*----------------------------------------------------------------------*/ int PrintINT16(buf) unsigned char *buf; { long n = IShort(buf); /* print a INT16 -- 16-bit signed integer */ if (n > 32767) n = 65536 - n; fprintf(stdout, "%ld", n); return 2; } /*----------------------------------------------------------------------*/ int PrintINT32(buf) unsigned char *buf; { long n = ILong(buf); /* print a INT32 -- 32-bit signed integer */ fprintf(stdout, "%ld", n); return 4; } /*----------------------------------------------------------------------*/ int PrintCARD8(buf) unsigned char *buf; { short n = IByte(buf); /* print a CARD8 -- 8-bit unsigned integer */ fprintf(stdout, "%02x", (unsigned) (n & 0xff)); return 1; } /*----------------------------------------------------------------------*/ int PrintCARD16(buf) unsigned char *buf; { unsigned long n = IShort(buf); /* print a CARD16 -- 16-bit unsigned integer */ fprintf(stdout, "%04x", (unsigned) (n & 0xffff)); return 2; } /*----------------------------------------------------------------------*/ int PrintCARD32(buf) unsigned char *buf; { unsigned long n = ILong(buf); /* print a CARD32 -- 32-bit unsigned integer */ fprintf(stdout, "%08lx", n); return 4; } /*----------------------------------------------------------------------*/ int PrintBYTE(buf) unsigned char *buf; { short n = IByte(buf); /* print a BYTE -- 8-bit value */ fprintf(stdout, "%02x", n); return 1; } /*----------------------------------------------------------------------*/ int PrintCHAR8(buf) unsigned char *buf; { unsigned short n = IByte(buf); /* print a CHAR8 -- 8-bit character */ fprintf(stdout, "%s", printrep(n)); return 1; } /*----------------------------------------------------------------------*/ int PrintSTRING16(buf) unsigned char *buf; { unsigned short n = IChar2B(buf); /* print a CHAR2B -- 16-bit character which is never byte-swapped */ fprintf(stdout, "%s", printrep(n)); return (1); } /*----------------------------------------------------------------------*/ int PrintSTR(buf) unsigned char *buf; { short n; short i; /* STR have the length (1 byte) then a string of CHAR8 */ n = IByte(buf++); for (i = 0; i < n; i++) fprintf(stdout, "%s", printrep(buf[i])); return (n + 1); } /*----------------------------------------------------------------------*/ int PrintWINDOW(buf) unsigned char *buf; { long n = ILong(buf); /* print a WINDOW -- CARD32 plus 0 = None */ if (n == 0) fprintf(stdout, "None"); else fprintf(stdout, "WIN %08lx", n); return (4); } /*----------------------------------------------------------------------*/ int PrintWINDOWD(buf) unsigned char *buf; { long n = ILong(buf); /* print a WINDOWD -- CARD32 plus 0 = PointerWindow, 1 = InputFocus */ if (n == 0) fprintf(stdout, "PointerWindow"); else if (n == 1) fprintf(stdout, "InputFocus"); else (void) PrintWINDOW(buf); return 4; } /*----------------------------------------------------------------------*/ int PrintWINDOWNR(buf) unsigned char *buf; { long n = ILong(buf); /* print a WINDOWNR -- CARD32 plus 0 = None, 1 = PointerRoot */ if (n == 0) fprintf(stdout, "None"); else if (n == 1) fprintf(stdout, "PointerRoot"); else (void) PrintWINDOW(buf); return 4; } /*----------------------------------------------------------------------*/ int PrintPIXMAP(buf) unsigned char *buf; { long n = ILong(buf); /* print a PIXMAP -- CARD32 plus 0 = None */ if (n == 0) fprintf(stdout, "None"); else fprintf(stdout, "PXM %08lx", n); return 4; } /*----------------------------------------------------------------------*/ int PrintPIXMAPNPR(buf) unsigned char *buf; { long n = ILong(buf); /* print a PIXMAPNPR -- CARD32 plus 0 = None, 1 = ParentRelative */ if (n == 0) fprintf(stdout, "None"); else if (n == 1) fprintf(stdout, "ParentRelative"); else PrintPIXMAP(buf); return 4; } /*----------------------------------------------------------------------*/ int PrintPIXMAPC(buf) unsigned char *buf; { long n = ILong(buf); /* print a PIXMAPC -- CARD32 plus 0 = CopyFromParent */ if (n == 0) fprintf(stdout, "CopyFromParent"); else PrintPIXMAP(buf); return 4; } /*----------------------------------------------------------------------*/ int PrintCURSOR(buf) unsigned char *buf; { long n = ILong(buf); /* print a CURSOR -- CARD32 plus 0 = None */ if (n == 0) fprintf(stdout, "None"); else fprintf(stdout, "CUR %08lx", n); return 4; } /*----------------------------------------------------------------------*/ int PrintFONT(buf) unsigned char *buf; { long n = ILong(buf); /* print a FONT -- CARD32 plus 0 = None */ if (n == 0) fprintf(stdout, "None"); else fprintf(stdout, "FNT %08lx", n); return 4; } /*----------------------------------------------------------------------*/ int PrintGCONTEXT(buf) unsigned char *buf; { long n = ILong(buf); /* print a GCONTEXT -- CARD32 */ fprintf(stdout, "GXC %08lx", n); return 4; } /*----------------------------------------------------------------------*/ int PrintCOLORMAP(buf) unsigned char *buf; { long n = ILong(buf); /* print a COLORMAP -- CARD32 plus 0 = None */ if (n == 0) fprintf(stdout, "None"); else fprintf(stdout, "CMP %08lx", n); return (4); } /*----------------------------------------------------------------------*/ int PrintCOLORMAPC(buf) unsigned char *buf; { long n = ILong(buf); /* print a COLORMAPC -- CARD32 plus 0 = CopyFromParent */ if (n == 0) fprintf(stdout, "CopyFromParent"); else (void) PrintCOLORMAP(buf); return 4; } /*----------------------------------------------------------------------*/ int PrintDRAWABLE(buf) unsigned char *buf; { long n = ILong(buf); /* print a DRAWABLE -- CARD32 */ fprintf(stdout, "DWB %08lx", n); return 4; } /*----------------------------------------------------------------------*/ int PrintFONTABLE(buf) unsigned char *buf; { long n = ILong(buf); /* print a FONTABLE -- CARD32 */ fprintf(stdout, "FTB %08lx", n); return 4; } /*----------------------------------------------------------------------*/ #define NumberofAtoms 68 char *AtomTable[NumberofAtoms + 1] = { "NONE", "PRIMARY", "SECONDARY", "ARC", "ATOM", "BITMAP", "CARDINAL", "COLORMAP", "CURSOR", "CUT_BUFFER0", "CUT_BUFFER1", "CUT_BUFFER2", "CUT_BUFFER3", "CUT_BUFFER4", "CUT_BUFFER5", "CUT_BUFFER6", "CUT_BUFFER7", "DRAWABLE", "FONT", "INTEGER", "PIXMAP", "POINT", "RECTANGLE", "RESOURCE_MANAGER", "RGB_COLOR_MAP", "RGB_BEST_MAP", "RGB_BLUE_MAP", "RGB_DEFAULT_MAP", "RGB_GRAY_MAP", "RGB_GREEN_MAP", "RGB_RED_MAP", "STRING", "VISUALID", "WINDOW", "WM_COMMAND", "WM_HINTS", "WM_CLIENT_MACHINE", "WM_ICON_NAME", "WM_ICON_SIZE", "WM_NAME", "WM_NORMAL_HINTS", "WM_SIZE_HINTS", "WM_ZOOM_HINTS", "MIN_SPACE", "NORM_SPACE", "MAX_SPACE", "END_SPACE", "SUPERSCRIPT_X", "SUPERSCRIPT_Y", "SUBSCRIPT_X", "SUBSCRIPT_Y", "UNDERLINE_POSITION", "UNDERLINE_THICKNESS", "STRIKEOUT_ASCENT", "STRIKEOUT_DESCENT", "ITALIC_ANGLE", "X_HEIGHT", "QUAD_WIDTH", "WEIGHT", "POINT_SIZE", "RESOLUTION", "COPYRIGHT", "NOTICE", "FONT_NAME", "FAMILY_NAME", "FULL_NAME", "CAP_HEIGHT", "WM_CLASS", "WM_TRANSIENT_FOR" }; /*----------------------------------------------------------------------*/ /* * for atoms, we print the built-in atoms. We could expand to printing * * the user defined ones, too. */ int PrintATOM(buf) unsigned char *buf; { long n = ILong(buf); /* print a ATOM -- CARD32 plus 0 = None */ if (0 <= n && n <= NumberofAtoms) fprintf(stdout, "<%s>", AtomTable[n]); else fprintf(stdout, "ATM %08lx", n); return (4); } /*----------------------------------------------------------------------*/ int PrintATOMT(buf) unsigned char *buf; { long n = ILong(buf); /* print a ATOMT -- CARD32 plus 0 = AnyPropertyType */ if (n == 0) fprintf(stdout, "AnyPropertyType"); else (void) PrintATOM(buf); return 4; } /*----------------------------------------------------------------------*/ int PrintVISUALID(buf) unsigned char *buf; { long n = ILong(buf); /* print a VISUALID -- CARD32 plus 0 = None */ if (n == 0) fprintf(stdout, "None"); else fprintf(stdout, "VIS %08lx", n); return 4; } /*----------------------------------------------------------------------*/ int PrintVISUALIDC(buf) unsigned char *buf; { long n = ILong(buf); /* print a VISUALIDC -- CARD32 plus 0 = CopyFromParent */ if (n == 0) fprintf(stdout, "CopyFromParent"); else PrintVISUALID(buf); return 4; } /*----------------------------------------------------------------------*/ int PrintTIMESTAMP(buf) unsigned char *buf; { long n = ILong(buf); /* print a TIMESTAMP -- CARD32 plus 0 as the current time */ if (n == 0) fprintf(stdout, "CurrentTime"); else fprintf(stdout, "TIM %08lx", n); return 4; } /*----------------------------------------------------------------------*/ int PrintRESOURCEID(buf) unsigned char *buf; { long n = ILong(buf); /* print a RESOURCEID -- CARD32 plus 0 = AllTemporary */ if (n == 0) fprintf(stdout, "AllTemporary"); else fprintf(stdout, "RID %08lx", n); return 4; } /*----------------------------------------------------------------------*/ int PrintKEYSYM(buf) unsigned char *buf; { long n = ILong(buf); /* print a KEYSYM -- CARD32 */ fprintf(stdout, "KYS %08lx", n); return (4); } /*----------------------------------------------------------------------*/ int PrintKEYCODE(buf) unsigned char *buf; { unsigned short n = IByte(buf); /* print a KEYCODE -- CARD8 */ fprintf(stdout, "%d (%s)", n, printrep(n)); return (1); } /*----------------------------------------------------------------------*/ int PrintKEYCODEA(buf) unsigned char *buf; { long n = IByte(buf); /* print a KEYCODEA -- CARD8 plus 0 = AnyKey */ if (n == 0) fprintf(stdout, "AnyKey"); else (void) PrintKEYCODE(buf); return 1; } /*----------------------------------------------------------------------*/ int PrintBUTTON(buf) unsigned char *buf; { unsigned short n = IByte(buf); /* print a BUTTON -- CARD8 */ fprintf(stdout, "%d (%s)", n, printrep(n)); return 1; } /*----------------------------------------------------------------------*/ int PrintBUTTONA(buf) unsigned char *buf; { long n = IByte(buf); /* print a BUTTONA -- CARD8 plus 0 = AnyButton */ if (n == 0) fprintf(stdout, "AnyButton"); else PrintBUTTON(buf); return 1; } /*----------------------------------------------------------------------*/ /* * this is an interesting cheat -- we call DecodeEvent to print an event * should work, but its never been tried */ void PrintEVENTFORM(buf) unsigned char *buf; { /* print an EVENT_FORM -- event format */ DecodeEvent(-1, buf, (long) -1); } /*----------------------------------------------------------------------*/ void PrintENUMERATED(buf, length, ValueList) unsigned char *buf; short length; struct ValueListEntry *ValueList; { long n; struct ValueListEntry *p; if (length == 1) n = IByte(buf); else if (length == 2) n = IShort(buf); else n = ILong(buf); p = ValueList; while (p != NULL && p->Value != n) p = p->Next; if (p != NULL) fprintf(stdout, "%s", p->Name); else fprintf(stdout, "**INVALID** (%ld)", n); } /*----------------------------------------------------------------------*/ void PrintSET(buf, length, ValueList) unsigned char *buf; short length; struct ValueListEntry *ValueList; { unsigned long n; struct ValueListEntry *p; Boolean MatchesAll = false; Boolean FoundOne = false; if (length == 1) n = IByte(buf); else if (length == 2) n = IShort(buf); else n = ILong(buf); if (n != 0) { /* first check if the value matches ALL of the bits. */ MatchesAll = true; for (p = ValueList; MatchesAll && (p != NULL); p = p->Next) { if ((p->Value & n) == 0) MatchesAll = false; } if (!MatchesAll) /* * if it matches some, but not all, print only those it * matches */ for (p = ValueList; p != NULL; p = p->Next) { if ((p->Value & n) != 0) { if (FoundOne) fprintf(stdout, " | "); fprintf(stdout, "%s", p->Name); FoundOne = true; } } } if (MatchesAll) fprintf(stdout, ""); else if (!FoundOne) fprintf(stdout, "0"); } /*----------------------------------------------------------------------*/ void PrintField(buf, start, length, FieldType, name) unsigned char *buf; short start; short length; short FieldType; char *name; { if (length == 0) return; fprintf(stdout, "%s%20s: ", Leader, name); if (debuglevel & 8) DumpHexBuffer(&(buf[start]), (long) length); switch (TD[FieldType].Type) { case BUILTIN: (*TD[FieldType].PrintProc) (&buf[start]); break; case ENUMERATED: PrintENUMERATED(&buf[start], length, TD[FieldType].ValueList); break; case SET: PrintSET(&buf[start], length, TD[FieldType].ValueList); break; case RECORD: ModifyIndentLevel(1); fprintf(stdout, "\n"); if (Verbose < 3) return; (*TD[FieldType].PrintProc) (&buf[start]); ModifyIndentLevel(-1); break; } fprintf(stdout, "\n"); (void) fflush(stdout); } /*----------------------------------------------------------------------*/ /* * print a list of things. The things are of type . * They * start at . There are things in the list */ long PrintList(buf, number, ListType, name) unsigned char *buf; long number; short ListType; char *name; { long n; long i; long sum; if (number == 0) return (0); fprintf(stdout, "%s%20s: (%ld)\n", Leader, name, number); if (Verbose < 2) return (0); ModifyIndentLevel(1); sum = 0; for (i = 0; i < number; i++) { switch (TD[ListType].Type) { case BUILTIN: n = (*TD[ListType].PrintProc) (buf); break; case RECORD: n = (*TD[ListType].PrintProc) (buf); break; default: fprintf(stdout, "**INVALID**"); n = 0; break; } buf = buf + n; sum = sum + n; fprintf(stdout, "%s---\n", Leader); } ModifyIndentLevel(-1); return (sum); } /*----------------------------------------------------------------------*/ /* * print a list of STRs. Similar to PrintList * They start at . * There are things in the list */ void PrintListSTR(buf, number, name) unsigned char *buf; long number; char *name; { long n; long i; long sum; if (number == 0) return; fprintf(stdout, "%s%20s: (%ld)\n", Leader, name, number); if (Verbose < 2) return; ModifyIndentLevel(1); sum = 0; for (i = 0; i < number; i++) { fprintf(stdout, "%s", Leader); n = PrintSTR(buf); buf = buf + n; sum = sum + n; fprintf(stdout, "\n"); } ModifyIndentLevel(-1); } /*----------------------------------------------------------------------*/ void PrintBytes(buf, number, name) unsigned char buf[]; long number; char *name; { long i; short column; if (number == 0) return; /* print a list of BYTE -- 8-bit character */ fprintf(stdout, "%s%20s: ", Leader, name); column = SizeofLeader() + 25; for (i = 0; i < number; i++) { if (column > 80) { if (Verbose < 2) break; fprintf(stdout, "\n%s%20s: ", Leader, ""); column = SizeofLeader() + 25; } fprintf(stdout, "%02x ", ((unsigned int) buf[i])); column += 3; } fprintf(stdout, "\n"); } /*----------------------------------------------------------------------*/ /* * print a String of CHAR8 -- 8-bit characters */ void PrintString8(buf, number, name) unsigned char buf[]; long number; char *name; { long i; if (number == 0) return; fprintf(stdout, "%s%20s: \"", Leader, name); for (i = 0; i < number; i++) fprintf(stdout, "%s", printrep(buf[i])); fprintf(stdout, "\"\n"); } /*----------------------------------------------------------------------*/ /* * print a String of CHAR2B -- 16-bit characters */ void PrintString16(buf, number, name) unsigned char buf[]; long number; char *name; { long i; unsigned short c; if (number == 0) return; fprintf(stdout, "%s%20s: \"", Leader, name); for (i = 0; i < number; i += 2) { c = IChar2B(&buf[i]); fprintf(stdout, "%s", printrep(c)); } fprintf(stdout, "\"\n"); } /*----------------------------------------------------------------------*/ /* * A Value List is two things: * * (1) A controlling bitmask. For each one bit in the control, * a value is in the list. * (2) A list of values. */ void PrintValues(control, clength, ctype, values, name) unsigned char *control; short clength; short ctype; unsigned char *values; char *name; { long cmask; struct ValueListEntry *p; /* * first get the control mask */ if (clength == 1) cmask = IByte(control); else if (clength == 2) cmask = IShort(control); else cmask = ILong(control); /* * now if it is zero, ignore and return */ if (cmask == 0) return; /* * there are bits in the controlling bitmask, figure out which * the ctype is a set type, so this code is similar to PrintSET */ fprintf(stdout, "%s%20s:\n", Leader, name); ModifyIndentLevel(1); for (p = TD[ctype].ValueList; p != NULL; p = p->Next) { if ((p->Value & cmask) != 0) { short m; if (littleEndian) m = 0; else m = 4 - p->Length; PrintField(values, m, p->Length, p->Type, p->Name); values += 4; } } ModifyIndentLevel(-1); } /*----------------------------------------------------------------------*/ /* * PolyText8 and PolyText16 take lists of characters with possible * font * changes in them. */ void PrintTextList8(buf, length, name) unsigned char *buf; short length; char *name; { short n; fprintf(stdout, "%s%20s:\n", Leader, name); while (length > 1) { n = IByte(&buf[0]); if (n != 255) { PrintField(buf, 1, 1, INT8, "delta"); PrintString8(&buf[2], (long) n, "text item 8 string"); buf += n + 2; length -= n + 2; } else { PrintField(buf, 1, 4, FONT, "font-shift-id"); buf += 4; length -= 4; } } } /*----------------------------------------------------------------------*/ void PrintTextList16(buf, length, name) unsigned char *buf; short length; char *name; { short n; fprintf(stdout, "%s%20s:\n", Leader, name); while (length > 1) { n = IByte(&buf[0]); if (n != 255) { PrintField(buf, 1, 1, INT8, "delta"); PrintString16(&buf[2], (long) n, "text item 16 string"); buf += n + 2; length -= n + 2; } else { PrintField(buf, 1, 4, FONT, "font-shift-id"); buf += 4; length -= 4; } } } /*----------------------------------------------------------------------*/ #define MAXline 78 void DumpHexBuffer(buf, n) unsigned char *buf; long n; { short i; short column; char h[6]; /* one hex or octal character */ column = 27 + SizeofLeader(); for (i = 0; i < n; i++) { /* get the hex representations */ (void) sprintf(h, "%02x", (0xff & buf[i])); /* check if these characters will fit on this line */ if ((column + strlen(h) + 1) > MAXline) { /* line will be too long -- print it */ fprintf(stdout, "\n"); column = 0; } fprintf(stdout, "%s ", h); column += 3; } } xlab-980917mine/record.c100664 71506 1605 120613 6745313400 14352 0ustar hildebinstall/* * $Id: record.c,v 1.8 1998/07/24 11:59:16 marc Exp $ * * Code to record / play back X events in script * * (c) Copyright 1996, 1997, 1998 Marc Vertes */ #include #include #include #include #include #include "scope.h" #include "server.h" #include "record.h" #include "x11.h" extern Display *Dpy; static char script_line[256]; /* stored script line */ struct WinTab wintab[MAXWTAB]; struct WinAlias winalias[MAXWTAB]; long maxalias = 0; long maxwtab = 0; int replay_counter = 0; int first_replay = 1; int first_event_in_replay = 0; int xRootPointer, yRootPointer; /* coordinates of pointer in the root window */ void (*Resource_Handler)() = 0; /* handler to call */ void *Resource_userdata = 0; /* user data to pass */ XID Resource_resource = 0; TimerID Resource_timeout = 0; /* timeout when resource doesn't appear */ int Resource_index = 0; /* resource index within fd */ FD Resource_fd = 0; /* resource file descriptor */ /* Synthetic X event rebuild from script */ struct Synth_ev { Window win; Window subw; Window rootw; Time time; FD fd; unsigned short type; /* Event type in binary form */ short state; short detail; short same; short x, y; short rootx, rooty; unsigned short seq; unsigned char evbuf[32]; } synth_ev; #define TheRootWindow wintab[0].newpar /*--------------------------------------------------------------*/ int start_record(filename) char *filename; { if (Playback != PLAYBACK_INACTIVE && Playback != PLAYBACK_COMPLETE) { fprintf(stderr, "Cannot record and play back in same session.\n"); return (1); } strcpy(RecordFileName, filename); RecordFile = fopen(RecordFileName, "w"); if (RecordFile == 0) { perror(RecordFileName); return (1); } fclose(RecordFile); RecordFile = 0; Record = 1; return (0); } /*--------------------------------------------------------------*/ void stop_record() { CloseFile(RecordFile); fclose(RecordFile); Record = 0; first_replay = 0; } /*--------------------------------------------------------------*/ static FILE *OpenFile(name, priv) char *name; char *priv; { register FILE *file; register int fid; /* open file */ file = fopen(name, priv); /* deal with failure. snarky messages are OK, we've pretested files */ if (file == 0) { panic("OpenFile failure.\n"); } /* * set up file descriptor in this program's table. * Seems to be necessary at least for SUN Solaris. */ fid = fileno(file); UsingFD(fid, 0); return file; } /*--------------------------------------------------------------*/ void CloseFile(file) FILE *file; { int fid = fileno(file); NotUsingFD(fid); } /*--------------------------------------------------------------*/ /* * TimeDilation expresses the time dilation in percent. * if TimeDilation = 200, then we want the thing to play back * twice as fast, so we want to cut all times in half. */ unsigned long int Dilate(deltat) unsigned long int deltat; { unsigned long int result; result = deltat; result = ((deltat * 100) + ((TimeDilation / 2) - 1)) / TimeDilation; return result; } /*--------------------------------------------------------------*/ static long int NextScriptEvent(buf, n) char *buf; long int n; { /* * This function reads the next script event * and returns it in a buffer. */ char *result; int goodline = 0; int event; /* open up the recording file if necessary, first time through */ if (PlaybackFile == 0) { PlaybackFile = OpenFile(PlaybackFileName, "r"); Playback = PLAYBACK_ACTIVE; first_event_in_replay = 1; } /* skip blanks and comments */ while (goodline == 0) { buf[0] = '\0'; result = fgets(buf, n, PlaybackFile); if (result == 0) return -1; /* skip comment-type lines */ if (buf[0] != '\0') { event = ascii_to_event_type(buf); if (event != 0) { goodline = 1; } } } return strlen(buf); } /*--------------------------------------------------------------*/ /* * this timer function is called when * the wait for a window to become mapped * runs out... * It issues a warning message, then proceeds as * if the window had, in fact, appeared. * * Under some failure conditions, this causes an * error cascade. */ static void ResourceNeverAppeared(timer, window) TimerID timer; XID window; { if (window != TheRootWindow) { fprintf(stderr, "Playback failure\n"); fprintf(stderr, " Timed out waiting for window %8.8x ( %8.8x )\n", (unsigned int) window, OriginalWid(window)); fprintf(stderr, " %s\n", script_line); Errorcount++; } /* call the wait handler, attempting to carry on with the run */ if (Resource_Handler) (*Resource_Handler) (Resource_resource, Resource_userdata); /* clear off the waiting flag in the resource status map */ if (Resource_index < MAXRESOURCESTATUS) { CS[Resource_fd].ResourceStatus[Resource_index] &= ~RES_Waiting; } /* Restore the resource-wait information to initial state */ Resource_Handler = 0; Resource_userdata = 0; Resource_resource = 0; Resource_timeout = 0; Resource_index = 0; Resource_fd = 0; } /*--------------------------------------------------------------*/ /* get the FD to which this window 'belongs' */ int GetResourceBaseFd(resource) XID resource; { long ifd; unsigned long int c_res_base; for (ifd = 1; ifd <= HighestFD; ifd++) { c_res_base = resource & ~CS[ifd].ResourceIdMask; if (FDD[ifd].Busy) { if (c_res_base == CS[ifd].ResourceIdBase) return ifd; } else { if (c_res_base == CS[ifd].ResourceIdBase) { fprintf(stderr, "Playback Error. fd %ld for resource %x (%x) is not valid anymore\n", ifd, (unsigned int) resource, OriginalWid(resource)); return 0; } } } /* maybe an external window */ if ((resource != TheRootWindow) && (OriginalWid(resource) != 0)) fprintf(stderr, "Playback Error. Couldn't find an fd for resource %x (%x)\n", (unsigned int) resource, OriginalWid(resource)); return(0); } /*-------------------------------------------------------------*/ /* * this function can be called when somebody * wants to wait for a window to appear. */ void WaitForWindowMapped(fd, resource, handler, user_data) int fd; XID resource; void (*handler) (); void *user_data; { int ifd; int res_index = resource & CS[fd].ResourceIdMask; if (Resource_Handler) panic("already waiting for a resource....only one allowed!"); if (res_index >= MAXRESOURCESTATUS) { warn("res_index beyond MAXRESOURCESTATUS in WaitForWindowMapped."); /* beyond the resource count; just assume it's available */ if (handler) (*handler) (resource, user_data); return; } /* No check for first EnterNotify event */ if (first_event_in_replay && synth_ev.type == EnterNotify) { first_event_in_replay = 0; if (handler) (*handler) (resource, user_data); return; } ifd = GetResourceBaseFd(resource); /* * a completeness test */ if (resource != TheRootWindow) { /** 'res_unmapped' **/ if (ifd == 0 && OriginalWid(resource) != 0) { fprintf(stderr, "Playback Error. Contradiction ifd=0 resource %x (%x)\n", (unsigned int) resource, OriginalWid(resource)); ReadPlaybackEvent(20L, fd); return; } if ((ifd != 0) && OriginalWid(resource) == 0) { fprintf(stderr, "Playback Error.Probably window destroyed. ifd = %d resource %x (0)\n", ifd, (unsigned int) resource); CS[ifd].ResourceStatus[res_index] = 0; ReadPlaybackEvent(20L, fd); return; } } /* * if the window is mapped or its is an external window */ if ((ifd == 0) || CS[fd].ResourceStatus[res_index] == RES_Mapped || CS[ifd].ResourceStatus[res_index] == RES_Mapped) { (*handler) (resource, user_data); return; } CS[ifd].ResourceStatus[res_index] |= RES_Waiting; Resource_Handler = handler; Resource_userdata = user_data; Resource_resource = resource; Resource_timeout = CreateTimer(2000, (void (*)()) ResourceNeverAppeared, (void *) resource); Resource_index = res_index; Resource_fd = ifd; debug(4, (stderr, "WAIT FOR %7x FD = %d IFD = %d\n", (unsigned int) resource, fd, ifd)); } /*-------------------------------------------------------------*/ /* debugging aid */ char *getstat(status) int status; { switch (status) { case 0: return "Unseen"; case 1: return "Seen"; case 2: return "Mapped"; case 3: return "Unmapped"; case 128: return "Wait"; case 129: return "Wait&Seen"; case 130: return "Wait&Mapped"; case 131: return "Wait&Unmapp"; default: return "illegal status"; } } /*-------------------------------------------------------------*/ /* * this routine gets called from the event formatters * in decode11.c * it is used to maintain event status. */ void WindowStatusAnnounce(fd, buf, n, status) FD fd; unsigned char *buf; int n; ResStatus status; { XID resource = ILong(&buf[n]); int res_index = resource & CS[fd].ResourceIdMask; int waiting = 0; ResStatus oldstatus; int ifd, i; enterprocedure("WindowStatusAnnounce"); ifd = GetResourceBaseFd(resource); if ((resource == 0) || (ifd == 0)) return; debug(4, (stderr, "curwin=%7x resindx = %3d waitwin=%7x FD = %d IFD = %d \n", (unsigned int) resource, res_index, (unsigned int) Resource_resource, fd, ifd)); debug(4, (stderr, " enstat = %10s oldstat = %10s nwstat = ", getstat(status), getstat(CS[ifd].ResourceStatus[res_index]))); if (res_index < MAXRESOURCESTATUS) { oldstatus = CS[ifd].ResourceStatus[res_index]; if (oldstatus & RES_Waiting) waiting = 1; CS[ifd].ResourceStatus[res_index] = status | (oldstatus & RES_Waiting); } /* if we were waiting for the resource and it is now mapped ... */ if (resource == Resource_resource) { if (waiting & (status == RES_Mapped)) { /* blast the wait timeout */ if (Resource_timeout) DeleteTimer(Resource_timeout); /* call the resource handler, if any */ if (Resource_Handler) (*Resource_Handler) (Resource_resource, Resource_userdata); /* zap the waiting bit in the resource map */ if (Resource_index < MAXRESOURCESTATUS) { CS[Resource_fd].ResourceStatus[Resource_index] &= ~RES_Waiting; } /* Restore the resource-wait information to initial state */ Resource_Handler = 0; Resource_userdata = 0; Resource_resource = 0; Resource_timeout = 0; Resource_index = 0; Resource_fd = 0; } } if (status == RES_Mapped) { CS[ifd].ResourceStatus[res_index] |= RES_Mapped; /* indicate that the children of this window are also mapped */ for (i = 0; i < maxwtab; i++) { if (wintab[i].newpar == resource) { int ifdchild; int res_indexchild; ifdchild = GetResourceBaseFd(wintab[i].newid); res_indexchild = wintab[i].newid & CS[ifdchild].ResourceIdMask; if (ifdchild) { CS[ifdchild].ResourceStatus[res_indexchild] &= ~RES_Waiting; CS[ifdchild].ResourceStatus[res_indexchild] |= RES_Mapped; } } } } debug(4, (stderr, "%10s Wait = %1d\n", getstat(CS[ifd].ResourceStatus[res_index]), waiting)); return; } /*--------------------------------------------------------------*/ void AnnouncePlaybackError(dpy, erev) Display *dpy; XErrorEvent *erev; { if (synth_ev.type != EnterNotify) { fprintf(stderr, "Playback failure\n"); fprintf(stderr, " Unable to move pointer into window %8.8x (%x)\n", (unsigned int) erev->resourceid, OriginalWid(erev->resourceid)); fprintf(stderr, " %s\n", script_line); Errorcount++; } } /*--------------------------------------------------------------*/ void SendPlaybackEvent(timer, fd) TimerID timer; int fd; { struct timeval tv; FD pairfd = FDPair(fd); unsigned short int seq = 0; Time timestamp, t; /* obtain the sequence number from the client-side CS structure */ if (pairfd >= StaticMaxFD) pairfd = -1; if (pairfd >= 0) seq = CS[pairfd].SequenceNumber; /* compute timestamp based on previously noted time offset */ gettimeofday(&tv, 0); t = tv.tv_sec * 1000; t += tv.tv_usec / 1000; timestamp = t + CS[fd].TimeOffset; /* it's time to send the event to the program under test.. */ /* convert it to a wire-format event buffer */ OShort(&synth_ev.evbuf[2], seq); OLong(&synth_ev.evbuf[4], timestamp); OShort(&synth_ev.evbuf[20], xRootPointer); OShort(&synth_ev.evbuf[22], yRootPointer); ReplaceWid(synth_ev.evbuf, 12); ReplaceWid(synth_ev.evbuf, 16); WriteToClient(fd, synth_ev.evbuf, 32); /* if Shift + Ctrl + Button 1, activate screen_capture */ if ((synth_ev.type == ButtonRelease) && (synth_ev.state & ShiftMask) && (synth_ev.state & ControlMask)) screen_capture(NewWid(synth_ev.win)); /* read the next event from the script file */ ReadPlaybackEvent(timer, fd); } /*--------------------------------------------------------------*/ extern int whichGrab; extern int status; void WarpPlaybackEvent(session_window, fd) Window session_window; int fd; { /* * This function decodes part of a stored script_line, * and warps the server pointer to the selected * position. It is called when the window is known to be mapped. * This function ends by registering a callback to * "SendPlaybackEvent" for 20 ms later. */ Window saved_window; static int first = 0; /* more variables to query pointer */ Window root_return, child_return; int win_x_return, win_y_return; unsigned int mask_Return; if (first == 0) { (void) XSetErrorHandler((int (*)()) AnnouncePlaybackError); first = 1; } saved_window = NewWid(synth_ev.win); /* EnterNotify events always causes problems */ if (!(synth_ev.type == 7 && saved_window == TheRootWindow && synth_ev.subw == 0)) { if (saved_window) { XWarpPointer(Dpy, None, saved_window, 0, 0, 0, 0, synth_ev.x, synth_ev.y); /* * This code does not work in all cases where you 'drag a window' * because the server or pointer is grabbed by another client */ if (!((whichGrab == 4 /*server */ || whichGrab == 1 /*pntr */ ) && status == 1)) { XSync(Dpy, False); /* * Get root_x and root_y for the pointer, to set event coord accordingly */ XQueryPointer(Dpy, saved_window, &root_return, &child_return, &xRootPointer, &yRootPointer, &win_x_return, &win_y_return, &mask_Return); } else { XFlush(Dpy); if (saved_window == TheRootWindow) { xRootPointer = synth_ev.x; yRootPointer = synth_ev.y; } } CreateTimer(20L, (void (*)()) SendPlaybackEvent, (void *) fd); return; } } ReadPlaybackEvent(20L, fd); } /*--------------------------------------------------------------*/ void TranslatePlaybackEvent(timer, fd) TimerID timer; int fd; { /* * This function decodes part of a stored script_line, * and waits for the named window to appear. */ Window session_window = NewWid(synth_ev.win); if (session_window == 0) fprintf(stderr, "Error. session_window = 0 \n"); WaitForWindowMapped(fd, session_window, (void (*)()) WarpPlaybackEvent, (void *) fd); } /*--------------------------------------------------------------*/ void end_replay() { CloseFile(PlaybackFile); warn("Playback completed"); Playback = PLAYBACK_COMPLETE; replay_counter--; if (replay_counter > 0) { warn("Activate next playback event"); start_replay(PlaybackFileName); } } /*--------------------------------------------------------------*/ void ReadPlaybackEvent(timer, fd) TimerID timer; int fd; { /* * This function reads an event from the script file. * It then establishes a timer call back to * activate WarpPlaybackEvent at the appropriate time * (based on the elapsed time specified in the script file.) * * If NextScriptEvent comes back = -1, it's the end of * the script file; forget about further timer callbacks. * However, don't stop the xscript pseudo-server, because * it should stay running until client-under-test disconnect. */ long int linelen = NextScriptEvent(script_line, 256); unsigned long int delay, delay2; if (linelen < 0) { /* * End of file ... wait 5 seconds to let application finish * windows closing. * Mark playback as complete */ warn("Playback completion in 5s"); CreateTimer(5000, end_replay, (void *) 0); } else { /* * Process next event from file. */ if (ReadSynthEvent(script_line) == 1) { ReadPlaybackEvent(20L, fd); return; } delay = synth_ev.time; switch (synth_ev.type) { case ButtonPress: /* * to avoid fouling up double clicks, * don't mess around with delay times before ButtonPress < 250 ms */ if (delay < DoubleClickTime) { /* delay is shorter than doubleclick time, don't touch it */ delay2 = delay; } else { /* * Original delay is longer than doubleclick time, * don't let recomputed delay end up shorter than doubleclick time */ delay2 = Dilate(delay); if (delay2 < DoubleClickTime) delay2 = delay; } break; default: /* * It's OK to compress other event delays more-or-less arbitrarily */ delay2 = Dilate(delay); break; } /* subtract delay time we'll use for waiting for motion */ if (delay2 > 20) delay2 -= 20; else delay2 = 0; if (delay2 < 5) delay2 = 5; debug(128, (stderr, "%ld=delay %s\n", delay2, script_line)); CreateTimer(delay2, (void (*)()) TranslatePlaybackEvent, (void *) synth_ev.fd); } } /*--------------------------------------------------------------*/ int start_replay(filename) char *filename; { if (Record) { fprintf(stderr, "Cannot record and play back in same session.\n"); return (1); } if (Playback != PLAYBACK_INACTIVE && Playback != PLAYBACK_COMPLETE) { fprintf(stderr, "Previous playback not yet completed.\n"); return (1); } strcpy(PlaybackFileName, filename); /* ensure we can open playback file correctly */ PlaybackFile = fopen(PlaybackFileName, "r"); if (PlaybackFile == 0) { perror(PlaybackFileName); return (1); } fclose(PlaybackFile); PlaybackFile = 0; Playback = PLAYBACK_PENDING; /* read playbackfile to to extract Windows info */ if (first_replay) { LoadWtab("PlaybackFileName"); first_replay = 0; } else { CreateTimer(5000, (void (*)()) ReadPlaybackEvent, (void *) 0); } return (0); } /*--------------------------------------------------------------*/ void RecordEvent(fd, buf, n) FD fd; unsigned char *buf; long n; { register short type = IByte(&buf[0]); /* event type */ if (RecordFile == 0) { /* open up the recording file if necessary, first time through */ RecordFile = OpenFile(RecordFileName, "w"); } /* high-order bit means SendEvent generated */ if (type & 0x80) { type = type & 0x7F; } /* * note that we can't cast stuff to * the XEvent structure here, because * the information is in a message buffer, * not correctly unpacked and byteswapped. */ switch (type) { case ButtonPress: case ButtonRelease: case KeyPress: case KeyRelease: case MotionNotify: case EnterNotify: /* process the event */ event_to_ascii(fd, buf, RecordFile); break; default: /*EMPTY *//* ignore the event */ break; } } /*-------------------------------------------------------------*/ void RecordRequest(fd, buf, n) FD fd; unsigned char *buf; long n; { register short request = IByte(&buf[0]); /* request type */ unsigned long wid = ILong(&buf[4]); if (RecordFile == 0) { /* open up the recording file if necessary, first time through */ RecordFile = OpenFile(RecordFileName, "w"); } switch (request) { case 1: /* CreateWindow */ if (!MatchCreateWinRec(buf)) req_to_ascii(fd, buf, RecordFile); break; case 4: /* DestroyWindow */ SetInferiorsDelflag(wid, 1); SetDelflag(wid, 1); break; case 5: /* DestroySubWindows */ SetInferiorsDelflag(wid, 1); break; } } /*-------------------------------------------------------------*/ /* *returns 1 if a window is found, 0 otherwise */ int MatchCreateWinRec(buf) unsigned char *buf; { unsigned long wid, parent, mask; int depth, x, y, width, height; long i; depth = IByte(&buf[1]); wid = ILong(&buf[4]); parent = ILong(&buf[8]); x = IShort(&buf[12]); y = IShort(&buf[14]); width = IShort(&buf[16]); height = IShort(&buf[18]); mask = ILong(&buf[28]); for (i = 0; i < maxwtab; i++) { if (parent == wintab[i].parent && depth == wintab[i].depth && mask == wintab[i].mask && x == wintab[i].x && y == wintab[i].y && width == wintab[i].width && height == wintab[i].height && wintab[i].delflag != 0) { /* * could match this window: means that a previously * destroyed window has been created again. * alias it to the original and reset the deleted flag */ wintab[i].delflag = 0; if (maxalias < MAXALIAS) { winalias[maxalias].wid = wid; winalias[maxalias].alias = wintab[i].wid; maxalias++; } else { fprintf(stderr, "Max number of window aliases reached, increase MAXALIAS.\n"); } return (1); } } /* * Couldn't match window, add it int the table. * Set newid and newpart to current wid and parent, * to match directly if we replay in the same session. */ wintab[maxwtab].wid = wid; wintab[maxwtab].newid = wid; wintab[maxwtab].parent = parent; wintab[maxwtab].newpar = parent; wintab[maxwtab].depth = depth; wintab[maxwtab].x = x; wintab[maxwtab].y = y; wintab[maxwtab].width = width; wintab[maxwtab].height = height; wintab[maxwtab].mask = mask; maxwtab++; return (0); } /*-------------------------------------------------------------*/ void LoadWtab(filename) char *filename; { char line[256]; int lsize = 256; unsigned int wid, parent, m; int d, x, y, w, h; char header[20]; PlaybackFile = fopen(PlaybackFileName, "r"); while (fgets(line, lsize, PlaybackFile) && maxwtab <= MAXWTAB) { if (line[0] == 'X') { if (9 != sscanf(line, "%s %x %x %x %d %d %d %d %x", header, &wid, &parent, &d, &x, &y, &w, &h, &m)) warn("Error decoding in LoadWtab"); wintab[maxwtab].wid = wid; wintab[maxwtab].parent = parent; wintab[maxwtab].depth = d; wintab[maxwtab].x = x; wintab[maxwtab].y = y; wintab[maxwtab].width = w; wintab[maxwtab].height = h; wintab[maxwtab].mask = m; maxwtab++; } } if (maxwtab == MAXWTAB) { warn("LoadWtab: Number max of XCreateWindow reached, increase MAXWTAB"); } fclose(PlaybackFile); PlaybackFile = 0; } /*-------------------------------------------------------------*/ /* mainly a debugging aid. get the original window */ int OriginalWid(wid) unsigned long wid; { long i; for (i = 0; i < maxwtab; i++) if (wintab[i].newid == wid) return wintab[i].wid; return 0; } /*-------------------------------------------------------------*/ int NewWid(wid) unsigned long wid; { long i; for (i = 0; i < maxwtab; i++) if (wintab[i].wid == wid) return(wintab[i].newid ? wintab[i].newid : wid); if (wid != TheRootWindow) { fprintf(stderr, "NewWid: Couldn't match Window id %lx\n", wid); } return wid; } /*-------------------------------------------------------------*/ void SetNewParent(old, new) unsigned long old, new; { long i; for (i = 0; i < maxwtab; i++) if (wintab[i].parent == old) wintab[i].newpar = new; } /*-------------------------------------------------------------*/ void SetNewid(old, new) unsigned long old, new; { long i; for (i = 0; i < maxwtab; i++) if (wintab[i].newid == old) wintab[i].newid = new; } /*-------------------------------------------------------------*/ unsigned long GetWinAlias(wid) unsigned long wid; { long i; for (i = 0; i < maxalias; i++) if (winalias[i].wid == wid) return (winalias[i].alias); return (wid); } /*-------------------------------------------------------------*/ void SetInferiorsNewid(wid, new) unsigned long wid, new; { long i; for (i = 0; i < maxwtab; i++) { if (wintab[i].newpar == wid) { SetInferiorsNewid(wintab[i].wid, new); wintab[i].newid = new; } } } /*-------------------------------------------------------------*/ void SetInferiorsDelflag(wid, value) unsigned long wid; char value; { long i; for (i = 0; i < maxwtab; i++) { if (wintab[i].newpar == wid) { SetInferiorsDelflag(wintab[i].wid, value); wintab[i].delflag = value; } } } /*-------------------------------------------------------------*/ void SetDelflag(wid, value) unsigned long wid; char value; { long i; for (i = 0; i < maxwtab; i++) { if (wintab[i].wid == wid) { wintab[i].delflag = value; } } } /*--------------------------------------------------------------*/ static char *state_to_ascii(state, scr_state) unsigned long int state; char scr_state[13]; { int k; /* clear the state mask string */ for (k = 0; k < 12; k++) scr_state[k] = '-'; if (state & ShiftMask) scr_state[0] = 'S'; if (state & LockMask) scr_state[1] = 'L'; if (state & ControlMask) scr_state[2] = 'C'; if (state & Mod1Mask) scr_state[3] = 'M'; if (state & Button1Mask) scr_state[4] = '1'; if (state & Button2Mask) scr_state[5] = '2'; if (state & Button3Mask) scr_state[6] = '3'; k = 7; if (state & Mod2Mask) scr_state[k++] = 'N'; if (state & Mod3Mask) scr_state[k++] = 'O'; if (state & Mod4Mask) scr_state[k++] = 'P'; if (state & Mod5Mask) scr_state[k++] = 'Q'; if (state & Button4Mask) scr_state[k++] = '4'; if (state & Button5Mask) scr_state[k++] = '5'; scr_state[k] = 0; return scr_state; } /*--------------------------------------------------------------*/ void event_to_ascii(fd, buf, file) FD fd; unsigned char *buf; FILE *file; { struct timeval tv; Time ts; static Time last_rec_ts = 0L; register unsigned short evtype = IByte(&buf[0]); short evdetail = 0; Window evroot = 0; unsigned long evstate = 0; Bool evsame = 0; /* Script variables */ int scr_x = 0, scr_y = 0, scr_xroot = 0, scr_yroot = 0; char scr_state[13]; char *scr_type; int scr_spec, scr_win = 0, scr_subw = 0; unsigned long int scr_time; char *scr_spec_str; char spec_str[40]; scr_type = 0; /* by default, no event type */ scr_spec_str = "0"; /* Compute time stamp from the last recorded event */ gettimeofday(&tv, 0); ts = tv.tv_sec * 1000; ts += tv.tv_usec / 1000; /* first event recorded, delay must be 0 */ if (last_rec_ts == 0L) last_rec_ts = ts; scr_time = ts - last_rec_ts; last_rec_ts = ts; /* high-order bit means SendEvent generated */ evtype &= 0x7f; switch (evtype) { case ButtonPress: case ButtonRelease: case KeyPress: case KeyRelease: case MotionNotify: case EnterNotify: case LeaveNotify: /* unpack the contents of the event fields. */ evdetail = IByte(&buf[1]); /* scr_time = ILong(&buf[4]); */ evroot = ILong(&buf[8]); // root scr_win = ILong(&buf[12]); // event scr_subw = ILong(&buf[16]); // child scr_xroot = IShort(&buf[20]); // root-x scr_yroot = IShort(&buf[22]); // root-y scr_x = IShort(&buf[24]); // event-x scr_y = IShort(&buf[26]); // event-y evstate = IShort(&buf[28]); // state evsame = IBool(&buf[30]); // same-screen evroot = GetWinAlias(evroot); scr_win = GetWinAlias(scr_win); scr_subw = GetWinAlias(scr_subw); state_to_ascii(evstate, scr_state); break; default: /* EMPTY */ break; } /* code the event type */ switch (evtype) { case ButtonPress: scr_type = "BP"; break; case ButtonRelease: scr_type = "BR"; break; case KeyPress: scr_type = "KP"; break; case KeyRelease: scr_type = "KR"; break; case MotionNotify: scr_type = "MN"; break; case EnterNotify: scr_type = "EN"; break; case LeaveNotify: scr_type = "LN"; break; } /* special handling per event type */ switch (evtype) { case ButtonPress: case ButtonRelease: /* snatch the button number */ scr_spec = evdetail; sprintf(spec_str, "%-7d", scr_spec); scr_spec_str = spec_str; /* Shift + Ctrl + Button 1 activates screen capture */ if ((evtype == ButtonRelease) && (evstate & ShiftMask) && (evstate & ControlMask)) screen_capture(scr_win); break; case KeyPress: case KeyRelease: { /* * fake an event for calling XLookupString, * to get Xlib-compatible KeySym lookup. */ XKeyEvent ev; char buff[10]; KeySym keysym; ev.type = evtype; ev.display = Dpy; ev.keycode = evdetail; ev.state = evstate; XLookupString(&ev, buff, 10, &keysym, 0); scr_spec_str = XKeysymToString(keysym); } break; case MotionNotify: scr_spec_str = evdetail ? "Hint " : "Nohint "; break; case EnterNotify: case LeaveNotify: { char *detail = ""; char *mode = ""; char evmode = IByte(&buf[30]); char str[12]; /* handle detail and mode */ switch (evdetail) { case 0: detail = "A"; // Ancestor break; case 1: detail = "V"; // Virtual break; case 2: detail = "I"; // Inferior break; case 3: detail = "N"; // Nonlinear break; case 4: detail = "C"; // ??? Nonlinear Virtual!? break; } switch (evmode) { case 0: mode = "N"; // Normal break; case 1: mode = "G"; // Grab break; case 2: mode = "U"; // Ungrab break; case 3: mode = "W"; // ??? While Grabbed!? break; } sprintf(str, "%s-%s", detail, mode); scr_spec_str = str; } } /* end switch (ev.type) */ if (scr_type) fprintf(file, "%s %-9s %s %d %8.8x %8.8x %8.8lx %4d %4d %4d %4d %7lu %4ld\n", scr_type, scr_spec_str, scr_state, evsame, scr_win, scr_subw, evroot, scr_xroot, scr_yroot, scr_x, scr_y, scr_time, NumberFD(fd)); } /*-------------------------------------------------------------*/ int ascii_to_event_type(line) char *line; { char scr_type[20]; int type = 0; int error = 0; int count = 0; count = sscanf(line, "%2s", scr_type); if (count != 1) error = 1; if (error) return 0; switch (scr_type[0]) { case 'B': case 'b': switch (scr_type[1]) { case 'P': case 'p': type = ButtonPress; break; case 'R': case 'r': type = ButtonRelease; break; default: error = 1; break; } if (error) return 0; break; case 'K': case 'k': switch (scr_type[1]) { case 'P': case 'p': type = KeyPress; break; case 'R': case 'r': type = KeyRelease; break; default: error = 1; break; } if (error) return 0; break; case 'M': case 'm': switch (scr_type[1]) { case 'N': case 'n': type = MotionNotify; break; default: error = 1; break; } if (error) return 0; break; case 'E': case 'e': switch (scr_type[1]) { case 'N': case 'n': type = EnterNotify; break; default: error = 1; break; } if (error) return 0; break; case 'L': case 'l': switch (scr_type[1]) { case 'N': case 'n': type = LeaveNotify; break; default: error = 1; break; } if (error) return 0; break; case '#': /* comment */ case 'X': /* XCreateWindow request */ type = 0; break; } return type; } /*-------------------------------------------------------------*/ /* record XCreateWindow request to trace window chaining */ void req_to_ascii(fd, buf, file) FD fd; unsigned char *buf; FILE *file; { unsigned long wid, parent, mask; int depth, x, y, width, height; // int borderwidth; depth = IByte(&buf[1]); // depth wid = ILong(&buf[4]); // wid parent = ILong(&buf[8]); // parent x = IShort(&buf[12]); // x y = IShort(&buf[14]); // y width = IShort(&buf[16]); // width height = IShort(&buf[18]); // height // borderwidth = IShort(&buf[20]); // border-width mask = ILong(&buf[28]); // value-mask fprintf(file, "%s %8.8lx %8.8lx %2.2x %4d %4d %4d %4d %8.8lx\n", "XCreateWindow", wid, parent, depth, x, y, width, height, mask); } /*-------------------------------------------------------------*/ /* * MatchWtab is called during the replay to match windows created * during replay against those created during recording. * If the request is CreateWindow, we try to find the corresponding * window in the recorded file (contained in wintab). * If the request is DestroyWindow or DestroySubWindows, we must remove * the corresponding wid from the table to allow a later CreateWindow of * the same window to match correctly. */ void MatchWtab(fd, buf) FD fd; unsigned char *buf; { short request = IByte(&buf[0]); unsigned long wid, parent, mask; int depth, x, y, width, height; long i; static int first = 1; int found = 0; if (request == 4) { /* DestroyWindow request */ wid = ILong(&buf[4]); /* SetInferiorsNewid(wid, 0L); */ SetNewid(wid, 0L); return; } if (request == 5) { /* DestroySubWindows request */ wid = ILong(&buf[4]); /* SetInferiorsNewid(wid, 0L); */ return; } if (request != 1) /* CreateWindow request */ return; depth = IByte(&buf[1]); wid = ILong(&buf[4]); parent = ILong(&buf[8]); x = IShort(&buf[12]); y = IShort(&buf[14]); width = IShort(&buf[16]); height = IShort(&buf[18]); mask = ILong(&buf[28]); if (first == 1) { first = 0; /* treat the case of root window (parent of the 1st XCreateWindow) */ SetNewParent(wintab[0].parent, parent); } /* * First we try to find a similar window in the recorded file * with the same hierarchy. */ for (i = 0; i < maxwtab; i++) { /* skip windows already allocated */ if (wintab[i].newid != 0) continue; if (parent == wintab[i].newpar && depth == wintab[i].depth && mask == wintab[i].mask && x == wintab[i].x && y == wintab[i].y && width == wintab[i].width && height == wintab[i].height) { wintab[i].newid = wid; SetNewParent(wintab[i].wid, wintab[i].newid); found = 1; return; } } /* * If previous search doesn't match, assume it is a top window * (don't try to match parent), do the search again. */ for (i = 0; i < maxwtab; i++) { /* skip windows already allocated */ if (wintab[i].newid != 0) continue; if (depth == wintab[i].depth && mask == wintab[i].mask && x == wintab[i].x && y == wintab[i].y && width == wintab[i].width && height == wintab[i].height) { wintab[i].newid = wid; SetNewParent(wintab[i].parent, parent); found = 1; return; } } warn("if nothing else helps.....\n"); /* * If previous search doesn't match, assume it is a top window * (don't try to match parent), do the search again. */ for (i = 0; i < maxwtab; i++) { /* skip windows already allocated */ if (wintab[i].newid != 0) continue; if (parent == wintab[i].newpar && depth == wintab[i].depth && mask == wintab[i].mask && width == wintab[i].width && height == wintab[i].height) { wintab[i].newid = wid; SetNewParent(wintab[i].wid, wid); found = 1; return; } } /* * If not found here, we got a problem. */ fprintf(stderr, "Window not matched %lx %lx %d %d %d %d\n", wid, parent, x, y, width, height); } /*-------------------------------------------------------------*/ void ReplaceWid(buf, offset) unsigned char *buf; int offset; { int wid, newid; wid = ILong(&buf[offset]); /* LM */ if (wid == 0) return; newid = NewWid(wid); OLong(&buf[offset], newid); } /*-------------------------------------------------------------*/ int ReadSynthEvent(line) char *line; { char str_type[3]; char str_state[14]; char str_spec[40]; unsigned long int time; int x, y, xroot, yroot, same, fd; Window win, subw, rootw; char *p; static int first_debug = 0; if (13 != sscanf(line, "%s %s %s %d %lx %lx %lx %d %d %d %d %ld %u", str_type, str_spec, str_state, &same, &win, &subw, &rootw, &xroot, &yroot, &x, &y, &time, &fd)) return (1); synth_ev.rootx = xroot; synth_ev.rooty = yroot; synth_ev.x = x; synth_ev.y = y; synth_ev.rootw = rootw; synth_ev.win = win; synth_ev.subw = subw; synth_ev.fd = FDClientFromNumber(fd); if (synth_ev.fd == -1) { fprintf(stderr, "Playback Error. No such client %d in current session\n", fd); return 1; } synth_ev.time = time; synth_ev.same = same; synth_ev.type = ascii_to_event_type(str_type); switch (synth_ev.type) { case ButtonPress: case ButtonRelease: /* get the button number */ if (first_debug == 0) { first_debug = 1; } synth_ev.detail = atoi(str_spec); break; case KeyPress: case KeyRelease: /* get the keycode number using tables from the server */ synth_ev.detail = XKeysymToKeycode(Dpy, XStringToKeysym(str_spec)); break; case MotionNotify: if (str_spec[0] == 'H') synth_ev.detail = 1; else synth_ev.detail = 0; break; case EnterNotify: case LeaveNotify: switch (str_spec[0]) { case 'A': synth_ev.detail = 0; break; case 'V': synth_ev.detail = 1; break; case 'I': synth_ev.detail = 2; break; case 'N': synth_ev.detail = 3; break; case 'C': synth_ev.detail = 4; break; default: synth_ev.detail = 0; break; } switch (str_spec[2]) { case 'N': synth_ev.same = 0; break; case 'G': synth_ev.same = 1; break; case 'U': synth_ev.same = 2; break; case 'W': synth_ev.same = 3; break; default: synth_ev.same = 0; break; } break; } synth_ev.state = 0; for (p = str_state; *p; p++) { switch (*p) { case 'S': synth_ev.state |= ShiftMask; break; case 'L': synth_ev.state |= LockMask; break; case 'C': synth_ev.state |= ControlMask; break; case 'M': synth_ev.state |= Mod1Mask; break; case 'N': synth_ev.state |= Mod2Mask; break; case 'O': synth_ev.state |= Mod3Mask; break; case 'P': synth_ev.state |= Mod4Mask; break; case 'Q': synth_ev.state |= Mod5Mask; break; case '1': synth_ev.state |= Button1Mask; break; case '2': synth_ev.state |= Button2Mask; break; case '3': synth_ev.state |= Button3Mask; break; case '4': synth_ev.state |= Button4Mask; break; case '5': synth_ev.state |= Button5Mask; break; } } OByte(&synth_ev.evbuf[0], synth_ev.type); OByte(&synth_ev.evbuf[1], synth_ev.detail); OLong(&synth_ev.evbuf[8], synth_ev.rootw); OLong(&synth_ev.evbuf[12], synth_ev.win); OLong(&synth_ev.evbuf[16], synth_ev.subw); OShort(&synth_ev.evbuf[20], synth_ev.rootx); OShort(&synth_ev.evbuf[22], synth_ev.rooty); OShort(&synth_ev.evbuf[24], synth_ev.x); OShort(&synth_ev.evbuf[26], synth_ev.y); OShort(&synth_ev.evbuf[28], synth_ev.state); OByte(&synth_ev.evbuf[30], synth_ev.same); return 0; } /*-------------------------------------------------------------*/ /* Screen capture function, activated by a keyboard sequence * during recording, and automatically reactivated during replay. * (this is really unstable at this moment). */ void screen_capture(wid) Window wid; { static int ncap = 0; /* increment this number at each capture */ char cap_cmd[256]; extern char *ScopeHost; extern int ScopePort; char this_disp[256]; /* build "This" display name, so capture tool is controled by xlab */ if (ncap == 0) sprintf(this_disp, "%s:%d.0", ScopeHost, ScopePort - 6000); /* build capture command */ #ifdef USE_IMAGEMAGICK sprintf(cap_cmd, "import -window 0x%x xlab_cap.%d.xwd &", wid, ncap++); #else sprintf(cap_cmd, "xwd -display %s -id 0x%x -out xlab_cap.%d.xwd &", this_disp, wid, ncap++); #endif printf("%s\n", cap_cmd); system(cap_cmd); } xlab-980917mine/record.h100664 71506 1605 6711 6745313400 14321 0ustar hildebinstall/* * $Id: record.h,v 1.3 1998/07/24 11:59:17 marc Exp $ * * header file for recording * * (c) Copyright 1993, Oliver Jones * */ #ifndef _RECORD_H_ #define _RECORD_H_ #include /* ********************************************** */ /* */ /* ********************************************** */ #ifndef MAXPATHLEN #define MAXPATHLEN 1024 #endif /* path name of file to record, if any */ extern char RecordFileName[MAXPATHLEN]; /* FILE id of file name to record, if any */ extern FILE * RecordFile; /* path name of file to play back, if any */ extern char PlaybackFileName[MAXPATHLEN]; /* FILE id of file name to play back, if any */ extern FILE * PlaybackFile; /* user requested playback */ #define PLAYBACK_INACTIVE 0 #define PLAYBACK_PENDING 1 #define PLAYBACK_ACTIVE 2 #define PLAYBACK_COMPLETE 3 extern long Playback; /* non-zero if user requested recording */ /* Record and Playback cannot both be nonzero */ extern long Record ; /* time dilation in percentage ... 200 means speed up x2 */ extern long TimeDilation; /* double-click time in milliseconds */ extern long DoubleClickTime; /* number of seconds to wait after starting program to start playback */ extern long Wait; /* playback error count */ extern unsigned long int Errorcount; #ifndef MAXWTAB #define MAXWTAB 16384 #endif #ifndef MAXALIAS #define MAXALIAS 16384 #endif struct WinTab { unsigned long wid, parent, newid, newpar, mask; int depth, x, y, width, height; char delflag; }; struct WinAlias { unsigned long wid, alias; }; extern long maxwtab; #if __STDC__ || defined(__cplusplus) #define P_(s) s #else #define P_(s) () #endif /* record.c */ int start_record P_((char *filename)); void stop_record P_((void)); void CloseFile P_((FILE *file)); unsigned long int Dilate P_((unsigned long int deltat)); int GetResourceBaseFd P_((XID resource)); void WaitForWindowMapped P_((int fd, XID resource, void (*handler)(void), void *user_data)); char *getstat P_((int status)); void WindowStatusAnnounce P_((FD fd, unsigned char *buf, int n, int status)); void AnnouncePlaybackError P_((Display *dpy, XErrorEvent *erev)); void SendPlaybackEvent P_((TimerID timer, int fd)); void WarpPlaybackEvent P_((Window session_window, int fd)); void TranslatePlaybackEvent P_((TimerID timer, int fd)); void end_replay P_((void)); void ReadPlaybackEvent P_((TimerID timer, int fd)); int start_replay P_((char *filename)); void RecordEvent P_((FD fd, unsigned char *buf, long n)); void RecordRequest P_((FD fd, unsigned char *buf, long n)); int MatchCreateWinRec P_((unsigned char *buf)); void LoadWtab P_((char *filename)); int OriginalWid P_((unsigned long wid)); int NewWid P_((unsigned long wid)); void SetNewParent P_((unsigned long old, unsigned long new)); void SetNewid P_((unsigned long old, unsigned long new)); unsigned long GetWinAlias P_((unsigned long wid)); void SetInferiorsNewid P_((unsigned long wid, unsigned long new)); void SetInferiorsDelflag P_((unsigned long wid, int value)); void SetDelflag P_((unsigned long wid, int value)); void dumpwtab P_((void)); void event_to_ascii P_((FD fd, unsigned char *buf, FILE *file)); int ascii_to_event_type P_((char *line)); void req_to_ascii P_((FD fd, unsigned char *buf, FILE *file)); void MatchWtab P_((FD fd, unsigned char *buf)); void ReplaceWid P_((unsigned char *buf, int offset)); int ReadSynthEvent P_((char *line)); void screen_capture P_((Window wid)); #undef P_ #endif /* _RECORD_H_ */ xlab-980917mine/scope.c100664 71506 1605 62536 6745313400 14176 0ustar hildebinstall/* * $Id: scope.c,v 1.5 1998/07/31 20:01:34 marc Exp $ * * A script program to store and replay X input events * * Adapted from "xscope" * James Peterson, 1988 * (c) Copyright MCC, 1988 * (c) Copyright Oliver Jones, 1993 * (c) Copyright Marc Vertes 1996, 1997, 1998 * */ #include #include #include /* for struct iovec, used by socket.h */ #include /* for AF_INET, SOCK_STREAM, ... */ #include /* for FIONCLEX, FIONBIO, ... */ #ifdef SVR4 #include #endif #include #include /* struct sockaddr_in */ #include /* struct servent * and struct hostent * */ #include /* for EINTR, EADDRINUSE, ... */ extern int errno; typedef struct TypeDef *TYPE; #include "scope.h" #include "table11.h" #include "common.h" #include "server.h" #include "record.h" #include "y.tab.h" /* * we need a local X display connection to the server-under-test * to allow various queries to go through. * Hence, include the X definitions. */ #include #include short debuglevel; short Verbose; /* quiet (0) or increasingly verbose ( > 0) */ int ScopePort; char *ScopeHost; /* path name of file to record, if any */ char RecordFileName[MAXPATHLEN]; /* FILE id of file name to record, if any */ FILE *RecordFile = 0; /* path name of file to play back, if any */ char PlaybackFileName[MAXPATHLEN]; /* FILE id of file name to play back, if any */ FILE *PlaybackFile = 0; /* user requested playback */ #define PLAYBACK_INACTIVE 0 #define PLAYBACK_PENDING 1 #define PLAYBACK_ACTIVE 2 #define PLAYBACK_COMPLETE 3 long Playback = PLAYBACK_INACTIVE; /* non-zero if user requested recording */ /* Record and Playback cannot both be nonzero */ long Record = 0; /* number of seconds to wait after starting program to start playback */ long Wait = 15; /* time dilation in percentage ... 200 means speed up x2 */ long TimeDilation = 100; /* double click time in milliseconds */ long DoubleClickTime = 250; /* grab timeout in seconds */ unsigned long int GrabTimeout = 30; /* display connection */ Display *Dpy = 0; /* playback error count */ unsigned long int Errorcount = 0; #define DefaultPort 6000 char ServerHostName[255]; long ServerBasePort = DefaultPort; long ServerInPort = 1; long ServerOutPort = 0; long ServerDisplay = 0; char ScopeEnabled = 0; char HandleSIGUSR1 = 0; /*----------------------------------------------------------------------*/ short GetServerport() { short port; enterprocedure("GetServerport"); port = ServerBasePort + ServerOutPort + ServerDisplay; debug(4, (stderr, "Server service is on port %d\n", port)); return (port); } /*----------------------------------------------------------------------*/ short GetScopePort() { short port; enterprocedure("GetScopePort"); port = ServerBasePort + ServerInPort + ServerDisplay; debug(4, (stderr, "scope service is on port %d\n", port)); return (port); } /*----------------------------------------------------------------------*/ void Usage(xscript) char *xscript; { fprintf(stderr, "Usage: %s [-r]\n", xscript); fprintf(stderr, " [-p]\n"); fprintf(stderr, " [-w]\n"); fprintf(stderr, " [-c]\n"); fprintf(stderr, " [-t]\n"); fprintf(stderr, " [-h]\n"); fprintf(stderr, " [-i]\n"); fprintf(stderr, " [-o]\n"); fprintf(stderr, " [-d]\n"); fprintf(stderr, " [-v] -- verbose output\n"); fprintf(stderr, " [-q] -- quiet output\n"); fprintf(stderr, " [-D]\n"); fprintf(stderr, " [-S] -- start/stop on SIGUSR1\n"); fprintf(stderr, " [-G] -- grab timeout in seconds\n"); fprintf(stderr, "To record a session, do this:\n"); fprintf(stderr, " (1) setenv DISPLAY `hostname`:0\n"); fprintf(stderr, " (2) %s -rscript-file&\n", xscript); fprintf(stderr, " (3) setenv DISPLAY `hostname`:1\n"); fprintf(stderr, " (4) run the program under test, and operate it.\n"); fprintf(stderr, "To play back a session at 50%% speed, do this:\n"); fprintf(stderr, " (1) setenv DISPLAY `hostname`:0\n"); fprintf(stderr, " (2) %s -t50 -pscript-file&\n", xscript); fprintf(stderr, " (3) setenv DISPLAY `hostname`:1\n"); fprintf(stderr, " (4) run the program under test, sit back, and watch.\n"); exit(1); } /*----------------------------------------------------------------------*/ static char *xscript = NULL; void ScanArgs(argc, argv) int argc; char **argv; { xscript = argv[0]; Verbose = 0 /* default verbose-ness level */ ; /* Scan argument list */ while (--argc > 0) { ++argv; if (**argv == '-') switch (*++*argv) { /* * debug levels: * 2 - trace each procedure entry * 4 - I/O, connections * 8 - Scope internals * 16 - Message protocol * 32 - 64 - malloc * 128 - 256 - really low level */ case 'D': debuglevel = atoi(++*argv); if (debuglevel == 0) debuglevel = 255; debuglevel |= 1; Verbose = 7; debug(1, (stderr, "debuglevel = %d\n", debuglevel)); break; case 'S': HandleSIGUSR1 = 1; ScopeEnabled = atoi(++*argv); debug(1, (stderr, "ScopeEnabled = %d\n", ScopeEnabled)); break; case 'G': GrabTimeout = atoi(++*argv); if (GrabTimeout == 0) GrabTimeout = 30; break; case 'q': /* quiet mode */ Verbose = 0; debug(1, (stderr, "Verbose = %d\n", Verbose)); break; case 'v': /* verbose mode */ Verbose = atoi(++*argv); debug(1, (stderr, "Verbose = %d\n", Verbose)); break; case 'o': ServerOutPort = atoi(++*argv); if (ServerOutPort <= 0) ServerOutPort = 0; debug(1, (stderr, "ServerOutPort = %ld\n", ServerOutPort)); break; case 'd': ServerDisplay = atoi(++*argv); if (ServerDisplay <= 0) ServerDisplay = 0; debug(1, (stderr, "ServerDisplay=%ld\n", ServerDisplay)); break; case 'i': ServerInPort = atoi(++*argv); if (ServerInPort <= 0) ServerInPort = 0; debug(1, (stderr, "ServerInPort = %ld\n", ServerInPort)); break; case 'h': if (++*argv != NULL && **argv != '\0') { (void) strcpy(ServerHostName, OfficialName(*argv)); debug(1, (stderr, "ServerHostName=%s\n", ServerHostName)); } else { /* -h by itself means print usage message */ Usage(xscript); } break; case 'r': if (Playback != PLAYBACK_INACTIVE) { fprintf(stderr, "Cannot record and play back in same session.\n"); Usage(xscript); } if (++*argv != NULL && **argv != '\0') (void) strcpy(RecordFileName, *argv); debug(1, (stderr, "RecordFileName=%s\n", RecordFileName)); /* ensure we can open record file correctly */ RecordFile = fopen(RecordFileName, "w"); if (RecordFile == 0) { perror(RecordFileName); exit(1); } fclose(RecordFile); RecordFile = 0; Record = 1; break; case 'p': if (Record) { fprintf(stderr, "Cannot record and play back in same session.\n"); Usage(xscript); } if (++*argv != NULL && **argv != '\0') (void) strcpy(PlaybackFileName, *argv); debug(1, (stderr, "PlaybackFile 0 && Playback != PLAYBACK_INACTIVE) { fprintf(stderr, "xlab: Playback summary\n"); fprintf(stderr, " %ld errors encountered during playback\n", Errorcount); exit(2); } exit(0); } /*----------------------------------------------------------------------*/ /* here is where we would add code to allow control from the keyboard. We would want to read a command and interpret it. Possibilties: (a) verbose level setting (b) reset time (c) save X requests to a file. (d) replay X requests from a file. (e) allow fake events, errors to be generated. */ /* xscope is really meant to look at one client at a time. However, it can easily handle multiple clients and servers. To do so, we need to have a pair of FDs: one for the client and one for the server for that client. If either goes away, so does the other. We need to be able to identify the other FD of a pair, so that if we get input from one, we can write it to the other. */ struct fdinfo { Boolean Server; long ClientNumber; FD pair; }; static long ClientNumber = 0; static long ClientsConnected = 0; struct fdinfo FDinfo[StaticMaxFD]; /* table to retrieve the client from the ClientNumber field of FDinfo */ FD FDbynum[StaticMaxFD]; /*----------------------------------------------------------------------*/ void SetUpPair(client, server) FD client; FD server; { if (client >= 0) { ClientNumber += 1; ClientsConnected += 1; FDinfo[client].Server = false; FDinfo[client].pair = server; FDinfo[client].ClientNumber = ClientNumber; if (server >= 0) { FDinfo[server].Server = true; FDinfo[server].pair = client; FDinfo[server].ClientNumber = FDinfo[client].ClientNumber; FDbynum[ClientNumber] = server; } } else if (server >= 0) { (void) close(server); NotUsingFD(server); } } /*----------------------------------------------------------------------*/ void CloseConnection(fd) FD fd; { debug(4, (stderr, "close %d and %d\n", fd, FDPair(fd))); StopClientConnection(ServerHalf(fd)); StopServerConnection(ClientHalf(fd)); (void) close(fd); NotUsingFD(fd); (void) close(FDPair(fd)); NotUsingFD(FDPair(fd)); ClientsConnected -= 1; } /*----------------------------------------------------------------------*/ FD FDPair(fd) FD fd; { return (FDinfo[fd].pair); } /*----------------------------------------------------------------------*/ FD ClientHalf(fd) FD fd; { if (FDinfo[fd].Server) return (FDinfo[fd].pair); return (fd); } /*----------------------------------------------------------------------*/ FD ServerHalf(fd) FD fd; { if (FDinfo[fd].Server) return (fd); return (FDinfo[fd].pair); } /*----------------------------------------------------------------------*/ char *ClientName(fd) FD fd; { static char name[12]; (void) sprintf(name, " %ld", FDinfo[fd].ClientNumber); return (name); } /*----------------------------------------------------------------------*/ void initFDbynum() { long i; for (i = 0; i < StaticMaxFD; i++) FDbynum[i] = -1; } /*----------------------------------------------------------------------*/ extern struct WinTab wintab[MAXWTAB]; extern struct WinAlias winalias[MAXWTAB]; void initwintab() { int i; for (i = 0; i < MAXWTAB; i++) { wintab[i].wid = 0; wintab[i].parent = 0; wintab[i].newid = 0; wintab[i].newpar = 0; wintab[i].x = -1; wintab[i].y = -1; wintab[i].width = -1; wintab[i].height = -1; wintab[i].delflag = 0; winalias[i].wid = 0; winalias[i].alias = 0; } } /*----------------------------------------------------------------------*/ FD FDClientFromNumber(clientNb) long clientNb; { return FDbynum[clientNb]; /* long i; for (i = 0; i < StaticMaxFD; i++) { if ((FDinfo[i].ClientNumber == clientNb) && (FDinfo[i].Server == false)) return i; } return -1; */ } /*----------------------------------------------------------------------*/ long NumberFD(fd) FD fd; { return FDinfo[fd].ClientNumber; } /*----------------------------------------------------------------------*/ /* It's possible for a write syscall to fail with EWOULDBLOCK. In this case, we want to do a select until the file descriptor is writeable once again */ static void WaitUntilWriteable(fd) FD fd; { long int rfds, wfds, xfds; short int nfds; /* assert (fd < 32); */ rfds = 0; wfds = 1 << fd; xfds = 0; debug(128, (stderr, "select %d, wfds = 0%lo\n", fd + 1, wfds)); nfds = select(fd + 1, (fd_set *) & rfds, (fd_set *) & wfds, (fd_set *) & xfds, (struct timeval *) NULL); debug(128, (stderr, "select nfds = 0%o, wfds 0%lo\n", nfds, wfds)); } /*----------------------------------------------------------------------*/ /* when we get data from a client, we read it in, copy it to the * server for this client, then dump it to the client. Note, we don't * have to have a server, if there isn't one. */ void DataFromClient(fd) FD fd; { unsigned char buf[2048]; long n; FD ServerFD; /*MV enterprocedure("DataFromClient"); */ n = read(fd, (char *) buf, 2048); debug(4, (stderr, "read %ld bytes from Client%s\n", n, ClientName(fd))); if (n < 0 && errno == ECONNRESET) n = 0; if (n < 0) { PrintTime(); perror("Client --> read error:"); CloseConnection(fd); return; } if (n == 0) { if (ScopeEnabled) { PrintTime(); fprintf(stdout, "Client%s --> EOF\n", ClientName(fd)); } if (RecordFile) { fflush(RecordFile); if (ClientsConnected == 0) { fclose(RecordFile); RecordFile = 0; } } CloseConnection(fd); /* if ((Record || (Playback != PLAYBACK_INACTIVE)) && (ClientsConnected == 0)) ReportAndExit (); */ return; } ServerFD = FDPair(fd); if (ServerFD < 0) { ServerFD = ConnectToServer(false); SetUpPair(fd, ServerFD); } /* write bytes from client to server, allow for server to fail */ if (ServerFD >= 0) { long BytesToWrite = n; unsigned char *p = buf; while (BytesToWrite > 0) { int n1 = write(ServerFD, (char *) p, (int) BytesToWrite); debug(4, (stderr, "write %d bytes to Server%s\n", n1, ClientName(fd))); if (n1 < 0 && (errno == EWOULDBLOCK || errno == EAGAIN)) { if (errno == EAGAIN) sleep(1); WaitUntilWriteable(ServerFD); n1 = 0; } if (n1 >= 0) { BytesToWrite -= n1; p += n1; } else { perror("Error on write to Server"); CloseConnection(fd); BytesToWrite = 0; } } } /* also report the bytes to standard out */ ReportFromClient(fd, buf, n); } /*----------------------------------------------------------------------*/ /* push bytes from server out to client */ void WriteToClient(fd, buf, n) FD fd; unsigned char *buf; int n; { FD ClientFD = FDPair(fd); long BytesToWrite = n; unsigned char *p = buf; while (BytesToWrite > 0) { int n1 = write(ClientFD, (char *) p, (int) BytesToWrite); debug(4, (stderr, "write %d bytes to Client%s\n", n1, ClientName(fd))); if (n1 < 0 && (errno == EWOULDBLOCK || errno == EAGAIN)) { if (errno == EAGAIN) sleep(1); WaitUntilWriteable(ClientFD); n1 = 0; } if (n1 >= 0) { BytesToWrite -= n1; p += n1; } else { perror("Error on write to Client"); CloseConnection(fd); BytesToWrite = 0; } } } /*----------------------------------------------------------------------*/ /* similar situation for the server, but note that if there is no client, * we close the connection down -- don't need a server with no client. */ void DataFromServer(fd) FD fd; { unsigned char buf[2048]; long n; FD ClientFD; /*MV enterprocedure("DataFromServer"); */ n = read(fd, (char *) buf, 2048); debug(4, (stderr, "read %ld bytes from Server%s\n", n, ClientName(fd))); if (n < 0) { PrintTime(); perror("read error <- Server"); CloseConnection(fd); return; } if (n == 0) { if (ScopeEnabled) { PrintTime(); fprintf(stdout, "EOF <-- Server%s\n", ClientName(fd)); } if (RecordFile) { fflush(RecordFile); if (ClientsConnected == 0) { fclose(RecordFile); RecordFile = 0; } } CloseConnection(fd); /* if ((Record || (Playback != PLAYBACK_INACTIVE)) && (ClientsConnected == 0)) ReportAndExit (); */ return; } ClientFD = FDPair(fd); if (ClientFD < 0) { CloseConnection(fd); return; } if (Playback == PLAYBACK_INACTIVE) { /* * if we're not playing stuff back from a file, * write bytes from server to client, allow for client to fail. * Note...if we ARE playing server stuff back, we need to * crack the protocol first, because we don't pass throug * all events from the server; only those which don't * come from the playback file. */ WriteToClient(fd, buf, n); } /* also report the bytes to standard out */ ReportFromServer(fd, buf, n); } /*----------------------------------------------------------------------*/ /* Create New Connection to a client program and to Server */ #ifndef linux static int ON = 1 /* used in ioctl */ ; #endif void NewConnection(fd) FD fd; { FD ServerFD = -1; FD ClientFD = -1; ClientFD = ConnectToClient(fd); ServerFD = ConnectToServer(true); SetUpPair(ClientFD, ServerFD); } /*----------------------------------------------------------------------*/ FD ConnectToClient(ConnectionSocket) FD ConnectionSocket; { FD ClientFD; struct sockaddr_in from; int len = sizeof(from); enterprocedure("ConnectToClient"); ClientFD = accept(ConnectionSocket, (struct sockaddr *) &from, &len); debug(4, (stderr, "Connect To Client: FD %d\n", ClientFD)); if (ClientFD < 0 && errno == EWOULDBLOCK) { debug(4, (stderr, "Almost blocked accepting FD %d\n", ClientFD)); panic("Can't connect to Client"); } if (ClientFD < 0) { debug(4, (stderr, "NewConnection: error %d\n", errno)); panic("Can't connect to Client"); } UsingFD(ClientFD, (int (*)()) DataFromClient); #ifdef FD_CLOEXEC (void) fcntl(ClientFD, F_SETFD, FD_CLOEXEC); #else (void) ioctl(ClientFD, FIOCLEX, 0); #endif /* ultrix reads hang on Unix sockets, hpux reads fail */ #if defined(O_NONBLOCK) && (!defined(ultrix) && !defined(hpux)) (void) fcntl(ClientFD, F_SETFL, O_NONBLOCK); #else #ifdef FIOSNBIO ioctl(ClientFD, FIOSNBIO, &ON); #else (void) fcntl(ClientFD, F_SETFL, FNDELAY); #endif #endif StartClientConnection(ClientFD); return (ClientFD); } /*----------------------------------------------------------------------*/ FD ConnectToServer(report) Boolean report; { FD ServerFD; struct sockaddr_in sin; struct hostent *hp; short port; int reuse_addr = 1; #ifndef SO_DONTLINGER struct linger linger; #endif /* SO_DONTLINGER */ enterprocedure("ConnectToServer"); /* establish a socket to the name server for this host */ bzero((char *) &sin, sizeof(sin)); ServerFD = socket(AF_INET, SOCK_STREAM, 0); if (ServerFD < 0) { perror("socket() to Server failed"); debug(1, (stderr, "socket failed\n")); panic("Can't open connection to Server"); } (void) setsockopt(ServerFD, SOL_SOCKET, SO_REUSEADDR, &reuse_addr, 0); #ifndef linux (void) setsockopt(ServerFD, SOL_SOCKET, SO_USELOOPBACK, (char *) NULL, 0); #endif #ifdef SO_DONTLINGER (void) setsockopt(ServerFD, SOL_SOCKET, SO_DONTLINGER, (char *) NULL, 0); #else /* SO_DONTLINGER */ linger.l_onoff = 0; linger.l_linger = 0; (void) setsockopt(ServerFD, SOL_SOCKET, SO_LINGER, (char *) &linger, sizeof linger); #endif /* SO_DONTLINGER */ /* determine the host machine for this process */ if (ServerHostName[0] == '\0') (void) gethostname(ServerHostName, sizeof(ServerHostName)); debug(4, (stderr, "try to connect on %s\n", ServerHostName)); hp = gethostbyname(ServerHostName); if (hp == 0) { perror("gethostbyname failed"); debug(1, (stderr, "gethostbyname failed for %s\n", ServerHostName)); panic("Can't open connection to Server"); } sin.sin_family = AF_INET; bcopy((char *) hp->h_addr, (char *) &sin.sin_addr, hp->h_length); port = GetServerport(); if (port == ScopePort && strcmp(ServerHostName, ScopeHost) == 0) { char error_message[100]; (void) sprintf(error_message, "Trying to attach to myself: %s,%d\n", ServerHostName, sin.sin_port); panic(error_message); } sin.sin_port = htons(port); /* ******************************************************** */ /* try to connect to Server */ if (connect(ServerFD, (struct sockaddr *) &sin, sizeof(sin)) < 0) { debug(4, (stderr, "connect returns errno of %d\n", errno)); if (errno != 0) if (report) perror("connect"); switch (errno) { case ECONNREFUSED: /* experience says this is because there is no Server to connect to */ (void) close(ServerFD); debug(1, (stderr, "No Server\n")); if (report) warn("Can't open connection to Server"); return (-1); default: (void) close(ServerFD); panic("Can't open connection to Server"); } } debug(4, (stderr, "Connect To Server: FD %d\n", ServerFD)); if (ServerFD >= 0) { UsingFD(ServerFD, (int (*)()) DataFromServer); StartServerConnection(ServerFD); } return (ServerFD); } /*----------------------------------------------------------------------*/ char *OfficialName(name) char *name; { struct hostent *HostEntry; HostEntry = gethostbyname(name); if (HostEntry == NULL) { fprintf(stderr, "%s: Cannot understand host name as specified: -h%s\n", xscript, name); Usage(xscript); } debug(4, (stderr, "Official name of %s is %s\n", name, HostEntry->h_name)); return (HostEntry->h_name); } /*----------------------------------------------------------------------*/ void DataOnXDisplay(fd) FD fd; { XEvent ev; enterprocedure("DataOnXDisplay"); if (fd != ConnectionNumber(Dpy)) { panic("impossible...fd mismatch in DataOnXDisplay"); } /* chew up and discard events.... */ while (XEventsQueued(Dpy, QueuedAfterReading)) { XNextEvent(Dpy, &ev); debug(4, (stderr, "event type %d in DataOnXDisplay\n", ev.type)); switch (ev.type) { /* process keyboard mapping changes */ case MappingNotify: XRefreshKeyboardMapping((XMappingEvent *) & ev); break; default: break; } } } /*----------------------------------------------------------------------*/ void SetUpXDisplay() { FD displayFD; char displayName[256]; long int displayPort = 0; long int myPort = 0; enterprocedure("SetUpXDisplay"); /* determine the host machine for this process */ if (ServerHostName[0] == '\0') (void) gethostname(ServerHostName, sizeof(ServerHostName)); displayPort = GetServerport() - ServerBasePort; myPort = ScopePort - ServerBasePort; (void) sprintf(displayName, "%s:%ld", ServerHostName, displayPort); debug(4, (stderr, "try to establish local X conn to %s\n", displayName)); if (displayPort == myPort && strcmp(ServerHostName, ScopeHost) == 0) { char error_message[100]; (void) sprintf(error_message, "Trying to attach to myself: %s\n", displayName); panic(error_message); } Dpy = XOpenDisplay(displayName); if (Dpy == 0) { char error_message[100]; (void) sprintf(error_message, "Unable to establish X connection to %s\n", displayName); panic(error_message); } displayFD = ConnectionNumber(Dpy); UsingFD(displayFD, (int (*)()) DataOnXDisplay); } xlab-980917mine/scope.h100664 71506 1605 4241 6745313400 14150 0ustar hildebinstall/* * $Id: scope.h,v 1.4 1998/07/24 11:59:18 marc Exp $ * * General definitions for xlab X record/replayer * * James Peterson, 1987 * (c) Copyright MCC, 1987 * (c) Copyright Marc Vertes 1996, 1997, 1998 */ #ifndef _SCOPE_H_ #define _SCOPE_H_ #include #include #define Boolean short #define true 1 #define false 0 /*----------------------------------------------------------------------*/ #define Assert(b) (b) #define debug(n,f) (void)((debuglevel & n) ? (fprintf f,fflush(stderr)) : 0) #define enterprocedure(s) debug(2,(stderr, "-> %s\n", s)) #define warn(s) fprintf(stderr, "####### %s\n", s) #define panic(s) {fprintf(stderr, "%s\n", s); exit(1);} #define Free(p) {debug(64,(stderr, "%lx = free\n", (long)p)); free(p);} extern short debuglevel; extern short Verbose; /* quiet (0) or increasingly verbose ( > 0) */ extern int ScopePort; extern char *ScopeHost; /*----------------------------------------------------------------------*/ /* need to change the MaxFD to allow larger number of fd's */ /* #define StaticMaxFD 256 */ #define StaticMaxFD 4096 #include "fd.h" #if __STDC__ || defined(__cplusplus) #define P_(s) s #else #define P_(s) () #endif /* scope.c */ short GetServerport P_((void)); short GetScopePort P_((void)); void Usage P_((char *xscript)); void ScanArgs P_((int argc, char **argv)); int main P_((int argc, char **argv)); void ReadStdin P_((FD fd)); void SetUpStdin P_((void)); void ReportAndExit P_((void)); void SetUpPair P_((FD client, FD server)); void CloseConnection P_((FD fd)); FD FDPair P_((FD fd)); FD ClientHalf P_((FD fd)); FD ServerHalf P_((FD fd)); char *ClientName P_((FD fd)); void initFDbynum P_((void)); void initwintab P_((void)); FD FDClientFromNumber P_((long clientNb)); long NumberFD P_((FD fd)); void DataFromClient P_((FD fd)); void WriteToClient P_((FD fd, unsigned char *buf, int n)); void DataFromServer P_((FD fd)); void NewConnection P_((FD fd)); FD ConnectToClient P_((FD ConnectionSocket)); FD ConnectToServer P_((int report)); char *OfficialName P_((char *name)); void DataOnXDisplay P_((FD fd)); void SetUpXDisplay P_((void)); #undef P_ #endif /* _SCOPE_H_ */ xlab-980917mine/server.c100664 71506 1605 45127 6745313400 14370 0ustar hildebinstall/* * $Id: server.c,v 1.4 1998/07/24 11:59:18 marc Exp $ * * Code to decode and print X11 protocol * * James Peterson, 1988 * (c) Copyright MCC, 1988 * (c) Copyright Marc Vertes 1998 */ #include #include "scope.h" #include "common.h" #include "record.h" #include "server.h" #include "decode11.h" #include "print11.h" #include "x11.h" extern char ScopeEnabled; struct ConnState CS[StaticMaxFD]; /*----------------------------------------------------------------------*/ void ReportFromClient(fd, buf, n) FD fd; unsigned char *buf; long n; { if (ScopeEnabled) { PrintTime(); fprintf(stdout, "Client%s --> %4ld %s\n", ClientName(fd), n, (n == 1 ? "byte" : "bytes")); } ProcessBuffer(fd, buf, n); } /*----------------------------------------------------------------------*/ void ReportFromServer(fd, buf, n) FD fd; unsigned char *buf; long n; { if (ScopeEnabled) { PrintTime(); fprintf(stdout, "\t\t\t\t\t%4ld %s <-- X11 Server%s\n", n, (n == 1 ? "byte" : "bytes"), ClientName(fd)); } ProcessBuffer(fd, buf, n); } /*----------------------------------------------------------------------*/ static long ZeroTime1 = -1; static long ZeroTime2 = -1; static struct timeval tp; /*----------------------------------------------------------------------*/ /* * Print the time since we started in hundredths (1/100) of seconds */ void PrintTime() { static long lastsec = 0; long sec /* seconds */ ; long hsec /* hundredths of a second */ ; (void) gettimeofday(&tp, (struct timezone *) NULL); if (ZeroTime1 == -1 || (tp.tv_sec - lastsec) >= 1000) { ZeroTime1 = tp.tv_sec; ZeroTime2 = tp.tv_usec / 10000; } lastsec = tp.tv_sec; sec = tp.tv_sec - ZeroTime1; hsec = tp.tv_usec / 10000 - ZeroTime2; if (hsec < 0) { hsec += 100; sec -= 1; } fprintf(stdout, "%2ld.%02ld: ", sec, hsec); } /*----------------------------------------------------------------------*/ /* * We will need to be able to interpret the values stored in the * requests as various built-in types. The following routines * support the types built into X11 */ long pad(n) long n; { /* round up to next multiple of 4 */ return ((n + 3) & ~0x3); } /*----------------------------------------------------------------------*/ extern int littleEndian; unsigned long int ILong(buf) unsigned char buf[]; { /* check for byte-swapping */ if (littleEndian) return ((((((buf[3] << 8) | buf[2]) << 8) | buf[1]) << 8) | buf[0]); return ((((((buf[0] << 8) | buf[1]) << 8) | buf[2]) << 8) | buf[3]); } /*----------------------------------------------------------------------*/ void OLong(buf, val) unsigned char buf[]; unsigned long int val; { if (littleEndian) { buf[0] = val & 0xff; val >>= 8; buf[1] = val & 0xff; val >>= 8; buf[2] = val & 0xff; val >>= 8; buf[3] = val; } else { buf[3] = val & 0xff; val >>= 8; buf[2] = val & 0xff; val >>= 8; buf[1] = val & 0xff; val >>= 8; buf[0] = val; } } /*----------------------------------------------------------------------*/ unsigned short IShort(buf) unsigned char buf[]; { /* check for byte-swapping */ if (littleEndian) return (buf[1] << 8) | buf[0]; return ((buf[0] << 8) | buf[1]); } /*----------------------------------------------------------------------*/ void OShort(buf, val) unsigned char buf[]; unsigned short int val; { if (littleEndian) { buf[0] = val & 0xff; val >>= 8; buf[1] = val & 0xff; } else { buf[1] = val & 0xff; val >>= 8; buf[0] = val & 0xff; } } /*----------------------------------------------------------------------*/ unsigned short IChar2B(buf) unsigned char buf[]; { /* CHAR2B is like an IShort, but not byte-swapped */ return ((buf[0] << 8) | buf[1]); } /*----------------------------------------------------------------------*/ unsigned short IByte(buf) unsigned char buf[]; { return (buf[0]); } /*----------------------------------------------------------------------*/ void OByte(buf, val) unsigned char buf[]; unsigned short int val; { buf[0] = val & 0xff; } /*----------------------------------------------------------------------*/ Boolean IBool(buf) unsigned char buf[]; { if (buf[0] != 0) return (true); else return (false); } /*----------------------------------------------------------------------*/ /* * we will need to save bytes until we get a complete request to * interpret. The following procedures provide this ability */ void SaveBytes(fd, buf, n) FD fd; unsigned char *buf; long n; { /* check if there is enough space to hold the bytes we want */ if (CS[fd].NumberofSavedBytes + n > CS[fd].SizeofSavedBytes) { /* not enough room so far; malloc more space and copy */ long SizeofNewBytes = (CS[fd].NumberofSavedBytes + n + 1); unsigned char *NewBytes = (unsigned char *) Malloc(SizeofNewBytes); if (CS[fd].NumberofSavedBytes > 0) { bcopy( /* from */ (char *) CS[fd].SavedBytes, /* to */ (char *) NewBytes, /* count */ (int) CS[fd].NumberofSavedBytes); Free((char *) CS[fd].SavedBytes); } CS[fd].SavedBytes = NewBytes; CS[fd].SizeofSavedBytes = SizeofNewBytes; } /* now copy the new bytes onto the end of the old bytes */ bcopy( /* from */ (char *) buf, /* to */ (char *) (CS[fd].SavedBytes + CS[fd].NumberofSavedBytes), /* count */ (int) n); CS[fd].NumberofSavedBytes += n; } /*----------------------------------------------------------------------*/ void RemoveSavedBytes(fd, n) FD fd; long n; { /* check if all bytes are being removed -- easiest case */ if (CS[fd].NumberofSavedBytes <= n) CS[fd].NumberofSavedBytes = 0; else if (n == 0) return; else { /* not all bytes are being removed -- shift the remaining ones down */ register unsigned char *p = CS[fd].SavedBytes; register unsigned char *q = CS[fd].SavedBytes + n; register long i = CS[fd].NumberofSavedBytes - n; while (i-- > 0) *p++ = *q++; CS[fd].NumberofSavedBytes -= n; } } /*----------------------------------------------------------------------*/ /* following are the possible values for ByteProcessing */ /* forward declarations */ long StartSetUpMessage(); long FinishSetUpMessage(); long StartRequest(); long FinishRequest(); long StartSetUpReply(); long FinishSetUpReply(); long ServerPacket(); long FinishReply(); int littleEndian; /*----------------------------------------------------------------------*/ void ProcessBuffer(fd, buf, n) FD fd; unsigned char *buf; long n; { unsigned char *BytesToProcess; long NumberofUsedBytes; /* as long as we have enough bytes to do anything -- do it */ while (CS[fd].NumberofSavedBytes + n >= CS[fd].NumberofBytesNeeded) { /* * we have enough bytes to do something. We want the bytes to be * grouped together into one contiguous block of bytes. We have three * cases: * * (1) NumberofSavedBytes = 0; so all needed bytes are in the * read buffer, buf. * * (2) NumberofSavedBytes >= NumberofBytesNeeded; in this case we * will not need to copy any extra bytes into the save buffer. * * (3) 0 < NumberofSavedBytes < NumberofBytesNeeded; so * some bytes are in the save buffer and others are in the read * buffer. In this case we need to copy some of the bytes from the * read buffer to the save buffer to get as many bytes as we need, * then use these bytes. */ if (CS[fd].NumberofSavedBytes == 0) { /* * no saved bytes, so just process the first bytes in the * read buffer */ BytesToProcess = buf /* address of request bytes */ ; } else { if (CS[fd].NumberofSavedBytes < CS[fd].NumberofBytesNeeded) { /* first determine the number of bytes we need to transfer; then transfer them and remove them from the read buffer. (there may be additional requests in the read buffer) */ long m; m = CS[fd].NumberofBytesNeeded - CS[fd].NumberofSavedBytes; SaveBytes(fd, buf, m); buf += m; n -= m; } BytesToProcess = CS[fd].SavedBytes /* address of request bytes */ ; } /* BytesToProcess points to a contiguous block of NumberofBytesNeeded bytes that we should process. The type of processing depends upon the state we are in. The processing routine should return the number of bytes that it actually used. */ NumberofUsedBytes = (*CS[fd].ByteProcessing) (fd, BytesToProcess, CS[fd].NumberofBytesNeeded); /* the number of bytes that were actually used is normally (but not always) the number of bytes needed. Discard the bytes that were actually used, not the bytes that were needed. The number of used bytes must be less than or equal to the number of needed bytes. */ if (NumberofUsedBytes > 0) { if (CS[fd].NumberofSavedBytes > 0) RemoveSavedBytes(fd, NumberofUsedBytes); else { /* there are no saved bytes, so the bytes that were used must have been in the read buffer */ buf += NumberofUsedBytes; n -= NumberofUsedBytes; } } } /* end of while (NumberofSavedBytes + n >= NumberofBytesNeeded) */ /* not enough bytes -- just save the new bytes for more later */ if (n > 0) SaveBytes(fd, buf, n); return; } /*----------------------------------------------------------------------*/ /* * Byte Processing Routines. Each routine MUST set NumberofBytesNeeded * and ByteProcessing. It probably needs to do some computation first. */ void StartClientConnection(fd) FD fd; { enterprocedure("StartClientConnection"); /* when a new connection is started, we have no saved bytes */ CS[fd].SavedBytes = NULL; CS[fd].SizeofSavedBytes = 0; CS[fd].NumberofSavedBytes = 0; /* when a new connection is started, we have no reply Queue */ FlushReplyQ(fd); /* each new connection gets a request sequence number */ CS[fd].SequenceNumber = 0; /* we need 12 bytes to start a SetUp message */ CS[fd].ByteProcessing = StartSetUpMessage; CS[fd].NumberofBytesNeeded = 12; } /*----------------------------------------------------------------------*/ void StopClientConnection(fd) FD fd; { enterprocedure("StopClientConnection"); /* when a new connection is stopped, discard the old buffer */ if (CS[fd].SizeofSavedBytes > 0) { Free((char *) CS[fd].SavedBytes); CS[fd].SizeofSavedBytes = 0; } } /*----------------------------------------------------------------------*/ long StartSetUpMessage(fd, buf, n) FD fd; unsigned char *buf; long n; { short namelength; short datalength; enterprocedure("StartSetUpMessage"); /* we need the first 12 bytes to be able to determine if, and how many, additional bytes we need for name and data authorization. However, we can't process the first 12 bytes until we get all of them, so return zero bytes used, and increase the number of bytes needed */ namelength = IShort(&buf[6]); datalength = IShort(&buf[8]); CS[fd].ByteProcessing = FinishSetUpMessage; CS[fd].NumberofBytesNeeded = n + pad((long) namelength) + pad((long) datalength); debug(8, (stderr, "need %ld bytes to finish startup\n", CS[fd].NumberofBytesNeeded - n)); return (0); } /*----------------------------------------------------------------------*/ long FinishSetUpMessage(fd, buf, n) FD fd; unsigned char *buf; long n; { enterprocedure("FinishSetUpMessage"); CS[fd].littleEndian = (buf[0] == 'l'); CS[ServerHalf(fd)].littleEndian = CS[fd].littleEndian; littleEndian = CS[fd].littleEndian; if (ScopeEnabled) PrintSetUpMessage(buf); /* after a set-up message, we expect a string of requests */ CS[fd].ByteProcessing = StartRequest; CS[fd].NumberofBytesNeeded = 4; return (n); } /*----------------------------------------------------------------------*/ long StartRequest(fd, buf, n) FD fd; unsigned char *buf; long n; { unsigned short requestlength; /*MV enterprocedure("StartRequest"); */ /* bytes 0,1 are ignored now; bytes 2,3 tell us the request length */ requestlength = IShort(&buf[2]); CS[fd].ByteProcessing = FinishRequest; CS[fd].NumberofBytesNeeded = 4 * requestlength; debug(8, (stderr, "need %ld more bytes to finish request\n", CS[fd].NumberofBytesNeeded - n)); return (0); } /*----------------------------------------------------------------------*/ long FinishRequest(fd, buf, n) FD fd; unsigned char *buf; long n; { /* CS[fd].SequenceNumber += 1; */ /*MV enterprocedure("FinishRequest"); */ if (ScopeEnabled) DecodeRequest(fd, buf, n); if (Record) RecordRequest(fd, buf, n); switch (Playback) { case PLAYBACK_PENDING: case PLAYBACK_ACTIVE: MatchWtab(fd, buf); break; } ProcessGrab(fd, buf, n); CS[fd].ByteProcessing = StartRequest; CS[fd].NumberofBytesNeeded = 4; return (n); } /*----------------------------------------------------------------------*/ void StartServerConnection(fd) FD fd; { enterprocedure("StartServerConnection"); /* when a new connection is started, we have no saved bytes */ CS[fd].SavedBytes = NULL; CS[fd].SizeofSavedBytes = 0; CS[fd].NumberofSavedBytes = 0; /* when a new connection is started, we have no reply Queue */ FlushReplyQ(fd); /* we need 8 bytes to start a SetUp reply */ CS[fd].ByteProcessing = StartSetUpReply; CS[fd].NumberofBytesNeeded = 8; } /*----------------------------------------------------------------------*/ void StopServerConnection(fd) FD fd; { enterprocedure("StopServerConnection"); /* when a new connection is stopped, discard the old buffer */ if (CS[fd].SizeofSavedBytes > 0) { Free((char *) CS[fd].SavedBytes); CS[fd].SizeofSavedBytes = 0; } } long StartSetUpReply(fd, buf, n) FD fd; unsigned char *buf; long n; { unsigned short replylength; /*MV enterprocedure("StartSetUpReply"); */ replylength = IShort(&buf[6]); CS[fd].ByteProcessing = FinishSetUpReply; CS[fd].NumberofBytesNeeded = n + 4 * replylength; debug(8, (stderr, "need %ld bytes to finish startup reply\n", CS[fd].NumberofBytesNeeded - n)); return (0); } /*----------------------------------------------------------------------*/ long FinishSetUpReply(fd, buf, n) FD fd; unsigned char *buf; long n; { unsigned long int ResourceIdBase; unsigned long int ResourceIdMask; /* enterprocedure("FinishSetUpReply"); */ if (ScopeEnabled) PrintSetUpReply(buf); /* pass along to client if playing back from file */ if (Playback != PLAYBACK_INACTIVE) WriteToClient(fd, buf, n); CS[fd].ByteProcessing = ServerPacket; CS[fd].NumberofBytesNeeded = 32; ResourceIdBase = ILong(&buf[12]); ResourceIdMask = ILong(&buf[16]); CS[fd].ResourceIdBase = ResourceIdBase; CS[fd].ResourceIdMask = ResourceIdMask; CS[fd].TimeInitialized = 0; return (n); } /*----------------------------------------------------------------------*/ long ErrorPacket(fd, buf, n) FD fd; unsigned char *buf; long n; { /* fprintf(stdout, "Error: "); DecodeError(fd, buf, n); */ /* pass along to client if playing back from file */ if (Playback != PLAYBACK_INACTIVE) WriteToClient(fd, buf, n); /* prepare for next packet */ CS[fd].ByteProcessing = ServerPacket; CS[fd].NumberofBytesNeeded = 32; return (n); } /*----------------------------------------------------------------------*/ long EventPacket(fd, buf, n) FD fd; unsigned char *buf; long n; { if (ScopeEnabled) DecodeEvent(fd, buf, n); if (Record) RecordEvent(fd, buf, n); /* * if we're playing back, start things happening * after the first event arrives, meaning the * client program under test has been initiated. * apply the "wait" parameter specified in the * xscript command line. */ if (Playback == PLAYBACK_PENDING) { static int first_time = 1; if (first_time) { warn("Activate next playback event"); CreateTimer(1000 * Wait, (void (*)()) ReadPlaybackEvent, 0); first_time = 0; } } /* * if we're playing stuff back, * we want to monitor the appearance * of resources by watching events * We also want to decide whether to * pass the events received from the server * along to the client (we don't pass along * the kinds of events we're synthesizing.) */ switch (Playback) { extern Boolean MonitorEvent(); case PLAYBACK_INACTIVE: break; case PLAYBACK_PENDING: case PLAYBACK_COMPLETE: /* nonselective delivery of events */ /* MonitorEvent (fd, buf, n); */ WriteToClient(fd, buf, n); break; case PLAYBACK_ACTIVE: /* selective delivery of events */ if (MonitorEvent(fd, buf, n)) { WriteToClient(fd, buf, n); } break; default: panic("bad Playback value."); break; } CS[fd].ByteProcessing = ServerPacket; CS[fd].NumberofBytesNeeded = 32; return (n); } /*----------------------------------------------------------------------*/ long ReplyPacket(fd, buf, n) FD fd; unsigned char *buf; long n; { unsigned long replylength; replylength = ILong(&buf[4]); /* Replies may need more bytes, so we compute how many more bytes are needed and ask for them, not using any of the bytes we were given (return(0) to say that no bytes were used). If the replylength is zero (we don't need any more bytes), the number of bytes needed will be the same as what we have, and so the top-level loop will call the next routine immediately with the same buffer of bytes that we were given. */ CS[fd].ByteProcessing = FinishReply; CS[fd].NumberofBytesNeeded = n + 4 * replylength; debug(8, (stderr, "need %d bytes to finish reply\n", (4 * replylength))); return (0); } /*----------------------------------------------------------------------*/ long ServerPacket(fd, buf, n) FD fd; unsigned char *buf; long n; { short PacketType; /*MV enterprocedure("ServerPacket"); */ PacketType = IByte(&buf[0]); if (PacketType == 0) return (ErrorPacket(fd, buf, n)); if (PacketType == 1) return (ReplyPacket(fd, buf, n)); return (EventPacket(fd, buf, n)); } /*----------------------------------------------------------------------*/ long FinishReply(fd, buf, n) FD fd; unsigned char *buf; long n; { FD pairfd = FDPair(fd); /*MV enterprocedure("FinishReply"); */ CS[pairfd].SequenceNumber = IShort(&buf[2]); if (ScopeEnabled) DecodeReply(fd, buf, n); /* pass along playback events if necessary */ if (Playback != PLAYBACK_INACTIVE) WriteToClient(fd, buf, n); CS[fd].ByteProcessing = ServerPacket; CS[fd].NumberofBytesNeeded = 32; return (n); } xlab-980917mine/server.h100664 71506 1605 3531 6745313400 14346 0ustar hildebinstall/* * $Id: server.h,v 1.1 1998/07/24 11:59:19 marc Exp $ * * Prototypes of functions implemented in server.c * * (c) Copyright Marc Vertes, 1998 * */ #ifndef _SERVER_H_ #define _SERVER_H_ #if __STDC__ || defined(__cplusplus) #define P_(s) s #else #define P_(s) () #endif /* server.c */ void ReportFromClient P_((FD fd, unsigned char *buf, long n)); void ReportFromServer P_((FD fd, unsigned char *buf, long n)); void PrintTime P_((void)); long pad P_((long n)); unsigned long int ILong P_((unsigned char buf[])); void OLong P_((unsigned char buf[], unsigned long int val)); unsigned short IShort P_((unsigned char buf[])); void OShort P_((unsigned char buf[], int val)); unsigned short IChar2B P_((unsigned char buf[])); unsigned short IByte P_((unsigned char buf[])); void OByte P_((unsigned char buf[], int val)); short IBool P_((unsigned char buf[])); void SaveBytes P_((FD fd, unsigned char *buf, long n)); void RemoveSavedBytes P_((FD fd, long n)); void ProcessBuffer P_((FD fd, unsigned char *buf, long n)); void StartClientConnection P_((FD fd)); void StopClientConnection P_((FD fd)); long StartSetUpMessage P_((FD fd, unsigned char *buf, long n)); long FinishSetUpMessage P_((FD fd, unsigned char *buf, long n)); long StartRequest P_((FD fd, unsigned char *buf, long n)); long FinishRequest P_((FD fd, unsigned char *buf, long n)); void StartServerConnection P_((FD fd)); void StopServerConnection P_((FD fd)); long StartSetUpReply P_((FD fd, unsigned char *buf, long n)); long FinishSetUpReply P_((FD fd, unsigned char *buf, long n)); long ErrorPacket P_((FD fd, unsigned char *buf, long n)); long EventPacket P_((FD fd, unsigned char *buf, long n)); long ReplyPacket P_((FD fd, unsigned char *buf, long n)); long ServerPacket P_((FD fd, unsigned char *buf, long n)); long FinishReply P_((FD fd, unsigned char *buf, long n)); #undef P_ #endif /* _SERVER_H_ */ xlab-980917mine/table11.c100664 71506 1605 125505 6745313400 14332 0ustar hildebinstall/* * $Id: table11.c,v 1.3 1998/07/24 11:59:19 marc Exp $ * * Table initialization for X11 protocol * * James Peterson, 1988 * (c) Copyright MCC, 1988 * (c) Copyright Marc Vertes, 1998 */ #include "scope.h" #include "common.h" #include "x11.h" #include "server.h" #include "table11.h" #include "decode11.h" /* * To initialize for the X11 protocol, we need to create data structures * describing the data types used by X11. */ struct TypeDef TD[MaxTypes]; /* * There are about 100-128 data types for X11. This start with the simple * INT8, INT16, INT32 (byte, short, long), and the CARD8, CARD16, CARD32 * (unsigned) and extend to records like RGB (a resource id, 3 color * values and a bitmask to select a subset of the 3 color values). Each * data type has an assigned type index. The type index identifies the * type (with a #define in x11.h) and is used to access an entry in an * array of type descriptors (TD). Each type descriptor has the type name, * the kind of type, and a procedure to print an object of that type. * The print procedure for a type is named Print. The kind of * type is * * BUILTIN: one of the primitive types. * ENUMERATED: value should be one of a small set of values. This type * needs a list of allowed values (and their print names). * SET: value is a bitmask of a small set of values. Each value * is a one-bit mask (and its print name). * RECORD: value is a record of fields of other types. * * The Type Descriptor array allows us to print a value if we know its type * (index) and the bytes in memory that are its value. */ /*----------------------------------------------------------------------*/ void InitializeX11() { InitReplyQ(); InitBuiltInTypes(); InitEnumeratedTypes(); InitSetTypes(); InitValuesTypes(); InitRecordTypes(); } /*----------------------------------------------------------------------*/ /* define the various types */ TYPE DefineType(typeid, class, name, printproc) short typeid; short class; char *name; int (*printproc) (); { TD[typeid].Name = name; TD[typeid].Type = class; TD[typeid].ValueList = NULL; TD[typeid].PrintProc = printproc; return (&TD[typeid]); } /*----------------------------------------------------------------------*/ /* define an Enumerated Value (or a Set Value) */ void DefineEValue(type, value, name) TYPE type; long value; char *name; { struct ValueListEntry *p; /* define the new value */ p = (struct ValueListEntry *) Malloc((long) (sizeof(struct ValueListEntry))); p->Name = name; p->Value = value; /* add an new value to the list. */ if (type->ValueList == NULL || type->ValueList->Value > p->Value) { p->Next = type->ValueList; type->ValueList = p; } else { /* keep the list sorted, smallest to largest */ struct ValueListEntry *q = type->ValueList; while (q->Next != NULL && q->Next->Value < p->Value) q = q->Next; p->Next = q->Next; q->Next = p; } } /*----------------------------------------------------------------------*/ /* * A Values list is like an enumerated Value, but has a type and length * in addition to a value and name. It is used to print a Values List. * * A Values List is a bitmask (like a set), but if the bit is set on, then * we have an associated value. We need to know the length and type of the * associated value for each bit. */ void DefineValues(type, value, length, ctype, name) TYPE type; long value; char *name; { struct ValueListEntry *p; p = (struct ValueListEntry *) Malloc((long) (sizeof(struct ValueListEntry))); p->Name = name; p->Type = ctype; p->Length = length; p->Value = value; /* add an new value to the list. */ if (type->ValueList == NULL || type->ValueList->Value > p->Value) { p->Next = type->ValueList; type->ValueList = p; } else { /* keep the list sorted, smallest to largest */ struct ValueListEntry *q = type->ValueList; while (q->Next != NULL && q->Next->Value < p->Value) q = q->Next; p->Next = q->Next; q->Next = p; } } /*----------------------------------------------------------------------*/ void InitBuiltInTypes() { (void) DefineType(INT8, BUILTIN, "INT8", (int (*)()) PrintINT8); (void) DefineType(INT16, BUILTIN, "INT16", (int (*)()) PrintINT16); (void) DefineType(INT32, BUILTIN, "INT32", (int (*)()) PrintINT32); (void) DefineType(CARD8, BUILTIN, "CARD8", (int (*)()) PrintCARD8); (void) DefineType(CARD16, BUILTIN, "CARD16", (int (*)()) PrintCARD16); (void) DefineType(CARD32, BUILTIN, "CARD32", (int (*)()) PrintCARD32); (void) DefineType(BYTE, BUILTIN, "BYTE", (int (*)()) PrintBYTE); (void) DefineType(CHAR8, BUILTIN, "CHAR8", (int (*)()) PrintCHAR8); (void) DefineType(STRING16, BUILTIN, "STRING16", (int (*)()) PrintSTRING16); (void) DefineType(STR, BUILTIN, "STR", (int (*)()) PrintSTR); (void) DefineType(WINDOW, BUILTIN, "WINDOW", (int (*)()) PrintWINDOW); (void) DefineType(WINDOWD, BUILTIN, "WINDOWD", (int (*)()) PrintWINDOWD); (void) DefineType(WINDOWNR, BUILTIN, "WINDOWNR", (int (*)()) PrintWINDOWNR); (void) DefineType(PIXMAP, BUILTIN, "PIXMAP", (int (*)()) PrintPIXMAP); (void) DefineType(PIXMAPNPR, BUILTIN, "PIXMAPNPR", (int (*)()) PrintPIXMAPNPR); (void) DefineType(PIXMAPC, BUILTIN, "PIXMAPC", (int (*)()) PrintPIXMAPC); (void) DefineType(CURSOR, BUILTIN, "CURSOR", (int (*)()) PrintCURSOR); (void) DefineType(FONT, BUILTIN, "FONT", (int (*)()) PrintFONT); (void) DefineType(GCONTEXT, BUILTIN, "GCONTEXT", (int (*)()) PrintGCONTEXT); (void) DefineType(COLORMAP, BUILTIN, "COLORMAP", (int (*)()) PrintCOLORMAP); (void) DefineType(COLORMAPC, BUILTIN, "COLORMAPC", (int (*)()) PrintCOLORMAPC); (void) DefineType(DRAWABLE, BUILTIN, "DRAWABLE", (int (*)()) PrintDRAWABLE); (void) DefineType(FONTABLE, BUILTIN, "FONTABLE", (int (*)()) PrintFONTABLE); (void) DefineType(ATOM, BUILTIN, "ATOM", (int (*)()) PrintATOM); (void) DefineType(ATOMT, BUILTIN, "ATOMT", (int (*)()) PrintATOMT); (void) DefineType(VISUALID, BUILTIN, "VISUALID", (int (*)()) PrintVISUALID); (void) DefineType(VISUALIDC, BUILTIN, "VISUALIDC", (int (*)()) PrintVISUALIDC); (void) DefineType(TIMESTAMP, BUILTIN, "TIMESTAMP", (int (*)()) PrintTIMESTAMP); (void) DefineType(RESOURCEID, BUILTIN, "RESOURCEID", (int (*)()) PrintRESOURCEID); (void) DefineType(KEYSYM, BUILTIN, "KEYSYM", (int (*)()) PrintKEYSYM); (void) DefineType(KEYCODE, BUILTIN, "KEYCODE", (int (*)()) PrintKEYCODE); (void) DefineType(KEYCODEA, BUILTIN, "KEYCODEA", (int (*)()) PrintKEYCODEA); (void) DefineType(BUTTON, BUILTIN, "BUTTON", (int (*)()) PrintBUTTON); (void) DefineType(BUTTONA, BUILTIN, "BUTTONA", (int (*)()) PrintBUTTONA); (void) DefineType(EVENTFORM, BUILTIN, "EVENTFORM", (int (*)()) PrintEVENTFORM); } /*----------------------------------------------------------------------*/ void InitEnumeratedTypes() { TYPE p; p = DefineType(REQUEST, ENUMERATED, "REQUEST", (int (*)()) PrintENUMERATED); DefineEValue(p, 1L, "CreateWindow"); DefineEValue(p, 2L, "ChangeWindowAttributes"); DefineEValue(p, 3L, "GetWindowAttributes"); DefineEValue(p, 4L, "DestroyWindow"); DefineEValue(p, 5L, "DestroySubwindows"); DefineEValue(p, 6L, "ChangeSaveSet"); DefineEValue(p, 7L, "ReparentWindow"); DefineEValue(p, 8L, "MapWindow"); DefineEValue(p, 9L, "MapSubwindows"); DefineEValue(p, 10L, "UnmapWindow"); DefineEValue(p, 11L, "UnmapSubwindows"); DefineEValue(p, 12L, "ConfigureWindow"); DefineEValue(p, 13L, "CirculateWindow"); DefineEValue(p, 14L, "GetGeometry"); DefineEValue(p, 15L, "QueryTree"); DefineEValue(p, 16L, "InternAtom"); DefineEValue(p, 17L, "GetAtomName"); DefineEValue(p, 18L, "ChangeProperty"); DefineEValue(p, 19L, "DeleteProperty"); DefineEValue(p, 20L, "GetProperty"); DefineEValue(p, 21L, "ListProperties"); DefineEValue(p, 22L, "SetSelectionOwner"); DefineEValue(p, 23L, "GetSelectionOwner"); DefineEValue(p, 24L, "ConvertSelection"); DefineEValue(p, 25L, "SendEvent"); DefineEValue(p, 26L, "GrabPointer"); DefineEValue(p, 27L, "UngrabPointer"); DefineEValue(p, 28L, "GrabButton"); DefineEValue(p, 29L, "UngrabButton"); DefineEValue(p, 30L, "ChangeActivePointerGrab"); DefineEValue(p, 31L, "GrabKeyboard"); DefineEValue(p, 32L, "UngrabKeyboard"); DefineEValue(p, 33L, "GrabKey"); DefineEValue(p, 34L, "UngrabKey"); DefineEValue(p, 35L, "AllowEvents"); DefineEValue(p, 36L, "GrabServer"); DefineEValue(p, 37L, "UngrabServer"); DefineEValue(p, 38L, "QueryPointer"); DefineEValue(p, 39L, "GetMotionEvents"); DefineEValue(p, 40L, "TranslateCoordinates"); DefineEValue(p, 41L, "WarpPointer"); DefineEValue(p, 42L, "SetInputFocus"); DefineEValue(p, 43L, "GetInputFocus"); DefineEValue(p, 44L, "QueryKeymap"); DefineEValue(p, 45L, "OpenFont"); DefineEValue(p, 46L, "CloseFont"); DefineEValue(p, 47L, "QueryFont"); DefineEValue(p, 48L, "QueryTextExtents"); DefineEValue(p, 49L, "ListFonts"); DefineEValue(p, 50L, "ListFontsWithInfo"); DefineEValue(p, 51L, "SetFontPath"); DefineEValue(p, 52L, "GetFontPath"); DefineEValue(p, 53L, "CreatePixmap"); DefineEValue(p, 54L, "FreePixmap"); DefineEValue(p, 55L, "CreateGC"); DefineEValue(p, 56L, "ChangeGC"); DefineEValue(p, 57L, "CopyGC"); DefineEValue(p, 58L, "SetDashes"); DefineEValue(p, 59L, "SetClipRectangles"); DefineEValue(p, 60L, "FreeGC"); DefineEValue(p, 61L, "ClearArea"); DefineEValue(p, 62L, "CopyArea"); DefineEValue(p, 63L, "CopyPlane"); DefineEValue(p, 64L, "PolyPoint"); DefineEValue(p, 65L, "PolyLine"); DefineEValue(p, 66L, "PolySegment"); DefineEValue(p, 67L, "PolyRectangle"); DefineEValue(p, 68L, "PolyArc"); DefineEValue(p, 69L, "FillPoly"); DefineEValue(p, 70L, "PolyFillRectangle"); DefineEValue(p, 71L, "PolyFillArc"); DefineEValue(p, 72L, "PutImage"); DefineEValue(p, 73L, "GetImage"); DefineEValue(p, 74L, "PolyText8"); DefineEValue(p, 75L, "PolyText16"); DefineEValue(p, 76L, "ImageText8"); DefineEValue(p, 77L, "ImageText16"); DefineEValue(p, 78L, "CreateColormap"); DefineEValue(p, 79L, "FreeColormap"); DefineEValue(p, 80L, "CopyColormapAndFree"); DefineEValue(p, 81L, "InstallColormap"); DefineEValue(p, 82L, "UninstallColormap"); DefineEValue(p, 83L, "ListInstalledColormaps"); DefineEValue(p, 84L, "AllocColor"); DefineEValue(p, 85L, "AllocNamedColor"); DefineEValue(p, 86L, "AllocColorCells"); DefineEValue(p, 87L, "AllocColorPlanes"); DefineEValue(p, 88L, "FreeColors"); DefineEValue(p, 89L, "StoreColors"); DefineEValue(p, 90L, "StoreNamedColor"); DefineEValue(p, 91L, "QueryColors"); DefineEValue(p, 92L, "LookupColor"); DefineEValue(p, 93L, "CreateCursor"); DefineEValue(p, 94L, "CreateGlyphCursor"); DefineEValue(p, 95L, "FreeCursor"); DefineEValue(p, 96L, "RecolorCursor"); DefineEValue(p, 97L, "QueryBestSize"); DefineEValue(p, 98L, "QueryExtension"); DefineEValue(p, 99L, "ListExtensions"); DefineEValue(p, 100L, "ChangeKeyboardMapping"); DefineEValue(p, 101L, "GetKeyboardMapping"); DefineEValue(p, 102L, "ChangeKeyboardControl"); DefineEValue(p, 103L, "GetKeyboardControl"); DefineEValue(p, 104L, "Bell"); DefineEValue(p, 105L, "ChangePointerControl"); DefineEValue(p, 106L, "GetPointerControl"); DefineEValue(p, 107L, "SetScreenSaver"); DefineEValue(p, 108L, "GetScreenSaver"); DefineEValue(p, 109L, "ChangeHosts"); DefineEValue(p, 110L, "ListHosts"); DefineEValue(p, 111L, "SetAccessControl"); DefineEValue(p, 112L, "SetCloseDownMode"); DefineEValue(p, 113L, "KillClient"); DefineEValue(p, 114L, "RotateProperties"); DefineEValue(p, 115L, "ForceScreenSaver"); DefineEValue(p, 116L, "SetPointerMapping"); DefineEValue(p, 117L, "GetPointerMapping"); DefineEValue(p, 118L, "SetModifierMapping"); DefineEValue(p, 119L, "GetModifierMapping"); DefineEValue(p, 127L, "NoOperation"); p = DefineType(REPLY, ENUMERATED, "REPLY", (int (*)()) PrintENUMERATED); DefineEValue(p, 3L, "GetWindowAttributes"); DefineEValue(p, 14L, "GetGeometry"); DefineEValue(p, 15L, "QueryTree"); DefineEValue(p, 16L, "InternAtom"); DefineEValue(p, 17L, "GetAtomName"); DefineEValue(p, 20L, "GetProperty"); DefineEValue(p, 21L, "ListProperties"); DefineEValue(p, 23L, "GetSelectionOwner"); DefineEValue(p, 26L, "GrabPointer"); DefineEValue(p, 31L, "GrabKeyboard"); DefineEValue(p, 38L, "QueryPointer"); DefineEValue(p, 39L, "GetMotionEvents"); DefineEValue(p, 40L, "TranslateCoordinates"); DefineEValue(p, 43L, "GetInputFocus"); DefineEValue(p, 44L, "QueryKeymap"); DefineEValue(p, 47L, "QueryFont"); DefineEValue(p, 48L, "QueryTextExtents"); DefineEValue(p, 49L, "ListFonts"); DefineEValue(p, 50L, "ListFontsWithInfo"); DefineEValue(p, 52L, "GetFontPath"); DefineEValue(p, 73L, "GetImage"); DefineEValue(p, 83L, "ListInstalledColormaps"); DefineEValue(p, 84L, "AllocColor"); DefineEValue(p, 85L, "AllocNamedColor"); DefineEValue(p, 86L, "AllocColorCells"); DefineEValue(p, 87L, "AllocColorPlanes"); DefineEValue(p, 91L, "QueryColors"); DefineEValue(p, 92L, "LookupColor"); DefineEValue(p, 97L, "QueryBestSize"); DefineEValue(p, 98L, "QueryExtension"); DefineEValue(p, 99L, "ListExtensions"); DefineEValue(p, 101L, "GetKeyboardMapping"); DefineEValue(p, 103L, "GetKeyboardControl"); DefineEValue(p, 106L, "GetPointerControl"); DefineEValue(p, 108L, "GetScreenSaver"); DefineEValue(p, 110L, "ListHosts"); DefineEValue(p, 116L, "SetPointerMapping"); DefineEValue(p, 117L, "GetPointerMapping"); DefineEValue(p, 118L, "SetModifierMapping"); DefineEValue(p, 119L, "GetModifierMapping"); p = DefineType(ERROR, ENUMERATED, "ERROR", (int (*)()) PrintENUMERATED); DefineEValue(p, 1L, "Request"); DefineEValue(p, 2L, "Value"); DefineEValue(p, 3L, "Window"); DefineEValue(p, 4L, "Pixmap"); DefineEValue(p, 5L, "Atom"); DefineEValue(p, 6L, "Cursor"); DefineEValue(p, 7L, "Font"); DefineEValue(p, 8L, "Match"); DefineEValue(p, 9L, "Drawable"); DefineEValue(p, 10L, "Access"); DefineEValue(p, 11L, "Alloc"); DefineEValue(p, 12L, "Colormap"); DefineEValue(p, 13L, "GContext"); DefineEValue(p, 14L, "IDChoice"); DefineEValue(p, 15L, "Name"); DefineEValue(p, 16L, "Length"); DefineEValue(p, 17L, "Implementation"); p = DefineType(EVENT, ENUMERATED, "EVENT", (int (*)()) PrintENUMERATED); DefineEValue(p, 2L, "KeyPress"); DefineEValue(p, 3L, "KeyRelease"); DefineEValue(p, 4L, "ButtonPress"); DefineEValue(p, 5L, "ButtonRelease"); DefineEValue(p, 6L, "MotionNotify"); DefineEValue(p, 7L, "EnterNotify"); DefineEValue(p, 8L, "LeaveNotify"); DefineEValue(p, 9L, "FocusIn"); DefineEValue(p, 10L, "FocusOut"); DefineEValue(p, 11L, "KeymapNotify"); DefineEValue(p, 12L, "Expose"); DefineEValue(p, 13L, "GraphicsExposure"); DefineEValue(p, 14L, "NoExposure"); DefineEValue(p, 15L, "VisibilityNotify"); DefineEValue(p, 16L, "CreateNotify"); DefineEValue(p, 17L, "DestroyNotify"); DefineEValue(p, 18L, "UnmapNotify"); DefineEValue(p, 19L, "MapNotify"); DefineEValue(p, 20L, "MapRequest"); DefineEValue(p, 21L, "ReparentNotify"); DefineEValue(p, 22L, "ConfigureNotify"); DefineEValue(p, 23L, "ConfigureRequest"); DefineEValue(p, 24L, "GravityNotify"); DefineEValue(p, 25L, "ResizeRequest"); DefineEValue(p, 26L, "CirculateNotify"); DefineEValue(p, 27L, "CirculateRequest"); DefineEValue(p, 28L, "PropertyNotify"); DefineEValue(p, 29L, "SelectionClear"); DefineEValue(p, 30L, "SelectionRequest"); DefineEValue(p, 31L, "SelectionNotify"); DefineEValue(p, 32L, "ColormapNotify"); DefineEValue(p, 33L, "ClientMessage"); DefineEValue(p, 34L, "MappingNotify"); DefineEValue(p, 0x80L | 2L, "KeyPress (from SendEvent)"); DefineEValue(p, 0x80L | 3L, "KeyRelease (from SendEvent)"); DefineEValue(p, 0x80L | 4L, "ButtonPress (from SendEvent)"); DefineEValue(p, 0x80L | 5L, "ButtonRelease (from SendEvent)"); DefineEValue(p, 0x80L | 6L, "MotionNotify (from SendEvent)"); DefineEValue(p, 0x80L | 7L, "EnterNotify (from SendEvent)"); DefineEValue(p, 0x80L | 8L, "LeaveNotify (from SendEvent)"); DefineEValue(p, 0x80L | 9L, "FocusIn (from SendEvent)"); DefineEValue(p, 0x80L | 10L, "FocusOut (from SendEvent)"); DefineEValue(p, 0x80L | 11L, "KeymapNotify (from SendEvent)"); DefineEValue(p, 0x80L | 12L, "Expose (from SendEvent)"); DefineEValue(p, 0x80L | 13L, "GraphicsExposure (from SendEvent)"); DefineEValue(p, 0x80L | 14L, "NoExposure (from SendEvent)"); DefineEValue(p, 0x80L | 15L, "VisibilityNotify (from SendEvent)"); DefineEValue(p, 0x80L | 16L, "CreateNotify (from SendEvent)"); DefineEValue(p, 0x80L | 17L, "DestroyNotify (from SendEvent)"); DefineEValue(p, 0x80L | 18L, "UnmapNotify (from SendEvent)"); DefineEValue(p, 0x80L | 19L, "MapNotify (from SendEvent)"); DefineEValue(p, 0x80L | 20L, "MapRequest (from SendEvent)"); DefineEValue(p, 0x80L | 21L, "ReparentNotify (from SendEvent)"); DefineEValue(p, 0x80L | 22L, "ConfigureNotify (from SendEvent)"); DefineEValue(p, 0x80L | 23L, "ConfigureRequest (from SendEvent)"); DefineEValue(p, 0x80L | 24L, "GravityNotify (from SendEvent)"); DefineEValue(p, 0x80L | 25L, "ResizeRequest (from SendEvent)"); DefineEValue(p, 0x80L | 26L, "CirculateNotify (from SendEvent)"); DefineEValue(p, 0x80L | 27L, "CirculateRequest (from SendEvent)"); DefineEValue(p, 0x80L | 28L, "PropertyNotify (from SendEvent)"); DefineEValue(p, 0x80L | 29L, "SelectionClear (from SendEvent)"); DefineEValue(p, 0x80L | 30L, "SelectionRequest (from SendEvent)"); DefineEValue(p, 0x80L | 31L, "SelectionNotify (from SendEvent)"); DefineEValue(p, 0x80L | 32L, "ColormapNotify (from SendEvent)"); DefineEValue(p, 0x80L | 33L, "ClientMessage (from SendEvent)"); DefineEValue(p, 0x80L | 34L, "MappingNotify (from SendEvent)"); p = DefineType(BITGRAVITY, ENUMERATED, "BITGRAVITY", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "Forget"); DefineEValue(p, 1L, "NorthWest"); DefineEValue(p, 2L, "North"); DefineEValue(p, 3L, "NorthEast"); DefineEValue(p, 4L, "West"); DefineEValue(p, 5L, "Center"); DefineEValue(p, 6L, "East"); DefineEValue(p, 7L, "SouthWest"); DefineEValue(p, 8L, "South"); DefineEValue(p, 9L, "SouthEast"); DefineEValue(p, 10L, "Static"); p = DefineType(WINGRAVITY, ENUMERATED, "WINGRAVITY", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "Unmap"); DefineEValue(p, 1L, "NorthWest"); DefineEValue(p, 2L, "North"); DefineEValue(p, 3L, "NorthEast"); DefineEValue(p, 4L, "West"); DefineEValue(p, 5L, "Center"); DefineEValue(p, 6L, "East"); DefineEValue(p, 7L, "SouthWest"); DefineEValue(p, 8L, "South"); DefineEValue(p, 9L, "SouthEast"); DefineEValue(p, 10L, "Static"); p = DefineType(BOOL, ENUMERATED, "BOOL", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "False"); DefineEValue(p, 1L, "True"); p = DefineType(HOSTFAMILY, ENUMERATED, "HOSTFAMILY", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "Internet"); DefineEValue(p, 1L, "DECnet"); DefineEValue(p, 2L, "Chaos"); p = DefineType(PK_MODE, ENUMERATED, "PK_MODE", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "Synchronous"); DefineEValue(p, 1L, "Asynchronous"); p = DefineType(NO_YES, ENUMERATED, "NO_YES", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "No"); DefineEValue(p, 1L, "Yes"); DefineEValue(p, 2L, "Default"); p = DefineType(WINDOWCLASS, ENUMERATED, "WINDOWCLASS", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "CopyFromParent"); DefineEValue(p, 1L, "InputOutput"); DefineEValue(p, 2L, "InputOnly"); p = DefineType(BACKSTORE, ENUMERATED, "BACKSTORE", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "NotUseful"); DefineEValue(p, 1L, "WhenMapped"); DefineEValue(p, 2L, "Always"); p = DefineType(MAPSTATE, ENUMERATED, "MAPSTATE", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "Unmapped"); DefineEValue(p, 1L, "Unviewable"); DefineEValue(p, 2L, "Viewable"); p = DefineType(STACKMODE, ENUMERATED, "STACKMODE", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "Above"); DefineEValue(p, 1L, "Below"); DefineEValue(p, 2L, "TopIf"); DefineEValue(p, 3L, "BottomIf"); DefineEValue(p, 4L, "Opposite"); p = DefineType(CIRMODE, ENUMERATED, "CIRMODE", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "RaiseLowest"); DefineEValue(p, 1L, "LowerHighest"); p = DefineType(CHANGEMODE, ENUMERATED, "CHANGEMODE", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "Replace"); DefineEValue(p, 1L, "Prepend"); DefineEValue(p, 2L, "Append"); p = DefineType(GRABSTAT, ENUMERATED, "GRABSTAT", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "Success"); DefineEValue(p, 1L, "AlreadyGrabbed"); DefineEValue(p, 2L, "InvalidTime"); DefineEValue(p, 3L, "NotViewable"); DefineEValue(p, 4L, "Frozen"); p = DefineType(EVENTMODE, ENUMERATED, "EVENTMODE", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "AsyncPointer"); DefineEValue(p, 1L, "SyncPointer"); DefineEValue(p, 2L, "ReplayPointer"); DefineEValue(p, 3L, "AsyncKeyboard"); DefineEValue(p, 4L, "SyncKeyboard"); DefineEValue(p, 5L, "ReplayKeyboard"); DefineEValue(p, 6L, "AsyncBoth"); DefineEValue(p, 7L, "SyncBoth"); p = DefineType(FOCUSAGENT, ENUMERATED, "FOCUSAGENT", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "None"); DefineEValue(p, 1L, "PointerRoot"); DefineEValue(p, 2L, "Parent"); p = DefineType(DIRECT, ENUMERATED, "DIRECT", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "LeftToRight"); DefineEValue(p, 1L, "RightToLeft"); p = DefineType(GCFUNC, ENUMERATED, "GCFUNC", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "Clear"); DefineEValue(p, 1L, "And"); DefineEValue(p, 2L, "AndReverse"); DefineEValue(p, 3L, "Copy"); DefineEValue(p, 4L, "AndInverted"); DefineEValue(p, 5L, "Noop"); DefineEValue(p, 6L, "Xor"); DefineEValue(p, 7L, "Or"); DefineEValue(p, 8L, "Nor"); DefineEValue(p, 9L, "Equiv"); DefineEValue(p, 10L, "Invert"); DefineEValue(p, 11L, "OrReverse"); DefineEValue(p, 12L, "CopyInverted"); DefineEValue(p, 13L, "OrInverted"); DefineEValue(p, 14L, "Nand"); DefineEValue(p, 15L, "Set"); p = DefineType(LINESTYLE, ENUMERATED, "LINESTYLE", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "Solid"); DefineEValue(p, 1L, "OnOffDash"); DefineEValue(p, 2L, "DoubleDash"); p = DefineType(CAPSTYLE, ENUMERATED, "CAPSTYLE", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "NotLast"); DefineEValue(p, 1L, "Butt"); DefineEValue(p, 2L, "Round"); DefineEValue(p, 3L, "Projecting"); p = DefineType(JOINSTYLE, ENUMERATED, "JOINSTYLE", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "Miter"); DefineEValue(p, 1L, "Round"); DefineEValue(p, 2L, "Bevel"); p = DefineType(FILLSTYLE, ENUMERATED, "FILLSTYLE", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "Solid"); DefineEValue(p, 1L, "Tiled"); DefineEValue(p, 2L, "Stippled"); DefineEValue(p, 3L, "OpaqueStippled"); p = DefineType(FILLRULE, ENUMERATED, "FILLRULE", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "EvenOdd"); DefineEValue(p, 1L, "Winding"); p = DefineType(SUBWINMODE, ENUMERATED, "SUBWINMODE", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "ClipByChildren"); DefineEValue(p, 1L, "IncludeInferiors"); p = DefineType(ARCMODE, ENUMERATED, "ARCMODE", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "Chord"); DefineEValue(p, 1L, "PieSlice"); p = DefineType(RECTORDER, ENUMERATED, "RECTORDER", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "UnSorted"); DefineEValue(p, 1L, "YSorted"); DefineEValue(p, 2L, "YXSorted"); DefineEValue(p, 3L, "YXBanded"); p = DefineType(COORMODE, ENUMERATED, "COORMODE", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "Origin"); DefineEValue(p, 1L, "Previous"); p = DefineType(POLYSHAPE, ENUMERATED, "POLYSHAPE", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "Complex"); DefineEValue(p, 1L, "Nonconvex"); DefineEValue(p, 2L, "Convex"); p = DefineType(IMAGEMODE, ENUMERATED, "IMAGEMODE", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "Bitmap"); DefineEValue(p, 1L, "XYPixmap"); DefineEValue(p, 2L, "ZPixmap"); p = DefineType(ALLORNONE, ENUMERATED, "ALLORNONE", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "None"); DefineEValue(p, 1L, "All"); p = DefineType(OBJECTCLASS, ENUMERATED, "OBJECTCLASS", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "Cursor"); DefineEValue(p, 1L, "Tile"); DefineEValue(p, 2L, "Stipple"); p = DefineType(OFF_ON, ENUMERATED, "OFF_ON", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "Off"); DefineEValue(p, 1L, "On"); DefineEValue(p, 2L, "Default"); p = DefineType(INS_DEL, ENUMERATED, "INS_DEL", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "Insert"); DefineEValue(p, 1L, "Delete"); p = DefineType(DIS_EN, ENUMERATED, "DIS_EN", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "Disabled"); DefineEValue(p, 1L, "Enabled"); p = DefineType(CLOSEMODE, ENUMERATED, "CLOSEMODE", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "Destroy"); DefineEValue(p, 1L, "RetainPermanent"); DefineEValue(p, 2L, "RetainTemporary"); p = DefineType(SAVEMODE, ENUMERATED, "SAVEMODE", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "Reset"); DefineEValue(p, 1L, "Activate"); p = DefineType(RSTATUS, ENUMERATED, "RSTATUS", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "Success"); DefineEValue(p, 1L, "Busy"); DefineEValue(p, 2L, "Failed"); p = DefineType(MOTIONDETAIL, ENUMERATED, "MOTIONDETAIL", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "Normal"); DefineEValue(p, 1L, "Hint"); p = DefineType(ENTERDETAIL, ENUMERATED, "ENTERDETAIL", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "Ancestor"); DefineEValue(p, 1L, "Virtual"); DefineEValue(p, 2L, "Inferior"); DefineEValue(p, 3L, "Nonlinear"); DefineEValue(p, 4L, "NonlinearVirtual"); DefineEValue(p, 5L, "Pointer"); DefineEValue(p, 6L, "PointerRoot"); DefineEValue(p, 7L, "None"); p = DefineType(BUTTONMODE, ENUMERATED, "BUTTONMODE", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "Normal"); DefineEValue(p, 1L, "Grab"); DefineEValue(p, 2L, "Ungrab"); DefineEValue(p, 3L, "WhileGrabbed"); p = DefineType(VISIBLE, ENUMERATED, "VISIBLE", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "Unobscured"); DefineEValue(p, 1L, "PartiallyObscured"); DefineEValue(p, 2L, "FullyObscured"); p = DefineType(CIRSTAT, ENUMERATED, "CIRSTAT", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "Top"); DefineEValue(p, 1L, "Bottom"); p = DefineType(PROPCHANGE, ENUMERATED, "PROPCHANGE", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "NewValue"); DefineEValue(p, 1L, "Deleted"); p = DefineType(CMAPCHANGE, ENUMERATED, "CMAPCHANGE", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "Uninstalled"); DefineEValue(p, 1L, "Installed"); p = DefineType(MAPOBJECT, ENUMERATED, "MAPOBJECT", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "Modifier"); DefineEValue(p, 1L, "Keyboard"); DefineEValue(p, 2L, "Pointer"); p = DefineType(BYTEMODE, ENUMERATED, "BYTEMODE", (int (*)()) PrintENUMERATED); DefineEValue(p, 0x42L, "MSB first"); DefineEValue(p, 0x6CL, "LSB first"); p = DefineType(BYTEORDER, ENUMERATED, "BYTEORDER", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "LSB first"); DefineEValue(p, 1L, "MSB first"); p = DefineType(COLORCLASS, ENUMERATED, "COLORCLASS", (int (*)()) PrintENUMERATED); DefineEValue(p, 0L, "StaticGray"); DefineEValue(p, 1L, "GrayScale"); DefineEValue(p, 2L, "StaticColor"); DefineEValue(p, 3L, "PseudoColor"); DefineEValue(p, 4L, "TrueColor"); DefineEValue(p, 5L, "DirectColor"); } /*----------------------------------------------------------------------*/ void InitSetTypes() { TYPE p; p = DefineType(SETofEVENT, SET, "SETofEVENT", (int (*)()) PrintSET); DefineEValue(p, 0x00000001L, "KeyPress"); DefineEValue(p, 0x00000002L, "KeyRelease"); DefineEValue(p, 0x00000004L, "ButtonPress"); DefineEValue(p, 0x00000008L, "ButtonRelease"); DefineEValue(p, 0x00000010L, "EnterWindow"); DefineEValue(p, 0x00000020L, "LeaveWindow"); DefineEValue(p, 0x00000040L, "PointerMotion"); DefineEValue(p, 0x00000080L, "PointerMotionHint"); DefineEValue(p, 0x00000100L, "Button1Motion"); DefineEValue(p, 0x00000200L, "Button2Motion"); DefineEValue(p, 0x00000400L, "Button3Motion"); DefineEValue(p, 0x00000800L, "Button4Motion"); DefineEValue(p, 0x00001000L, "Button5Motion"); DefineEValue(p, 0x00002000L, "ButtonMotion"); DefineEValue(p, 0x00004000L, "KeymapState"); DefineEValue(p, 0x00008000L, "Exposure"); DefineEValue(p, 0x00010000L, "VisibilityChange"); DefineEValue(p, 0x00020000L, "StructureNotify"); DefineEValue(p, 0x00040000L, "ResizeRedirect"); DefineEValue(p, 0x00080000L, "SubstructureNotify"); DefineEValue(p, 0x00100000L, "SubstructureRedirect"); DefineEValue(p, 0x00200000L, "FocusChange"); DefineEValue(p, 0x00400000L, "PropertyChange"); DefineEValue(p, 0x00800000L, "ColormapChange"); DefineEValue(p, 0x01000000L, "OwnerGrabButton"); p = DefineType(SETofPOINTEREVENT, SET, "SETofPOINTEREVENT", (int (*)()) PrintSET); DefineEValue(p, 0x00000004L, "ButtonPress"); DefineEValue(p, 0x00000008L, "ButtonRelease"); DefineEValue(p, 0x00000010L, "EnterWindow"); DefineEValue(p, 0x00000020L, "LeaveWindow"); DefineEValue(p, 0x00000040L, "PointerMotion"); DefineEValue(p, 0x00000080L, "PointerMotionHint"); DefineEValue(p, 0x00000100L, "Button1Motion"); DefineEValue(p, 0x00000200L, "Button2Motion"); DefineEValue(p, 0x00000400L, "Button3Motion"); DefineEValue(p, 0x00000800L, "Button4Motion"); DefineEValue(p, 0x00001000L, "Button5Motion"); DefineEValue(p, 0x00002000L, "ButtonMotion"); DefineEValue(p, 0x00004000L, "KeymapState"); p = DefineType(SETofDEVICEEVENT, SET, "SETofDEVICEEVENT", (int (*)()) PrintSET); DefineEValue(p, 0x00000001L, "KeyPress"); DefineEValue(p, 0x00000002L, "KeyRelease"); DefineEValue(p, 0x00000004L, "ButtonPress"); DefineEValue(p, 0x00000008L, "ButtonRelease"); DefineEValue(p, 0x00000040L, "PointerMotion"); DefineEValue(p, 0x00000100L, "Button1Motion"); DefineEValue(p, 0x00000200L, "Button2Motion"); DefineEValue(p, 0x00000400L, "Button3Motion"); DefineEValue(p, 0x00000800L, "Button4Motion"); DefineEValue(p, 0x00001000L, "Button5Motion"); DefineEValue(p, 0x00002000L, "ButtonMotion"); p = DefineType(SETofKEYBUTMASK, SET, "SETofKEYBUTMASK", (int (*)()) PrintSET); DefineEValue(p, 0x0001L, "Shift"); DefineEValue(p, 0x0002L, "Lock"); DefineEValue(p, 0x0004L, "Control"); DefineEValue(p, 0x0008L, "Mod1"); DefineEValue(p, 0x0010L, "Mod2"); DefineEValue(p, 0x0020L, "Mod3"); DefineEValue(p, 0x0040L, "Mod4"); DefineEValue(p, 0x0080L, "Mod5"); DefineEValue(p, 0x0100L, "Button1"); DefineEValue(p, 0x0200L, "Button2"); DefineEValue(p, 0x0400L, "Button3"); DefineEValue(p, 0x0800L, "Button4"); DefineEValue(p, 0x1000L, "Button5"); p = DefineType(SETofKEYMASK, SET, "SETofKEYMASK", (int (*)()) PrintSET); DefineEValue(p, 0x0001L, "Shift"); DefineEValue(p, 0x0002L, "Lock"); DefineEValue(p, 0x0004L, "Control"); DefineEValue(p, 0x0008L, "Mod1"); DefineEValue(p, 0x0010L, "Mod2"); DefineEValue(p, 0x0020L, "Mod3"); DefineEValue(p, 0x0040L, "Mod4"); DefineEValue(p, 0x0080L, "Mod5"); DefineEValue(p, 0x8000L, "AnyModifier"); p = DefineType(COLORMASK, SET, "COLORMASK", (int (*)()) PrintSET); DefineEValue(p, 0x01L, "do-red"); DefineEValue(p, 0x02L, "do-green"); DefineEValue(p, 0x04L, "do-blue"); p = DefineType(SCREENFOCUS, SET, "SCREENFOCUS", (int (*)()) PrintSET); DefineEValue(p, 0x01L, "focus"); DefineEValue(p, 0x02L, "same-screen"); } /*----------------------------------------------------------------------*/ /* Print Routines for builtin record types */ void PrintCHAR2B(buf) unsigned char *buf; { PrintField(buf, 0, 1, CARD8, "byte1"); PrintField(buf, 1, 1, CARD8, "byte2"); } /*----------------------------------------------------------------------*/ int PrintPOINT(buf) unsigned char *buf; { PrintField(buf, 0, 2, INT16, "x"); PrintField(buf, 2, 2, INT16, "y"); return (4); } /*----------------------------------------------------------------------*/ int PrintRECTANGLE(buf) unsigned char *buf; { PrintField(buf, 0, 2, INT16, "x"); PrintField(buf, 2, 2, INT16, "y"); PrintField(buf, 4, 2, CARD16, "width"); PrintField(buf, 6, 2, CARD16, "height"); return (8); } /*----------------------------------------------------------------------*/ int PrintARC(buf) unsigned char *buf; { PrintField(buf, 0, 2, INT16, "x"); PrintField(buf, 2, 2, INT16, "y"); PrintField(buf, 4, 2, CARD16, "width"); PrintField(buf, 6, 2, CARD16, "height"); PrintField(buf, 8, 2, INT16, "angle1"); PrintField(buf, 10, 2, INT16, "angle2"); return (12); } /*----------------------------------------------------------------------*/ int PrintHOST(buf) unsigned char *buf; { short n; PrintField(buf, 0, 1, HOSTFAMILY, "family"); PrintField(buf, 2, 2, DVALUE2(n), "length of address"); n = IShort(&buf[2]); (void) PrintList(&buf[4], (long) n, BYTE, "address"); return (pad((long) (4 + n))); } /*----------------------------------------------------------------------*/ int PrintTIMECOORD(buf) unsigned char *buf; { PrintField(buf, 0, 4, TIMESTAMP, "time"); PrintField(buf, 4, 2, CARD16, "x"); PrintField(buf, 6, 2, CARD16, "y"); return (8); } /*----------------------------------------------------------------------*/ int PrintFONTPROP(buf) unsigned char *buf; { PrintField(buf, 0, 4, ATOM, "name"); PrintField(buf, 4, 4, INT32, "value"); return (8); } /*----------------------------------------------------------------------*/ int PrintCHARINFO(buf) unsigned char *buf; { PrintField(buf, 0, 2, INT16, "left-side-bearing"); PrintField(buf, 2, 2, INT16, "right-side-bearing"); PrintField(buf, 4, 2, INT16, "character-width"); PrintField(buf, 6, 2, INT16, "ascent"); PrintField(buf, 8, 2, INT16, "descent"); PrintField(buf, 10, 2, CARD16, "attributes"); return (12); } /*----------------------------------------------------------------------*/ int PrintSEGMENT(buf) unsigned char *buf; { PrintField(buf, 0, 2, INT16, "x1"); PrintField(buf, 2, 2, INT16, "y1"); PrintField(buf, 4, 2, INT16, "x2"); PrintField(buf, 6, 2, INT16, "y2"); return (8); } /*----------------------------------------------------------------------*/ int PrintCOLORITEM(buf) unsigned char *buf; { PrintField(buf, 0, 4, CARD32, "pixel"); PrintField(buf, 4, 2, CARD16, "red"); PrintField(buf, 6, 2, CARD16, "green"); PrintField(buf, 8, 2, CARD16, "blue"); PrintField(buf, 10, 1, COLORMASK, "component selector"); return (12); } /*----------------------------------------------------------------------*/ int PrintRGB(buf) unsigned char *buf; { PrintField(buf, 0, 2, CARD16, "red"); PrintField(buf, 2, 2, CARD16, "green"); PrintField(buf, 4, 2, CARD16, "blue"); return (8); } /*----------------------------------------------------------------------*/ int PrintFORMAT(buf) unsigned char *buf; { PrintField(buf, 0, 1, CARD8, "depth"); PrintField(buf, 1, 1, CARD8, "bits-per-pixel"); PrintField(buf, 2, 1, CARD8, "scanline-pad"); return (8); } /*----------------------------------------------------------------------*/ int PrintSCREEN(buf) unsigned char *buf; { short n /* number of elements in List of DEPTH */ ; long m /* length (in bytes) of List of DEPTH */ ; PrintField(buf, 0, 4, WINDOW, "root"); PrintField(buf, 4, 4, COLORMAP, "default-colormap"); PrintField(buf, 8, 4, CARD32, "white-pixel"); PrintField(buf, 12, 4, CARD32, "black-pixel"); PrintField(buf, 16, 4, SETofEVENT, "current-input-masks"); PrintField(buf, 20, 2, CARD16, "width-in-pixels"); PrintField(buf, 22, 2, CARD16, "height-in-pixels"); PrintField(buf, 24, 2, CARD16, "width-in-millimeters"); PrintField(buf, 26, 2, CARD16, "height-in-millimeters"); PrintField(buf, 28, 2, CARD16, "min-installed-maps"); PrintField(buf, 30, 2, CARD16, "max-installed-maps"); PrintField(buf, 32, 4, VISUALID, "root-visual"); PrintField(buf, 36, 1, BACKSTORE, "backing-stores"); PrintField(buf, 37, 1, BOOL, "save-unders"); PrintField(buf, 38, 1, CARD8, "root-depth"); PrintField(buf, 39, 1, CARD8, "number of allowed-depths"); n = IByte(&buf[39]); m = PrintList(&buf[40], (long) n, DEPTH, "allowed-depths"); return (40 + m); } /*----------------------------------------------------------------------*/ int PrintDEPTH(buf) unsigned char *buf; { short n /* number of elements in List of VISUALTYPE */ ; short m /* length (in bytes) of List of VISUALTYPE */ ; PrintField(buf, 0, 1, CARD8, "depth"); PrintField(buf, 2, 2, DVALUE2(n), "number of visuals"); n = IShort(&buf[2]); m = PrintList(&buf[8], (long) n, VISUALTYPE, "visuals"); return (8 + m); } /*----------------------------------------------------------------------*/ int PrintVISUALTYPE(buf) unsigned char *buf; { PrintField(buf, 0, 4, VISUALID, "visual-id"); PrintField(buf, 4, 1, COLORCLASS, "class"); PrintField(buf, 5, 1, CARD8, "bits-per-rgb-value"); PrintField(buf, 6, 2, CARD16, "colormap-entries"); PrintField(buf, 8, 4, CARD32, "red-mask"); PrintField(buf, 12, 4, CARD32, "green-mask"); PrintField(buf, 16, 4, CARD32, "blue-mask"); return (24); } /*----------------------------------------------------------------------*/ void InitRecordTypes() { (void) DefineType(CHAR2B, RECORD, "CHAR2B", (int (*)()) PrintCHAR2B); (void) DefineType(POINT, RECORD, "POINT", (int (*)()) PrintPOINT); (void) DefineType(RECTANGLE, RECORD, "RECTANGLE", (int (*)()) PrintRECTANGLE); (void) DefineType(ARC, RECORD, "ARC", (int (*)()) PrintARC); (void) DefineType(HOST, RECORD, "HOST", (int (*)()) PrintHOST); (void) DefineType(TIMECOORD, RECORD, "TIMECOORD", (int (*)()) PrintTIMECOORD); (void) DefineType(FONTPROP, RECORD, "FONTPROP", (int (*)()) PrintFONTPROP); (void) DefineType(CHARINFO, RECORD, "CHARINFO", (int (*)()) PrintCHARINFO); (void) DefineType(SEGMENT, RECORD, "SEGMENT", (int (*)()) PrintSEGMENT); (void) DefineType(COLORITEM, RECORD, "COLORITEM", (int (*)()) PrintCOLORITEM); (void) DefineType(RGB, RECORD, "RGB", (int (*)()) PrintRGB); (void) DefineType(FORMAT, RECORD, "FORMAT", (int (*)()) PrintFORMAT); (void) DefineType(SCREEN, RECORD, "SCREEN", (int (*)()) PrintSCREEN); (void) DefineType(DEPTH, RECORD, "DEPTH", (int (*)()) PrintDEPTH); (void) DefineType(VISUALTYPE, RECORD, "VISUALTYPE", (int (*)()) PrintVISUALTYPE); } /*----------------------------------------------------------------------*/ void InitValuesTypes() { TYPE p; p = DefineType(WINDOW_BITMASK, SET, "WINDOW_BITMASK", (int (*)()) PrintSET); DefineValues(p, 0x00000001L, 4, PIXMAPNPR, "background-pixmap"); DefineValues(p, 0x00000002L, 4, CARD32, "background-pixel"); DefineValues(p, 0x00000004L, 4, PIXMAPC, "border-pixmap"); DefineValues(p, 0x00000008L, 4, CARD32, "border-pixel"); DefineValues(p, 0x00000010L, 1, BITGRAVITY, "bit-gravity"); DefineValues(p, 0x00000020L, 1, WINGRAVITY, "win-gravity"); DefineValues(p, 0x00000040L, 1, BACKSTORE, "backing-store"); DefineValues(p, 0x00000080L, 4, CARD32, "backing-planes"); DefineValues(p, 0x00000100L, 4, CARD32, "backing-pixel"); DefineValues(p, 0x00000200L, 1, BOOL, "override-redirect"); DefineValues(p, 0x00000400L, 1, BOOL, "save-under"); DefineValues(p, 0x00000800L, 4, SETofEVENT, "event-mask"); DefineValues(p, 0x00001000L, 4, SETofDEVICEEVENT, "do-not-propagate-mask"); DefineValues(p, 0x00002000L, 4, COLORMAPC, "colormap"); DefineValues(p, 0x00004000L, 4, CURSOR, "cursor"); p = DefineType(CONFIGURE_BITMASK, SET, "CONFIGURE_BITMASK", (int (*)()) PrintSET); DefineValues(p, 0x0001L, 2, INT16, "x"); DefineValues(p, 0x0002L, 2, INT16, "y"); DefineValues(p, 0x0004L, 2, CARD16, "width"); DefineValues(p, 0x0008L, 2, CARD16, "height"); DefineValues(p, 0x0010L, 2, CARD16, "border-width"); DefineValues(p, 0x0020L, 4, WINDOW, "sibling"); DefineValues(p, 0x0040L, 1, STACKMODE, "stack-mode"); p = DefineType(GC_BITMASK, SET, "GC_BITMASK", (int (*)()) PrintSET); DefineValues(p, 0x00000001L, 1, GCFUNC, "function"); DefineValues(p, 0x00000002L, 4, CARD32, "plane-mask"); DefineValues(p, 0x00000004L, 4, CARD32, "foreground"); DefineValues(p, 0x00000008L, 4, CARD32, "background"); DefineValues(p, 0x00000010L, 2, CARD16, "line-width"); DefineValues(p, 0x00000020L, 1, LINESTYLE, "line-style"); DefineValues(p, 0x00000040L, 1, CAPSTYLE, "cap-style"); DefineValues(p, 0x00000080L, 1, JOINSTYLE, "join-style"); DefineValues(p, 0x00000100L, 1, FILLSTYLE, "fill-style"); DefineValues(p, 0x00000200L, 1, FILLRULE, "fill-rule"); DefineValues(p, 0x00000400L, 4, PIXMAP, "tile"); DefineValues(p, 0x00000800L, 4, PIXMAP, "stipple"); DefineValues(p, 0x00001000L, 2, INT16, "tile-stipple-x-origin"); DefineValues(p, 0x00002000L, 2, INT16, "tile-stipple-y-origin"); DefineValues(p, 0x00004000L, 4, FONT, "font"); DefineValues(p, 0x00008000L, 1, SUBWINMODE, "subwindow-mode"); DefineValues(p, 0x00010000L, 1, BOOL, "graphics-exposures"); DefineValues(p, 0x00020000L, 2, INT16, "clip-x-origin"); DefineValues(p, 0x00040000L, 2, INT16, "clip-y-origin"); DefineValues(p, 0x00080000L, 4, PIXMAP, "clip-mask"); DefineValues(p, 0x00100000L, 2, CARD16, "dash-offset"); DefineValues(p, 0x00200000L, 1, CARD8, "dashes"); DefineValues(p, 0x00400000L, 1, ARCMODE, "arc-mode"); p = DefineType(KEYBOARD_BITMASK, SET, "KEYBOARD_BITMASK", (int (*)()) PrintSET); DefineValues(p, 0x0001L, 1, INT8, "key-click-percent"); DefineValues(p, 0x0002L, 1, INT8, "bell-percent"); DefineValues(p, 0x0004L, 2, INT16, "bell-pitch"); DefineValues(p, 0x0008L, 2, INT16, "bell-duration"); DefineValues(p, 0x0010L, 1, CARD8, "led"); DefineValues(p, 0x0020L, 1, OFF_ON, "led-mode"); DefineValues(p, 0x0040L, 1, KEYCODE, "key"); DefineValues(p, 0x0080L, 1, OFF_ON, "auto-repeat-mode"); } xlab-980917mine/table11.h100664 71506 1605 2563 6745313400 14275 0ustar hildebinstall/* * $Id: table11.h,v 1.1 1998/07/24 11:59:19 marc Exp $ * * Prototypes for functions impplemented in table11.c * * (c) Copyright Marc Vertes, 1998 */ #ifndef _TABLE11_H_ #define _TABLE11_H_ #if __STDC__ || defined(__cplusplus) #define P_(s) s #else #define P_(s) () #endif /* table11.c */ void InitializeX11 P_((void)); TYPE DefineType P_((int typeid, int class, char *name, int (*printproc)(void))); void DefineEValue P_((TYPE type, long value, char *name)); void DefineValues P_((TYPE type, long value, int length, int ctype, char *name)); void InitBuiltInTypes P_((void)); void InitEnumeratedTypes P_((void)); void InitSetTypes P_((void)); void PrintCHAR2B P_((unsigned char *buf)); int PrintPOINT P_((unsigned char *buf)); int PrintRECTANGLE P_((unsigned char *buf)); int PrintARC P_((unsigned char *buf)); int PrintHOST P_((unsigned char *buf)); int PrintTIMECOORD P_((unsigned char *buf)); int PrintFONTPROP P_((unsigned char *buf)); int PrintCHARINFO P_((unsigned char *buf)); int PrintSEGMENT P_((unsigned char *buf)); int PrintCOLORITEM P_((unsigned char *buf)); int PrintRGB P_((unsigned char *buf)); int PrintFORMAT P_((unsigned char *buf)); int PrintSCREEN P_((unsigned char *buf)); int PrintDEPTH P_((unsigned char *buf)); int PrintVISUALTYPE P_((unsigned char *buf)); void InitRecordTypes P_((void)); void InitValuesTypes P_((void)); #undef P_ #endif /* _TABLE11_H_ */ xlab-980917mine/x11.h100664 71506 1605 35247 6745313400 13502 0ustar hildebinstall/* * $Id: x11.h,v 1.3 1998/07/24 11:59:20 marc Exp $ * * Type definitions and Connection State for the X11 protocol * * James Peterson, 1988 * (c) Copyright MCC, 1988 * (c) Marc Vertes, 1998 */ #ifndef _x11_H_ #define _x11_H /* Some field contents are constants, not just types */ #define CONST1(n) CARD8 #define CONST2(n) CARD16 #define CONST4(n) CARD32 /* Some field contents define the components of an expression */ #define DVALUE1(expression) CARD8 #define DVALUE2(expression) CARD16 #define DVALUE4(expression) CARD32 /*----------------------------------------------------------------------*/ /* Built-in Types */ #define BYTE 1 /* 8-bit value */ #define INT8 2 /* 8-bit signed integer */ #define INT16 3 /* 16-bit signed integer */ #define INT32 4 /* 32-bit signed integer */ #define CARD8 5 /* 8-bit unsigned integer */ #define CARD16 6 /* 16-bit unsigned integer */ #define CARD32 7 /* 32-bit unsigned integer */ #define STRING8 8 /* List of CARD8 */ #define STRING16 9 /* List of CHAR2B */ #define TEXTITEM8 10 /* STRING8 or Font shift */ #define TEXTITEM16 11 /* STRING16 or Font shift */ #define WINDOW 12 /* CARD32 plus 0 = None */ #define WINDOWD 13 /* CARD32 plus 0 = PointerWindow, 1 = InputFocus */ #define WINDOWNR 14 /* CARD32 plus 0 = None, 1 = PointerRoot */ #define PIXMAP 15 /* CARD32 plus 0 = None */ #define PIXMAPNPR 16 /* CARD32 plus 0 = None, 1 = ParentRelative */ #define PIXMAPC 17 /* CARD32 plus 0 = CopyFromParent */ #define CURSOR 18 /* CARD32 plus 0 = None */ #define FONT 19 /* CARD32 plus 0 = None */ #define GCONTEXT 20 /* CARD32 */ #define COLORMAP 21 /* CARD32 plus 0 = None */ #define COLORMAPC 22 /* CARD32 plus 0 = CopyFromParent */ #define DRAWABLE 23 /* CARD32 */ #define FONTABLE 24 /* CARD32 */ #define ATOM 25 /* CARD32 plus 0 = None */ #define ATOMT 26 /* CARD32 plus 0 = AnyPropertyType */ #define VISUALID 27 /* CARD32 plus 0 = None */ #define VISUALIDC 28 /* CARD32 plus 0 = CopyFromParent */ #define TIMESTAMP 29 /* CARD32 plus 0 as the current time */ #define RESOURCEID 30 /* CARD32 plus 0 = AllTemporary */ #define KEYSYM 31 /* CARD32 */ #define KEYCODE 32 /* CARD8 */ #define KEYCODEA 33 /* CARD8 plus 0 = AnyKey */ #define BUTTON 34 /* CARD8 */ #define BUTTONA 35 /* CARD8 plus 0 = AnyButton */ #define EVENTFORM 36 /* event format */ #define CHAR8 37 /* CARD8 interpreted as a character */ #define STR 38 /* String of CHAR8 with preceding length */ /*----------------------------------------------------------------------*/ /* Defined types */ #define BITGRAVITY 40 #define WINGRAVITY 41 #define BOOL 42 #define HOSTFAMILY 43 #define PK_MODE 44 #define NO_YES 45 #define WINDOWCLASS 46 #define BACKSTORE 47 #define MAPSTATE 48 #define STACKMODE 49 #define CIRMODE 50 #define CHANGEMODE 51 #define GRABSTAT 52 #define EVENTMODE 53 #define FOCUSAGENT 54 #define DIRECT 55 #define GCFUNC 56 #define LINESTYLE 57 #define CAPSTYLE 58 #define JOINSTYLE 59 #define FILLSTYLE 60 #define FILLRULE 61 #define SUBWINMODE 62 #define ARCMODE 63 #define RECTORDER 64 #define COORMODE 65 #define POLYSHAPE 66 #define IMAGEMODE 67 #define ALLORNONE 68 #define OBJECTCLASS 69 #define OFF_ON 70 #define INS_DEL 71 #define DIS_EN 72 #define CLOSEMODE 73 #define SAVEMODE 74 #define RSTATUS 75 #define MOTIONDETAIL 76 #define ENTERDETAIL 77 #define BUTTONMODE 78 #define SCREENFOCUS 79 #define VISIBLE 80 #define CIRSTAT 81 #define PROPCHANGE 82 #define CMAPCHANGE 83 #define MAPOBJECT 84 #define SETofEVENT 85 #define SETofPOINTEREVENT 86 #define SETofDEVICEEVENT 87 #define SETofKEYBUTMASK 88 #define SETofKEYMASK 89 #define WINDOW_BITMASK 90 #define CONFIGURE_BITMASK 91 #define GC_BITMASK 92 #define KEYBOARD_BITMASK 93 #define COLORMASK 94 #define CHAR2B 95 #define POINT 96 #define RECTANGLE 97 #define ARC 98 #define HOST 99 #define TIMECOORD 100 #define FONTPROP 101 #define CHARINFO 102 #define SEGMENT 103 #define COLORITEM 104 #define RGB 105 #define BYTEMODE 110 #define BYTEORDER 111 #define COLORCLASS 112 #define FORMAT 113 #define SCREEN 114 #define DEPTH 115 #define VISUALTYPE 116 #define REQUEST 117 #define REPLY 118 #define ERROR 119 #define EVENT 120 #define MaxTypes 128 /* Type Definition Table Each item in the X11 Protocol has a type. There are about 120 different types. We need to be able to print each item in a format and interpretation which is appropriate for the type of that item. To do so, we build a table describing each type. Each type has a name, possibly a list of named values and a procedure which knows how to print that type. */ /* Types of Types */ #define BUILTIN 1 #define ENUMERATED 2 #define SET 3 #define RECORD 5 /* Enumerated and Set types need a list of Named Values */ struct ValueListEntry { struct ValueListEntry *Next; char *Name; short Type; short Length; long Value; }; struct TypeDef { char *Name; short Type /* BUILTIN, ENUMERATED, SET, or RECORD */ ; struct ValueListEntry *ValueList; int (*PrintProc) (); }; typedef struct TypeDef *TYPE; extern struct TypeDef TD[MaxTypes]; /*----------------------------------------------------------------------*/ /* Reply Buffer: Pseudo-buffer used to provide the opcode for the request to which this is a reply: Set by DecodeReply and used in the PrintField of the Reply procedure */ extern unsigned char RBf[2]; /* Sequence Buffer: Pseudo-buffer used to provide the sequence number for a request: Set by DecodeReply and used in a PrintField of the Request procedure */ extern unsigned char SBf[4]; #define PRINTSERVER 5 /* indent output as if it comes from server */ #define PRINTCLIENT 1 /* indent output as if it comes from client */ /* * this defines the number of resources per connection for * which we keep a status field */ #define MAXRESOURCESTATUS 1024 /* * this defines what we know about the resources * in our per-resource status data base */ typedef unsigned char ResStatus; #define RES_Unseen 0 #define RES_Seen 1 #define RES_Mapped 2 #define RES_Unmapped 3 /* if this bit is set, somebody's waiting for the resource to be seen */ #define RES_Waiting 128 /*----------------------------------------------------------------------*/ /* In general, we are called with a buffer of bytes and are supposed to try to make sense of these bytes according to the X11 protocol. There are two different types of communication: requests from the client to the server and replies/errors/events from the server to the client. We must interpret these two differently. Also, we must consider that the bytes on the communication socket may be sent asynchronously in any amount. This means that we must be prepared to read in and save some bytes until we get enough to do something with them. For example, suppose that we get a buffer from a client. We would expect it to be a request. The request may be 24 bytes long. We may find, however, that only 16 bytes have actually arrived -- the other 8 are stuck in a buffer somewhere. We must be prepared to simply hold the 16 bytes we have until more bytes arrive. In general, we do two things: we wait for some number of bytes, and then we interpret this set of bytes. To interpret this data we use a modified state machine. We keep two pieces of information: (1) the number of bytes that we need (2) what to do with those bytes. This last piece of information is the "state" of the interpretation. We keep the state as a pointer to the procedure that is to be executed. CLIENTS: The data going from the client to the x11 server consists of a set-up message followed by an infinite stream of variable length requests. Our overall flow is then: (a) Wait for 12 bytes. (b) Interpret these first 12 bytes of the set-up message to get the length of the rest of the message. (c) Wait for the rest of the set-up message. (d) Interpret and print the set-up message. *** end of set-up phase -- start normal request loop *** (e) Wait for 4 bytes. (f) Interpret these 4 bytes to get the length of the rest of the command. (g) Wait for the rest of the command. (h) Interpret and print the command. (i) Go back to step (e). SERVERS: Again, we have a set-up reply followed by an infinite stream of variable length replies/errors/events. Our overall flow is then: (a) Wait for 8 bytes. (b) Interpret the 8 bytes to get the length of the rest of the set-up reply. (c) Wait for the rest of the set-up reply. (d) Interpret and print the set-up reply. *** end of set-up phase -- start normal reply/error/event loop *** We have the following properties of X11 replies, errors, and events: Replies: 32 bytes plus a variable amount. Byte 0 is 1. Bytes 2-3 are a sequence number; bytes 4-7 are length (n). The complete length of the reply is 32 + 4 * n. Errors: 32 bytes. Byte 0 is 0. Byte 1 is an error code; bytes 2-3 are a sequence number. Bytes 8-9 are a major opcode; byte 10 is a minor opcode. Events: 32 bytes. Byte 0 is 2, 3, 4, .... Looking at this we have two choices: wait for one byte and then separately wait for replies, errors, and events, or wait for 32 bytes, then separately process each type. We may have to wait for more, in the event of a reply. This latter seems more effective. It appears reply/error/event formats were selected to allow waiting for 32 bytes, and it will allow short packets which are only 32 bytes long, to be processed completely in one step. Thus, For normal reply/error/event processing we have (e) Wait for 32 bytes. (f) Interpret these 32 bytes. If possible, go back to step (e). (g) If the packet is a reply with bytes 4-7 non-zero, wait for the remainder of the the reply. (h) Interpret and print the longer reply. Go back to step (e). The similarity in approach to how both the client and server are handled suggests we can use the same control structure to drive the interpretation of both types of communication client->server and server->client. Accordingly, we package up the relevant variables in a ConnState record. The ConnState record contains the buffer of saved bytes (if any), the size and length of this buffer, the number of bytes we are waiting for and what to do when we get them. A separate ConnState record is kept for the client and server. In addition, we may have several different client or server connections. Thus we need an array of all the necessary state for each client or server. A client/server is identified with a file descriptor (fd), so we use the fd to identify the client/server and use it as an index into an array of state variables. */ struct ConnState { unsigned char *SavedBytes; int littleEndian; long int SizeofSavedBytes; long int NumberofSavedBytes; long int NumberofBytesNeeded; long int (*ByteProcessing) (); long int SequenceNumber; /* * these members keep track of resource synthesis * for this connection. Allows us to convert * saved-context window ids to session-context */ unsigned long int ResourceIdBase; unsigned long int ResourceIdMask; /* * this member allows us to keep track of * which resources (windows) have already appeared * in this connection, and whether they're mapped. * allows us to wait for a window to appear. */ ResStatus ResourceStatus[MAXRESOURCESTATUS]; /* * this member lets us put timestamps * on synthetic packets */ Boolean TimeInitialized; unsigned long int TimeOffset; }; extern struct ConnState CS[StaticMaxFD]; /*----------------------------------------------------------------------*/ /* declaraction of the types of some common functions */ extern unsigned long ILong(); extern unsigned short IShort(); extern unsigned short IChar2B(); extern unsigned short IByte(); extern Boolean IBool(); #if __STDC__ || defined(__cplusplus) #define P_(s) s #else #define P_(s) () #endif /* prtype.c */ char *printrep P_((int c)); void SetIndentLevel P_((int which)); void ModifyIndentLevel P_((int amount)); short SizeofLeader P_((void)); void DumpItem P_((char *name, FD fd, unsigned char *buf, long n)); int PrintINT8 P_((unsigned char *buf)); int PrintINT16 P_((unsigned char *buf)); int PrintINT32 P_((unsigned char *buf)); int PrintCARD8 P_((unsigned char *buf)); int PrintCARD16 P_((unsigned char *buf)); int PrintCARD32 P_((unsigned char *buf)); int PrintBYTE P_((unsigned char *buf)); int PrintCHAR8 P_((unsigned char *buf)); int PrintSTRING16 P_((unsigned char *buf)); int PrintSTR P_((unsigned char *buf)); int PrintWINDOW P_((unsigned char *buf)); int PrintWINDOWD P_((unsigned char *buf)); int PrintWINDOWNR P_((unsigned char *buf)); int PrintPIXMAP P_((unsigned char *buf)); int PrintPIXMAPNPR P_((unsigned char *buf)); int PrintPIXMAPC P_((unsigned char *buf)); int PrintCURSOR P_((unsigned char *buf)); int PrintFONT P_((unsigned char *buf)); int PrintGCONTEXT P_((unsigned char *buf)); int PrintCOLORMAP P_((unsigned char *buf)); int PrintCOLORMAPC P_((unsigned char *buf)); int PrintDRAWABLE P_((unsigned char *buf)); int PrintFONTABLE P_((unsigned char *buf)); int PrintATOM P_((unsigned char *buf)); int PrintATOMT P_((unsigned char *buf)); int PrintVISUALID P_((unsigned char *buf)); int PrintVISUALIDC P_((unsigned char *buf)); int PrintTIMESTAMP P_((unsigned char *buf)); int PrintRESOURCEID P_((unsigned char *buf)); int PrintKEYSYM P_((unsigned char *buf)); int PrintKEYCODE P_((unsigned char *buf)); int PrintKEYCODEA P_((unsigned char *buf)); int PrintBUTTON P_((unsigned char *buf)); int PrintBUTTONA P_((unsigned char *buf)); void PrintEVENTFORM P_((unsigned char *buf)); void PrintENUMERATED P_((unsigned char *buf, int length, struct ValueListEntry * ValueList)); void PrintSET P_((unsigned char *buf, int length, struct ValueListEntry * ValueList)); void PrintField P_((unsigned char *buf, int start, int length, int FieldType, char *name)); long PrintList P_((unsigned char *buf, long number, int ListType, char *name)); void PrintListSTR P_((unsigned char *buf, long number, char *name)); void PrintBytes P_((unsigned char buf[], long number, char *name)); void PrintString8 P_((unsigned char buf[], long number, char *name)); void PrintString16 P_((unsigned char buf[], long number, char *name)); void PrintValues P_((unsigned char *control, int clength, int ctype, unsigned char *values, char *name)); void PrintTextList8 P_((unsigned char *buf, int length, char *name)); void PrintTextList16 P_((unsigned char *buf, int length, char *name)); void DumpHexBuffer P_((unsigned char *buf, long n)); #undef P_ #endif /* _x11_H_ */ xlab-980917mine/test/ 42775 71506 1605 0 6745313400 13551 5ustar hildebinstallxlab-980917mine/test/CVS/ 42775 71506 1605 0 6745313400 14204 5ustar hildebinstallxlab-980917mine/test/CVS/Root100664 71506 1605 23 6745313400 15100 0ustar hildebinstall/usr/local/cvsroot xlab-980917mine/test/CVS/Repository100664 71506 1605 47 6745313400 16342 0ustar hildebinstall/usr/local/cvsroot/xlab-soft/xlab/test xlab-980917mine/test/CVS/Entries100664 71506 1605 2 6745313400 15543 0ustar hildebinstallD xlab-980917mine/Imakefile100664 71506 1605 1150 6745313400 14473 0ustar hildebinstall## Imakefile for Xlab. Copyright 1998 Marc Vertes # $Id: Imakefile,v 1.4 1998/07/14 16:58:03 marc Exp $ ## SYS_LIBRARIES = LOCAL_LIBRARIES = $(XLIB) SRCS = prtype.c print11.c table11.c decode11.c \ server.c fd.c common.c scope.c record.c parse.y parse.l OBJS = scope.o common.o fd.o server.o decode11.o \ table11.o print11.o prtype.o record.o y.tab.o lex.yy.o ComplexProgramTarget(xlab) scope.c: y.tab.h y.tab.h: parse.y $(YACC) -d $< y.tab.o: parse.y $(CC) $(CFLAGS) -c y.tab.c lex.yy.o: parse.l $(LEX) $< $(CC) $(CFLAGS) -c lex.yy.c clean:: $(RM) lex.yy.c y.tab.h y.tab.c xlab-980917mine/Makefile100664 71506 1605 57637 6745356062 14402 0ustar hildebinstall# Makefile generated by imake - do not edit! # $XConsortium: imake.c,v 1.89 94/08/12 00:45:51 gildea Exp $ # ----------------------------------------------------------------------- # Makefile generated from "Imake.tmpl" and # $XConsortium: Imake.tmpl,v 1.219 94/05/13 15:58:31 matt Exp $ # $SunSoft: @(#)Imake.tmpl 1.1 01/13/97 16:16:22 $ # # ************************************************************************** # NOTE: # # If the user does not define DESTDIR and/or BINDIR in the local Imakefile, # 'make install' will install the resultant binaries in /usr/openwin/bin. # This usually fails because of lack of write permission in that directory # for non-root users. # # The reason is that the default definition of ProjectRoot is /usr/openwin. # This value determines all other definitions, e.g. the binary, library and # manual page directories, etc. The destination directory, DESTDIR, is not # defined and BINDIR is defined as $(ProjectRoot)/bin in Project.tmpl. # # Care must be taken when changing ProjectRoot. It affects the inclusion # path of 'imake' in finding the *.cf, *.def, *.tmpl and *.rules files, # which are in /usr/openwin/lib/X11/config/, and the default inclusion path # of X11 header files and libraries. Therefore, if ProjectRoot is changed # not only these configuration files need to be copied to a proper location, # defined by IRULESRC, so 'make Makefile' can work properly, the header file # inclusion path, /usr/openwin/include, and the library search path, # /usr/openwin/lib, also need to be defined properly either in the local # Imakefile or one of the configuration files to avoid compilation errors # for programs that use X11 header files or libraries. # # Please refer to Project.tmpl, Imake.tmpl, site.def, etc. in # /usr/openwin/lib/X11/config/ for details. # ************************************************************************** .SUFFIXES: .i # $XConsortium: Imake.cf,v 1.12 94/03/29 15:42:08 gildea Exp $ # $SunSoft: @(#)Imake.cf 1.1 01/13/97 16:16:21 $ # ----------------------------------------------------------------------- # site-specific configuration parameters that need to come before # the platform-specific parameters - edit site.def to change # site: $XConsortium: site.sample,v 1.11 94/06/03 19:50:12 matt Exp $ # site: $SunSoft: @(#)site.def 1.1 01/13/97 16:16:27$ # ----------------------------------------------------------------------- # platform-specific configuration parameters - edit sun.cf to change # platform: $XConsortium: sun.cf,v 1.133 94/07/08 12:23:12 gildea Exp $ # platform: $SunSoft: @(#)sun.cf 1.1 01/13/97 16:16:27 $ # operating system: SunOS 5.6 # SUNSOFT SUNSOFT_LOADABLE # $XConsortium: svr4.cf,v 1.6 94/04/08 18:56:33 rws Exp $ # $SunSoft: @(#)svr4.cf 1.1 01/13/97 16:16:29 $ # $XConsortium: sv4Lib.rules,v 1.14 94/04/09 12:00:10 rws Exp $ # $SunSoft: @(#)sv4Lib.rules 1.1 01/13/97 16:16:28 $ # SUNSOFT SUNSOFT_LOADABLE # ----------------------------------------------------------------------- # site-specific configuration parameters that go after # the platform-specific parameters - edit site.def to change # site: $XConsortium: site.sample,v 1.11 94/06/03 19:50:12 matt Exp $ # site: $SunSoft: @(#)site.def 1.1 01/13/97 16:16:27$ # ----------------------------------------------------------------------- # Imake rules for building libraries, programs, scripts, and data files # rules: $XConsortium: Imake.rules,v 1.193 94/04/10 17:39:55 rws Exp $ # rules: $SunSoft: @(#)Imake.rules 1.1 01/13/97 16:16:21 $ # SUNSOFT SUNSOFT_LOADABLE PATHSEP = / SHELL = /bin/sh TOP = . CURRENT_DIR = . IMAKE = infosun_imake DEPEND = makedepend MKDIRHIER = mkdirhier CONFIGSRC = $(TOP)/config IMAKESRC = $(CONFIGSRC)/imake DEPENDSRC = $(CONFIGSRC)/makedepend IXXSRC = $(UNSUPPORTEDSRC)/programs/ixx IXX = ixx IXXFLAGS = -s BaseObject -m TypeObj -r RequestObj -p Xf IXXINCLUDES = -i '' INCROOT = /public/include USRLIBDIR = /public/packages/misc/xlab-980917//lib SHLIBDIR = /public/packages/misc/xlab-980917//lib LINTLIBDIR = $(USRLIBDIR) MANPATH = /public/packages/misc/xlab-980917//man MANSOURCEPATH = $(MANPATH)/man MANDIR = $(MANSOURCEPATH)1 LIBMANDIR = $(MANSOURCEPATH)3 FILEMANDIR = $(MANSOURCEPATH)$(FILEMANSUFFIX) AR = /usr/ccs/bin/ar cq BOOTSTRAPCFLAGS = -DSVR4 CC = gcc AS = /usr/ccs/bin/as COMPRESS = compress CPP = /usr/ccs/lib/cpp $(STD_CPP_DEFINES) PREPROCESSCMD = gcc -fpcc-struct-return -E $(STD_CPP_DEFINES) INSTALL = /usr/ucb/install INSTALLFLAGS = -c LD = /usr/ccs/bin/ld LEX = flex LEXLIB = -ll YACC = bison CCYACC = bison LINT = lint LINTLIBFLAG = -o LINTOPTS = -b -h -Xc LN = ln -s MAKE = /usr/ccs/bin/make MV = mv CP = cp RM = rm -f MANSUFFIX = 1 LIBMANSUFFIX = 3 FILEMANSUFFIX = 4 TROFF = psroff MSMACROS = -ms TBL = tbl EQN = eqn DVIPS = dvips LATEX = latex STD_INCLUDES = -I/usr/openwin/include/X11 STD_CPP_DEFINES = -Dsun -Dsparc -DSVR4 -DSYSV STD_DEFINES = -Dsun -Dsparc -DSVR4 -DSYSV EXTRA_LOAD_FLAGS = EXTRA_LDOPTIONS = -L/public/lib EXTRA_LIBRARIES = -lsocket -lnsl TAGS = ctags SHAREDCODEDEF = SHLIBDEF = SHLIBLDFLAGS = -G -z text -M mapfile PICFLAGS = -fpic CXXPICFLAGS = -K PIC PROTO_DEFINES = INSTPGMFLAGS = INSTBINFLAGS = -m 0755 INSTUIDFLAGS = -m 4755 INSTLIBFLAGS = -m 0644 INSTINCFLAGS = -m 0644 INSTMANFLAGS = -m 0444 INSTDATFLAGS = -m 0444 INSTKMEMFLAGS = -g sys -m 2755 PROJECTROOT = /public TOP_INCLUDES = -I$(INCROOT) CDEBUGFLAGS = CCOPTIONS = ALLINCLUDES = $(INCLUDES) $(EXTRA_INCLUDES) $(TOP_INCLUDES) $(STD_INCLUDES) ALLDEFINES = $(ALLINCLUDES) $(STD_DEFINES) $(EXTRA_DEFINES) $(PROTO_DEFINES) $(THREADS_DEFINES) $(DEFINES) CFLAGS = $(CDEBUGFLAGS) $(CCOPTIONS) $(THREADS_CFLAGS) $(ALLDEFINES) LINTFLAGS = $(LINTOPTS) -DLINT $(ALLDEFINES) $(DEPEND_DEFINES) LDPRELIB = -L$(USRLIBDIR) LDPOSTLIB = LDOPTIONS = $(CDEBUGFLAGS) $(CCOPTIONS) $(EXTRA_LDOPTIONS) $(THREADS_LDFLAGS) $(LOCAL_LDFLAGS) $(LDPRELIB) CXXLDOPTIONS = $(CXXDEBUGFLAGS) $(CXXOPTIONS) $(EXTRA_LDOPTIONS) $(THREADS_CXXLDFLAGS) $(LOCAL_LDFLAGS) $(LDPRELIB) LDLIBS = $(LDPOSTLIB) $(THREADS_LIBS) $(SYS_LIBRARIES) $(EXTRA_LIBRARIES) CCENVSETUP = LD_RUN_PATH=/public/lib:$(USRLIBDIR) CCLINK = $(CCENVSETUP) $(CC) CXXENVSETUP = LD_RUN_PATH=/public/lib:$(USRLIBDIR) CXXLINK = $(CXXENVSETUP) $(CXX) LDSTRIPFLAGS = -x LDCOMBINEFLAGS = -r DEPENDFLAGS = MACROFILE = sun.cf RM_CMD = $(RM) IMAKE_DEFINES = IRULESRC = $(CONFIGDIR) IMAKE_CMD = $(IMAKE) -DUseInstalled -I$(IRULESRC) $(IMAKE_DEFINES) ICONFIGFILES = $(IRULESRC)/Imake.tmpl $(IRULESRC)/Project.tmpl \ $(IRULESRC)/site.def $(IRULESRC)/$(MACROFILE) \ $(EXTRA_ICONFIGFILES) # ----------------------------------------------------------------------- # X Window System Build Parameters and Rules # $XConsortium: Project.tmpl,v 1.242 94/04/13 14:58:40 rws Exp $ # $SunSoft: @(#)Project.tmpl 1.3 04/21/97 16:46:25 $ # SUNSOFT SUNSOFT_LOADABLE # ----------------------------------------------------------------------- # X Window System make variables; these need to be coordinated with rules BINDIR = /public/packages/misc/xlab-980917//bin BUILDINCROOT = $(TOP) BUILDINCDIR = $(BUILDINCROOT)/X11 BUILDINCTOP = .. BUILDLIBDIR = $(TOP)/usrlib BUILDLIBTOP = .. INCDIR = $(INCROOT)/X11 ADMDIR = /usr/adm LIBDIR = $(USRLIBDIR)/X11 FONTDIR = $(LIBDIR)/fonts XINITDIR = $(LIBDIR)/xinit XDMDIR = $(LIBDIR)/xdm TWMDIR = $(LIBDIR)/twm NLSDIR = $(LIBDIR)/nls XLOCALEDIR = $(PROJECTROOT)/lib/locale PEXAPIDIR = $(LIBDIR)/PEX XAPPLOADDIR = /public/packages/misc/xlab-980917//app-defaults FONTCFLAGS = -t INSTAPPFLAGS = $(INSTDATFLAGS) RGB = rgb FONTC = bdftopcf MKFONTDIR = mkfontdir DOCUTILSRC = $(TOP)/doc/util XDOCMACROS = $(DOCUTILSRC)/macros.t XIDXMACROS = $(DOCUTILSRC)/indexmacros.t PROGRAMSRC = $(TOP)/programs LIBSRC = $(TOP)/lib FONTSRC = $(TOP)/fonts INCLUDESRC = $(TOP)/X11 SERVERSRC = $(TOP)/programs/Xserver CONTRIBSRC = $(TOP)/../contrib UNSUPPORTEDSRC = $(TOP)/unsupported DOCSRC = $(TOP)/doc RGBSRC = $(TOP)/programs/rgb BDFTOPCFSRC = $(PROGRAMSRC)/bdftopcf MKFONTDIRSRC = $(PROGRAMSRC)/mkfontdir FONTSERVERSRC = $(PROGRAMSRC)/xfs FONTINCSRC = $(TOP)/include/fonts EXTINCSRC = $(TOP)/include/extensions TRANSCOMMSRC = $(LIBSRC)/xtrans TRANS_INCLUDES = -I$(TRANSCOMMSRC) # $XConsortium: sunLib.tmpl,v 1.37 95/05/23 14:31:40 matt Exp $ # $SunSoft: @(#)sunLib.tmpl 1.2 02/06/97 16:06:36 $ # $XConsortium: sv4Lib.tmpl,v 1.19 93/12/03 10:48:36 kaleb Exp $ # $SunSoft: @(#)sv4Lib.tmpl 1.1 01/13/97 16:16:29 $ XMULIBONLY = -lXmu -lm XMULIB = -lXmu -lm SERVERLIB = /public/server/lib SERVERMODULES = /public/server/modules SERVERETC = /public/server/etc SHLIBLDFLAGS = -G -z text -M mapfile PICFLAGS = -fpic MAPFILE = mapfile XLIBSRC = $(LIBSRC)/X11 SOXLIBREV = 4 DEPXONLYLIB = XONLYLIB = -lX11 LINTXONLY = $(LINTLIBDIR)/llib-lX11.ln XLIBONLY = $(XONLYLIB) XEXTLIBSRC = $(LIBSRC)/Xext SOXEXTREV = 0 DEPEXTENSIONLIB = EXTENSIONLIB = -lXext LINTEXTENSION = $(LINTLIBDIR)/llib-lXext.ln LINTEXTENSIONLIB = $(LINTEXTENSION) DEPXLIB = $(DEPEXTENSIONLIB) $(DEPXONLYLIB) XLIB = $(EXTENSIONLIB) $(XONLYLIB) LINTXLIB = $(LINTXONLYLIB) XAUTHSRC = $(LIBSRC)/Xau DEPXAUTHLIB = $(USRLIBDIR)/libXau.a XAUTHLIB = -lXau LINTXAUTH = $(LINTLIBDIR)/llib-lXau.ln XDMCPLIBSRC = $(LIBSRC)/Xdmcp DEPXDMCPLIB = $(USRLIBDIR)/libXdmcp.a XDMCPLIB = -lXdmcp LINTXDMCP = $(LINTLIBDIR)/llib-lXdmcp.ln XMUSRC = $(LIBSRC)/Xmu SOXMUREV = 4 DEPXMULIB = XMULIB = -lXmu LINTXMU = $(LINTLIBDIR)/llib-lXmu.ln XMULIB = -lXmu -lm XCONFIGSRC = $(LIBSRC)/Xconfig SOXCONFIGREV = 0 DEPXCONFIGLIB = XCONFIGLIB = -lXconfig LINTXCONFIG = $(LINTLIBDIR)/llib-lXconfig.ln DGASRC = $(LIBSRC)/dga SODGAREV = 1 DEPDGASRCLIB = DGASRCLIB = -ldga LINTDGASRC = $(LINTLIBDIR)/llib-ldga.ln MISRC = $(SERVERSRC)/mi SOMIREV = 1 DEPMILIB = MILIB = -lmi LINTMI = $(LINTLIBDIR)/llib-lmi.ln MFBSRC = $(SERVERSRC)/mfb SOMFBREV = 1 DEPMFBLIB = MFBLIB = -lmfb LINTMFB = $(LINTLIBDIR)/llib-lmfb.ln CFBSRC = $(SERVERSRC)/cfb SOCFBREV = 1 DEPCFBLIB = CFBLIB = -lcfb LINTCFB = $(LINTLIBDIR)/llib-lcfb.ln OLDXLIBSRC = $(LIBSRC)/oldX SOOLDXREV = 6 DEPOLDXLIB = OLDXLIB = -loldX LINTOLDX = $(LINTLIBDIR)/llib-loldX.ln TOOLKITSRC = $(LIBSRC)/Xt SOXTREV = 4 DEPXTOOLONLYLIB = XTOOLONLYLIB = -lXt LINTXTOOLONLY = $(LINTLIBDIR)/llib-lXt.ln DEPXTOOLLIB = $(DEPXTOOLONLYLIB) $(DEPSMLIB) $(DEPICELIB) XTOOLLIB = $(XTOOLONLYLIB) $(SMLIB) $(ICELIB) LINTXTOOLLIB = $(LINTXTOOLONLYLIB) AWIDGETSRC = $(LIBSRC)/Xaw SOXAWREV = 5 DEPXAWLIB = XAWLIB = -lXaw LINTXAW = $(LINTLIBDIR)/llib-lXaw.ln XTFSRC = $(TOP)/workInProgress/Xtf SOXTFREV = 0.7 DEPXTFLIB = XTFLIB = -lXtf LINTXTF = $(LINTLIBDIR)/llib-lXtf.ln FRESCOSRC = $(TOP)/workInProgress/Fresco SOFRESCOREV = 0.7 DEPFRESCOLIB = FRESCOLIB = -lFresco LINTFRESCO = $(LINTLIBDIR)/llib-lFresco.ln XILIBSRC = $(LIBSRC)/Xi SOXINPUTREV = 5 DEPXILIB = XILIB = -lXi LINTXI = $(LINTLIBDIR)/llib-lXi.ln XTESTLIBSRC = $(LIBSRC)/Xtst SOXTESTREV = 1 DEPXTESTLIB = XTESTLIB = -lXtst LINTXTEST = $(LINTLIBDIR)/llib-lXtst.ln PEXLIBSRC = $(LIBSRC)/PEX5 SOPEXREV = 6 DEPPEXLIB = PEXLIB = -lPEX5 LINTPEX = $(LINTLIBDIR)/llib-lPEX5.ln SODPSREV = 5 SOSERVERDPSREV = 5 DPSLIBSRC = $(LIBSRC)/DPS SODPSREV = 5 DEPDPSLIB = DPSLIB = -lDPS LINTDPS = $(LINTLIBDIR)/llib-lDPS.ln XIELIBSRC = $(LIBSRC)/XIE SOXIEREV = 6 DEPXIELIB = XIELIB = -lXIE LINTXIE = $(LINTLIBDIR)/llib-lXIE.ln PHIGSLIBSRC = $(LIBSRC)/PHIGS DEPPHIGSLIB = $(USRLIBDIR)/libphigs.a PHIGSLIB = -lphigs LINTPHIGS = $(LINTLIBDIR)/llib-lphigs.ln DEPXBSDLIB = $(USRLIBDIR)/libXbsd.a XBSDLIB = -lXbsd LINTXBSD = $(LINTLIBDIR)/llib-lXbsd.ln ICESRC = $(LIBSRC)/ICE SOICEREV = 6 DEPICELIB = ICELIB = -lICE LINTICE = $(LINTLIBDIR)/llib-lICE.ln SMSRC = $(LIBSRC)/SM SOSMREV = 6 DEPSMLIB = SMLIB = -lSM LINTSM = $(LINTLIBDIR)/llib-lSM.ln FSLIBSRC = $(LIBSRC)/FS SOFSREV = 5 DEPFSLIB = FSLIB = -lFS LINTFS = $(LINTLIBDIR)/llib-lFS.ln FONTLIBSRC = $(LIBSRC)/font DEPFONTLIB = $(USRLIBDIR)/libfont.a FONTLIB = -lfont LINTFONT = $(LINTLIBDIR)/llib-lfont.ln DEPLIBS = $(DEPXAWLIB) $(DEPXMULIB) $(DEPXTOOLLIB) $(DEPXLIB) DEPLIBS1 = $(DEPLIBS) DEPLIBS2 = $(DEPLIBS) DEPLIBS3 = $(DEPLIBS) CONFIGDIR = /usr/openwin/lib/config # ----------------------------------------------------------------------- # start of Imakefile # # Imakefile for Xlab. Copyright 1998 Marc Vertes # $Id: Imakefile,v 1.4 1998/07/14 16:58:03 marc Exp $ # # SYS_LIBRARIES = LOCAL_LIBRARIES = $(XLIB) SRCS = prtype.c print11.c table11.c decode11.c \ server.c fd.c common.c scope.c record.c parse.y parse.l OBJS = scope.o common.o fd.o server.o decode11.o \ table11.o print11.o prtype.o record.o y.tab.o lex.yy.o PROGRAM = xlab all:: xlab xlab: $(OBJS) $(DEPLIBS) $(RM) $@ $(CCLINK) -o $@ $(LDOPTIONS) $(OBJS) $(LOCAL_LIBRARIES) $(LDLIBS) $(EXTRA_LOAD_FLAGS) install:: xlab @if [ -d $(DESTDIR)$(BINDIR) ]; then set +x; \ else (set -x; $(MKDIRHIER) $(DESTDIR)$(BINDIR)); fi $(INSTALL) $(INSTALLFLAGS) $(INSTPGMFLAGS) xlab $(DESTDIR)$(BINDIR)/xlab install.man:: xlab.man @if [ -d $(DESTDIR)$(MANDIR) ]; then set +x; \ else (set -x; $(MKDIRHIER) $(DESTDIR)$(MANDIR)); fi $(INSTALL) $(INSTALLFLAGS) $(INSTMANFLAGS) xlab.man $(DESTDIR)$(MANDIR)/xlab.$(MANSUFFIX) depend:: $(DEPEND) $(DEPENDFLAGS) -- $(ALLDEFINES) $(DEPEND_DEFINES) -- $(SRCS) lint: $(LINT) $(LINTFLAGS) $(SRCS) $(LINTLIBS) lint1: $(LINT) $(LINTFLAGS) $(FILE) $(LINTLIBS) clean:: $(RM) xlab scope.c: y.tab.h y.tab.h: parse.y $(YACC) -d $< y.tab.o: parse.y $(CC) $(CFLAGS) -c y.tab.c lex.yy.o: parse.l $(LEX) $< $(CC) $(CFLAGS) -c lex.yy.c clean:: $(RM) lex.yy.c y.tab.h y.tab.c # ----------------------------------------------------------------------- # common rules for all Makefiles - do not edit .c.i: $(RM) $@ $(CC) -E $(CFLAGS) $(_NOOP_) $*.c > $@ emptyrule:: clean:: $(RM) *.CKP *.ln *.BAK *.bak *.o core errs ,* *~ *.a .emacs_* tags TAGS make.log MakeOut "#"* Makefile:: -@if [ -f Makefile ]; then set -x; \ $(RM) Makefile.bak; $(MV) Makefile Makefile.bak; \ else exit 0; fi $(IMAKE_CMD) -DTOPDIR=$(TOP) -DCURDIR=$(CURRENT_DIR) tags:: $(TAGS) -w *.[ch] $(TAGS) -xw *.[ch] > TAGS man_keywords:: catman -M $(DESTDIR)$(MANPATH) -w # ---------------------------------------------------------------------- # empty rules for directories that do not have SUBDIRS - do not edit install:: @echo "install in $(CURRENT_DIR) done" install.man:: @echo "install.man in $(CURRENT_DIR) done" Makefiles:: includes:: depend:: # ----------------------------------------------------------------------- # dependencies generated by makedepend # DO NOT DELETE prtype.o: scope.h /usr/include/X11/Xos.h /usr/include/X11/Xosdefs.h prtype.o: /usr/include/sys/types.h /usr/include/sys/feature_tests.h prtype.o: /usr/include/sys/isa_defs.h /usr/include/sys/machtypes.h prtype.o: /usr/include/sys/int_types.h /usr/include/sys/select.h prtype.o: /usr/include/sys/time.h /usr/include/sys/time.h prtype.o: /usr/include/string.h /usr/include/fcntl.h /usr/include/sys/fcntl.h prtype.o: /usr/include/unistd.h /usr/include/sys/unistd.h prtype.o: /usr/include/stdio.h /usr/include/sys/va_list.h fd.h decode11.h prtype.o: x11.h print11.o: scope.h /usr/include/X11/Xos.h /usr/include/X11/Xosdefs.h print11.o: /usr/include/sys/types.h /usr/include/sys/feature_tests.h print11.o: /usr/include/sys/isa_defs.h /usr/include/sys/machtypes.h print11.o: /usr/include/sys/int_types.h /usr/include/sys/select.h print11.o: /usr/include/sys/time.h /usr/include/sys/time.h print11.o: /usr/include/string.h /usr/include/fcntl.h print11.o: /usr/include/sys/fcntl.h /usr/include/unistd.h print11.o: /usr/include/sys/unistd.h /usr/include/stdio.h print11.o: /usr/include/sys/va_list.h fd.h x11.h server.h decode11.h print11.o: print11.h table11.o: scope.h /usr/include/X11/Xos.h /usr/include/X11/Xosdefs.h table11.o: /usr/include/sys/types.h /usr/include/sys/feature_tests.h table11.o: /usr/include/sys/isa_defs.h /usr/include/sys/machtypes.h table11.o: /usr/include/sys/int_types.h /usr/include/sys/select.h table11.o: /usr/include/sys/time.h /usr/include/sys/time.h table11.o: /usr/include/string.h /usr/include/fcntl.h table11.o: /usr/include/sys/fcntl.h /usr/include/unistd.h table11.o: /usr/include/sys/unistd.h /usr/include/stdio.h table11.o: /usr/include/sys/va_list.h fd.h common.h x11.h server.h table11.h table11.o: decode11.h decode11.o: scope.h /usr/include/X11/Xos.h /usr/include/X11/Xosdefs.h decode11.o: /usr/include/sys/types.h /usr/include/sys/feature_tests.h decode11.o: /usr/include/sys/isa_defs.h /usr/include/sys/machtypes.h decode11.o: /usr/include/sys/int_types.h /usr/include/sys/select.h decode11.o: /usr/include/sys/time.h /usr/include/sys/time.h decode11.o: /usr/include/string.h /usr/include/fcntl.h decode11.o: /usr/include/sys/fcntl.h /usr/include/unistd.h decode11.o: /usr/include/sys/unistd.h /usr/include/stdio.h decode11.o: /usr/include/sys/va_list.h fd.h x11.h print11.h server.h record.h decode11.o: /usr/include/X11/Xlib.h /usr/include/X11/X.h decode11.o: /usr/include/X11/Xfuncproto.h /usr/include/stddef.h common.h server.o: /usr/include/malloc.h scope.h /usr/include/X11/Xos.h server.o: /usr/include/X11/Xosdefs.h /usr/include/sys/types.h server.o: /usr/include/sys/feature_tests.h /usr/include/sys/isa_defs.h server.o: /usr/include/sys/machtypes.h /usr/include/sys/int_types.h server.o: /usr/include/sys/select.h /usr/include/sys/time.h server.o: /usr/include/sys/time.h /usr/include/string.h /usr/include/fcntl.h server.o: /usr/include/sys/fcntl.h /usr/include/unistd.h server.o: /usr/include/sys/unistd.h /usr/include/stdio.h server.o: /usr/include/sys/va_list.h fd.h common.h record.h server.o: /usr/include/X11/Xlib.h /usr/include/X11/X.h server.o: /usr/include/X11/Xfuncproto.h /usr/include/stddef.h server.h server.o: decode11.h print11.h x11.h fd.o: /usr/include/stdlib.h /usr/include/sys/feature_tests.h fd.o: /usr/include/stdio.h /usr/include/sys/va_list.h /usr/include/errno.h fd.o: /usr/include/sys/errno.h /usr/include/sys/time.h fd.o: /usr/include/sys/types.h /usr/include/sys/isa_defs.h fd.o: /usr/include/sys/machtypes.h /usr/include/sys/int_types.h fd.o: /usr/include/sys/select.h /usr/include/sys/time.h /usr/include/unistd.h fd.o: /usr/include/sys/unistd.h scope.h /usr/include/X11/Xos.h fd.o: /usr/include/X11/Xosdefs.h /usr/include/string.h /usr/include/fcntl.h fd.o: /usr/include/sys/fcntl.h fd.h common.h common.o: /usr/include/stdlib.h /usr/include/sys/feature_tests.h common.o: /usr/include/fcntl.h /usr/include/sys/types.h common.o: /usr/include/sys/isa_defs.h /usr/include/sys/machtypes.h common.o: /usr/include/sys/int_types.h /usr/include/sys/select.h common.o: /usr/include/sys/time.h /usr/include/sys/time.h common.o: /usr/include/sys/fcntl.h scope.h /usr/include/X11/Xos.h common.o: /usr/include/X11/Xosdefs.h /usr/include/string.h common.o: /usr/include/unistd.h /usr/include/sys/unistd.h common.o: /usr/include/stdio.h /usr/include/sys/va_list.h fd.h common.o: /usr/include/signal.h /usr/include/sys/signal.h common.o: /usr/include/sys/uio.h /usr/include/sys/socket.h common.o: /usr/include/sys/netconfig.h /usr/include/sys/ioctl.h common.o: /usr/include/sys/filio.h /usr/include/sys/ioccom.h common.o: /usr/include/netinet/in.h /usr/include/sys/stream.h common.o: /usr/include/sys/vnode.h /usr/include/sys/t_lock.h common.o: /usr/include/sys/machlock.h /usr/include/sys/sleepq.h common.o: /usr/include/sys/turnstile.h /usr/include/sys/param.h common.o: /usr/include/sys/pirec.h /usr/include/sys/mutex.h common.o: /usr/include/sys/rwlock.h /usr/include/sys/semaphore.h common.o: /usr/include/sys/condvar.h /usr/include/sys/cred.h common.o: /usr/include/sys/resource.h /usr/include/vm/seg_enum.h common.o: /usr/include/sys/poll.h /usr/include/sys/strmdep.h common.o: /usr/include/sys/model.h /usr/include/sys/byteorder.h common.o: /usr/include/netdb.h scope.o: /usr/include/stdio.h /usr/include/sys/feature_tests.h scope.o: /usr/include/sys/va_list.h /usr/include/stdlib.h scope.o: /usr/include/sys/uio.h /usr/include/sys/types.h scope.o: /usr/include/sys/isa_defs.h /usr/include/sys/machtypes.h scope.o: /usr/include/sys/int_types.h /usr/include/sys/select.h scope.o: /usr/include/sys/time.h /usr/include/sys/time.h scope.o: /usr/include/sys/socket.h /usr/include/sys/netconfig.h scope.o: /usr/include/sys/ioctl.h /usr/include/sys/filio.h scope.o: /usr/include/sys/ioccom.h /usr/include/fcntl.h scope.o: /usr/include/sys/fcntl.h /usr/include/netinet/in.h scope.o: /usr/include/sys/stream.h /usr/include/sys/vnode.h scope.o: /usr/include/sys/t_lock.h /usr/include/sys/machlock.h scope.o: /usr/include/sys/sleepq.h /usr/include/sys/turnstile.h scope.o: /usr/include/sys/param.h /usr/include/sys/unistd.h scope.o: /usr/include/sys/pirec.h /usr/include/sys/mutex.h scope.o: /usr/include/sys/rwlock.h /usr/include/sys/semaphore.h scope.o: /usr/include/sys/condvar.h /usr/include/sys/cred.h scope.o: /usr/include/sys/resource.h /usr/include/vm/seg_enum.h scope.o: /usr/include/sys/poll.h /usr/include/sys/strmdep.h scope.o: /usr/include/sys/model.h /usr/include/sys/byteorder.h scope.o: /usr/include/netdb.h /usr/include/errno.h /usr/include/sys/errno.h scope.o: scope.h /usr/include/X11/Xos.h /usr/include/X11/Xosdefs.h scope.o: /usr/include/string.h /usr/include/unistd.h fd.h table11.h common.h scope.o: server.h record.h /usr/include/X11/Xlib.h /usr/include/X11/X.h scope.o: /usr/include/X11/Xfuncproto.h /usr/include/stddef.h scope.o: /usr/include/X11/Xutil.h record.o: /usr/include/stdio.h /usr/include/sys/feature_tests.h record.o: /usr/include/sys/va_list.h /usr/include/stdlib.h record.o: /usr/include/X11/Xlib.h /usr/include/sys/types.h record.o: /usr/include/sys/isa_defs.h /usr/include/sys/machtypes.h record.o: /usr/include/sys/int_types.h /usr/include/sys/select.h record.o: /usr/include/sys/time.h /usr/include/sys/time.h record.o: /usr/include/X11/X.h /usr/include/X11/Xfuncproto.h record.o: /usr/include/X11/Xosdefs.h /usr/include/stddef.h record.o: /usr/include/X11/Xutil.h /usr/include/X11/keysym.h record.o: /usr/include/X11/keysymdef.h scope.h /usr/include/X11/Xos.h record.o: /usr/include/string.h /usr/include/fcntl.h /usr/include/sys/fcntl.h record.o: /usr/include/unistd.h /usr/include/sys/unistd.h fd.h server.h record.o: record.h x11.h parse.o: /usr/include/stdio.h /usr/include/sys/feature_tests.h parse.o: /usr/include/sys/va_list.h /usr/include/stdlib.h fd.h record.h parse.o: /usr/include/X11/Xlib.h /usr/include/sys/types.h parse.o: /usr/include/sys/isa_defs.h /usr/include/sys/machtypes.h parse.o: /usr/include/sys/int_types.h /usr/include/sys/select.h parse.o: /usr/include/sys/time.h /usr/include/sys/time.h /usr/include/X11/X.h parse.o: /usr/include/X11/Xfuncproto.h /usr/include/X11/Xosdefs.h parse.o: /usr/include/stddef.h scope.h /usr/include/X11/Xos.h parse.o: /usr/include/string.h /usr/include/fcntl.h /usr/include/sys/fcntl.h parse.o: /usr/include/unistd.h /usr/include/sys/unistd.h parse.o: /usr/include/string.h /usr/include/sys/feature_tests.h xlab-980917mine/xlab_cap.0100664 71506 1605 1127113 6745313401 14606 0ustar hildebinstallk< @@<<xwdump!  B@ @ca 0a @ ((Q(00a088q8AA AI)I$$I$QJQD(QDYkYe,Yeaa0aii4iqq8qyy #include #include "fd.h" #include "record.h" #include "scope.h" #if __STDC__ || defined(__cplusplus) #define P_(s) s #else #define P_(s) () #endif int yylex P_((void)); int yyerror P_((char *)); #undef P_ extern int replay_counter; #line 33 "parse.y" typedef union { char *string; /* quoted string (quotes removed by lex scanner) */ char *name; /* filename */ int intval; /* integer */ } YYSTYPE; #include #ifndef __cplusplus #ifndef __STDC__ #define const #endif #endif #define YYFINAL 30 #define YYFLAG -32768 #define YYNTBASE 17 #define YYTRANSLATE(x) ((unsigned)(x) <= 270 ? yytranslate[x] : 28) static const char yytranslate[] = { 0, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 1, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16 }; #if YYDEBUG != 0 static const short yyprhs[] = { 0, 0, 2, 4, 6, 8, 10, 12, 14, 16, 18, 20, 24, 28, 32, 34, 37, 40, 44, 47, 50 }; static const short yyrhs[] = { 22, 0, 18, 0, 23, 0, 24, 0, 25, 0, 26, 0, 27, 0, 19, 0, 21, 0, 20, 0, 8, 11, 16, 0, 8, 10, 16, 0, 8, 9, 16, 0, 3, 0, 4, 13, 0, 5, 13, 0, 5, 13, 16, 0, 7, 4, 0, 7, 5, 0, 14, 0 }; #endif #if YYDEBUG != 0 static const short yyrline[] = { 0, 58, 60, 61, 62, 63, 64, 65, 68, 70, 71, 74, 81, 88, 95, 103, 110, 117, 125, 132, 139 }; #endif #if YYDEBUG != 0 || defined (YYERROR_VERBOSE) static const char * const yytname[] = { "$","error","$undefined.","EXIT","RECORD", "REPLAY","EXTREP","STOP","SET","TRACE","DEBUG","SPEED","NL","FILENAME","SYSSTR", "QSTRING","NATURAL","command","set_command","set_speed_command","set_debug_command", "set_trace_command","exit_command","record_command","replay_command","stop_record_command", "stop_replay_command","shell_command", NULL }; #endif static const short yyr1[] = { 0, 17, 17, 17, 17, 17, 17, 17, 18, 18, 18, 19, 20, 21, 22, 23, 24, 24, 25, 26, 27 }; static const short yyr2[] = { 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 3, 3, 3, 1, 2, 2, 3, 2, 2, 1 }; static const short yydefact[] = { 0, 14, 0, 0, 0, 0, 20, 2, 8, 10, 9, 1, 3, 4, 5, 6, 7, 15, 16, 18, 19, 0, 0, 0, 17, 13, 12, 11, 0, 0, 0 }; static const short yydefgoto[] = { 28, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16 }; static const short yypact[] = { -3, -32768, -10, -7, 8, -2,-32768,-32768,-32768,-32768,-32768, -32768,-32768,-32768,-32768,-32768,-32768,-32768, -6,-32768,-32768, -1, 0, 1,-32768,-32768,-32768,-32768, 14, 18,-32768 }; static const short yypgoto[] = {-32768, -32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768 }; #define YYLAST 18 static const short yytable[] = { 1, 2, 3, 17, 4, 5, 18, 21, 22, 23, 24, 6, 19, 20, 29, 25, 26, 27, 30 }; static const short yycheck[] = { 3, 4, 5, 13, 7, 8, 13, 9, 10, 11, 16, 14, 4, 5, 0, 16, 16, 16, 0 }; /* -*-C-*- Note some compilers choke on comments on `#line' lines. */ #line 3 "/public/packages/programming/bison-1.27/share/bison.simple" /* This file comes from bison-1.27. */ /* Skeleton output parser for bison, Copyright (C) 1984, 1989, 1990 Free Software Foundation, Inc. This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ /* As a special exception, when this file is copied by Bison into a Bison output file, you may use that output file without restriction. This special exception was added by the Free Software Foundation in version 1.24 of Bison. */ /* This is the parser code that is written into each bison parser when the %semantic_parser declaration is not specified in the grammar. It was written by Richard Stallman by simplifying the hairy parser used when %semantic_parser is specified. */ #ifndef YYSTACK_USE_ALLOCA #ifdef alloca #define YYSTACK_USE_ALLOCA #else /* alloca not defined */ #ifdef __GNUC__ #define YYSTACK_USE_ALLOCA #define alloca __builtin_alloca #else /* not GNU C. */ #if (!defined (__STDC__) && defined (sparc)) || defined (__sparc__) || defined (__sparc) || defined (__sgi) || (defined (__sun) && defined (__i386)) #define YYSTACK_USE_ALLOCA #include #else /* not sparc */ /* We think this test detects Watcom and Microsoft C. */ /* This used to test MSDOS, but that is a bad idea since that symbol is in the user namespace. */ #if (defined (_MSDOS) || defined (_MSDOS_)) && !defined (__TURBOC__) #if 0 /* No need for malloc.h, which pollutes the namespace; instead, just don't use alloca. */ #include #endif #else /* not MSDOS, or __TURBOC__ */ #if defined(_AIX) /* I don't know what this was needed for, but it pollutes the namespace. So I turned it off. rms, 2 May 1997. */ /* #include */ #pragma alloca #define YYSTACK_USE_ALLOCA #else /* not MSDOS, or __TURBOC__, or _AIX */ #if 0 #ifdef __hpux /* haible@ilog.fr says this works for HPUX 9.05 and up, and on HPUX 10. Eventually we can turn this on. */ #define YYSTACK_USE_ALLOCA #define alloca __builtin_alloca #endif /* __hpux */ #endif #endif /* not _AIX */ #endif /* not MSDOS, or __TURBOC__ */ #endif /* not sparc */ #endif /* not GNU C */ #endif /* alloca not defined */ #endif /* YYSTACK_USE_ALLOCA not defined */ #ifdef YYSTACK_USE_ALLOCA #define YYSTACK_ALLOC alloca #else #define YYSTACK_ALLOC malloc #endif /* Note: there must be only one dollar sign in this file. It is replaced by the list of actions, each action as one case of the switch. */ #define yyerrok (yyerrstatus = 0) #define yyclearin (yychar = YYEMPTY) #define YYEMPTY -2 #define YYEOF 0 #define YYACCEPT goto yyacceptlab #define YYABORT goto yyabortlab #define YYERROR goto yyerrlab1 /* Like YYERROR except do call yyerror. This remains here temporarily to ease the transition to the new meaning of YYERROR, for GCC. Once GCC version 2 has supplanted version 1, this can go. */ #define YYFAIL goto yyerrlab #define YYRECOVERING() (!!yyerrstatus) #define YYBACKUP(token, value) \ do \ if (yychar == YYEMPTY && yylen == 1) \ { yychar = (token), yylval = (value); \ yychar1 = YYTRANSLATE (yychar); \ YYPOPSTACK; \ goto yybackup; \ } \ else \ { yyerror ("syntax error: cannot back up"); YYERROR; } \ while (0) #define YYTERROR 1 #define YYERRCODE 256 #ifndef YYPURE #define YYLEX yylex() #endif #ifdef YYPURE #ifdef YYLSP_NEEDED #ifdef YYLEX_PARAM #define YYLEX yylex(&yylval, &yylloc, YYLEX_PARAM) #else #define YYLEX yylex(&yylval, &yylloc) #endif #else /* not YYLSP_NEEDED */ #ifdef YYLEX_PARAM #define YYLEX yylex(&yylval, YYLEX_PARAM) #else #define YYLEX yylex(&yylval) #endif #endif /* not YYLSP_NEEDED */ #endif /* If nonreentrant, generate the variables here */ #ifndef YYPURE int yychar; /* the lookahead symbol */ YYSTYPE yylval; /* the semantic value of the */ /* lookahead symbol */ #ifdef YYLSP_NEEDED YYLTYPE yylloc; /* location data for the lookahead */ /* symbol */ #endif int yynerrs; /* number of parse errors so far */ #endif /* not YYPURE */ #if YYDEBUG != 0 int yydebug; /* nonzero means print parse trace */ /* Since this is uninitialized, it does not stop multiple parsers from coexisting. */ #endif /* YYINITDEPTH indicates the initial size of the parser's stacks */ #ifndef YYINITDEPTH #define YYINITDEPTH 200 #endif /* YYMAXDEPTH is the maximum size the stacks can grow to (effective only if the built-in stack extension method is used). */ #if YYMAXDEPTH == 0 #undef YYMAXDEPTH #endif #ifndef YYMAXDEPTH #define YYMAXDEPTH 10000 #endif /* Define __yy_memcpy. Note that the size argument should be passed with type unsigned int, because that is what the non-GCC definitions require. With GCC, __builtin_memcpy takes an arg of type size_t, but it can handle unsigned int. */ #if __GNUC__ > 1 /* GNU C and GNU C++ define this. */ #define __yy_memcpy(TO,FROM,COUNT) __builtin_memcpy(TO,FROM,COUNT) #else /* not GNU C or C++ */ #ifndef __cplusplus /* This is the most reliable way to avoid incompatibilities in available built-in functions on various systems. */ static void __yy_memcpy (to, from, count) char *to; char *from; unsigned int count; { register char *f = from; register char *t = to; register int i = count; while (i-- > 0) *t++ = *f++; } #else /* __cplusplus */ /* This is the most reliable way to avoid incompatibilities in available built-in functions on various systems. */ static void __yy_memcpy (char *to, char *from, unsigned int count) { register char *t = to; register char *f = from; register int i = count; while (i-- > 0) *t++ = *f++; } #endif #endif #line 216 "/public/packages/programming/bison-1.27/share/bison.simple" /* The user can define YYPARSE_PARAM as the name of an argument to be passed into yyparse. The argument should have type void *. It should actually point to an object. Grammar actions can access the variable by casting it to the proper pointer type. */ #ifdef YYPARSE_PARAM #ifdef __cplusplus #define YYPARSE_PARAM_ARG void *YYPARSE_PARAM #define YYPARSE_PARAM_DECL #else /* not __cplusplus */ #define YYPARSE_PARAM_ARG YYPARSE_PARAM #define YYPARSE_PARAM_DECL void *YYPARSE_PARAM; #endif /* not __cplusplus */ #else /* not YYPARSE_PARAM */ #define YYPARSE_PARAM_ARG #define YYPARSE_PARAM_DECL #endif /* not YYPARSE_PARAM */ /* Prevent warning if -Wstrict-prototypes. */ #ifdef __GNUC__ #ifdef YYPARSE_PARAM int yyparse (void *); #else int yyparse (void); #endif #endif int yyparse(YYPARSE_PARAM_ARG) YYPARSE_PARAM_DECL { register int yystate; register int yyn; register short *yyssp; register YYSTYPE *yyvsp; int yyerrstatus; /* number of tokens to shift before error messages enabled */ int yychar1 = 0; /* lookahead token as an internal (translated) token number */ short yyssa[YYINITDEPTH]; /* the state stack */ YYSTYPE yyvsa[YYINITDEPTH]; /* the semantic value stack */ short *yyss = yyssa; /* refer to the stacks thru separate pointers */ YYSTYPE *yyvs = yyvsa; /* to allow yyoverflow to reallocate them elsewhere */ #ifdef YYLSP_NEEDED YYLTYPE yylsa[YYINITDEPTH]; /* the location stack */ YYLTYPE *yyls = yylsa; YYLTYPE *yylsp; #define YYPOPSTACK (yyvsp--, yyssp--, yylsp--) #else #define YYPOPSTACK (yyvsp--, yyssp--) #endif int yystacksize = YYINITDEPTH; int yyfree_stacks = 0; #ifdef YYPURE int yychar; YYSTYPE yylval; int yynerrs; #ifdef YYLSP_NEEDED YYLTYPE yylloc; #endif #endif YYSTYPE yyval; /* the variable used to return */ /* semantic values from the action */ /* routines */ int yylen; #if YYDEBUG != 0 if (yydebug) fprintf(stderr, "Starting parse\n"); #endif yystate = 0; yyerrstatus = 0; yynerrs = 0; yychar = YYEMPTY; /* Cause a token to be read. */ /* Initialize stack pointers. Waste one element of value and location stack so that they stay on the same level as the state stack. The wasted elements are never initialized. */ yyssp = yyss - 1; yyvsp = yyvs; #ifdef YYLSP_NEEDED yylsp = yyls; #endif /* Push a new state, which is found in yystate . */ /* In all cases, when you get here, the value and location stacks have just been pushed. so pushing a state here evens the stacks. */ yynewstate: *++yyssp = yystate; if (yyssp >= yyss + yystacksize - 1) { /* Give user a chance to reallocate the stack */ /* Use copies of these so that the &'s don't force the real ones into memory. */ YYSTYPE *yyvs1 = yyvs; short *yyss1 = yyss; #ifdef YYLSP_NEEDED YYLTYPE *yyls1 = yyls; #endif /* Get the current used size of the three stacks, in elements. */ int size = yyssp - yyss + 1; #ifdef yyoverflow /* Each stack pointer address is followed by the size of the data in use in that stack, in bytes. */ #ifdef YYLSP_NEEDED /* This used to be a conditional around just the two extra args, but that might be undefined if yyoverflow is a macro. */ yyoverflow("parser stack overflow", &yyss1, size * sizeof (*yyssp), &yyvs1, size * sizeof (*yyvsp), &yyls1, size * sizeof (*yylsp), &yystacksize); #else yyoverflow("parser stack overflow", &yyss1, size * sizeof (*yyssp), &yyvs1, size * sizeof (*yyvsp), &yystacksize); #endif yyss = yyss1; yyvs = yyvs1; #ifdef YYLSP_NEEDED yyls = yyls1; #endif #else /* no yyoverflow */ /* Extend the stack our own way. */ if (yystacksize >= YYMAXDEPTH) { yyerror("parser stack overflow"); if (yyfree_stacks) { free (yyss); free (yyvs); #ifdef YYLSP_NEEDED free (yyls); #endif } return 2; } yystacksize *= 2; if (yystacksize > YYMAXDEPTH) yystacksize = YYMAXDEPTH; #ifndef YYSTACK_USE_ALLOCA yyfree_stacks = 1; #endif yyss = (short *) YYSTACK_ALLOC (yystacksize * sizeof (*yyssp)); __yy_memcpy ((char *)yyss, (char *)yyss1, size * (unsigned int) sizeof (*yyssp)); yyvs = (YYSTYPE *) YYSTACK_ALLOC (yystacksize * sizeof (*yyvsp)); __yy_memcpy ((char *)yyvs, (char *)yyvs1, size * (unsigned int) sizeof (*yyvsp)); #ifdef YYLSP_NEEDED yyls = (YYLTYPE *) YYSTACK_ALLOC (yystacksize * sizeof (*yylsp)); __yy_memcpy ((char *)yyls, (char *)yyls1, size * (unsigned int) sizeof (*yylsp)); #endif #endif /* no yyoverflow */ yyssp = yyss + size - 1; yyvsp = yyvs + size - 1; #ifdef YYLSP_NEEDED yylsp = yyls + size - 1; #endif #if YYDEBUG != 0 if (yydebug) fprintf(stderr, "Stack size increased to %d\n", yystacksize); #endif if (yyssp >= yyss + yystacksize - 1) YYABORT; } #if YYDEBUG != 0 if (yydebug) fprintf(stderr, "Entering state %d\n", yystate); #endif goto yybackup; yybackup: /* Do appropriate processing given the current state. */ /* Read a lookahead token if we need one and don't already have one. */ /* yyresume: */ /* First try to decide what to do without reference to lookahead token. */ yyn = yypact[yystate]; if (yyn == YYFLAG) goto yydefault; /* Not known => get a lookahead token if don't already have one. */ /* yychar is either YYEMPTY or YYEOF or a valid token in external form. */ if (yychar == YYEMPTY) { #if YYDEBUG != 0 if (yydebug) fprintf(stderr, "Reading a token: "); #endif yychar = YYLEX; } /* Convert token to internal form (in yychar1) for indexing tables with */ if (yychar <= 0) /* This means end of input. */ { yychar1 = 0; yychar = YYEOF; /* Don't call YYLEX any more */ #if YYDEBUG != 0 if (yydebug) fprintf(stderr, "Now at end of input.\n"); #endif } else { yychar1 = YYTRANSLATE(yychar); #if YYDEBUG != 0 if (yydebug) { fprintf (stderr, "Next token is %d (%s", yychar, yytname[yychar1]); /* Give the individual parser a way to print the precise meaning of a token, for further debugging info. */ #ifdef YYPRINT YYPRINT (stderr, yychar, yylval); #endif fprintf (stderr, ")\n"); } #endif } yyn += yychar1; if (yyn < 0 || yyn > YYLAST || yycheck[yyn] != yychar1) goto yydefault; yyn = yytable[yyn]; /* yyn is what to do for this token type in this state. Negative => reduce, -yyn is rule number. Positive => shift, yyn is new state. New state is final state => don't bother to shift, just return success. 0, or most negative number => error. */ if (yyn < 0) { if (yyn == YYFLAG) goto yyerrlab; yyn = -yyn; goto yyreduce; } else if (yyn == 0) goto yyerrlab; if (yyn == YYFINAL) YYACCEPT; /* Shift the lookahead token. */ #if YYDEBUG != 0 if (yydebug) fprintf(stderr, "Shifting token %d (%s), ", yychar, yytname[yychar1]); #endif /* Discard the token being shifted unless it is eof. */ if (yychar != YYEOF) yychar = YYEMPTY; *++yyvsp = yylval; #ifdef YYLSP_NEEDED *++yylsp = yylloc; #endif /* count tokens shifted since error; after three, turn off error status. */ if (yyerrstatus) yyerrstatus--; yystate = yyn; goto yynewstate; /* Do the default action for the current state. */ yydefault: yyn = yydefact[yystate]; if (yyn == 0) goto yyerrlab; /* Do a reduction. yyn is the number of a rule to reduce with. */ yyreduce: yylen = yyr2[yyn]; if (yylen > 0) yyval = yyvsp[1-yylen]; /* implement default value of the action */ #if YYDEBUG != 0 if (yydebug) { int i; fprintf (stderr, "Reducing via rule %d (line %d), ", yyn, yyrline[yyn]); /* Print the symbols being reduced, and their result. */ for (i = yyprhs[yyn]; yyrhs[i] > 0; i++) fprintf (stderr, "%s ", yytname[yyrhs[i]]); fprintf (stderr, " -> %s\n", yytname[yyr1[yyn]]); } #endif switch (yyn) { case 11: #line 76 "parse.y" { printf("speed: %d\n", yyvsp[0].intval); ; break;} case 12: #line 83 "parse.y" { printf("debug: %d\n", yyvsp[0].intval); ; break;} case 13: #line 90 "parse.y" { printf("trace: %d\n", yyvsp[0].intval); ; break;} case 14: #line 97 "parse.y" { printf("Bye!\n"); ReportAndExit(); ; break;} case 15: #line 105 "parse.y" { start_record(yyvsp[0].name); ; break;} case 16: #line 112 "parse.y" { printf("Start replay\n"); replay_counter = 1; start_replay(yyvsp[0].name); ; break;} case 17: #line 118 "parse.y" { printf("Start replay\n"); replay_counter = yyvsp[0].intval; start_replay(yyvsp[-1].name); ; break;} case 18: #line 126 "parse.y" { printf("Stop record\n"); stop_record(); ; break;} case 19: #line 134 "parse.y" { printf("command: stop replay\n"); ; break;} case 20: #line 140 "parse.y" { printf("%s\n", yyvsp[0].string); system(yyvsp[0].string); ; break;} } /* the action file gets copied in in place of this dollarsign */ #line 542 "/public/packages/programming/bison-1.27/share/bison.simple" yyvsp -= yylen; yyssp -= yylen; #ifdef YYLSP_NEEDED yylsp -= yylen; #endif #if YYDEBUG != 0 if (yydebug) { short *ssp1 = yyss - 1; fprintf (stderr, "state stack now"); while (ssp1 != yyssp) fprintf (stderr, " %d", *++ssp1); fprintf (stderr, "\n"); } #endif *++yyvsp = yyval; #ifdef YYLSP_NEEDED yylsp++; if (yylen == 0) { yylsp->first_line = yylloc.first_line; yylsp->first_column = yylloc.first_column; yylsp->last_line = (yylsp-1)->last_line; yylsp->last_column = (yylsp-1)->last_column; yylsp->text = 0; } else { yylsp->last_line = (yylsp+yylen-1)->last_line; yylsp->last_column = (yylsp+yylen-1)->last_column; } #endif /* Now "shift" the result of the reduction. Determine what state that goes to, based on the state we popped back to and the rule number reduced by. */ yyn = yyr1[yyn]; yystate = yypgoto[yyn - YYNTBASE] + *yyssp; if (yystate >= 0 && yystate <= YYLAST && yycheck[yystate] == *yyssp) yystate = yytable[yystate]; else yystate = yydefgoto[yyn - YYNTBASE]; goto yynewstate; yyerrlab: /* here on detecting error */ if (! yyerrstatus) /* If not already recovering from an error, report this error. */ { ++yynerrs; #ifdef YYERROR_VERBOSE yyn = yypact[yystate]; if (yyn > YYFLAG && yyn < YYLAST) { int size = 0; char *msg; int x, count; count = 0; /* Start X at -yyn if nec to avoid negative indexes in yycheck. */ for (x = (yyn < 0 ? -yyn : 0); x < (sizeof(yytname) / sizeof(char *)); x++) if (yycheck[x + yyn] == x) size += strlen(yytname[x]) + 15, count++; msg = (char *) malloc(size + 15); if (msg != 0) { strcpy(msg, "parse error"); if (count < 5) { count = 0; for (x = (yyn < 0 ? -yyn : 0); x < (sizeof(yytname) / sizeof(char *)); x++) if (yycheck[x + yyn] == x) { strcat(msg, count == 0 ? ", expecting `" : " or `"); strcat(msg, yytname[x]); strcat(msg, "'"); count++; } } yyerror(msg); free(msg); } else yyerror ("parse error; also virtual memory exceeded"); } else #endif /* YYERROR_VERBOSE */ yyerror("parse error"); } goto yyerrlab1; yyerrlab1: /* here on error raised explicitly by an action */ if (yyerrstatus == 3) { /* if just tried and failed to reuse lookahead token after an error, discard it. */ /* return failure if at end of input */ if (yychar == YYEOF) YYABORT; #if YYDEBUG != 0 if (yydebug) fprintf(stderr, "Discarding token %d (%s).\n", yychar, yytname[yychar1]); #endif yychar = YYEMPTY; } /* Else will try to reuse lookahead token after shifting the error token. */ yyerrstatus = 3; /* Each real token shifted decrements this */ goto yyerrhandle; yyerrdefault: /* current state does not do anything special for the error token. */ #if 0 /* This is wrong; only states that explicitly want error tokens should shift them. */ yyn = yydefact[yystate]; /* If its default is to accept any token, ok. Otherwise pop it.*/ if (yyn) goto yydefault; #endif yyerrpop: /* pop the current state because it cannot handle the error token */ if (yyssp == yyss) YYABORT; yyvsp--; yystate = *--yyssp; #ifdef YYLSP_NEEDED yylsp--; #endif #if YYDEBUG != 0 if (yydebug) { short *ssp1 = yyss - 1; fprintf (stderr, "Error: state stack now"); while (ssp1 != yyssp) fprintf (stderr, " %d", *++ssp1); fprintf (stderr, "\n"); } #endif yyerrhandle: yyn = yypact[yystate]; if (yyn == YYFLAG) goto yyerrdefault; yyn += YYTERROR; if (yyn < 0 || yyn > YYLAST || yycheck[yyn] != YYTERROR) goto yyerrdefault; yyn = yytable[yyn]; if (yyn < 0) { if (yyn == YYFLAG) goto yyerrpop; yyn = -yyn; goto yyreduce; } else if (yyn == 0) goto yyerrpop; if (yyn == YYFINAL) YYACCEPT; #if YYDEBUG != 0 if (yydebug) fprintf(stderr, "Shifting error token, "); #endif *++yyvsp = yylval; #ifdef YYLSP_NEEDED *++yylsp = yylloc; #endif yystate = yyn; goto yynewstate; yyacceptlab: /* YYACCEPT comes here. */ if (yyfree_stacks) { free (yyss); free (yyvs); #ifdef YYLSP_NEEDED free (yyls); #endif } return 0; yyabortlab: /* YYABORT comes here. */ if (yyfree_stacks) { free (yyss); free (yyvs); #ifdef YYLSP_NEEDED free (yyls); #endif } return 1; } #line 144 "parse.y" /* user subroutines section */ int yyerror(s) char *s; { fprintf(stderr, "%s\n", s); return(0); } xlab-980917mine/parse.tab.h100664 71506 1605 657 6745351614 14716 0ustar hildebinstalltypedef union { char *string; /* quoted string (quotes removed by lex scanner) */ char *name; /* filename */ int intval; /* integer */ } YYSTYPE; #define EXIT 257 #define RECORD 258 #define REPLAY 259 #define EXTREP 260 #define STOP 261 #define SET 262 #define TRACE 263 #define DEBUG 264 #define SPEED 265 #define NL 266 #define FILENAME 267 #define SYSSTR 268 #define QSTRING 269 #define NATURAL 270 extern YYSTYPE yylval; xlab-980917mine/warnings100664 71506 1605 0 6745313403 14351 0ustar hildebinstallxlab-980917mine/record100664 71506 1605 0 6745346622 14010 0ustar hildebinstallxlab-980917mine/play100664 71506 1605 771 6745313403 13545 0ustar hildebinstall####### Activate next playback event Playback failure Timed out waiting for window 038001ce ( 038001ce ) EN A-N ------- 0 038001ce 00000000 00000026 274 376 206 13 193 1 Playback failure Timed out waiting for window 038001d4 ( 038001d4 ) EN N-N ------- 0 038001d4 00000000 00000026 260 350 192 220 21 1 Playback failure Timed out waiting for window 038001fd ( 038001fd ) EN N-N ------- 0 038001fd 00000000 00000026 192 126 124 16 10 1 xlab-980917mine/.gdbinit100664 71506 1605 5 6745313403 14224 0ustar hildebinstallrun xlab-980917mine/Makeifle100664 71506 1605 1 6745313403 14237 0ustar hildebinstall xlab-980917mine/scope.da100664 71506 1605 7650 6745313403 14317 0ustar hildebinstall--8!8833!!!!!!!!33833333--&&&&&&&3333dOOOOOOOOOOOOdO22PP3/" 222j22OOPkPkOdddddddddddddddddddddddd833333333--88xlab-980917mine/common.da100664 71506 1605 1410 6745313403 14462 0ustar hildebinstall` &&&&&&&&&-----------&&&&&88xlab-980917mine/fd.da100664 71506 1605 2320 6745313403 13564 0ustar hildebinstall93) {&s\999@SLI٪CCC333gg3333333 Nf d &&&JYePe&EM2 E88xlab-980917mine/server.da100664 71506 1605 2600 6745313403 14502 0ustar hildebinstallӌZZZOPkPkPkOP CT&PzzZ  %h 5$  $   #7 dddO2dddddddd#A#   .. !! dddOAdddAA#Add  Z]ζTZڢڢͫͫ* Z]ͫZ]ͫͫͫFFeFe88xlab-980917mine/decode11.da100664 71506 1605 13640 6745313403 14607 0ustar hildebinstall77#/rr7777@1@1+@1@177hhh  g \.NW>VKH{4@ Ti,JOm q & $  +& & +  $ & qq mmOJJ,iiTT  @44{HKV>WN\. gg  ,$e..پd#5_"}_"#iiY@1@1@1@1uusQ~  ? \!5 ff 5\!?  ~ Q] * *|_ M LL|**  ی * *|_ M * * * O ##xlab-980917mine/table11.da100664 71506 1605 14100 6745313404 14444 0ustar hildebinstall3333333Pb ZJvV RG 3333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333388xlab-980917mine/print11.da100664 71506 1605 44770 6745313404 14531 0ustar hildebinstall> #########YYYY ff00  !!\\ 88Y;Y;WW ++&&Y Y Y Y Y  qqkkII&&&&``\\LL PP33[[))``((mnmn}}(A(A((  88xlab-980917mine/prtype.da100664 71506 1605 5060 6745313404 14523 0ustar hildebinstallEla88xlab-980917mine/record.da100664 71506 1605 12110 6745313404 14470 0ustar hildebinstall####!""::""........_"iL" \ \ sssyy hhhhhhu}i[l l l l l l l l l l l l V l KXgl """"":""   .. L OJEa*:!!џ77!!]"*00gSNF͕DFV_ZV$TFK<mSd- - 4    T                       YY  YYYl> yO   ]>t P *&P r t >>]!GKKKKKKKKZakZ)&fyLp98sGEnV%@]${]$]$"""(G a+""""""""""""88xlab-980917mine/y.tab.da100664 71506 1605 1030 6745313404 14206 0ustar hildebinstallB88xlab-980917mine/lex.yy.da100664 71506 1605 2460 6745313404 14431 0ustar hildebinstall88xlab-980917mine/testicq100775 71506 1605 164 6745313404 14254 0ustar hildebinstallrm -Rf ~/.icq # Create a predefined state ./script play Xgtk ~/gtkicq-0.60/src/gtkicq # Replay until crash