opencode.energia.arti.ee/vt1200
1
0 Fork 0
forked from arti/vt1200
Code Pull Requests Activity
Files
17dfd24340fe3346433f90457cb48cb8786dff39
vt1200/xie/docs/dec/xie23-src/include/xemacros.h
T
arti d8d54bb990 feat(xie): a client-chosen XIE image is displayed on the VT1200 
The XIE path now runs end to end: XieCreateImage -> XieCreatePhoto ->
XiePutTile -> XieExport(photomap -> depth-1 pixmap) -> XCopyArea(pixmap ->
window), and the client's tile appears on screen at the client's own window
position, pixel-exact.

TWO FAULTS BEHIND THE LONG DEAD END

1. Device model (harness/mame/vt1200.cpp, opt-in VT1200_ACCEL=1).  The
   accelerator's output port 0x5600200 returns the pixel stream the firmware
   pushed into the FIFO -- the firmware then stores it into the drawable itself
   (file 0x125528: MOVE *B6,*B1 ; ADDK 0x10,B1).  The FIFO read pointer was
   never reset between transfers, so consecutive exports read stale words and
   the same fill produced 759 then 516 set pixels.  Reset m_fifo_in/out on the
   data-register write; the export is now deterministic.

2. Measurement, not the device.
   - dwt/screenshot.py without --real reads 1024x1024 at a 128-byte row stride,
     but the VR319 default programs 1280x1024 at a 2048-bit (256-byte) pitch.
     That is the "shifted" picture; --real is the correct read.
   - The earlier "0 differing bytes over 128 KiB" VRAM comparison stepped peek
     by 1024 *bit* addresses, so it scanned rows 0..63 only -- never the window
     at rows 200..263.  Over the real raster the white/black diff is 576 bytes
     spanning exactly those rows.
   - New instrument: decclient does a server-side XGetImage readback of the
     pixmap and window and counts set pixels.  That separated "the server never
     drew it" from "the framebuffer view is wrong".

EVIDENCE (reproduced twice, the second time from a fresh machine)

  no export vs 0xFF : 4096 / 4096 pixels differ
  no export vs 0x00 :    0 / 4096   (the window background is black)
  0xFF      vs 0x00 : 4096 / 4096
  0xAA      vs 0x0F : 2048 / 4096   (the two stripe phases)

Tile byte 0xAA reproduces as 1-pixel vertical stripes, 0x0F as 4-pixel, with
no shear -- so the placement is right and the pixels are the client's.

Contents: xie/ holds DEC XIE 2.3 headers, 84 man pages and complete
client+server source; a libXie.a and decclient built from DEC's own code; the
XIE probes; and evidence/ with every measurement, including explicit
retractions of the earlier wrong readings (VRAM_IDENTICAL_FOR_BOTH_FILLS and
friends).  xie/evidence/XIE_IMAGE_DISPLAYED.md is the report; frames are in
xie/evidence/png/.

The accelerator model stays opt-in: it answers the status poll and relays the
pixel stream, but performs no compositing, so it is a stand-in and the verified
default configuration is unchanged (a no-env run still parks in the level-0
diagnostics menu at PC=3FDCE400).
2026-11-01 23:22:25 +02:00

359 lines
16 KiB
C
Raw Blame History

