Import xscope bits into keithp.com CVS

1 files changed, 155 insertions, 0 deletions

diff --git a/print_randr.c b/print_randr.c
new file mode 100644
index 0000000..cc1b0c1
--- /dev/null
+++ b/print_randr.c
@@ -0,0 +1,155 @@
+/*
+ * $XFree86$
+ *
+ * Copyright © 2001 Keith Packard, member of The XFree86 Project, Inc.
+ *
+ * Permission to use, copy, modify, distribute, and sell this software and its
+ * documentation for any purpose is hereby granted without fee, provided that
+ * the above copyright notice appear in all copies and that both that
+ * copyright notice and this permission notice appear in supporting
+ * documentation, and that the name of Keith Packard not be used in
+ * advertising or publicity pertaining to distribution of the software without
+ * specific, written prior permission.  Keith Packard makes no
+ * representations about the suitability of this software for any purpose.  It
+ * is provided "as is" without express or implied warranty.
+ *
+ * KEITH PACKARD DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+ * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+ * EVENT SHALL KEITH PACKARD BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+ * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE,
+ * DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
+ * TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+ * PERFORMANCE OF THIS SOFTWARE.
+ */
+
+#include "scope.h"
+#include "x11.h"
+#include "randrscope.h"
+
+RandrQueryVersion (FD fd, unsigned char *buf)
+{
+  PrintField (buf, 0, 1, REQUEST, REQUESTHEADER) /* RandrRequest */ ;
+  PrintField (buf, 1, 1, RANDRREQUEST, RANDRREQUESTHEADER) /* RandrSwitch */ ;
+  if (Verbose < 1)
+    return;
+  if (Verbose > 1)
+    PrintField(SBf, 0, 4, CARD32, "sequence number");
+
+  printfield(buf, 2, 2, CONST2(2), "request length");
+}
+RandrQueryVersionReply (FD fd, unsigned char *buf)
+{
+  short   n;
+  long    m;
+  long   k;
+
+  PrintField(RBf, 0, 1, REPLY, REPLYHEADER) /* RandrRequest reply */ ;
+  PrintField(RBf, 1, 1, RANDRREPLY, RANDRREPLYHEADER) /* RandrQueryVersion reply */;
+  if (Verbose < 1)
+    return;
+  printfield(buf, 2, 2, CARD16, "sequence number");
+  printfield(buf, 4, 4, DVALUE4(0), "reply length");
+  PrintField(buf, 8, 2, CARD16, "major-version");
+  PrintField(buf, 10, 2, CARD16, "minor-version");
+}
+RandrGetScreenInfo (FD fd, unsigned char *buf)
+{
+  PrintField (buf, 0, 1, REQUEST, REQUESTHEADER) /* RandrRequest */ ;
+  PrintField (buf, 1, 1, RANDRREQUEST, RANDRREQUESTHEADER) /* RandrSwitch */ ;
+  if (Verbose < 1)
+    return;
+  if (Verbose > 1)
+    PrintField(SBf, 0, 4, CARD32, "sequence number");
+
+  printfield(buf, 2, 2, CONST2(2), "request length");
+  PrintField(buf, 4, 4, WINDOW, "window");
+}
+
+RandrGetScreenInfoReply (FD fd, unsigned char *buf)
+{
+  short   n;
+  long    m;
+  long   k;
+
+  PrintField(RBf, 0, 1, REPLY, REPLYHEADER) /* RandrRequest reply */ ;
+  PrintField(RBf, 1, 1, RANDRREPLY, RANDRREPLYHEADER) /* RandrQueryVersion reply */;
+  if (Verbose < 1)
+    return;
+  printfield(buf, 2, 2, CARD16, "sequence number");
+  printfield(buf, 4, 4, DVALUE4(0), "reply length");
+}
+
+RandrSetScreenConfig (FD fd, unsigned char *buf)
+{
+  PrintField (buf, 0, 1, REQUEST, REQUESTHEADER) /* RandrRequest */ ;
+  PrintField (buf, 1, 1, RANDRREQUEST, RANDRREQUESTHEADER) /* RandrSwitch */ ;
+  if (Verbose < 1)
+    return;
+  if (Verbose > 1)
+    PrintField(SBf, 0, 4, CARD32, "sequence number");
+
+  printfield(buf, 2, 2, CONST2(2), "request length");
+  PrintField(buf, 4, 4, DRAWABLE, "drawable");
+  PrintField(buf, 8, 4, TIMESTAMP, "timestamp");
+  PrintField(buf,12, 4, TIMESTAMP, "config-timestamp");
+  PrintField(buf,16, 2, CARD16, "size-id");
+  PrintField(buf,18, 2, CARD16, "rotation");
+  PrintField(buf,20, 2, CARD16, "visual-group-id");
+}
+
+RandrSetScreenConfigReply (FD fd, unsigned char *buf)
+{
+  short   n;
+  long    m;
+  long   k;
+
+  PrintField(RBf, 0, 1, REPLY, REPLYHEADER) /* RandrRequest reply */ ;
+  PrintField(buf, 1, 1, BOOL, "success") /* RandrQueryVersion reply */;
+  if (Verbose < 1)
+    return;
+  printfield(buf, 2, 2, CARD16, "sequence number");
+  printfield(buf, 4, 4, DVALUE4(0), "reply length");
+  PrintField(buf, 8, 4, TIMESTAMP, "new-timestamp");
+  PrintField(buf,12, 4, TIMESTAMP, "new-config-timestamp");
+  PrintField(buf,16, 4, WINDOW, "root");
+}
+
+RandrScreenChangeSelectInput (FD fd, unsigned char *buf)
+{
+  PrintField (buf, 0, 1, REQUEST, REQUESTHEADER) /* RandrRequest */ ;
+  PrintField (buf, 1, 1, RANDRREQUEST, RANDRREQUESTHEADER) /* RandrSwitch */ ;
+  if (Verbose < 1)
+    return;
+  if (Verbose > 1)
+    PrintField(SBf, 0, 4, CARD32, "sequence number");
+
+  printfield(buf, 2, 2, CONST2(2), "request length");
+  PrintField(buf, 4, 4, WINDOW, "window");
+  PrintField(buf, 8, 1, BOOL, "enable");
+}
+
+RandrScreenSizes (buf)
+  unsigned char *buf;
+{
+  PrintField(buf, 0, 2, CARD16, "width-in-pixels");
+  PrintField(buf, 2, 2, CARD16, "height-in-pixels");
+  PrintField(buf, 4, 2, CARD16, "width-in-millimeters");
+  PrintField(buf, 6, 2, CARD16, "height-in-millimeters");
+  PrintField(buf, 8, 2, CARD16, "visual-group");
+}
+
+RandrScreenChangeNotifyEvent(buf)
+  unsigned char *buf;
+{
+  PrintField(buf, 0, 1, EVENT, EVENTHEADER) /* RRScreenChangeNotify */ ;
+  if (Verbose < 1)
+    return;
+  PrintField(buf, 1, 1, BOOL, "resident");
+  printfield(buf, 2, 2, CARD16, "sequence number");
+  PrintField(buf, 4, 4, TIMESTAMP, "timestamp");
+  PrintField(buf, 8, 4, TIMESTAMP, "config-timestamp");
+  PrintField(buf,12, 4, WINDOW, "root");
+  PrintField(buf,16, 2, CARD16, "size id");
+  PrintField(buf,18, 2, CARD16, "rotation");
+  RandrScreenSizes (buf + 20);
+}