/*
* *****************************************************************
* * *
* * Copyright (c) Digital Equipment Corporation, 1991, 1994 *
* * *
* * All Rights Reserved. Unpublished rights reserved under *
* * the copyright laws of the United States. *
* * *
* * The software contained on this media is proprietary to *
* * and embodies the confidential technology of Digital *
* * Equipment Corporation. Possession, use, duplication or *
* * dissemination of the software and media is authorized only *
* * pursuant to a valid written license from Digital Equipment *
* * Corporation. *
* * *
* * RESTRICTED RIGHTS LEGEND Use, duplication, or disclosure *
* * by the U.S. Government is subject to restrictions as set *
* * forth in Subparagraph (c)(1)(ii) of DFARS 252.227-7013, *
* * or in FAR 52.227-19, as applicable. *
* * *
* *****************************************************************
*/
/*
* HISTORY
*/
/*
**************************************************************************
** DIGITAL EQUIPMENT CORPORATION **
** CONFIDENTIAL **
** NOT FOR MODIFICATION OR REDISTRIBUTION IN ANY MANNER WHATSOEVER **
**************************************************************************
*/
#ifndef __XEMACROS__
#define __XEMACROS__ "@(#)xemacros.h 1.9 - 90/09/18 "
/* RCSID = $Header: /alphabits/u3/x11/ode/rcs/x11/src/extensions/include/xemacros.h,v 1.1.2.3 92/04/27 12:33:06 Leela_Obilichetti Exp $" */
/*****************************************************************************
Copyright 1987, 1988, 1989, 1990, 1991 by Digital Equipment Corp., Maynard, MA
Permission to use, copy, modify, and distribute this software and its
documentation for any purpose and without fee is hereby granted,
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 Digital not be
used in advertising or publicity pertaining to distribution of the
software without specific, written prior permission.
DIGITAL DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING
ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL
DIGITAL 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.
*****************************************************************************/
/*
*
* CONTRIBUTORS:
*
* Dick Annicchiarico
* Robert Chesler
* Dan Coutu
* Gene Durso
* Marc Evans
* Alan Jamison
* Mark Henry
* Ken Miller
*
* DESCRIPTION:
* This include file is designed to provide the *visible*
* interface to XTrap data structures. Fields can be set
* using these macros by client programs unless otherwise
* specified; however, use of Trap Context convenience
* routines is strongly encouraged (XETrapContext.c)
*/
#include "bits.h"
/* msleep macro to replace msleep() for portability reasons */
#define msleep(m) usleep((m)*1000)
/* Copying TC's assumes that the new TC must be created */
#define XECopyTC(src,mask,dest) \
(dest = XECreateTC(((src)->dpy), (mask), (&((src)->values))))
/* Expands to SET each element of the TCValues structure
* Returns the TCValues Mask so that the Set can be entered
* as an argument to the XEChangeTC() routine call
*/
/* Note: req_cb & evt_cb would only be used if you wanted to
* *share* callbacks between Trap Contexts. Normally,
* XEAddRequestCB() and XEAddEventCB() would be used.
*/
#define XETrapSetCfgReqCB(tcv,x) ((tcv)->req_cb = (x))
#define XETrapSetCfgEvtCB(tcv,x) ((tcv)->evt_cb = (x))
#define XETrapSetCfgMaxPktSize(tcv,x) ((tcv)->v.max_pkt_size = (x))
#define XETrapSetCfgCmdKey(tcv,x) ((tcv)->v.cmd_key = (x))
/* Note: e is only pertinent for "valid" or "data" */
#define XETrapSetCfgFlags(tcv,e,a) \
memcpy((tcv)->v.flags.e, (a), sizeof((tcv)->v.flags.e))
#define XETrapSetCfgFlagTimestamp(tcv,e,x) \
BitSet((tcv)->v.flags.e, XETrapTimestamp, (x))
#define XETrapSetCfgFlagCmd(tcv,e,x) \
BitSet((tcv)->v.flags.e, XETrapCmd, (x))
#define XETrapSetCfgFlagCmdKeyMod(tcv,e,x) \
BitSet((tcv)->v.flags.e, XETrapCmdKeyMod, (x))
#define XETrapSetCfgFlagRequest(tcv,e,x) \
BitSet((tcv)->v.flags.e, XETrapRequest, (x))
#define XETrapSetCfgFlagEvent(tcv,e,x) \
BitSet((tcv)->v.flags.e, XETrapEvent, (x))
#define XETrapSetCfgFlagMaxPacket(tcv,e,x) \
BitSet((tcv)->v.flags.e, XETrapMaxPacket, (x))
#define XETrapSetCfgFlagStatistics(tcv,e,x) \
BitSet((tcv)->v.flags.e, XETrapStatistics, (x))
#define XETrapSetCfgFlagWinXY(tcv,e,x) \
BitSet((tcv)->v.flags.e, XETrapWinXY, (x))
#define XETrapSetCfgFlagCursor(tcv,e,x) \
BitSet((tcv)->v.flags.e, XETrapCursor, (x))
#define XETrapSetCfgFlagReq(tcv,request,x) \
BitSet((tcv)->v.flags.req, (request), (x))
#define XETrapSetCfgFlagXInput(tcv,e,x) \
BitSet((tcv)->v.flags.e, XETrapXInput, (x))
#define XETrapSetCfgFlagColorReplies(tcv,e,x) \
BitSet((tcv)->v.flags.e, XETrapColorReplies, (x))
#define XETrapSetCfgFlagGrabServer(tcv,e,x) \
BitSet((tcv)->v.flags.e, XETrapGrabServer, (x))
#define XETrapSetCfgFlagEvt(tcv,evt,x) \
BitSet((tcv)->v.flags.event, (evt), (x))
#define XETrapSetValFlagDeltaTimes(tcv,x) \
BitSet((tcv)->tc_flags, XETCDeltaTimes, (x))
/* Fields returned in the "GetAvailable" request */
#define XETrapGetAvailPFIdent(avail) ((avail)->pf_ident)
#define XETrapGetAvailRelease(avail) ((avail)->xtrap_release)
#define XETrapGetAvailVersion(avail) ((avail)->xtrap_version)
#define XETrapGetAvailRevision(avail) ((avail)->xtrap_revision)
#define XETrapGetAvailMaxPktSize(avail) ((avail)->max_pkt_size)
#define XETrapGetAvailFlags(avail,a) \
memcpy((a), (avail)->valid, sizeof((avail)->valid))
#define XETrapGetAvailFlagTimestamp(avail) \
(BitValue((avail)->valid, XETrapTimestamp))
#define XETrapGetAvailFlagCmd(avail) \
(BitValue((avail)->valid, XETrapCmd))
#define XETrapGetAvailFlagCmdKeyMod(avail) \
(BitValue((avail)->valid, XETrapCmdKeyMod))
#define XETrapGetAvailFlagRequest(avail) \
(BitValue((avail)->valid, XETrapRequest))
#define XETrapGetAvailFlagEvent(avail) \
(BitValue((avail)->valid, XETrapEvent))
#define XETrapGetAvailFlagMaxPacket(avail) \
(BitValue((avail)->valid, XETrapMaxPacket))
#define XETrapGetAvailFlagStatistics(avail) \
(BitValue((avail)->valid, XETrapStatistics))
#define XETrapGetAvailFlagWinXY(avail) \
(BitValue((avail)->valid, XETrapWinXY))
#define XETrapGetAvailFlagCursor(avail) \
(BitValue((avail)->valid, XETrapCursor))
#define XETrapGetAvailFlagXInput(avail) \
(BitValue((avail)->valid, XETrapXInput))
#define XETrapGetAvailFlagVecEvt(avail) \
(BitValue((avail)->valid, XETrapVectorEvents))
#define XETrapGetAvailFlagColorReplies(avail) \
(BitValue((avail)->valid, XETrapColorReplies))
#define XETrapGetAvailFlagGrabServer(avail) \
(BitValue((avail)->valid, XETrapGrabServer))
#define XETrapGetAvailOpCode(avail) ((avail)->major_opcode)
/* Macro's for creating current request and trap context macros */
#define XETrapGetCfgMaxPktSize(cfg) ((cfg)->max_pkt_size)
#define XETrapGetCfgCmdKey(cfg) ((cfg)->cmd_key)
#define XETrapGetCfgFlags(cfg,e,a) \
memcpy((a), (cfg)->flags.e, sizeof((cfg)->flags.e))
#define XETrapGetCfgFlagTimestamp(cfg,e) \
(BitValue((cfg)->flags.e, XETrapTimestamp))
#define XETrapGetCfgFlagCmd(cfg,e) \
(BitValue((cfg)->flags.e, XETrapCmd))
#define XETrapGetCfgFlagCmdKeyMod(cfg,e) \
(BitValue((cfg)->flags.e, XETrapCmdKeyMod))
#define XETrapGetCfgFlagRequest(cfg,e) \
(BitValue((cfg)->flags.e, XETrapRequest))
#define XETrapGetCfgFlagEvent(cfg,e) \
(BitValue((cfg)->flags.e, XETrapEvent))
#define XETrapGetCfgFlagMaxPacket(cfg,e) \
(BitValue((cfg)->flags.e, XETrapMaxPacket))
#define XETrapGetCfgFlagStatistics(cfg,e) \
(BitValue((cfg)->flags.e, XETrapStatistics))
#define XETrapGetCfgFlagWinXY(cfg,e) \
(BitValue((cfg)->flags.e, XETrapWinXY))
#define XETrapGetCfgFlagCursor(cfg,e) \
(BitValue((cfg)->flags.e, XETrapCursor))
#define XETrapGetCfgFlagXInput(cfg,e) \
(BitValue((cfg)->flags.e, XETrapXInput))
#define XETrapGetCfgFlagColorReplies(cfg,e) \
(BitValue((cfg)->flags.e, XETrapColorReplies))
#define XETrapGetCfgFlagGrabServer(cfg,e) \
(BitValue((cfg)->flags.e, XETrapGrabServer))
/* Request values are in "Xproto.h" of the flavor X_RequestType */
#define XETrapGetCfgFlagReq(cfg,request) \
(BitValue((cfg)->flags.req, (request)))
/* Event types are in "X.h" of the flavor EventType (e.g. KeyPress) */
#define XETrapGetCfgFlagEvt(cfg,evt) \
(BitValue((cfg)->flags.event, (evt)))
/* Fields returned int the "GetCurrent" Request */
#define XETrapGetCurX(avail) ((avail)->cur_x)
#define XETrapGetCurY(avail) ((avail)->cur_y)
#define XETrapGetCurSFlags(cur,a) \
memcpy((a), (cur)->state_flags, sizeof((cur)->state_flags))
#define XETrapGetCurMaxPktSize(cur) (XETrapGetCfgMaxPktSize(&((cur)->config)))
#define XETrapGetCurCmdKey(cur) (XETrapGetCfgCmdKey(&((cur)->config)))
/* Note: e is only pertinent for "valid" or "data" */
#define XETrapGetCurCFlags(cur,e,a) (XETrapGetCfgFlags(&((cur)->config),e,a))
#define XETrapGetCurFlagTimestamp(cur,e) \
(XETrapGetCfgFlagTimestamp(&((cur)->config),e))
#define XETrapGetCurFlagCmd(cur,e) (XETrapGetCfgFlagCmd(&((cur)->config),e))
#define XETrapGetCurFlagCmdKeyMod(cur,e) \
(XETrapGetCfgFlagCmdKeyMod(&((cur)->config),e))
#define XETrapGetCurFlagRequest(cur,r) \
(XETrapGetCfgFlagRequest(&((cur)->config),r))
#define XETrapGetCurFlagEvent(cur,e) \
(XETrapGetCfgFlagEvent(&((cur)->config),e))
#define XETrapGetCurFlagMaxPacket(cur,e) \
(XETrapGetCfgFlagMaxPacket(&((cur)->config),e))
#define XETrapGetCurFlagStatistics(cur,e) \
(XETrapGetCfgFlagStatistics(&((cur)->config),e))
#define XETrapGetCurFlagWinXY(cur,e) \
(XETrapGetCfgFlagWinXY(&((cur)->config),e))
#define XETrapGetCurFlagCursor(cur,e) \
(XETrapGetCfgFlagCursor(&((cur)->config),e))
#define XETrapGetCurFlagXInput(cur,e) \
(XETrapGetCfgFlagXInput(&((cur)->config),e))
#define XETrapGetCurFlagColorReplies(cur,e) \
(XETrapGetCfgFlagColorReplies(&((cur)->config),e))
#define XETrapGetCurFlagGrabServer(cur,e) \
(XETrapGetCfgFlagGrabServer(&((cur)->config),e))
/* Request values are in "Xproto.h" of the flavor X_RequestType */
#define XETrapGetCurFlagReq(cur,r) (XETrapGetCfgFlagReq(&((cur)->config),r))
/* Event types are in "X.h" of the flavor EventType (e.g. KeyPress) */
#define XETrapGetCurFlagEvt(cur,e) (XETrapGetCfgFlagEvt(&((cur)->config),e))
/* Fields returned int the "GetStatistics" Request */
#define XETrapGetStatsReq(stat,e) ((stat)->requests[(e)])
#define XETrapGetStatsEvt(stat,e) ((stat)->events[(e)])
/* Fields returned in the "GetVersion" request */
#define XETrapGetVersRelease(vers) ((vers)->xtrap_release)
#define XETrapGetVersVersion(vers) ((vers)->xtrap_version)
#define XETrapGetVersRevision(vers) ((vers)->xtrap_revision)
/* Fields returned in the "GetLastInpTime" request */
#define XETrapGetLastInpTime(time_rep) ((time_rep)->last_time)
/* Expands to GET each element of the TCValues structure */
#define XETrapGetTCReqCB(tc) ((tc)->values.req_cb)
#define XETrapGetTCEvtCB(tc) ((tc)->values.evt_cb)
#define XETrapGetTCTime(tc) ((tc)->values.last_time)
/* TC specific flags */
#define XETrapGetTCLFlags(tc,a) \
memcpy((a), (tc)->values.tc_flags, sizeof((tc)->values.tc_flags))
#define XETrapGetTCFlagDeltaTimes(tc) \
(BitValue((tc)->values.tc_flags, XETCDeltaTimes))
#define XETrapGetTCFlagTrapActive(tc) \
(BitValue((tc)->values.tc_flags, XETCTrapActive))
#define XETrapGetTCMaxPktSize(tc) (XETrapGetCfgMaxPktSize(&((tc)->values.v)))
#define XETrapGetTCCmdKey(tc) (XETrapGetCfgCmdKey(&((tc)->values.v)))
/* Note: e is only pertinent for "valid" or "data" */
#define XETrapGetTCFlags(tc,e,a) (XETrapGetCfgFlags(&((tc)->values.v),e,a))
#define XETrapGetTCFlagTimestamp(tc,e) \
(XETrapGetCfgFlagTimestamp(&((tc)->values.v),e))
#define XETrapGetTCFlagCmd(tc,e) \
(XETrapGetCfgFlagCmd(&((tc)->values.v),e))
#define XETrapGetTCFlagCmdKeyMod(tc,e) \
(XETrapGetCfgFlagCmdKeyMod(&((tc)->values.v),e))
#define XETrapGetTCFlagRequest(tc,r) \
(XETrapGetCfgFlagRequest(&((tc)->values.v),r))
#define XETrapGetTCFlagEvent(tc,e) \
(XETrapGetCfgFlagEvent(&((tc)->values.v),e))
#define XETrapGetTCFlagMaxPacket(tc,e) \
(XETrapGetCfgFlagMaxPacket(&((tc)->values.v),e))
#define XETrapGetTCFlagStatistics(tc,e) \
(XETrapGetCfgFlagStatistics(&((tc)->values.v),e))
#define XETrapGetTCFlagWinXY(tc,e) \
(XETrapGetCfgFlagWinXY(&((tc)->values.v),e))
#define XETrapGetTCFlagCursor(tc,e) \
(XETrapGetCfgFlagCursor(&((tc)->values.v),e))
#define XETrapGetTCFlagXInput(tc,e) \
(XETrapGetCfgFlagXInput(&((tc)->values.v),e))
#define XETrapGetTCFlagColorReplies(tc,e) \
(XETrapGetCfgFlagColorReplies(&((tc)->values.v),e))
#define XETrapGetTCFlagGrabServer(tc,e) \
(XETrapGetCfgFlagGrabServer(&((tc)->values.v),e))
/* Request values are in "Xproto.h" of the flavor X_RequestType */
#define XETrapGetTCFlagReq(tc,r) \
(XETrapGetCfgFlagReq(&((tc)->values.v),r))
/* Event types are in "X.h" of the flavor EventType (e.g. KeyPress) */
#define XETrapGetTCFlagEvt(tc,e) \
(XETrapGetCfgFlagEvt(&((tc)->values.v),e))
/* The following can/should *not* be set directly! */
#define XETrapGetNext(tc) ((tc)->next)
#define XETrapGetDpy(tc) ((tc)->dpy)
#define XETrapGetEventBase(tc) ((tc)->eventBase)
#define XETrapGetErrorBase(tc) ((tc)->errorBase)
#define XETrapGetExtOpcode(tc) ((tc)->extOpcode)
#define XETrapGetXBuff(tc) ((tc)->xbuff)
#define XETrapGetXMaxSize(tc) ((tc)->xmax_size)
#define XETrapGetExt(tc) ((tc)->ext_data)
#define XETrapGetDirty(tc) ((tc)->dirty)
#define XETrapGetValues(tc) memcpy((x),(tc)->values,sizeof((tc)->values))
#define XETrapGetEventFunc(tc) ((tc)->eventFunc)
#define XETrapGetHeaderCount(phdr) ((phdr)->count)
#define XETrapGetHeaderTimestamp(phdr) ((phdr)->timestamp)
#define XETrapGetHeaderType(phdr) ((phdr)->type)
#define XETrapGetHeaderScreen(phdr) ((phdr)->screen)
#define XETrapGetHeaderWindowX(phdr) ((phdr)->win_x)
#define XETrapGetHeaderWindowY(phdr) ((phdr)->win_y)
#define XETrapGetHeaderClient(phdr) ((phdr)->client)
#define XEGetRelease(tc) ((tc)->release)
#define XEGetVersion(tc) ((tc)->version)
#define XEGetRevision(tc) ((tc)->revision)
/* Condition handling macros */
#ifndef _InitExceptionHandling
#ifdef vms
#define _InitExceptionHandling(rtn) \
VAXC$ESTABLISH(rtn) /* VMS exception handler */
#else /* vms */
#define _InitExceptionHandling(rtn) \
(void)signal(SIGBUS, rtn); /* Bus error */ \
(void)signal(SIGSEGV, rtn); /* Accvio/Segment error */ \
(void)signal(SIGFPE, rtn); /* Floating point exception */ \
(void)signal(SIGILL, rtn); /* Illegal instruction */ \
(void)signal(SIGSYS, rtn); /* Param error in sys call */ \
(void)signal(SIGHUP, rtn); \
(void)signal(SIGPIPE, rtn); \
(void)signal(SIGTERM, rtn)
#endif /* vms */
#endif /* _InitExceptionHandling */
#ifndef _ClearExceptionHandling
#ifdef vms
#define _ClearExceptionHandling() \
LIB$REVERT()
#else
#define _ClearExceptionHandling() \
(void)signal(SIGBUS, SIG_DFL); /* Bus error */ \
(void)signal(SIGSEGV, SIG_DFL); /* Accvio/Segment error */ \
(void)signal(SIGFPE, SIG_DFL); /* Floating point exception */ \
(void)signal(SIGILL, SIG_DFL); /* Illegal instruction */ \
(void)signal(SIGSYS, SIG_DFL); /* Param error in sys call */ \
(void)signal(SIGHUP, SIG_DFL); \
(void)signal(SIGPIPE, SIG_DFL); \
(void)signal(SIGTERM, SIG_DFL)
#endif /* vms */
#endif /* _ClearExceptionHandling */
#endif /* __XEMACROS__ */
View Git Blame Copy Permalink