TGX11.cxx

Go to the documentation of this file.

// @(#)root/x11:$Id$
// Author: Rene Brun, Olivier Couet, Fons Rademakers   28/11/94
 
/*************************************************************************
 * Copyright (C) 1995-2000, Rene Brun and Fons Rademakers.               *
 * All rights reserved.                                                  *
 *                                                                       *
 * For the licensing terms see $ROOTSYS/LICENSE.                         *
 * For the list of contributors see $ROOTSYS/README/CREDITS.             *
 *************************************************************************/
 
/// \defgroup x11 X11 backend
/// \brief Interface to X11 graphics.
/// \ingroup GraphicsBackends
 
/** \class TGX11
\ingroup x11
This class is the basic interface to the X11 (Xlib) graphics system.
It is an implementation of the abstract TVirtualX class.
 
This class gives access to basic X11 graphics, pixmap, text and font handling
routines.
 
The companion class for Win32 is TGWin32.
 
The file G11Gui.cxx contains the implementation of the GUI methods of the
TGX11 class. Most of the methods are used by the machine independent
GUI classes (libGUI.so).
 
This code was initially developed in the context of HIGZ and PAW
by Olivier Couet (package X11INT).
*/
 
#include "TROOT.h"
#include "TColor.h"
#include "TGX11.h"
#include "TPoint.h"
#include "TMath.h"
#include "TStorage.h"
#include "TStyle.h"
#include "TExMap.h"
#include "TEnv.h"
#include "TString.h"
#include "TObjString.h"
#include "TObjArray.h"
#include "RStipples.h"
#include "strlcpy.h"
 
#include <X11/Xlib.h>
#include <X11/Xutil.h>
#include <X11/Xatom.h>
#include <X11/cursorfont.h>
#include <X11/keysym.h>
#include <X11/xpm.h>
 
#include <cstdio>
#include <cstring>
#include <cstdlib>
#include <cctype>
#include <unistd.h>
#ifdef R__AIX
#   include <sys/socket.h>
#endif
 
#include "gifencode.h"
#include "gifdecode.h"
 
extern float   XRotVersion(char*, int);
extern void    XRotSetMagnification(float);
extern void    XRotSetBoundingBoxPad(int);
extern int     XRotDrawString(Display*, XFontStruct*, float,
                              Drawable, GC, int, int, char*);
extern int     XRotDrawImageString(Display*, XFontStruct*, float,
                                   Drawable, GC, int, int, char*);
extern int     XRotDrawAlignedString(Display*, XFontStruct*, float,
                                     Drawable, GC, int, int, char*, int);
extern int     XRotDrawAlignedImageString(Display*, XFontStruct*, float,
                                          Drawable, GC, int, int, char*, int);
extern XPoint *XRotTextExtents(Display*, XFontStruct*, float,
                               int, int, char*, int);
 
 
 
//
// Primitives Graphic Contexts global for all windows
//
const int kMAXGC = 7,
          kGCline = 0, kGCmark = 1, kGCfill = 2,
          kGCtext = 3, kGCinvt = 4, kGCdash = 5, kGCpxmp = 6;
 
static GC gGCecho;                 // Input echo
 
 
/// Description of a X11 window.
struct XWindow_t {
   Int_t    fOpen = 0;                ///< 1 if the window is open, 0 if not
   Int_t    fDoubleBuffer = 0;        ///< 1 if the double buffer is on, 0 if not
   Int_t    fIsPixmap = 0;            ///< 1 if pixmap, 0 if not
   Drawable fDrawing = 0;             ///< drawing area, equal to window or buffer
   Drawable fWindow = 0;              ///< X11 window
   Drawable fBuffer = 0;              ///< pixmap used for double buffer
   UInt_t   fWidth = 0;               ///< width of the window
   UInt_t   fHeight = 0;              ///< height of the window
   Int_t    fClip = 0;                ///< 1 if the clipping is on
   Int_t    fXclip = 0;               ///< x coordinate of the clipping rectangle
   Int_t    fYclip = 0;               ///< y coordinate of the clipping rectangle
   UInt_t   fWclip = 0;               ///< width of the clipping rectangle
   UInt_t   fHclip = 0;               ///< height of the clipping rectangle
   std::vector<ULong_t> fNewColors;   ///< extra image colors created for transparency (after processing)
   Bool_t   fShared = 0;              ///< notify when window is shared
   GC       fGClist[kMAXGC];          ///< list of GC object, individual for each window
   TVirtualX::EDrawMode drawMode = TVirtualX::kCopy;    ///< current draw mode
   TAttLine  fAttLine = {-1, -1, -1};  ///< current line attributes
   Int_t     lineWidth = 0;           ///< X11 line width
   Int_t     lineStyle = LineSolid;   ///< X11 line style
   std::vector<char> dashList;        ///< X11 array for dashes
   Int_t     dashLength = 0;          ///< total length of dashes
   Int_t     dashOffset = 0;          ///< current dash offset
   TAttFill  fAttFill = {-1, -1};     ///< current fill attributes
   Int_t     fillHollow = 0;          ///< X11 fill method
   Int_t     fillFasi = 0;            ///< selected fasi pattern
   Pixmap    fillPattern = 0;         ///< current initialized fill pattern
   TAttMarker fAttMarker = { -1, -1, -1 }; ///< current marker attribute
   Int_t     markerType = 0;          ///< 4 differen kinds of marker
   Int_t     markerSize = 0;          ///< size of simple markers
   std::vector<XPoint> markerShape;   ///< marker shape points
   Int_t markerLineWidth = 0;         ///< line width used for marker
   TAttText fAttText;                 ///< current text attribute
   TGX11::EAlign textAlign = TGX11::kAlignNone;     ///< selected text align
   XFontStruct *textFont = nullptr;   ///< selected text font
};
 
 
//---- globals
 
static XWindow_t *gCws;      // gCws: pointer to the current window
static XWindow_t *gTws;      // gTws: temporary pointer
 
const Int_t kBIGGEST_RGB_VALUE = 65535;
 
 
//
// Text management
//
const Int_t kMAXFONT = 4;
static struct {
   XFontStruct *id;
   char         name[80];                    // Font name
} gFont[kMAXFONT];                          // List of fonts loaded
 
static XFontStruct *gTextFont;              // Current font
static Int_t        gCurrentFontNumber = 0; // Current font number in gFont[]
 
static int  gMarkerLineStyle = LineSolid;
static int  gMarkerCapStyle  = CapRound;
static int  gMarkerJoinStyle = JoinRound;
 
//
// Keep style values for line GC
//
static int  gCapStyle  = CapButt;
static int  gJoinStyle = JoinMiter;
 
//
// Event masks
//
static ULong_t gMouseMask =   ButtonPressMask   | ButtonReleaseMask |
                              EnterWindowMask   | LeaveWindowMask   |
                              PointerMotionMask | KeyPressMask      |
                              KeyReleaseMask;
static ULong_t gKeybdMask =   ButtonPressMask | KeyPressMask |
                              EnterWindowMask | LeaveWindowMask;
 
//
// Data to create an invisible cursor
//
const char null_cursor_bits[] = {
0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00};
static Cursor gNullCursor = 0;
 
struct RXGCValues:XGCValues{};
struct RXColor:XColor{};
struct RXImage:XImage{};
struct RXPoint:XPoint{};
struct RXVisualInfo:XVisualInfo{};
struct RVisual:Visual{};
 
 
////////////////////////////////////////////////////////////////////////////////
/// Default constructor.
 
TGX11::TGX11()
{
   int i;
   fDisplay            = nullptr;
   fScreenNumber       = 0;
   fVisual             = nullptr;
   fRootWin            = 0;
   fVisRootWin         = 0;
   fColormap           = 0;
   fBlackPixel         = 0;
   fWhitePixel         = 0;
   fColors             = nullptr;
   fXEvent             = new XEvent;
   fRedDiv             = -1;
   fGreenDiv           = -1;
   fBlueDiv            = -1;
   fRedShift           = -1;
   fGreenShift         = -1;
   fBlueShift          = -1;
   fCharacterUpX       = 1;
   fCharacterUpY       = 1;
   fDepth              = 0;
   fHasTTFonts         = kFALSE;
   fHasXft             = kFALSE;
   fTextMagnitude      = 1;
   for (i = 0; i < kNumCursors; i++) fCursors[i] = 0;
}
 
////////////////////////////////////////////////////////////////////////////////
/// Normal Constructor.
 
TGX11::TGX11(const char *name, const char *title) : TVirtualX(name, title)
{
   int i;
   fDisplay            = nullptr;
   fScreenNumber       = 0;
   fVisual             = nullptr;
   fRootWin            = 0;
   fVisRootWin         = 0;
   fColormap           = 0;
   fBlackPixel         = 0;
   fWhitePixel         = 0;
   fDrawMode           = kCopy;
   fXEvent             = new XEvent;
   fRedDiv             = -1;
   fGreenDiv           = -1;
   fBlueDiv            = -1;
   fRedShift           = -1;
   fGreenShift         = -1;
   fBlueShift          = -1;
   fCharacterUpX       = 1;
   fCharacterUpY       = 1;
   fDepth              = 0;
   fHasTTFonts         = kFALSE;
   fHasXft             = kFALSE;
   fTextMagnitude      = 1;
   for (i = 0; i < kNumCursors; i++)
      fCursors[i] = 0;
 
   fColors = new TExMap;
}
 
////////////////////////////////////////////////////////////////////////////////
/// Copy constructor. Currently only used by TGX11TTF.
 
TGX11::TGX11(TGX11 &&org) : TVirtualX(org)
{
   fDisplay         = org.fDisplay;
   fScreenNumber    = org.fScreenNumber;
   fVisual          = org.fVisual;
   fRootWin         = org.fRootWin;
   fVisRootWin      = org.fVisRootWin;
   fColormap        = org.fColormap;
   fBlackPixel      = org.fBlackPixel;
   fWhitePixel      = org.fWhitePixel;
   fHasTTFonts      = org.fHasTTFonts;
   fHasXft          = org.fHasXft;
   fTextMagnitude   = org.fTextMagnitude;
   fCharacterUpX    = org.fCharacterUpX;
   fCharacterUpY    = org.fCharacterUpY;
   fDepth           = org.fDepth;
   fRedDiv          = org.fRedDiv;
   fGreenDiv        = org.fGreenDiv;
   fBlueDiv         = org.fBlueDiv;
   fRedShift        = org.fRedShift;
   fGreenShift      = org.fGreenShift;
   fBlueShift       = org.fBlueShift;
   fDrawMode        = org.fDrawMode;
   fXEvent          = org.fXEvent; org.fXEvent = nullptr;
   fColors          = org.fColors; org.fColors = nullptr;
 
   fWindows         = std::move(org.fWindows);
 
   for (int i = 0; i < kNumCursors; i++) {
      fCursors[i] = org.fCursors[i];
      org.fCursors[i] = 0;
   }
}
 
////////////////////////////////////////////////////////////////////////////////
/// Destructor.
 
TGX11::~TGX11()
{
   if (fXEvent)
      delete (XEvent*)fXEvent;
 
   if (fColors) {
      Long64_t key, value;
      TExMapIter it(fColors);
      while (it.Next(key, value)) {
         XColor_t *col = (XColor_t *) (Long_t)value;
         delete col;
      }
      delete fColors;
   }
 
   for (int i = 0; i < kNumCursors; i++)
      if (fCursors[i])
         XFreeCursor((Display*)fDisplay, fCursors[i]);
}
 
////////////////////////////////////////////////////////////////////////////////
/// Initialize X11 system. Returns kFALSE in case of failure.
 
Bool_t TGX11::Init(void *display)
{
   if (OpenDisplay(display) == -1)
      return kFALSE;
   return kTRUE;
}
 
////////////////////////////////////////////////////////////////////////////////
/// Allocate color in colormap. If we are on an <= 8 plane machine
/// we will use XAllocColor. If we are on a >= 15 (15, 16 or 24) plane
/// true color machine we will calculate the pixel value using:
/// for 15 and 16 bit true colors have 6 bits precision per color however
/// only the 5 most significant bits are used in the color index.
/// Except for 16 bits where green uses all 6 bits. I.e.:
/// ~~~ {.cpp}
///   15 bits = rrrrrgggggbbbbb
///   16 bits = rrrrrggggggbbbbb
/// ~~~
/// for 24 bits each r, g and b are represented by 8 bits.
///
/// Since all colors are set with a max of 65535 (16 bits) per r, g, b
/// we just right shift them by 10, 11 and 10 bits for 16 planes, and
/// (10, 10, 10 for 15 planes) and by 8 bits for 24 planes.
/// Returns kFALSE in case color allocation failed.
 
Bool_t TGX11::AllocColor(Colormap cmap, RXColor *color)
{
   if (fRedDiv == -1) {
      if (XAllocColor((Display*)fDisplay, cmap, color))
         return kTRUE;
   } else {
      color->pixel = (color->red   >> fRedDiv)   << fRedShift |
                     (color->green >> fGreenDiv) << fGreenShift |
                     (color->blue  >> fBlueDiv)  << fBlueShift;
      return kTRUE;
   }
   return kFALSE;
}
 
////////////////////////////////////////////////////////////////////////////////
/// Returns the current RGB value for the pixel in the XColor structure.
 
void TGX11::QueryColors(Colormap cmap, RXColor *color, Int_t ncolors)
{
   if (fRedDiv == -1) {
      XQueryColors((Display*)fDisplay, cmap, color, ncolors);
   } else {
      ULong_t r, g, b;
      for (Int_t i = 0; i < ncolors; i++) {
         r = (color[i].pixel & fVisual->red_mask) >> fRedShift;
         color[i].red = UShort_t(r*kBIGGEST_RGB_VALUE/(fVisual->red_mask >> fRedShift));
 
         g = (color[i].pixel & fVisual->green_mask) >> fGreenShift;
         color[i].green = UShort_t(g*kBIGGEST_RGB_VALUE/(fVisual->green_mask >> fGreenShift));
 
         b = (color[i].pixel & fVisual->blue_mask) >> fBlueShift;
         color[i].blue = UShort_t(b*kBIGGEST_RGB_VALUE/(fVisual->blue_mask >> fBlueShift));
 
         color[i].flags = DoRed | DoGreen | DoBlue;
      }
   }
}
 
 
////////////////////////////////////////////////////////////////////////////////
/// Clear current window.
 
void TGX11::ClearWindow()
{
   ClearWindowW((WinContext_t) gCws);
}
 
////////////////////////////////////////////////////////////////////////////////
/// Clear specified window.
 
void TGX11::ClearWindowW(WinContext_t wctxt)
{
   auto ctxt = (XWindow_t *) wctxt;
   if (!ctxt)
      return;
 
   if (!ctxt->fIsPixmap && !ctxt->fDoubleBuffer) {
      XSetWindowBackground((Display*)fDisplay, ctxt->fDrawing, GetColor(0).fPixel);
      XClearWindow((Display*)fDisplay, ctxt->fDrawing);
      XFlush((Display*)fDisplay);
   } else {
      SetColor(ctxt, &ctxt->fGClist[kGCpxmp], 0);
      XFillRectangle((Display*)fDisplay, ctxt->fDrawing, ctxt->fGClist[kGCpxmp],
                     0, 0, ctxt->fWidth, ctxt->fHeight);
      SetColor(ctxt, &ctxt->fGClist[kGCpxmp], 1);
   }
}
 
////////////////////////////////////////////////////////////////////////////////
/// Delete current pixmap.
 
void TGX11::ClosePixmap()
{
   CloseWindow();
}
 
////////////////////////////////////////////////////////////////////////////////
/// Delete current window.
 
void TGX11::CloseWindow()
{
   if (gCws->fBuffer)
      XFreePixmap((Display*)fDisplay, gCws->fBuffer);
 
   if (!gCws->fNewColors.empty()) {
      if (fRedDiv == -1)
         XFreeColors((Display*)fDisplay, fColormap, gCws->fNewColors.data(), gCws->fNewColors.size(), 0);
      gCws->fNewColors.clear();
   }
 
   if (!gCws->fShared) { // if not QT window
      if (gCws->fIsPixmap)
         XFreePixmap((Display*)fDisplay, gCws->fWindow);
      else
         XDestroyWindow((Display*)fDisplay, gCws->fWindow);
 
      XFlush((Display*)fDisplay);
   }
 
   for (int i = 0; i < kMAXGC; ++i)
      XFreeGC((Display*)fDisplay, gCws->fGClist[i]);
 
   if (gCws->fillPattern != 0) {
      XFreePixmap((Display*)fDisplay, gCws->fillPattern);
      gCws->fillPattern = 0;
   }
 
   gCws->fOpen = 0;
 
   for (auto iter = fWindows.begin(); iter != fWindows.end(); ++iter)
      if (iter->second.get() == gCws) {
         fWindows.erase(iter);
         gCws = nullptr;
         break;
      }
 
   if (gCws)
      Fatal("CloseWindow", "Not found gCws in list of windows");
 
   // select first from active windows
   for (auto iter = fWindows.begin(); iter != fWindows.end(); ++iter)
      if (iter->second && iter->second->fOpen) {
         gCws = iter->second.get();
         return;
      }
}
 
////////////////////////////////////////////////////////////////////////////////
/// Copy the pixmap wid at the position xpos, ypos in the current window.
 
void TGX11::CopyPixmap(int wid, int xpos, int ypos)
{
   CopyPixmapW((WinContext_t) gCws, wid, xpos, ypos);
}
 
////////////////////////////////////////////////////////////////////////////////
/// Draw a box.
///
///  - mode=0 hollow  (kHollow)
///  - mode=1 solid   (kSolid)
 
void TGX11::DrawBox(int x1, int y1, int x2, int y2, EBoxMode mode)
{
   DrawBoxW((WinContext_t) gCws, x1, y1, x2, y2, mode);
}
 
////////////////////////////////////////////////////////////////////////////////
/// Draw a box on specified window
///
///  - mode=0 hollow  (kHollow)
///  - mode=1 solid   (kSolid)
 
void TGX11::DrawBoxW(WinContext_t wctxt, Int_t x1, Int_t y1, Int_t x2, Int_t y2, EBoxMode mode)
{
   auto ctxt = (XWindow_t *) wctxt;
 
   Int_t x = TMath::Min(x1, x2);
   Int_t y = TMath::Min(y1, y2);
   Int_t w = TMath::Abs(x2 - x1);
   Int_t h = TMath::Abs(y2 - y1);
 
   switch (mode) {
 
      case kHollow:
         XDrawRectangle((Display*)fDisplay, ctxt->fDrawing, ctxt->fGClist[kGCline], x, y, w, h);
         break;
 
      case kFilled:
         XFillRectangle((Display*)fDisplay, ctxt->fDrawing, ctxt->fGClist[kGCfill], x, y, w, h);
         break;
 
      default:
         break;
   }
}
 
////////////////////////////////////////////////////////////////////////////////
/// Draw a cell array.
//
///  \param [in] x1,y1        : left down corner
///  \param [in] x2,y2        : right up corner
///  \param [in] nx,ny        : array size
///  \param [in] ic           : array
///
/// Draw a cell array. The drawing is done with the pixel precision
/// if (X2-X1)/NX (or Y) is not a exact pixel number the position of
/// the top right corner may be wrong.
 
void TGX11::DrawCellArray(int x1, int y1, int x2, int y2, int nx, int ny, int *ic)
{
   int i, j, icol, ix, iy, w, h, current_icol;
 
   current_icol = -1;
   w            = TMath::Max((x2-x1)/(nx),1);
   h            = TMath::Max((y1-y2)/(ny),1);
   ix           = x1;
 
   for (i = 0; i < nx; i++) {
      iy = y1-h;
      for (j = 0; j < ny; j++) {
         icol = ic[i+(nx*j)];
         if (icol != current_icol) {
            XSetForeground((Display*)fDisplay, gCws->fGClist[kGCfill], GetColor(icol).fPixel);
            current_icol = icol;
         }
         XFillRectangle((Display*)fDisplay, gCws->fDrawing, gCws->fGClist[kGCfill], ix, iy, w, h);
         iy = iy-h;
      }
      ix = ix+w;
   }
}
 
////////////////////////////////////////////////////////////////////////////////
/// Fill area described by polygon.
///
///  \param [in] n     number of points
///  \param [in] xy   list of points
 
void TGX11::DrawFillArea(int n, TPoint *xy)
{
   DrawFillAreaW((WinContext_t) gCws, n, xy);
}
 
////////////////////////////////////////////////////////////////////////////////
/// Fill area described by polygon on specified window
///
///  \param [in] n     number of points
///  \param [in] xy   list of points
 
void TGX11::DrawFillAreaW(WinContext_t wctxt, Int_t n, TPoint *xy)
{
   auto ctxt = (XWindow_t *) wctxt;
   XPoint *xyp = (XPoint *)xy;
 
   if (ctxt->fillHollow)
      XDrawLines((Display*)fDisplay, ctxt->fDrawing, ctxt->fGClist[kGCfill], xyp, n, CoordModeOrigin);
 
   else {
      XFillPolygon((Display*)fDisplay, ctxt->fDrawing, ctxt->fGClist[kGCfill],
                   xyp, n, Nonconvex, CoordModeOrigin);
   }
}
 
////////////////////////////////////////////////////////////////////////////////
/// Draw a line.
///
///  \param [in] x1,y1        : begin of line
///  \param [in] x2,y2        : end of line
 
void TGX11::DrawLine(Int_t x1, Int_t y1, Int_t x2, Int_t y2)
{
   DrawLineW((WinContext_t) gCws, x1, y1, x2, y2);
}
 
////////////////////////////////////////////////////////////////////////////////
/// Draw a line on specified window.
///
///  \param [in] x1,y1        : begin of line
///  \param [in] x2,y2        : end of line
 
void TGX11::DrawLineW(WinContext_t wctxt, Int_t x1, Int_t y1, Int_t x2, Int_t y2)
{
   auto ctxt = (XWindow_t *) wctxt;
 
   if (ctxt->lineStyle == LineSolid)
      XDrawLine((Display*)fDisplay, ctxt->fDrawing, ctxt->fGClist[kGCline], x1, y1, x2, y2);
   else {
      XSetDashes((Display*)fDisplay, ctxt->fGClist[kGCdash], ctxt->dashOffset, ctxt->dashList.data(), ctxt->dashList.size());
      XDrawLine((Display*)fDisplay, ctxt->fDrawing, ctxt->fGClist[kGCdash], x1, y1, x2, y2);
   }
}
 
////////////////////////////////////////////////////////////////////////////////
/// Draw a line through all points.
///
///  \param [in] n     number of points
///  \param [in] xy   list of points
 
void TGX11::DrawPolyLine(int n, TPoint *xy)
{
   DrawPolyLineW((WinContext_t) gCws, n, xy);
}
 
////////////////////////////////////////////////////////////////////////////////
/// Draw a line through all points on specified window.
///
///  \param [in] n     number of points
///  \param [in] xy   list of points
 
void TGX11::DrawPolyLineW(WinContext_t wctxt, Int_t n, TPoint *xy)
{
   auto ctxt = (XWindow_t *) wctxt;
   XPoint *xyp = (XPoint*)xy;
 
   const Int_t kMaxPoints = 1000001;
 
   if (n > kMaxPoints) {
      int ibeg = 0;
      int iend = kMaxPoints - 1;
      while (iend < n) {
         DrawPolyLineW(wctxt, kMaxPoints, &xy[ibeg]);
         ibeg = iend;
         iend += kMaxPoints - 1;
      }
      if (ibeg < n) {
         int npt = n - ibeg;
         DrawPolyLineW(wctxt, npt, &xy[ibeg]);
      }
   } else if (n > 1) {
      if (ctxt->lineStyle == LineSolid)
         XDrawLines((Display*)fDisplay, ctxt->fDrawing, ctxt->fGClist[kGCline], xyp, n, CoordModeOrigin);
      else {
         XSetDashes((Display*)fDisplay, ctxt->fGClist[kGCdash], ctxt->dashOffset, ctxt->dashList.data(), ctxt->dashList.size());
         XDrawLines((Display*)fDisplay, ctxt->fDrawing, ctxt->fGClist[kGCdash], xyp, n, CoordModeOrigin);
 
         // calculate length of line to update dash offset
         for (int i = 1; i < n; i++) {
            int dx = xyp[i].x - xyp[i-1].x;
            int dy = xyp[i].y - xyp[i-1].y;
            if (dx < 0) dx = - dx;
            if (dy < 0) dy = - dy;
            ctxt->dashOffset += dx > dy ? dx : dy;
         }
         ctxt->dashOffset %= ctxt->dashLength;
      }
   } else {
      int px = xyp[0].x;
      int py = xyp[0].y;
      XDrawPoint((Display*)fDisplay, ctxt->fDrawing,
                 ctxt->lineStyle == LineSolid ? ctxt->fGClist[kGCline] : ctxt->fGClist[kGCdash], px, py);
   }
}
 
////////////////////////////////////////////////////////////////////////////////
/// Draws N segments between provided points
///
/// \param [in] n    number of segements
/// \param [in] xy   list of points, size 2*n
 
void TGX11::DrawLinesSegments(Int_t n, TPoint *xy)
{
   DrawLinesSegmentsW((WinContext_t) gCws, n, xy);
}
 
////////////////////////////////////////////////////////////////////////////////
/// Draws N segments between provided points on specified windows
///
/// \param [in] n    number of segements
/// \param [in] xy   list of points, size 2*n
 
void TGX11::DrawLinesSegmentsW(WinContext_t wctxt, Int_t n, TPoint *xy)
{
   auto ctxt = (XWindow_t *) wctxt;
 
   const Int_t kMaxSegments = 500000;
   if (n > kMaxSegments) {
      Int_t ibeg = 0;
      Int_t iend = kMaxSegments;
      while (ibeg < n) {
         DrawLinesSegmentsW(wctxt, iend - ibeg, &xy[ibeg*2]);
         ibeg = iend;
         iend = TMath::Min(n, iend + kMaxSegments);
      }
   } else if (n > 0) {
      if (ctxt->lineStyle == LineSolid)
         XDrawSegments((Display*)fDisplay, ctxt->fDrawing, ctxt->fGClist[kGCline], (XSegment *) xy, n);
      else {
         XSetDashes((Display*)fDisplay, ctxt->fGClist[kGCdash], ctxt->dashOffset, ctxt->dashList.data(), ctxt->dashList.size());
         XDrawSegments((Display*)fDisplay, ctxt->fDrawing, ctxt->fGClist[kGCdash], (XSegment *) xy, n);
      }
   }
}
 
 
////////////////////////////////////////////////////////////////////////////////
/// Draw n markers with the current attributes at position x, y.
///
///  \param [in] n     number of markers to draw
///  \param [in] xy   x,y coordinates of markers
 
void TGX11::DrawPolyMarker(int n, TPoint *xy)
{
   DrawPolyMarkerW((WinContext_t) gCws, n, xy);
}
 
////////////////////////////////////////////////////////////////////////////////
/// Draw n markers with the current attributes at position x, y on specified window.
///
///  \param [in] n     number of markers to draw
///  \param [in] xy   x,y coordinates of markers
 
void TGX11::DrawPolyMarkerW(WinContext_t wctxt, Int_t n, TPoint *xy)
{
   auto ctxt = (XWindow_t *) wctxt;
   XPoint *xyp = (XPoint *) xy;
 
   if ((ctxt->markerShape.size() == 0) && (ctxt->markerSize <= 0)) {
      const int kNMAX = 1000000;
      int nt = n/kNMAX;
      for (int it=0;it<=nt;it++) {
         if (it < nt) {
            XDrawPoints((Display*)fDisplay, ctxt->fDrawing, ctxt->fGClist[kGCmark], &xyp[it*kNMAX], kNMAX, CoordModeOrigin);
         } else {
            XDrawPoints((Display*)fDisplay, ctxt->fDrawing, ctxt->fGClist[kGCmark], &xyp[it*kNMAX], n-it*kNMAX, CoordModeOrigin);
         }
      }
   } else {
      int r = ctxt->markerSize / 2;
      auto &shape = ctxt->markerShape;
 
      for (int m = 0; m < n; m++) {
         if (ctxt->markerType == 0) {
            // hollow circle
            XDrawArc((Display*)fDisplay, ctxt->fDrawing, ctxt->fGClist[kGCmark],
                      xyp[m].x - r, xyp[m].y - r, ctxt->markerSize, ctxt->markerSize, 0, 360*64);
         } else if (ctxt->markerType == 1) {
            // filled circle
            XFillArc((Display*)fDisplay, ctxt->fDrawing, ctxt->fGClist[kGCmark],
                      xyp[m].x - r, xyp[m].y - r, ctxt->markerSize, ctxt->markerSize, 0, 360*64);
         } else {
            for (size_t i = 0; i < shape.size(); i++) {
               shape[i].x += xyp[m].x;
               shape[i].y += xyp[m].y;
            }
            switch(ctxt->markerType) {
               case 2:
                  // hollow polygon
                  XDrawLines((Display*)fDisplay, ctxt->fDrawing, ctxt->fGClist[kGCmark],
                             shape.data(), shape.size(), CoordModeOrigin);
                  break;
               case 3:
                  // filled polygon
                  XFillPolygon((Display*)fDisplay, ctxt->fDrawing, ctxt->fGClist[kGCmark],
                               shape.data(), shape.size(), Nonconvex, CoordModeOrigin);
                  break;
               case 4:
                  // segmented line
                  XDrawSegments((Display*)fDisplay, ctxt->fDrawing, ctxt->fGClist[kGCmark],
                                (XSegment *) shape.data(), shape.size()/2);
                  break;
            }
            for (size_t i = 0; i < shape.size(); i++) {
               shape[i].x -= xyp[m].x;
               shape[i].y -= xyp[m].y;
            }
         }
      }
   }
}
 
////////////////////////////////////////////////////////////////////////////////
/// Draw a text string using current font.
///
///  \param [in] mode       : drawing mode
///              - mode=0     : the background is not drawn (kClear)
///              - mode=1     : the background is drawn (kOpaque)
///  \param [in] x,y        : text position
///  \param [in] angle      : text angle
///  \param [in] mgn        : magnification factor
///  \param [in] text       : text string
 
void TGX11::DrawText(Int_t x, Int_t y, Float_t angle, Float_t mgn,
                     const char *text, ETextMode mode)
{
   DrawTextW((WinContext_t) gCws, x, y, angle, mgn, text, mode);
}
 
////////////////////////////////////////////////////////////////////////////////
/// Draw a text string using current font.
///
///  \param [in] mode       : drawing mode
///              - mode=0     : the background is not drawn (kClear)
///              - mode=1     : the background is drawn (kOpaque)
///  \param [in] x,y        : text position
///  \param [in] angle      : text angle
///  \param [in] mgn        : magnification factor
///  \param [in] text       : text string
 
void TGX11::DrawText(Int_t x, Int_t y, Float_t angle, Float_t mgn,
                     const wchar_t *text, ETextMode mode)
{
   DrawTextW((WinContext_t) gCws, x, y, angle, mgn, text, mode);
}
 
////////////////////////////////////////////////////////////////////////////////
/// Draw a text string using current font on specified window.
///
///  \param [in] mode       : drawing mode
///              - mode=0     : the background is not drawn (kClear)
///              - mode=1     : the background is drawn (kOpaque)
///  \param [in] x,y        : text position
///  \param [in] angle      : text angle
///  \param [in] mgn        : magnification factor
///  \param [in] text       : text string
 
void TGX11::DrawTextW(WinContext_t wctxt, Int_t x, Int_t y, Float_t angle, Float_t mgn,
                      const char *text, ETextMode mode)
{
   auto ctxt = (XWindow_t *) wctxt;
 
   if (!text || !ctxt->textFont || ctxt->fAttText.GetTextSize() < 0)
      return;
 
   XRotSetMagnification(mgn);
 
   switch (mode) {
 
      case kClear:
         XRotDrawAlignedString((Display*)fDisplay, ctxt->textFont, angle,
                      ctxt->fDrawing, ctxt->fGClist[kGCtext], x, y, (char*)text, (int) ctxt->textAlign);
         break;
 
      case kOpaque:
         XRotDrawAlignedImageString((Display*)fDisplay, ctxt->textFont, angle,
                      ctxt->fDrawing, ctxt->fGClist[kGCtext], x, y, (char*)text, (int) ctxt->textAlign);
         break;
 
      default:
         break;
   }
}
 
////////////////////////////////////////////////////////////////////////////////
/// Find best visual, i.e. the one with the most planes and TrueColor or
/// DirectColor. Sets fVisual, fDepth, fRootWin, fColormap, fBlackPixel
/// and fWhitePixel.
 
void TGX11::FindBestVisual()
{
   Int_t findvis = gEnv->GetValue("X11.FindBestVisual", 1);
 
   Visual *vis = DefaultVisual((Display*)fDisplay, fScreenNumber);
   if (((vis->c_class != TrueColor && vis->c_class != DirectColor) ||
       DefaultDepth((Display*)fDisplay, fScreenNumber) < 15) && findvis) {
 
      // try to find better visual
      static XVisualInfo templates[] = {
         // Visual, visualid, screen, depth, class      , red_mask, green_mask, blue_mask, colormap_size, bits_per_rgb
         { nullptr, 0       , 0     , 24   , TrueColor  , 0       , 0         , 0        , 0            , 0 },
         { nullptr, 0       , 0     , 32   , TrueColor  , 0       , 0         , 0        , 0            , 0 },
         { nullptr, 0       , 0     , 16   , TrueColor  , 0       , 0         , 0        , 0            , 0 },
         { nullptr, 0       , 0     , 15   , TrueColor  , 0       , 0         , 0        , 0            , 0 },
         // no suitable TrueColorMode found - now do the same thing to DirectColor
         { nullptr, 0       , 0     , 24   , DirectColor, 0       , 0         , 0        , 0            , 0 },
         { nullptr, 0       , 0     , 32   , DirectColor, 0       , 0         , 0        , 0            , 0 },
         { nullptr, 0       , 0     , 16   , DirectColor, 0       , 0         , 0        , 0            , 0 },
         { nullptr, 0       , 0     , 15   , DirectColor, 0       , 0         , 0        , 0            , 0 },
         { nullptr, 0       , 0     , 0    , 0          , 0       , 0         , 0        , 0            , 0 },
      };
 
      Int_t nitems = 0;
      XVisualInfo *vlist = nullptr;
      for (Int_t i = 0; templates[i].depth != 0; i++) {
         Int_t mask = VisualScreenMask|VisualDepthMask|VisualClassMask;
         templates[i].screen = fScreenNumber;
         if ((vlist = XGetVisualInfo((Display*)fDisplay, mask, &(templates[i]), &nitems))) {
            FindUsableVisual((RXVisualInfo*)vlist, nitems);
            XFree(vlist);
            vlist = nullptr;
            if (fVisual)
               break;
         }
      }
   }
 
   fRootWin = RootWindow((Display*)fDisplay, fScreenNumber);
 
   if (!fVisual) {
      fDepth      = DefaultDepth((Display*)fDisplay, fScreenNumber);
      fVisual     = (RVisual*)DefaultVisual((Display*)fDisplay, fScreenNumber);
      fVisRootWin = fRootWin;
      if (fDepth > 1)
         fColormap = DefaultColormap((Display*)fDisplay, fScreenNumber);
      fBlackPixel = BlackPixel((Display*)fDisplay, fScreenNumber);
      fWhitePixel = WhitePixel((Display*)fDisplay, fScreenNumber);
   }
   if (gDebug > 1)
      Printf("Selected visual 0x%lx: depth %d, class %d, colormap: %s",
             fVisual->visualid, fDepth, fVisual->c_class,
             fColormap == DefaultColormap((Display*)fDisplay, fScreenNumber) ? "default" :
             "custom");
}
 
////////////////////////////////////////////////////////////////////////////////
/// Dummy error handler for X11. Used by FindUsableVisual().
 
static Int_t DummyX11ErrorHandler(Display *, XErrorEvent *)
{
   return 0;
}
 
////////////////////////////////////////////////////////////////////////////////
/// Check if visual is usable, if so set fVisual, fDepth, fColormap,
/// fBlackPixel and fWhitePixel.
 
void TGX11::FindUsableVisual(RXVisualInfo *vlist, Int_t nitems)
{
   Int_t (*oldErrorHandler)(Display *, XErrorEvent *) =
       XSetErrorHandler(DummyX11ErrorHandler);
 
   XSetWindowAttributes attr;
   memset(&attr, 0, sizeof(attr));
 
   Window root = RootWindow((Display*)fDisplay, fScreenNumber);
 
   for (Int_t i = 0; i < nitems; i++) {
      Window w = None, wjunk;
      UInt_t width, height, ujunk;
      Int_t  junk;
 
      // try and use default colormap when possible
      if (vlist[i].visual == DefaultVisual((Display*)fDisplay, fScreenNumber)) {
         attr.colormap = DefaultColormap((Display*)fDisplay, fScreenNumber);
      } else {
         attr.colormap = XCreateColormap((Display*)fDisplay, root, vlist[i].visual, AllocNone);
      }
 
      static XColor black_xcol = { 0, 0x0000, 0x0000, 0x0000, DoRed|DoGreen|DoBlue, 0 };
      static XColor white_xcol = { 0, 0xFFFF, 0xFFFF, 0xFFFF, DoRed|DoGreen|DoBlue, 0 };
      XAllocColor((Display*)fDisplay, attr.colormap, &black_xcol);
      XAllocColor((Display*)fDisplay, attr.colormap, &white_xcol);
      attr.border_pixel = black_xcol.pixel;
      attr.override_redirect = True;
 
      w = XCreateWindow((Display*)fDisplay, root, -20, -20, 10, 10, 0, vlist[i].depth,
                        CopyFromParent, vlist[i].visual,
                        CWColormap|CWBorderPixel|CWOverrideRedirect, &attr);
      if (w != None && XGetGeometry((Display*)fDisplay, w, &wjunk, &junk, &junk,
                                    &width, &height, &ujunk, &ujunk)) {
         fVisual     = (RVisual*)vlist[i].visual;
         fDepth      = vlist[i].depth;
         fColormap   = attr.colormap;
         fBlackPixel = black_xcol.pixel;
         fWhitePixel = white_xcol.pixel;
         fVisRootWin = w;
         break;
      }
      if (attr.colormap != DefaultColormap((Display*)fDisplay, fScreenNumber))
         XFreeColormap((Display*)fDisplay, attr.colormap);
   }
   XSetErrorHandler(oldErrorHandler);
}
 
////////////////////////////////////////////////////////////////////////////////
/// Return character up vector.
 
void TGX11::GetCharacterUp(Float_t &chupx, Float_t &chupy)
{
   chupx = fCharacterUpX;
   chupy = fCharacterUpY;
}
 
////////////////////////////////////////////////////////////////////////////////
/// Return reference to internal color structure associated
/// to color index cid.
 
XColor_t &TGX11::GetColor(Int_t cid)
{
   XColor_t *col = (XColor_t*) (Long_t)fColors->GetValue(cid);
   if (!col) {
      col = new XColor_t;
      fColors->Add(cid, (Long_t) col);
   }
   return *col;
}
 
////////////////////////////////////////////////////////////////////////////////
/// Return current window pointer.
 
Window_t TGX11::GetCurrentWindow() const
{
   return (Window_t)(gCws ? gCws->fDrawing : 0);
}
 
////////////////////////////////////////////////////////////////////////////////
/// Return desired Graphics Context ("which" maps directly on gGCList[]).
/// Protected method used by TGX11TTF.
 
void *TGX11::GetGC(Int_t which) const
{
   if (which >= kMAXGC || which < 0) {
      Error("GetGC", "trying to get illegal GC (which = %d)", which);
      return nullptr;
   }
   if (!gCws) {
      Error("GetGC", "No current window selected");
      return nullptr;
   }
   return &gCws->fGClist[which];
}
 
////////////////////////////////////////////////////////////////////////////////
/// Return X11 window for specified window context.
/// Protected method used by TGX11TTF.
 
Window_t TGX11::GetWindow(WinContext_t wctxt) const
{
   auto ctxt = (XWindow_t *) wctxt;
   return (Window_t) (ctxt ? ctxt->fDrawing : 0);
}
 
////////////////////////////////////////////////////////////////////////////////
/// Return X11 Graphics Context for specified window context.
/// Protected method used by TGX11TTF.
 
void *TGX11::GetGCW(WinContext_t wctxt, Int_t which) const
{
   auto ctxt = (XWindow_t *) wctxt;
   if (!ctxt) {
      Error("GetGC", "No window context specified");
      return nullptr;
   }
 
   if (which >= kMAXGC || which < 0) {
      Error("GetGC", "trying to get illegal GC (which = %d)", which);
      return nullptr;
   }
   return &ctxt->fGClist[which];
}
 
////////////////////////////////////////////////////////////////////////////////
/// Return text align value for specified window context.
/// Protected method used by TGX11TTF.
 
TGX11::EAlign TGX11::GetTextAlignW(WinContext_t wctxt) const
{
   auto ctxt = (XWindow_t *) wctxt;
   return ctxt ? ctxt->textAlign : kAlignNone;
}
 
////////////////////////////////////////////////////////////////////////////////
/// Query the double buffer value for the window wid.
 
Int_t TGX11::GetDoubleBuffer(int wid)
{
   gTws = fWindows[wid].get();
   if (!gTws->fOpen)
      return -1;
   else
      return gTws->fDoubleBuffer;
}
 
////////////////////////////////////////////////////////////////////////////////
/// Return position and size of window wid.
///
///  \param [in] wid        : window identifier
///  \param [in] x,y        : window position (output)
///  \param [in] w,h        : window size (output)
///
/// if wid < 0 the size of the display is returned
 
void TGX11::GetGeometry(int wid, int &x, int &y, unsigned int &w, unsigned int &h)
{
   Window junkwin=0;
 
   if (wid < 0) {
      x = 0;
      y = 0;
      w = DisplayWidth((Display*)fDisplay,fScreenNumber);
      h = DisplayHeight((Display*)fDisplay,fScreenNumber);
   } else {
      Window root;
      unsigned int border, depth;
      unsigned int width, height;
 
      gTws = fWindows[wid].get();
      XGetGeometry((Display*)fDisplay, gTws->fWindow, &root, &x, &y,
                   &width, &height, &border, &depth);
      XTranslateCoordinates((Display*)fDisplay, gTws->fWindow, fRootWin,
                            0, 0, &x, &y, &junkwin);
      if (width >= 65535)
         width = 1;
      if (height >= 65535)
         height = 1;
      if (width > 0 && height > 0) {
         gTws->fWidth  = width;
         gTws->fHeight = height;
      }
      w = gTws->fWidth;
      h = gTws->fHeight;
   }
}
 
////////////////////////////////////////////////////////////////////////////////
/// Return hostname on which the display is opened.
 
const char *TGX11::DisplayName(const char *dpyName)
{
   return XDisplayName(dpyName);
}
 
////////////////////////////////////////////////////////////////////////////////
/// Return pixel value associated to specified ROOT color number.
 
ULong_t TGX11::GetPixel(Color_t ci)
{
   TColor *color = gROOT->GetColor(ci);
   if (color)
      SetRGB(ci, color->GetRed(), color->GetGreen(), color->GetBlue());
//   else
//      Warning("GetPixel", "color with index %d not defined", ci);
 
   XColor_t &col = GetColor(ci);
   return col.fPixel;
}
 
////////////////////////////////////////////////////////////////////////////////
/// Get maximum number of planes.
 
void TGX11::GetPlanes(int &nplanes)
{
   nplanes = fDepth;
}
 
////////////////////////////////////////////////////////////////////////////////
/// Get rgb values for color "index".
 
void TGX11::GetRGB(int index, float &r, float &g, float &b)
{
   if (index == 0) {
      r = g = b = 1.0;
   } else if (index == 1) {
      r = g = b = 0.0;
   } else {
      XColor_t &col = GetColor(index);
      r = ((float) col.fRed) / ((float) kBIGGEST_RGB_VALUE);
      g = ((float) col.fGreen) / ((float) kBIGGEST_RGB_VALUE);
      b = ((float) col.fBlue) / ((float) kBIGGEST_RGB_VALUE);
   }
}
 
////////////////////////////////////////////////////////////////////////////////
/// Return the size of a character string.
///
///  \param [in] w          : text width
///  \param [in] h          : text height
///  \param [in] mess        : message
 
void TGX11::GetTextExtent(UInt_t &w, UInt_t &h, char *mess)
{
   w=0; h=0;
   if (strlen(mess)==0) return;
 
   XPoint *cBox;
   XRotSetMagnification(fTextMagnitude);
   cBox = XRotTextExtents((Display*)fDisplay, gTextFont, 0., 0, 0, mess, 0);
   if (cBox) {
      w    = cBox[2].x;
      h    = -cBox[2].y;
      free((char *)cBox);
   }
}
 
////////////////////////////////////////////////////////////////////////////////
/// Return the X11 window identifier.
///
///  \param [in] wid      : Workstation identifier (input)
 
Window_t TGX11::GetWindowID(int wid)
{
   if (fWindows.count(wid) == 0) return 0;
   return (Window_t) fWindows[wid]->fWindow;
}
 
////////////////////////////////////////////////////////////////////////////////
/// Move the window wid.
///
///  \param [in] wid  : Window identifier.
///  \param [in] x    : x new window position
///  \param [in] y    : y new window position
 
void TGX11::MoveWindow(Int_t wid, Int_t x, Int_t y)
{
   gTws = fWindows[wid].get();
   if (!gTws->fOpen) return;
 
   XMoveWindow((Display*)fDisplay, gTws->fWindow, x, y);
}
 
////////////////////////////////////////////////////////////////////////////////
/// Open the display. Return -1 if the opening fails, 0 when ok.
 
Int_t TGX11::OpenDisplay(void *disp)
{
   Pixmap  pixmp1, pixmp2;
   XColor  fore, back;
   char  **fontlist;
   int     fontcount = 0;
   int     i;
 
   if (fDisplay) return 0;
 
   fDisplay      = (void *) disp;
   fScreenNumber = DefaultScreen((Display*)fDisplay);
 
   FindBestVisual();
 
   GetColor(1).fDefined = kTRUE; // default foreground
   GetColor(1).fPixel = fBlackPixel;
   GetColor(0).fDefined = kTRUE; // default background
   GetColor(0).fPixel = fWhitePixel;
 
   // Inquire the XServer Vendor
   char vendor[132];
   strlcpy(vendor, XServerVendor((Display*)fDisplay),132);
 
   // Create input echo graphic context
   XGCValues echov;
   echov.foreground = fBlackPixel;
   echov.background = fWhitePixel;
   if (strstr(vendor,"Hewlett"))
      echov.function   = GXxor;
   else
      echov.function   = GXinvert;
 
   gGCecho = XCreateGC((Display*)fDisplay, fVisRootWin,
                       GCForeground | GCBackground | GCFunction,
                       &echov);
 
   // Load a default Font
   static int isdisp = 0;
   if (!isdisp) {
      for (i = 0; i < kMAXFONT; i++) {
         gFont[i].id = nullptr;
         strcpy(gFont[i].name, " ");
      }
      fontlist = XListFonts((Display*)fDisplay, "*courier*", 1, &fontcount);
      if (fontlist && fontcount != 0) {
         gFont[gCurrentFontNumber].id = XLoadQueryFont((Display*)fDisplay, fontlist[0]);
         gTextFont = gFont[gCurrentFontNumber].id;
         strcpy(gFont[gCurrentFontNumber].name, "*courier*");
         gCurrentFontNumber++;
         XFreeFontNames(fontlist);
      } else {
         // emergency: try fixed font
         fontlist = XListFonts((Display*)fDisplay, "fixed", 1, &fontcount);
         if (fontlist && fontcount != 0) {
            gFont[gCurrentFontNumber].id = XLoadQueryFont((Display*)fDisplay, fontlist[0]);
            gTextFont = gFont[gCurrentFontNumber].id;
            strcpy(gFont[gCurrentFontNumber].name, "fixed");
            gCurrentFontNumber++;
            XFreeFontNames(fontlist);
         } else {
            Warning("OpenDisplay", "no default font loaded");
         }
      }
      isdisp = 1;
   }
 
   // Create a null cursor
   pixmp1 = XCreateBitmapFromData((Display*)fDisplay, fRootWin,
                                  null_cursor_bits, 16, 16);
   pixmp2 = XCreateBitmapFromData((Display*)fDisplay, fRootWin,
                                  null_cursor_bits, 16, 16);
   gNullCursor = XCreatePixmapCursor((Display*)fDisplay,pixmp1,pixmp2,&fore,&back,0,0);
 
   // Create cursors
   fCursors[kBottomLeft]  = XCreateFontCursor((Display*)fDisplay, XC_bottom_left_corner);
   fCursors[kBottomRight] = XCreateFontCursor((Display*)fDisplay, XC_bottom_right_corner);
   fCursors[kTopLeft]     = XCreateFontCursor((Display*)fDisplay, XC_top_left_corner);
   fCursors[kTopRight]    = XCreateFontCursor((Display*)fDisplay, XC_top_right_corner);
   fCursors[kBottomSide]  = XCreateFontCursor((Display*)fDisplay, XC_bottom_side);
   fCursors[kLeftSide]    = XCreateFontCursor((Display*)fDisplay, XC_left_side);
   fCursors[kTopSide]     = XCreateFontCursor((Display*)fDisplay, XC_top_side);
   fCursors[kRightSide]   = XCreateFontCursor((Display*)fDisplay, XC_right_side);
   fCursors[kMove]        = XCreateFontCursor((Display*)fDisplay, XC_fleur);
   fCursors[kCross]       = XCreateFontCursor((Display*)fDisplay, XC_tcross);
   fCursors[kArrowHor]    = XCreateFontCursor((Display*)fDisplay, XC_sb_h_double_arrow);
   fCursors[kArrowVer]    = XCreateFontCursor((Display*)fDisplay, XC_sb_v_double_arrow);
   fCursors[kHand]        = XCreateFontCursor((Display*)fDisplay, XC_hand2);
   fCursors[kRotate]      = XCreateFontCursor((Display*)fDisplay, XC_exchange);
   fCursors[kPointer]     = XCreateFontCursor((Display*)fDisplay, XC_left_ptr);
   fCursors[kArrowRight]  = XCreateFontCursor((Display*)fDisplay, XC_arrow);
   fCursors[kCaret]       = XCreateFontCursor((Display*)fDisplay, XC_xterm);
   fCursors[kWatch]       = XCreateFontCursor((Display*)fDisplay, XC_watch);
   fCursors[kNoDrop]      = XCreateFontCursor((Display*)fDisplay, XC_pirate);
 
   // Setup color information
   fRedDiv = fGreenDiv = fBlueDiv = fRedShift = fGreenShift = fBlueShift = -1;
 
   if (fVisual->c_class == TrueColor) {
      for (i = 0; i < int(sizeof(fVisual->blue_mask)*kBitsPerByte); i++) {
         if (fBlueShift == -1 && ((fVisual->blue_mask >> i) & 1))
            fBlueShift = i;
         if ((fVisual->blue_mask >> i) == 1) {
            fBlueDiv = sizeof(UShort_t)*kBitsPerByte - i - 1 + fBlueShift;
            break;
         }
      }
      for (i = 0; i < int(sizeof(fVisual->green_mask)*kBitsPerByte); i++) {
         if (fGreenShift == -1 && ((fVisual->green_mask >> i) & 1))
            fGreenShift = i;
         if ((fVisual->green_mask >> i) == 1) {
            fGreenDiv = sizeof(UShort_t)*kBitsPerByte - i - 1 + fGreenShift;
            break;
         }
      }
      for (i = 0; i < int(sizeof(fVisual->red_mask)*kBitsPerByte); i++) {
         if (fRedShift == -1 && ((fVisual->red_mask >> i) & 1))
            fRedShift = i;
         if ((fVisual->red_mask >> i) == 1) {
            fRedDiv = sizeof(UShort_t)*kBitsPerByte - i - 1 + fRedShift;
            break;
         }
      }
      //printf("fRedDiv = %d, fGreenDiv = %d, fBlueDiv = %d, fRedShift = %d, fGreenShift = %d, fBlueShift = %d\n",
      //       fRedDiv, fGreenDiv, fBlueDiv, fRedShift, fGreenShift, fBlueShift);
   }
 
   return 0;
}
 
 
////////////////////////////////////////////////////////////////////////////////
/// Add new window handle
/// Only for private usage
 
Int_t TGX11::AddWindowHandle()
{
   Int_t maxid = 0;
   for (auto & pair : fWindows) {
      if (!pair.second->fOpen) {
         pair.second->fOpen = 1;
         return pair.first;
      }
      if (pair.first > maxid)
         maxid = pair.first;
   }
 
   if (fWindows.size() == (size_t) maxid) {
      // all ids are in use - just add maximal+1
      maxid++;
   } else
      for (int id = 1; id < maxid; id++) {
         if (fWindows.count(id) == 0) {
            maxid = id;
            break;
         }
      }
 
   fWindows.emplace(maxid, std::make_unique<XWindow_t>());
 
   auto ctxt = fWindows[maxid].get();
   ctxt->fOpen = 1;
   ctxt->drawMode = TVirtualX::kCopy;
   for (int n = 0; n < kMAXGC; ++n)
      ctxt->fGClist[n] = XCreateGC((Display*)fDisplay, fVisRootWin, 0, nullptr);
 
   XGCValues values;
   if (XGetGCValues((Display*)fDisplay, ctxt->fGClist[kGCtext], GCForeground|GCBackground, &values)) {
      XSetForeground((Display*)fDisplay, ctxt->fGClist[kGCinvt], values.background);
      XSetBackground((Display*)fDisplay, ctxt->fGClist[kGCinvt], values.foreground);
   } else {
      Error("AddWindowHandle", "cannot get GC values");
   }
 
   // Turn-off GraphicsExpose and NoExpose event reporting for the pixmap
   // manipulation GC, this to prevent these events from being stacked up
   // without ever being processed and thereby wasting a lot of memory.
   XSetGraphicsExposures((Display*)fDisplay, ctxt->fGClist[kGCpxmp], False);
 
   return maxid;
}
 
 
 
////////////////////////////////////////////////////////////////////////////////
/// Open a new pixmap.
///
///  \param [in] w,h : Width and height of the pixmap.
 
Int_t TGX11::OpenPixmap(unsigned int w, unsigned int h)
{
   Window root;
   unsigned int wval, hval;
   int xx, yy;
   unsigned int ww, hh, border, depth;
   wval = w;
   hval = h;
 
   // Select next free window number
   int wid = AddWindowHandle();
   gCws = fWindows[wid].get();
 
   gCws->fWindow = XCreatePixmap((Display*)fDisplay, fRootWin, wval, hval, fDepth);
   XGetGeometry((Display*)fDisplay, gCws->fWindow, &root, &xx, &yy, &ww, &hh, &border, &depth);
 
   for (int i = 0; i < kMAXGC; i++)
      XSetClipMask((Display*)fDisplay, gCws->fGClist[i], None);
 
   SetColor(gCws, &gCws->fGClist[kGCpxmp], 0);
   XFillRectangle((Display*)fDisplay, gCws->fWindow, gCws->fGClist[kGCpxmp], 0, 0, ww, hh);
   SetColor(gCws, &gCws->fGClist[kGCpxmp], 1);
 
   // Initialise the window structure
   gCws->fDrawing       = gCws->fWindow;
   gCws->fBuffer        = 0;
   gCws->fDoubleBuffer  = 0;
   gCws->fIsPixmap      = 1;
   gCws->fClip          = 0;
   gCws->fWidth         = wval;
   gCws->fHeight        = hval;
   gCws->fShared        = kFALSE;
 
   return wid;
}
 
////////////////////////////////////////////////////////////////////////////////
/// Open window and return window number.
///
/// \return -1 if window initialization fails.
 
Int_t TGX11::InitWindow(ULong_t win)
{
   XSetWindowAttributes attributes;
   ULong_t attr_mask = 0;
   int xval, yval;
   unsigned int wval, hval, border, depth;
   Window root;
 
   Window wind = (Window) win;
 
   XGetGeometry((Display*)fDisplay, wind, &root, &xval, &yval, &wval, &hval, &border, &depth);
 
   // Select next free window number
 
   int wid = AddWindowHandle();
   gCws = fWindows[wid].get();
   gCws->fDoubleBuffer = 0;
 
   // Create window
 
   attributes.background_pixel = GetColor(0).fPixel;
   attr_mask |= CWBackPixel;
   attributes.border_pixel = GetColor(1).fPixel;
   attr_mask |= CWBorderPixel;
   attributes.event_mask = NoEventMask;
   attr_mask |= CWEventMask;
   attributes.backing_store = Always;
   attr_mask |= CWBackingStore;
   attributes.bit_gravity = NorthWestGravity;
   attr_mask |= CWBitGravity;
   if (fColormap) {
      attributes.colormap = fColormap;
      attr_mask |= CWColormap;
   }
 
   gCws->fWindow = XCreateWindow((Display*)fDisplay, wind,
                                 xval, yval, wval, hval, 0, fDepth,
                                 InputOutput, fVisual,
                                 attr_mask, &attributes);
 
   XMapWindow((Display*)fDisplay, gCws->fWindow);
   XFlush((Display*)fDisplay);
 
   // Initialise the window structure
 
   gCws->fDrawing      = gCws->fWindow;
   gCws->fBuffer       = 0;
   gCws->fDoubleBuffer = 0;
   gCws->fIsPixmap     = 0;
   gCws->fClip         = 0;
   gCws->fWidth        = wval;
   gCws->fHeight       = hval;
   gCws->fShared       = kFALSE;
 
   return wid;
}
 
////////////////////////////////////////////////////////////////////////////////
/// Register a window created by Qt as a ROOT window (like InitWindow()).
 
Int_t TGX11::AddWindow(ULong_t qwid, UInt_t w, UInt_t h)
{
   // Select next free window number
   int wid = AddWindowHandle();
   gCws = fWindows[wid].get();
   gCws->fDoubleBuffer = 0;
 
   gCws->fWindow = qwid;
 
   //init Xwindow_t struct
   gCws->fDrawing       = gCws->fWindow;
   gCws->fBuffer        = 0;
   gCws->fDoubleBuffer  = 0;
   gCws->fIsPixmap      = 0;
   gCws->fClip          = 0;
   gCws->fWidth         = w;
   gCws->fHeight        = h;
   gCws->fShared        = kTRUE;
 
   return wid;
}
 
////////////////////////////////////////////////////////////////////////////////
/// Remove a window created by Qt (like CloseWindow()).
 
void TGX11::RemoveWindow(ULong_t qwid)
{
   SelectWindow((int) qwid);
 
   CloseWindow();
}
 
////////////////////////////////////////////////////////////////////////////////
/// Query pointer position.
///
///  \param [in] ix       : X coordinate of pointer
///  \param [in] iy       : Y coordinate of pointer
/// (both coordinates are relative to the origin of the root window)
 
void TGX11::QueryPointer(Int_t &ix, Int_t &iy)
{
   Window    root_return, child_return;
   int       win_x_return, win_y_return;
   int       root_x_return, root_y_return;
   unsigned int mask_return;
 
   XQueryPointer((Display*)fDisplay,gCws->fWindow, &root_return,
                 &child_return, &root_x_return, &root_y_return, &win_x_return,
                 &win_y_return, &mask_return);
 
   ix = root_x_return;
   iy = root_y_return;
}
 
 
////////////////////////////////////////////////////////////////////////////////
/// Request Locator position.
///
///  \param [in] x,y       : cursor position at moment of button press (output)
///  \param [in] ctyp      : cursor type (input)
///              - ctyp=1 tracking cross
///              - ctyp=2 cross-hair
///              - ctyp=3 rubber circle
///              - ctyp=4 rubber band
///              - ctyp=5 rubber rectangle
///
///  \param [in] mode      : input mode
///              - mode=0 request
///              - mode=1 sample
///
/// Request locator:
/// return button number:
///                     - 1 = left is pressed
///                     - 2 = middle is pressed
///                     - 3 = right is pressed
///        in sample mode:
///                     - 11 = left is released
///                     - 12 = middle is released
///                     - 13 = right is released
///                     - -1 = nothing is pressed or released
///                     - -2 = leave the window
///                     - else = keycode (keyboard is pressed)
 
Int_t TGX11::RequestLocator(int mode, int ctyp, int &x, int &y)
{
   static int xloc  = 0;
   static int yloc  = 0;
   static int xlocp = 0;
   static int ylocp = 0;
   static Cursor cursor = 0;
 
   XEvent event;
   int button_press;
   int radius;
 
   // Change the cursor shape
   if (cursor == 0) {
      if (ctyp > 1) {
         XDefineCursor((Display*)fDisplay, gCws->fWindow, gNullCursor);
         XSetForeground((Display*)fDisplay, gGCecho, GetColor(0).fPixel);
      } else {
         cursor = XCreateFontCursor((Display*)fDisplay, XC_crosshair);
         XDefineCursor((Display*)fDisplay, gCws->fWindow, cursor);
      }
   }
 
   // Event loop
 
   button_press = 0;
 
   while (button_press == 0) {
 
      switch (ctyp) {
 
         case 1 :
            break;
 
         case 2 :
            XDrawLine((Display*)fDisplay, gCws->fWindow, gGCecho,
                      xloc, 0, xloc, gCws->fHeight);
            XDrawLine((Display*)fDisplay, gCws->fWindow, gGCecho,
                      0, yloc, gCws->fWidth, yloc);
            break;
 
         case 3 :
            radius = (int) TMath::Sqrt((double)((xloc-xlocp)*(xloc-xlocp) +
                                       (yloc-ylocp)*(yloc-ylocp)));
            XDrawArc((Display*)fDisplay, gCws->fWindow, gGCecho,
                     xlocp-radius, ylocp-radius,
                     2*radius, 2*radius, 0, 23040);
            break;
 
         case 4 :
            XDrawLine((Display*)fDisplay, gCws->fWindow, gGCecho,
                      xlocp, ylocp, xloc, yloc);
            break;
 
         case 5 :
            XDrawRectangle((Display*)fDisplay, gCws->fWindow, gGCecho,
                           TMath::Min(xlocp,xloc), TMath::Min(ylocp,yloc),
                           TMath::Abs(xloc-xlocp), TMath::Abs(yloc-ylocp));
            break;
 
         default:
            break;
      }
 
      while (XEventsQueued( (Display*)fDisplay, QueuedAlready) > 1) {
         XNextEvent((Display*)fDisplay, &event);
      }
      XWindowEvent((Display*)fDisplay, gCws->fWindow, gMouseMask, &event);
 
      switch (ctyp) {
 
         case 1 :
            break;
 
         case 2 :
            XDrawLine((Display*)fDisplay, gCws->fWindow, gGCecho,
                      xloc, 0, xloc, gCws->fHeight);
            XDrawLine((Display*)fDisplay, gCws->fWindow, gGCecho,
                      0, yloc, gCws->fWidth, yloc);
            break;
 
         case 3 :
            radius = (int) TMath::Sqrt((double)((xloc-xlocp)*(xloc-xlocp) +
                                           (yloc-ylocp)*(yloc-ylocp)));
            XDrawArc((Display*)fDisplay, gCws->fWindow, gGCecho,
                     xlocp-radius, ylocp-radius,
                     2*radius, 2*radius, 0, 23040);
            break;
 
         case 4 :
            XDrawLine((Display*)fDisplay, gCws->fWindow, gGCecho,
                      xlocp, ylocp, xloc, yloc);
            break;
 
         case 5 :
            XDrawRectangle((Display*)fDisplay, gCws->fWindow, gGCecho,
                           TMath::Min(xlocp,xloc), TMath::Min(ylocp,yloc),
                           TMath::Abs(xloc-xlocp), TMath::Abs(yloc-ylocp));
            break;
 
         default:
            break;
      }
 
      xloc = event.xbutton.x;
      yloc = event.xbutton.y;
 
      switch (event.type) {
 
         case LeaveNotify :
            if (mode == 0) {
               while (true) {
                  XNextEvent((Display*)fDisplay, &event);
                  if (event.type == EnterNotify) break;
               }
            } else {
               button_press = -2;
            }
            break;
 
         case ButtonPress :
            button_press = event.xbutton.button ;
            xlocp = event.xbutton.x;
            ylocp = event.xbutton.y;
            XUndefineCursor( (Display*)fDisplay, gCws->fWindow );
            cursor = 0;
            break;
 
         case ButtonRelease :
            if (mode == 1) {
               button_press = 10+event.xbutton.button ;
               xlocp = event.xbutton.x;
               ylocp = event.xbutton.y;
            }
            break;
 
         case KeyPress :
            if (mode == 1) {
               button_press = event.xkey.keycode;
               xlocp = event.xbutton.x;
               ylocp = event.xbutton.y;
            }
            break;
 
         case KeyRelease :
            if (mode == 1) {
               button_press = -event.xkey.keycode;
               xlocp = event.xbutton.x;
               ylocp = event.xbutton.y;
            }
            break;
 
         default :
            break;
      }
 
      if (mode == 1) {
         if (button_press == 0)
            button_press = -1;
         break;
      }
   }
   x = event.xbutton.x;
   y = event.xbutton.y;
 
   return button_press;
}
 
////////////////////////////////////////////////////////////////////////////////
/// Request a string.
///
///  \param [in] x,y         : position where text is displayed
///  \param [in] text        : text displayed (input), edited text (output)
///
/// Request string:
/// text is displayed and can be edited with Emacs-like keybinding
/// return termination code (0 for ESC, 1 for RETURN)
 
Int_t TGX11::RequestString(int x, int y, char *text)
{
   static Cursor cursor = 0;
   static int percent = 0;  // bell volume
   Window focuswindow;
   int focusrevert;
   XEvent event;
   KeySym keysym;
   int key = -1;
   int len_text = strlen(text);
   int nt;         // defined length of text
   int pt;         // cursor position in text
 
   // change the cursor shape
   if (cursor == 0) {
      XKeyboardState kbstate;
      cursor = XCreateFontCursor((Display*)fDisplay, XC_question_arrow);
      XGetKeyboardControl((Display*)fDisplay, &kbstate);
      percent = kbstate.bell_percent;
   }
   if (cursor != 0)
      XDefineCursor((Display*)fDisplay, gCws->fWindow, cursor);
   for (nt = len_text; nt > 0 && text[nt-1] == ' '; nt--) { }
      pt = nt;
   XGetInputFocus((Display*)fDisplay, &focuswindow, &focusrevert);
   XSetInputFocus((Display*)fDisplay, gCws->fWindow, focusrevert, CurrentTime);
   while (key < 0) {
      char keybuf[8];
      char nbytes;
      int dx;
      int i;
      XDrawImageString((Display*)fDisplay, gCws->fWindow, gCws->fGClist[kGCtext], x, y, text, nt);
      dx = XTextWidth(gCws->textFont, text, nt);
      XDrawImageString((Display*)fDisplay, gCws->fWindow, gCws->fGClist[kGCtext], x + dx, y, " ", 1);
      dx = pt == 0 ? 0 : XTextWidth(gCws->textFont, text, pt);
      XDrawImageString((Display*)fDisplay, gCws->fWindow, gCws->fGClist[kGCinvt],
                       x + dx, y, pt < len_text ? &text[pt] : " ", 1);
      XWindowEvent((Display*)fDisplay, gCws->fWindow, gKeybdMask, &event);
      switch (event.type) {
         case ButtonPress:
         case EnterNotify:
            XSetInputFocus((Display*)fDisplay, gCws->fWindow, focusrevert, CurrentTime);
            break;
         case LeaveNotify:
            XSetInputFocus((Display*)fDisplay, focuswindow, focusrevert, CurrentTime);
            break;
         case KeyPress:
            nbytes = XLookupString(&event.xkey, keybuf, sizeof(keybuf),
                                   &keysym, nullptr);
            switch (keysym) {      // map cursor keys
               case XK_Left:
                  keybuf[0] = '\002';  // Control-B
                  nbytes = 1;
                  break;
               case XK_Right:
                  keybuf[0] = '\006';  // Control-F
                  nbytes = 1;
                  break;
            }
            if (nbytes == 1) {
            if (isascii(keybuf[0]) && isprint(keybuf[0])) {
               // insert character
               if (nt < len_text)
                  nt++;
               for (i = nt - 1; i > pt; i--)
                  text[i] = text[i-1];
               if (pt < len_text) {
                  text[pt] = keybuf[0];
                  pt++;
               }
            } else
               switch (keybuf[0]) {
                  // Emacs-like editing keys
 
                  case '\010':    // backspace
                  case '\177':    // delete
                     // delete backward
                     if (pt > 0) {
                        for (i = pt; i < nt; i++)
                           text[i-1] = text[i];
                        text[nt-1] = ' ';
                        nt--;
                        pt--;
                     }
                     break;
                  case '\001':    // ^A
                     // beginning of line
                     pt = 0;
                     break;
                  case '\002':    // ^B
                     // move backward
                     if (pt > 0)
                        pt--;
                     break;
                  case '\004':    // ^D
                     // delete forward
                     if (pt > 0) {
                        for (i = pt; i < nt; i++)
                           text[i-1] = text[i];
                        text[nt-1] = ' ';
                        pt--;
                     }
                     break;
                  case '\005':    // ^E
                     // end of line
                     pt = nt;
                     break;
 
                  case '\006':    // ^F
                     // move forward
                     if (pt < nt)
                        pt++;
                     break;
                  case '\013':    // ^K
                     // delete to end of line
                     for (i = pt; i < nt; i++)
                        text[i] = ' ';
                     nt = pt;
                     break;
                  case '\024':    // ^T
                     // transpose
                     if (pt > 0) {
                        char c = text[pt];
                        text[pt] = text[pt-1];
                        text[pt-1] = c;
                     }
                     break;
                  case '\012':    // newline
                  case '\015':    // return
                     key = 1;
                     break;
                  case '\033':    // escape
                     key = 0;
                     break;
 
                  default:
                     XBell((Display*)fDisplay, percent);
               }
            }
      }
   }
   XSetInputFocus((Display*)fDisplay, focuswindow, focusrevert, CurrentTime);
 
   if (cursor != 0) {
      XUndefineCursor((Display*)fDisplay, gCws->fWindow);
      cursor = 0;
   }
 
   return key;
}
 
////////////////////////////////////////////////////////////////////////////////
/// Rescale the window wid.
///
///  \param [in] wid  : Window identifier
///  \param [in] w    : Width
///  \param [in] h    : Height
 
void TGX11::RescaleWindow(int wid, unsigned int w, unsigned int h)
{
   gTws = fWindows[wid].get();
   if (!gTws->fOpen) return;
 
   // don't do anything when size did not change
   if (gTws->fWidth == w && gTws->fHeight == h) return;
 
   XResizeWindow((Display*)fDisplay, gTws->fWindow, w, h);
 
   if (gTws->fBuffer) {
      // don't free and recreate pixmap when new pixmap is smaller
      if (gTws->fWidth < w || gTws->fHeight < h) {
         XFreePixmap((Display*)fDisplay,gTws->fBuffer);
         gTws->fBuffer = XCreatePixmap((Display*)fDisplay, fRootWin, w, h, fDepth);
      }
      for (int i = 0; i < kMAXGC; i++)
         XSetClipMask((Display*)fDisplay, gTws->fGClist[i], None);
      SetColor(gTws, &gTws->fGClist[kGCpxmp], 0);
      XFillRectangle((Display*)fDisplay, gTws->fBuffer, gTws->fGClist[kGCpxmp], 0, 0, w, h);
      SetColor(gTws, &gTws->fGClist[kGCpxmp], 1);
      if (gTws->fDoubleBuffer)
         gTws->fDrawing = gTws->fBuffer;
   }
   gTws->fWidth  = w;
   gTws->fHeight = h;
}
 
////////////////////////////////////////////////////////////////////////////////
/// Resize a pixmap.
///
///  \param [in] wid : pixmap to be resized
///  \param [in] w,h : Width and height of the pixmap
 
int TGX11::ResizePixmap(int wid, unsigned int w, unsigned int h)
{
   Window root;
   unsigned int wval, hval;
   int xx, yy, i;
   unsigned int ww, hh, border, depth;
   wval = w;
   hval = h;
 
   gTws = fWindows[wid].get();
 
   // don't do anything when size did not change
   //  if (gTws->fWidth == wval && gTws->fHeight == hval) return 0;
 
   // due to round-off errors in TPad::Resize() we might get +/- 1 pixel
   // change, in those cases don't resize pixmap
   if (gTws->fWidth  >= wval-1 && gTws->fWidth  <= wval+1 &&
       gTws->fHeight >= hval-1 && gTws->fHeight <= hval+1) return 0;
 
   // don't free and recreate pixmap when new pixmap is smaller
   if (gTws->fWidth < wval || gTws->fHeight < hval) {
      XFreePixmap((Display*)fDisplay, gTws->fWindow);
      gTws->fWindow = XCreatePixmap((Display*)fDisplay, fRootWin, wval, hval, fDepth);
   }
   XGetGeometry((Display*)fDisplay, gTws->fWindow, &root, &xx, &yy, &ww, &hh, &border, &depth);
 
   for (i = 0; i < kMAXGC; i++)
      XSetClipMask((Display*)fDisplay, gTws->fGClist[i], None);
 
   SetColor(gTws, &gTws->fGClist[kGCpxmp], 0);
   XFillRectangle((Display*)fDisplay, gTws->fWindow, gTws->fGClist[kGCpxmp], 0, 0, ww, hh);
   SetColor(gTws, &gTws->fGClist[kGCpxmp], 1);
 
   // Initialise the window structure
   gTws->fDrawing = gTws->fWindow;
   gTws->fWidth   = wval;
   gTws->fHeight  = hval;
 
   return 1;
}
 
////////////////////////////////////////////////////////////////////////////////
/// Resize the current window if necessary.
 
void TGX11::ResizeWindow(Int_t wid)
{
   int xval=0, yval=0;
   Window win, root=0;
   unsigned int wval=0, hval=0, border=0, depth=0;
 
   gTws = fWindows[wid].get();
 
   win = gTws->fWindow;
 
   XGetGeometry((Display*)fDisplay, win, &root,
                &xval, &yval, &wval, &hval, &border, &depth);
   if (wval >= 65500) wval = 1;
   if (hval >= 65500) hval = 1;
 
   // don't do anything when size did not change
   if (gTws->fWidth == wval && gTws->fHeight == hval) return;
 
   XResizeWindow((Display*)fDisplay, gTws->fWindow, wval, hval);
 
   if (gTws->fBuffer) {
      if (gTws->fWidth < wval || gTws->fHeight < hval) {
         XFreePixmap((Display*)fDisplay,gTws->fBuffer);
         gTws->fBuffer = XCreatePixmap((Display*)fDisplay, fRootWin, wval, hval, fDepth);
      }
      for (int i = 0; i < kMAXGC; i++)
         XSetClipMask((Display*)fDisplay, gTws->fGClist[i], None);
      SetColor(gTws, &gTws->fGClist[kGCpxmp], 0);
      XFillRectangle((Display*)fDisplay, gTws->fBuffer, gTws->fGClist[kGCpxmp], 0, 0, wval, hval);
      SetColor(gTws, &gTws->fGClist[kGCpxmp], 1);
      if (gTws->fDoubleBuffer)
         gTws->fDrawing = gTws->fBuffer;
   }
   gTws->fWidth  = wval;
   gTws->fHeight = hval;
}
 
////////////////////////////////////////////////////////////////////////////////
/// Select window to which subsequent output is directed.
 
void TGX11::SelectWindow(int wid)
{
   if ((wid == 0) || (fWindows.count(wid) == 0))
      return;
 
   if (!fWindows[wid]->fOpen)
      return;
 
   gCws = fWindows[wid].get();
 
   if (gCws->fClip && !gCws->fIsPixmap && !gCws->fDoubleBuffer) {
      XRectangle region;
      region.x      = gCws->fXclip;
      region.y      = gCws->fYclip;
      region.width  = gCws->fWclip;
      region.height = gCws->fHclip;
      for (int i = 0; i < kMAXGC; i++)
         XSetClipRectangles((Display*)fDisplay, gCws->fGClist[i], 0, 0, &region, 1, YXBanded);
   } else {
      for (int i = 0; i < kMAXGC; i++)
         XSetClipMask((Display*)fDisplay, gCws->fGClist[i], None);
   }
}
 
////////////////////////////////////////////////////////////////////////////////
/// Set character up vector.
 
void TGX11::SetCharacterUp(Float_t chupx, Float_t chupy)
{
   if (chupx == fCharacterUpX  && chupy == fCharacterUpY) return;
 
   if      (chupx == 0  && chupy == 0)  fTextAngle = 0;
   else if (chupx == 0  && chupy == 1)  fTextAngle = 0;
   else if (chupx == -1 && chupy == 0)  fTextAngle = 90;
   else if (chupx == 0  && chupy == -1) fTextAngle = 180;
   else if (chupx == 1  && chupy ==  0) fTextAngle = 270;
   else {
      fTextAngle = ((TMath::ACos(chupx/TMath::Sqrt(chupx*chupx +chupy*chupy))*180.)/TMath::Pi())-90;
      if (chupy < 0) fTextAngle = 180 - fTextAngle;
      if (TMath::Abs(fTextAngle) <= 0.01) fTextAngle = 0;
   }
   fCharacterUpX = chupx;
   fCharacterUpY = chupy;
}
 
////////////////////////////////////////////////////////////////////////////////
/// Turn off the clipping for the window wid.
 
void TGX11::SetClipOFF(int wid)
{
   gTws       = fWindows[wid].get();
   gTws->fClip = 0;
 
   for (int i = 0; i < kMAXGC; i++)
      XSetClipMask( (Display*)fDisplay, gTws->fGClist[i], None );
}
 
////////////////////////////////////////////////////////////////////////////////
/// Set clipping region for the window wid.
///
///  \param [in] wid        : Window identifier
///  \param [in] x,y        : origin of clipping rectangle
///  \param [in] w,h        : size of clipping rectangle;
 
void TGX11::SetClipRegion(int wid, int x, int y, unsigned int w, unsigned int h)
{
   gTws = fWindows[wid].get();
   gTws->fXclip = x;
   gTws->fYclip = y;
   gTws->fWclip = w;
   gTws->fHclip = h;
   gTws->fClip  = 1;
   if (gTws->fClip && !gTws->fIsPixmap && !gTws->fDoubleBuffer) {
      XRectangle region;
      region.x      = gTws->fXclip;
      region.y      = gTws->fYclip;
      region.width  = gTws->fWclip;
      region.height = gTws->fHclip;
      for (int i = 0; i < kMAXGC; i++)
         XSetClipRectangles((Display*)fDisplay, gTws->fGClist[i], 0, 0, &region, 1, YXBanded);
   }
}
 
////////////////////////////////////////////////////////////////////////////////
/// Set the foreground color in GC.
 
void TGX11::SetColor(XWindow_t *ctxt, void *gci, int ci)
{
   GC gc = *(GC *)gci;
 
   TColor *color = gROOT->GetColor(ci);
   if (color)
      SetRGB(ci, color->GetRed(), color->GetGreen(), color->GetBlue());
 
   XColor_t &col = GetColor(ci);
   if (fColormap && !col.fDefined) {
      col = GetColor(0);
   } else if (!fColormap && (ci < 0 || ci > 1)) {
      col = GetColor(0);
   }
 
   if (ctxt && ctxt->drawMode == kXor) {
      XGCValues values;
      XGetGCValues((Display*)fDisplay, gc, GCBackground, &values);
      XSetForeground((Display*)fDisplay, gc, col.fPixel ^ values.background);
   } else {
      XSetForeground((Display*)fDisplay, gc, col.fPixel);
 
      // make sure that foreground and background are different
      XGCValues values;
      XGetGCValues((Display*)fDisplay, gc, GCForeground | GCBackground, &values);
      if (values.foreground == values.background)
         XSetBackground((Display*)fDisplay, gc, GetColor(!ci).fPixel);
   }
}
 
////////////////////////////////////////////////////////////////////////////////
/// Set the cursor.
 
void  TGX11::SetCursor(Int_t wid, ECursor cursor)
{
   gTws = fWindows[wid].get();
   XDefineCursor((Display*)fDisplay, gTws->fWindow, fCursors[cursor]);
}
 
////////////////////////////////////////////////////////////////////////////////
/// Set the double buffer on/off on window wid.
///
///  \param [in] wid  : Window identifier.
///       - 999 means all the opened windows.
///  \param [in] mode :
///       - 1 double buffer is on
///       - 0 double buffer is off
 
void TGX11::SetDoubleBuffer(int wid, int mode)
{
   if (wid == 999) {
      for (auto & pair : fWindows) {
         gTws = pair.second.get();
         if (gTws->fOpen) {
            switch (mode) {
               case 1 :
                  SetDoubleBufferON();
                  break;
               default:
                  SetDoubleBufferOFF();
                  break;
            }
         }
      }
   } else {
      gTws = fWindows[wid].get();
      if (!gTws->fOpen)
         return;
      switch (mode) {
         case 1 :
            SetDoubleBufferON();
            return;
         default:
            SetDoubleBufferOFF();
            return;
      }
   }
}
 
////////////////////////////////////////////////////////////////////////////////
/// Turn double buffer mode off.
 
void TGX11::SetDoubleBufferOFF()
{
   if (!gTws->fDoubleBuffer) return;
   gTws->fDoubleBuffer = 0;
   gTws->fDrawing      = gTws->fWindow;
}
 
////////////////////////////////////////////////////////////////////////////////
/// Turn double buffer mode on.
 
void TGX11::SetDoubleBufferON()
{
   if (gTws->fDoubleBuffer || gTws->fIsPixmap)
      return;
   if (!gTws->fBuffer) {
      gTws->fBuffer = XCreatePixmap((Display*)fDisplay, fRootWin,
                                   gTws->fWidth, gTws->fHeight, fDepth);
      SetColor(gTws, &gTws->fGClist[kGCpxmp], 0);
      XFillRectangle((Display*)fDisplay, gTws->fBuffer, gTws->fGClist[kGCpxmp], 0, 0, gTws->fWidth, gTws->fHeight);
      SetColor(gTws, &gTws->fGClist[kGCpxmp], 1);
   }
   for (int i = 0; i < kMAXGC; i++)
      XSetClipMask((Display*)fDisplay, gTws->fGClist[i], None);
   gTws->fDoubleBuffer  = 1;
   gTws->fDrawing       = gTws->fBuffer;
}
 
////////////////////////////////////////////////////////////////////////////////
/// Set the drawing mode.
///
///  \param [in] mode : drawing mode
///            - mode=1 copy
///            - mode=2 xor
///            - mode=3 invert
///            - mode=4 set the suitable mode for cursor echo according to
///                     the vendor
 
void TGX11::SetDrawMode(EDrawMode mode)
{
   SetDrawModeW((WinContext_t) gCws, mode);
}
 
////////////////////////////////////////////////////////////////////////////////
/// Set color index for fill areas.
 
void TGX11::SetFillColor(Color_t cindex)
{
   if (cindex < 0) return;
 
   TAttFill::SetFillColor(cindex);
 
   TAttFill arg(gCws->fAttFill);
   arg.SetFillColor(cindex);
 
   SetAttFill((WinContext_t) gCws, arg);
}
 
////////////////////////////////////////////////////////////////////////////////
/// Return current fill color
 
Color_t TGX11::GetFillColor() const
{
   // TODO: remove in ROOT7, no longer used in the code
 
   return gCws ? gCws->fAttFill.GetFillColor() : TAttFill::GetFillColor();
}
 
 
////////////////////////////////////////////////////////////////////////////////
/// Set fill area style.
///
///  \param [in] fstyle   : compound fill area interior style
///            - fstyle = 1000*interiorstyle + styleindex
 
void TGX11::SetFillStyle(Style_t fstyle)
{
   TAttFill::SetFillStyle(fstyle);
 
   TAttFill arg(gCws->fAttFill);
   arg.SetFillStyle(fstyle);
 
   SetAttFill((WinContext_t) gCws, arg);
}
 
////////////////////////////////////////////////////////////////////////////////
/// Return current fill style
 
Style_t TGX11::GetFillStyle() const
{
   // TODO: remove in ROOT7, no longer used in the code
 
   return gCws ? gCws->fAttFill.GetFillStyle() : TAttFill::GetFillStyle();
}
 
////////////////////////////////////////////////////////////////////////////////
/// Set input on or off.
 
void TGX11::SetInput(int inp)
{
   XSetWindowAttributes attributes;
   ULong_t attr_mask;
 
   if (inp == 1) {
      attributes.event_mask = gMouseMask | gKeybdMask;
      attr_mask = CWEventMask;
      XChangeWindowAttributes((Display*)fDisplay, gCws->fWindow, attr_mask, &attributes);
   } else {
      attributes.event_mask = NoEventMask;
      attr_mask = CWEventMask;
      XChangeWindowAttributes((Display*)fDisplay, gCws->fWindow, attr_mask, &attributes);
   }
}
 
////////////////////////////////////////////////////////////////////////////////
/// Set color index for lines.
 
void TGX11::SetLineColor(Color_t cindex)
{
   if (cindex < 0) return;
 
   TAttLine::SetLineColor(cindex);
 
   TAttLine arg(gCws->fAttLine);
   arg.SetLineColor(cindex);
 
   SetAttLine((WinContext_t) gCws, arg);
}
 
////////////////////////////////////////////////////////////////////////////////
/// Set line type.
///
///  \param [in] n         : length of dash list
///  \param [in] dash      : dash segment lengths
///
///  - if n <= 0 use solid lines
///  - if n >  0 use dashed lines described by DASH(N)
///       e.g. N=4,DASH=(6,3,1,3) gives a dashed-dotted line with dash length 6
///       and a gap of 7 between dashes
 
void TGX11::SetLineType(int /* n */, int * /* dash */)
{
   Warning("SetLineType", "DEPRECATED, use SetAttLine() instead");
}
 
////////////////////////////////////////////////////////////////////////////////
/// Set line style.
 
void TGX11::SetLineStyle(Style_t lstyle)
{
   TAttLine::SetLineStyle(lstyle);
 
   TAttLine arg(gCws->fAttLine);
   arg.SetLineStyle(lstyle);
 
   SetAttLine((WinContext_t) gCws, arg);
}
 
////////////////////////////////////////////////////////////////////////////////
/// Return current line style
 
Style_t TGX11::GetLineStyle() const
{
   // TODO: remove in ROOT7, no loner used in ROOT code
 
   return gCws ? gCws->fAttLine.GetLineStyle() : TAttLine::GetLineStyle();
}
 
////////////////////////////////////////////////////////////////////////////////
/// Set line width.
///
///  \param [in] width   : line width in pixels
 
void TGX11::SetLineWidth(Width_t width)
{
   TAttLine::SetLineWidth(width);
 
   TAttLine arg(gCws->fAttLine);
   arg.SetLineWidth(width);
 
   SetAttLine((WinContext_t) gCws, arg);
}
 
////////////////////////////////////////////////////////////////////////////////
/// Return current line width
 
Width_t TGX11::GetLineWidth() const
{
   // TODO: remove in ROOT7, no loner used in ROOT code
 
   return gCws ? gCws->fAttLine.GetLineWidth() : TAttLine::GetLineWidth();
}
 
////////////////////////////////////////////////////////////////////////////////
/// Set color index for markers.
 
void TGX11::SetMarkerColor(Color_t cindex)
{
   if (cindex < 0) return;
 
   TAttMarker::SetMarkerColor(cindex);
 
   TAttMarker arg(gCws->fAttMarker);
   arg.SetMarkerColor(cindex);
 
   SetAttMarker((WinContext_t) gCws, arg);
}
 
////////////////////////////////////////////////////////////////////////////////
/// Set marker size index.
///
///  \param [in] msize  : marker scale factor
 
void TGX11::SetMarkerSize(Float_t msize)
{
   TAttMarker::SetMarkerSize(msize);
 
   TAttMarker arg(gCws->fAttMarker);
   arg.SetMarkerSize(msize);
 
   SetAttMarker((WinContext_t) gCws, arg);
}
 
////////////////////////////////////////////////////////////////////////////////
/// Set marker style.
 
void TGX11::SetMarkerStyle(Style_t markerstyle)
{
   TAttMarker::SetMarkerStyle(markerstyle);
 
   TAttMarker arg(gCws->fAttMarker);
   arg.SetMarkerStyle(markerstyle);
 
   SetAttMarker((WinContext_t) gCws, arg);
}
 
////////////////////////////////////////////////////////////////////////////////
/// Set opacity of a selected window. This image manipulation routine works
/// by adding to a percent amount of neutral to each pixels RGB.
/// Since it requires quite some additional color map entries is it
/// only supported on displays with more than > 8 color planes (> 256
/// colors).
 
void TGX11::SetOpacity(Int_t percent)
{
   SetOpacityW((WinContext_t) gCws, percent);
}
 
////////////////////////////////////////////////////////////////////////////////
/// Set color intensities for given color index.
///
///  \param [in] cindex     : color index
///  \param [in] r,g,b      : red, green, blue intensities between 0.0 and 1.0
 
void TGX11::SetRGB(int cindex, float r, float g, float b)
{
   if (fColormap) {
      RXColor xcol;
      xcol.red   = (UShort_t)(r * kBIGGEST_RGB_VALUE);
      xcol.green = (UShort_t)(g * kBIGGEST_RGB_VALUE);
      xcol.blue  = (UShort_t)(b * kBIGGEST_RGB_VALUE);
      xcol.flags = DoRed | DoGreen | DoBlue;
      XColor_t &col = GetColor(cindex);
      if (col.fDefined) {
         // if color is already defined with same rgb just return
         if (col.fRed  == xcol.red && col.fGreen == xcol.green &&
             col.fBlue == xcol.blue)
            return;
         col.fDefined = kFALSE;
         if (fRedDiv == -1)
            XFreeColors((Display*)fDisplay, fColormap, &col.fPixel, 1, 0);
      }
      if (AllocColor(fColormap, &xcol)) {
         col.fDefined = kTRUE;
         col.fPixel   = xcol.pixel;
         col.fRed     = xcol.red;
         col.fGreen   = xcol.green;
         col.fBlue    = xcol.blue;
      }
   }
}
 
////////////////////////////////////////////////////////////////////////////////
/// Set text alignment.
///
///  \param [in] talign   text alignment
 
void TGX11::SetTextAlign(Short_t talign)
{
   TAttText::SetTextAlign(talign);
 
   TAttText arg(gCws->fAttText);
   arg.SetTextAlign(talign);
 
   SetAttText((WinContext_t) gCws, arg);
}
 
////////////////////////////////////////////////////////////////////////////////
/// Set color index for text.
 
void TGX11::SetTextColor(Color_t cindex)
{
   if (cindex < 0) return;
 
   TAttText::SetTextColor(cindex);
 
   TAttText arg(gCws->fAttText);
   arg.SetTextColor(cindex);
 
   SetAttText((WinContext_t) gCws, arg);
}
 
////////////////////////////////////////////////////////////////////////////////
/// Set text font to specified name.
///
///  \param [in] fontname   font name
///  \param [in] mode       loading flag
///            - mode=0     search if the font exist (kCheck)
///            - mode=1     search the font and load it if it exists (kLoad)
///
/// Set text font to specified name. This function returns 0 if
/// the specified font is found, 1 if not.
 
Int_t TGX11::SetTextFont(char *fontname, ETextSetMode mode)
{
   char **fontlist;
   int fontcount;
 
   if (mode == kLoad) {
      for (int i = 0; i < kMAXFONT; i++) {
         if (strcmp(fontname, gFont[i].name) == 0) {
            gTextFont = gFont[i].id;
            if (gCws) {
               gCws->textFont = gTextFont;
               XSetFont((Display*)fDisplay, gCws->fGClist[kGCtext], gCws->textFont->fid);
               XSetFont((Display*)fDisplay, gCws->fGClist[kGCinvt], gCws->textFont->fid);
            }
            return 0;
         }
      }
   }
 
   fontlist = XListFonts((Display*)fDisplay, fontname, 1, &fontcount);
 
   if (fontlist && fontcount != 0) {
      if (mode == kLoad) {
         if (gFont[gCurrentFontNumber].id)
            XFreeFont((Display*)fDisplay, gFont[gCurrentFontNumber].id);
         gTextFont = XLoadQueryFont((Display*)fDisplay, fontlist[0]);
         gFont[gCurrentFontNumber].id = gTextFont;
         strlcpy(gFont[gCurrentFontNumber].name,fontname,80);
         gCurrentFontNumber++;
         if (gCurrentFontNumber == kMAXFONT) gCurrentFontNumber = 0;
      }
      XFreeFontNames(fontlist);
      return 0;
   } else {
      return 1;
   }
}
 
////////////////////////////////////////////////////////////////////////////////
/// Set current text font number.
 
void TGX11::SetTextFont(Font_t fontnumber)
{
   TAttText::SetTextFont(fontnumber);
 
   TAttText arg(gCws->fAttText);
   arg.SetTextFont(fontnumber);
 
   SetAttText((WinContext_t) gCws, arg);
}
 
////////////////////////////////////////////////////////////////////////////////
/// Set current text size.
 
void TGX11::SetTextSize(Float_t textsize)
{
   TAttText::SetTextSize(textsize);
 
   TAttText arg(gCws->fAttText);
   arg.SetTextSize(textsize);
 
   SetAttText((WinContext_t) gCws, arg);
}
 
////////////////////////////////////////////////////////////////////////////////
/// Set synchronisation on or off.
///
///  \param [in] mode : synchronisation on/off
///            - mode=1  on
///            - mode<>0 off
 
void TGX11::Sync(int mode)
{
   switch (mode) {
 
      case 1 :
         XSynchronize((Display*)fDisplay,1);
         break;
 
      default:
         XSynchronize((Display*)fDisplay,0);
         break;
   }
}
 
////////////////////////////////////////////////////////////////////////////////
/// Update display.
///
///  \param [in] mode : (1) update (0) sync
///
/// Synchronise client and server once (not permanent).
/// Copy the pixmap gCws->fDrawing on the window gCws->fWindow
/// if the double buffer is on.
 
void TGX11::UpdateWindow(int mode)
{
   UpdateWindowW((WinContext_t) gCws, mode);
}
 
////////////////////////////////////////////////////////////////////////////////
/// Update display for specified window.
///
///  \param [in] mode : (1) update (0) sync
///
/// Synchronise client and server once (not permanent).
/// Copy the pixmap gCws->fDrawing on the window gCws->fWindow
/// if the double buffer is on.
 
void TGX11::UpdateWindowW(WinContext_t wctxt, Int_t mode)
{
   auto ctxt = (XWindow_t *) wctxt;
   if (!ctxt)
      return;
 
   if (ctxt->fDoubleBuffer) {
      XCopyArea((Display*)fDisplay, ctxt->fDrawing, ctxt->fWindow,
                ctxt->fGClist[kGCpxmp], 0, 0, ctxt->fWidth, ctxt->fHeight, 0, 0);
   }
   if (mode == 1) {
      XFlush((Display*)fDisplay);
   } else {
      XSync((Display*)fDisplay, False);
   }
}
 
////////////////////////////////////////////////////////////////////////////////
/// Set opacity of a specified window. This image manipulation routine works
/// by adding to a percent amount of neutral to each pixels RGB.
/// Since it requires quite some additional color map entries is it
/// only supported on displays with more than > 8 color planes (> 256
/// colors).
 
void TGX11::SetOpacityW(WinContext_t wctxt, Int_t percent)
{
   if ((fDepth <= 8) || (percent <= 0)) return;
   if (percent > 100) percent = 100;
 
   auto ctxt = (XWindow_t *) wctxt;
 
   // get pixmap from server as image
   XImage *image = XGetImage((Display*)fDisplay, ctxt->fDrawing, 0, 0, ctxt->fWidth,
                             ctxt->fHeight, AllPlanes, ZPixmap);
   if (!image) return;
 
   // collect different image colors
   std::vector<ULong_t> orgcolors;
   for (UInt_t y = 0; y < ctxt->fHeight; y++) {
      for (UInt_t x = 0; x < ctxt->fWidth; x++) {
         ULong_t pixel = XGetPixel(image, x, y);
         if (std::find(orgcolors.begin(), orgcolors.end(), pixel) == orgcolors.end())
            orgcolors.emplace_back(pixel);
      }
   }
   if (orgcolors.empty()) {
      XDestroyImage(image);
      return;
   }
 
   // clean up old colors
   if (!ctxt->fNewColors.empty()) {
      if (fRedDiv == -1)
         XFreeColors((Display*)fDisplay, fColormap, ctxt->fNewColors.data(), ctxt->fNewColors.size(), 0);
      ctxt->fNewColors.clear();
   }
 
   std::vector<RXColor> xcol(orgcolors.size());
 
   for (std::size_t i = 0; i < orgcolors.size(); i++) {
      xcol[i].pixel = orgcolors[i];
      xcol[i].red   = xcol[i].green = xcol[i].blue = 0;
      xcol[i].flags = DoRed | DoGreen | DoBlue;
   }
   QueryColors(fColormap, xcol.data(), orgcolors.size());
 
   // create new colors mixing:  "100-percent" of old color and "percent" of new background color
   XColor_t &bkgr = GetColor(ctxt->fAttFill.GetFillColor());
 
   for (std::size_t i = 0; i < orgcolors.size(); i++) {
      xcol[i].red   = (UShort_t) TMath::Min((Int_t) xcol[i].red * (100 - percent) / 100  + bkgr.fRed * percent / 100, kBIGGEST_RGB_VALUE);
      xcol[i].green = (UShort_t) TMath::Min((Int_t) xcol[i].green * (100 - percent) / 100  + bkgr.fGreen * percent / 100, kBIGGEST_RGB_VALUE);
      xcol[i].blue  = (UShort_t) TMath::Min((Int_t) xcol[i].blue * (100 - percent) / 100  + bkgr.fBlue * percent / 100, kBIGGEST_RGB_VALUE);
      if (!AllocColor(fColormap, &xcol[i]))
         Warning("SetOpacityW", "failed to allocate color %hd, %hd, %hd",
                 xcol[i].red, xcol[i].green, xcol[i].blue);
      // assumes that in case of failure xcol[i].pixel is not changed
   }
 
   ctxt->fNewColors.resize(orgcolors.size());
 
   for (std::size_t i = 0; i < orgcolors.size(); i++)
      ctxt->fNewColors[i] = xcol[i].pixel;
 
   // put opaque colors in image
   for (UInt_t y = 0; y < ctxt->fHeight; y++) {
      for (UInt_t x = 0; x < ctxt->fWidth; x++) {
         ULong_t pixel = XGetPixel(image, x, y);
         auto iter = std::find(orgcolors.begin(), orgcolors.end(), pixel);
         if (iter != orgcolors.end()) {
            auto idx = iter - orgcolors.begin();
            XPutPixel(image, x, y, ctxt->fNewColors[idx]);
         }
      }
   }
 
   // put image back in pixmap on server
   XPutImage((Display*)fDisplay, ctxt->fDrawing, ctxt->fGClist[kGCpxmp], image, 0, 0, 0, 0,
             ctxt->fWidth, ctxt->fHeight);
   XFlush((Display*)fDisplay);
 
   XDestroyImage(image);
}
 
////////////////////////////////////////////////////////////////////////////////
/// Copy the pixmap wid at the position xpos, ypos in the specified window.
 
void TGX11::CopyPixmapW(WinContext_t wctxt, Int_t wid, Int_t xpos, Int_t ypos)
{
   auto ctxt = (XWindow_t *) wctxt;
 
   gTws = fWindows[wid].get();
 
   XCopyArea((Display*)fDisplay, gTws->fDrawing, ctxt->fDrawing, gTws->fGClist[kGCpxmp], 0, 0, gTws->fWidth,
             gTws->fHeight, xpos, ypos);
   XFlush((Display*)fDisplay);
}
 
////////////////////////////////////////////////////////////////////////////////
/// Set pointer position.
///
/// \param [in] ix   New X coordinate of pointer
/// \param [in] iy   New Y coordinate of pointer
/// \param [in] id   Window identifier
///
/// Coordinates are relative to the origin of the window id
/// or to the origin of the current window if id == 0.
 
void TGX11::Warp(Int_t ix, Int_t iy, Window_t id)
{
   if (!id) {
      // Causes problems when calling ProcessEvents()... BadWindow
      //XWarpPointer((Display*)fDisplay, None, gCws->fWindow, 0, 0, 0, 0, ix, iy);
   } else {
      XWarpPointer((Display*)fDisplay, None, (Window) id, 0, 0, 0, 0, ix, iy);
   }
}
 
////////////////////////////////////////////////////////////////////////////////
/// Write the pixmap wid in the bitmap file pxname.
///
///  \param [in] wid         : Pixmap address
///  \param [in] w,h         : Width and height of the pixmap.
///  \param [in] pxname      : pixmap name
 
void TGX11::WritePixmap(int wid, unsigned int w, unsigned int h, char *pxname)
{
   unsigned int wval, hval;
   wval = w;
   hval = h;
 
   gTws = fWindows[wid].get();
   XWriteBitmapFile((Display*)fDisplay, pxname, gTws->fDrawing, wval, hval, -1, -1);
}
 
////////////////////////////////////////////////////////////////////////////////
/// Helper class to extract pixel information from XImage for store in the GIF
 
class TX11GifEncode : public TGifEncode {
   private:
      XImage *fXimage = nullptr;
   protected:
      void get_scline(int y, int width, unsigned char *buf) override
      {
         for (int x = 0; x < width; x++) {
            ULong_t pixel = XGetPixel(fXimage, x, y);
            buf[x] = 0;
 
            auto iter = std::find(orgcolors.begin(), orgcolors.end(), pixel);
            if (iter != orgcolors.end()) {
               auto idx = iter - orgcolors.begin();
               if (idx < 256)
                  buf[x] = (unsigned char) idx;
            }
         }
      }
   public:
      std::vector<ULong_t> orgcolors; // all unique pixels
 
      TX11GifEncode(XImage *image) : fXimage(image) {}
};
 
 
////////////////////////////////////////////////////////////////////////////////
/// Writes the current window into GIF file. Returns 1 in case of success,
/// 0 otherwise.
 
Int_t TGX11::WriteGIF(char *name)
{
   return WriteGIFW((WinContext_t) gCws, name);
}
 
////////////////////////////////////////////////////////////////////////////////
/// Writes the specified window into GIF file. Returns 1 in case of success,
/// 0 otherwise.
 
Int_t TGX11::WriteGIFW(WinContext_t wctxt, const char *name)
{
   auto ctxt = (XWindow_t *) wctxt;
 
   XImage *image = XGetImage((Display*)fDisplay, ctxt->fDrawing, 0, 0,
                             ctxt->fWidth, ctxt->fHeight,
                             AllPlanes, ZPixmap);
 
   if (!image) {
      Error("WriteGIFW", "Cannot create image for writing GIF. Try in batch mode.");
      return 0;
   }
 
   /// Collect R G B colors of the palette used by the image.
   /// The image pixels are changed to index values in these R G B arrays.
   /// This produces a colormap with only the used colors (so even on displays
   /// with more than 8 planes we will be able to create GIF's when the image
   /// contains no more than 256 different colors). If it does contain more
   /// colors we will have to use GIFquantize to reduce the number of colors.
 
   TX11GifEncode gif(image);
 
   // collect different image colors
   for (UInt_t x = 0; x < ctxt->fWidth; x++) {
      for (UInt_t y = 0; y < ctxt->fHeight; y++) {
         ULong_t pixel = XGetPixel(image, x, y);
         if (std::find(gif.orgcolors.begin(), gif.orgcolors.end(), pixel) == gif.orgcolors.end())
            gif.orgcolors.emplace_back(pixel);
      }
   }
 
   auto ncolors = gif.orgcolors.size();
 
   if (ncolors > 256) {
      Error("WriteGIFW", "Cannot create GIF of image containing more than 256 colors. Try in batch mode.");
      XDestroyImage(image);
      return 0;
   }
 
   // get RGB values belonging to pixels
   std::vector<RXColor> xcol(ncolors);
 
   for (std::size_t i = 0; i < ncolors; i++) {
      xcol[i].pixel = gif.orgcolors[i];
      xcol[i].red   = xcol[i].green = xcol[i].blue = 0;
      xcol[i].flags = DoRed | DoGreen | DoBlue;
   }
 
   QueryColors(fColormap, xcol.data(), ncolors);
 
   UShort_t maxcol = 0;
   for (std::size_t i = 0; i < ncolors; i++) {
      maxcol = TMath::Max(maxcol, xcol[i].red);
      maxcol = TMath::Max(maxcol, xcol[i].green);
      maxcol = TMath::Max(maxcol, xcol[i].blue);
   }
   if (maxcol == 0)
      maxcol = 255;
 
   std::vector<unsigned char> r(ncolors), b(ncolors), g(ncolors);
 
   for (std::size_t i = 0; i < ncolors; i++) {
      r[i] = (unsigned char) (xcol[i].red * 255 / maxcol);
      g[i] = (unsigned char) (xcol[i].green * 255 / maxcol);
      b[i] = (unsigned char) (xcol[i].blue * 255 / maxcol);
   }
 
   Int_t ret = 0;
 
   if (gif.OpenFile(name)) {
      auto len = gif.GIFencode(ctxt->fWidth, ctxt->fHeight, ncolors, r.data(), g.data(), b.data());
      if (len > 0)
         ret = 1;
      gif.CloseFile();
   } else {
      Error("WriteGIFW", "cannot write file: %s", name);
   }
 
   // cleanup image at the end
   XDestroyImage(image);
 
   return ret;
}
 
////////////////////////////////////////////////////////////////////////////////
/// Draw image.
/// Not used, keep for backward compatibility
 
void TGX11::PutImage(Int_t offset,Int_t itran,Int_t x0,Int_t y0,Int_t nx,Int_t ny,Int_t xmin,
                     Int_t ymin,Int_t xmax,Int_t ymax, UChar_t *image,Drawable_t wid)
{
   const int maxSegment = 20;
   int           i, n, x, y, xcur, x1, x2, y1, y2;
   unsigned char *jimg, *jbase, icol;
   int           nlines[256];
   XSegment      lines[256][maxSegment];
   Drawable_t    id;
   GC            lineGC;
 
   if (wid) {
      id = wid;
      lineGC = XCreateGC((Display*)fDisplay, fVisRootWin, 0, nullptr);
   } else {
      id = gCws->fDrawing;
      lineGC = gCws->fGClist[kGCline];
   }
 
   for (i = 0; i < 256; i++) nlines[i] = 0;
 
   x1 = x0 + xmin; y1 = y0 + ny - ymax - 1;
   x2 = x0 + xmax; y2 = y0 + ny - ymin - 1;
   jbase = image + (ymin-1)*nx + xmin;
 
   for (y = y2; y >= y1; y--) {
      xcur = x1; jbase += nx;
      for (jimg = jbase, icol = *jimg++, x = x1+1; x <= x2; jimg++, x++) {
         if (icol != *jimg) {
            if (icol != itran) {
               n = nlines[icol]++;
               lines[icol][n].x1 = xcur; lines[icol][n].y1 = y;
               lines[icol][n].x2 = x-1;  lines[icol][n].y2 = y;
               if (nlines[icol] == maxSegment) {
                  SetColor(wid ? nullptr : gCws, &lineGC, (int)icol+offset);
                  XDrawSegments((Display*)fDisplay,id,lineGC,&lines[icol][0],
                                maxSegment);
                  nlines[icol] = 0;
               }
            }
            icol = *jimg; xcur = x;
         }
      }
      if (icol != itran) {
         n = nlines[icol]++;
         lines[icol][n].x1 = xcur; lines[icol][n].y1 = y;
         lines[icol][n].x2 = x-1;  lines[icol][n].y2 = y;
         if (nlines[icol] == maxSegment) {
            SetColor(wid ? nullptr : gCws, &lineGC, (int)icol+offset);
            XDrawSegments((Display*)fDisplay,id,lineGC,&lines[icol][0],
                          maxSegment);
            nlines[icol] = 0;
         }
      }
   }
 
   for (i = 0; i < 256; i++) {
      if (nlines[i] != 0) {
         SetColor(wid ? nullptr : gCws, &lineGC,i+offset);
         XDrawSegments((Display*)fDisplay,id,lineGC,&lines[i][0],nlines[i]);
      }
   }
 
   if (wid)
      XFreeGC((Display*)fDisplay, lineGC);
}
 
////////////////////////////////////////////////////////////////////////////////
/// If id is NULL - loads the specified gif file at position [x0,y0] in the
/// current window. Otherwise creates pixmap from gif file
 
Pixmap_t TGX11::ReadGIF(int x0, int y0, const char *file, Window_t id)
{
   Seek_t filesize = 0;
   unsigned char *gifArr, *pixArr, red[256], green[256], blue[256], *j1, *j2, icol;
   int   i, j, k, width, height, ncolor, irep, offset;
   float rr, gg, bb;
   Pixmap_t pic = 0;
 
   FILE  *fd = fopen(file, "r");
   if (!fd) {
      Error("ReadGIF", "unable to open GIF file");
      return pic;
   }
 
   fseek(fd, 0L, 2);
   long ft = ftell(fd);
   if (ft <=0) {
      Error("ReadGIF", "unable to open GIF file");
      fclose(fd);
      return pic;
   } else {
      filesize = Seek_t(ft);
   }
   fseek(fd, 0L, 0);
 
   if (!(gifArr = (unsigned char *) calloc(filesize+256,1))) {
      Error("ReadGIF", "unable to allocate array for gif");
      fclose(fd);
      return pic;
   }
 
   if (fread(gifArr, filesize, 1, fd) != 1) {
      Error("ReadGIF", "GIF file read failed");
      free(gifArr);
      fclose(fd);
      return pic;
   }
   fclose(fd);
 
   irep = TGifDecode::GIFinfo(gifArr, &width, &height, &ncolor);
   if (irep != 0) {
      free(gifArr);
      return pic;
   }
 
   if (!(pixArr = (unsigned char *) calloc((width*height),1))) {
      Error("ReadGIF", "unable to allocate array for image");
      free(gifArr);
      return pic;
   }
 
   TGifDecode gif;
 
   irep = gif.GIFdecode(gifArr, pixArr, &width, &height, &ncolor, red, green, blue);
   if (irep != 0) {
      free(gifArr);
      free(pixArr);
      return pic;
   }
 
   // S E T   P A L E T T E
 
   offset = 8;
 
   for (i = 0; i < ncolor; i++) {
      rr = red[i]/255.;
      gg = green[i]/255.;
      bb = blue[i]/255.;
      j = i+offset;
      SetRGB(j,rr,gg,bb);
   }
 
   // O U T P U T   I M A G E
 
   for (i = 1; i <= height/2; i++) {
      j1 = pixArr + (i-1)*width;
      j2 = pixArr + (height-i)*width;
      for (k = 0; k < width; k++) {
         icol = *j1; *j1++ = *j2; *j2++ = icol;
      }
   }
   if (id)
      pic = CreatePixmap(id, width, height);
   PutImage(offset,-1,x0,y0,width,height,0,0,width-1,height-1,pixArr,pic);
 
   free(gifArr);
   free(pixArr);
 
   if (pic)
      return pic;
 
   if (gCws->fDrawing)
      return (Pixmap_t)gCws->fDrawing;
   return 0;
}
 
////////////////////////////////////////////////////////////////////////////////
/// Returns an array of pixels created from a part of drawable
/// (defined by x, y, w, h) in format:
/// `b1, g1, r1, 0,  b2, g2, r2, 0,  ...,  bn, gn, rn, 0`.
///
/// Pixels are numbered from left to right and from top to bottom.
/// By default all pixels from the whole drawable are returned.
///
/// Note that return array is 32-bit aligned
 
unsigned char *TGX11::GetColorBits(Drawable_t /*wid*/, Int_t /*x*/, Int_t /*y*/,
                                       UInt_t /*w*/, UInt_t /*h*/)
{
   return nullptr;
}
 
////////////////////////////////////////////////////////////////////////////////
/// create pixmap from RGB data. RGB data is in format :
/// b1, g1, r1, 0,  b2, g2, r2, 0 ... bn, gn, rn, 0 ..
///
/// Pixels are numbered from left to right and from top to bottom.
/// Note that data must be 32-bit aligned
 
Pixmap_t TGX11::CreatePixmapFromData(unsigned char * /*bits*/, UInt_t /*width*/,
                                       UInt_t /*height*/)
{
   return (Pixmap_t)0;
}
 
////////////////////////////////////////////////////////////////////////////////
/// Register pixmap created by gVirtualGL
///
/// \param [in] pixid   Pixmap identifier
/// \param [in] w,h     Width and height of the pixmap
///
/// register new pixmap
 
Int_t TGX11::AddPixmap(ULong_t pixid, UInt_t w, UInt_t h)
{
   Int_t wid = AddWindowHandle();
 
   gCws = fWindows[wid].get();
   gCws->fWindow = pixid;
   gCws->fDrawing = gCws->fWindow;
   gCws->fBuffer = 0;
   gCws->fDoubleBuffer = 0;
   gCws->fIsPixmap = 1;
   gCws->fClip = 0;
   gCws->fWidth = w;
   gCws->fHeight = h;
   gCws->fShared = kFALSE;
 
   return wid;
}
 
////////////////////////////////////////////////////////////////////////////////
/// Returns 1 if window system server supports extension given by the
/// argument, returns 0 in case extension is not supported and returns -1
/// in case of error (like server not initialized).
/// Examples:
///  - "Apple-WM" - does server run on MacOS X;
///  - "XINERAMA" - does server support Xinerama.
/// See also the output of xdpyinfo.
 
Int_t TGX11::SupportsExtension(const char *ext) const
{
   Int_t major_opcode, first_event, first_error;
   if (!(Display*)fDisplay)
      return -1;
   return XQueryExtension((Display*)fDisplay, ext, &major_opcode, &first_event, &first_error);
}
 
////////////////////////////////////////////////////////////////////////////////
/// Returns window context for specified window id
/// Window context is valid until window not closed or destroyed
/// Provided methods to work with window context like DrawLineW allows to
/// perform actions independently on different windows
 
WinContext_t TGX11::GetWindowContext(Int_t wid)
{
   return (WinContext_t) fWindows[wid].get();
}
 
////////////////////////////////////////////////////////////////////////////////
/// Set fill attributes for specified window
 
void TGX11::SetAttFill(WinContext_t wctxt, const TAttFill &att)
{
   auto ctxt = (XWindow_t *) wctxt;
   if (!ctxt)
      return;
 
   Int_t cindex = att.GetFillColor();
   if (!gStyle->GetFillColor() && cindex > 1)
      cindex = 0;
   if (cindex >= 0)
      SetColor(ctxt, &ctxt->fGClist[kGCfill], Int_t(cindex));
   ctxt->fAttFill.SetFillColor(cindex);
 
   Int_t style = att.GetFillStyle() / 1000;
   Int_t fasi  = att.GetFillStyle() % 1000;
   Int_t stn = (fasi >= 1 && fasi <=25) ? fasi : 2;
   ctxt->fAttFill.SetFillStyle(style * 1000 + fasi);
 
   switch (style) {
      case 1:         // solid
         ctxt->fillHollow = 0;
         XSetFillStyle((Display*)fDisplay, ctxt->fGClist[kGCfill], FillSolid);
         break;
 
      case 2:         // pattern
         ctxt->fillHollow = 1;
         break;
 
      case 3:         // hatch
         ctxt->fillHollow = 0;
         XSetFillStyle((Display*)fDisplay, ctxt->fGClist[kGCfill], FillStippled);
 
         if (stn != ctxt->fillFasi) {
            if (ctxt->fillPattern != 0)
               XFreePixmap((Display*)fDisplay, ctxt->fillPattern);
 
            ctxt->fillPattern = XCreateBitmapFromData((Display*)fDisplay, fRootWin,
                                                      (const char*)gStipples[stn], 16, 16);
 
            XSetStipple((Display*)fDisplay, ctxt->fGClist[kGCfill], ctxt->fillPattern);
            ctxt->fillFasi = stn;
         }
         break;
 
      default:
         ctxt->fillHollow = 1;
   }
}
 
////////////////////////////////////////////////////////////////////////////////
/// Set line attributes for specified window
 
void TGX11::SetAttLine(WinContext_t wctxt, const TAttLine &att)
{
   auto ctxt = (XWindow_t *) wctxt;
   if (!ctxt)
      return;
 
   if (ctxt->fAttLine.GetLineStyle() != att.GetLineStyle()) { //set style index only if different
      if (att.GetLineStyle() <= 1)
         ctxt->dashList.clear();
      else if (att.GetLineStyle() == 2)
         ctxt->dashList = { 3, 3 };
      else if (att.GetLineStyle() == 3)
         ctxt->dashList = { 1, 2 };
      else if (att.GetLineStyle() == 4) {
         ctxt->dashList = { 3, 4, 1, 4} ;
      } else {
         TString st = (TString)gStyle->GetLineStyleString(att.GetLineStyle());
         auto tokens = st.Tokenize(" ");
         Int_t nt = tokens->GetEntries();
         ctxt->dashList.resize(nt);
         for (Int_t j = 0; j < nt; ++j) {
            Int_t it;
            sscanf(tokens->At(j)->GetName(), "%d", &it);
            ctxt->dashList[j] = (Int_t) (it/4);
         }
         delete tokens;
      }
      ctxt->dashLength = 0;
      for (auto elem : ctxt->dashList)
         ctxt->dashLength += elem;
      ctxt->dashOffset = 0;
      ctxt->lineStyle = ctxt->dashList.size() == 0 ? LineSolid : LineOnOffDash;
   }
 
   ctxt->lineWidth = att.GetLineWidth();
   if (ctxt->lineStyle == LineSolid) {
      if (ctxt->lineWidth == 1)
         ctxt->lineWidth = 0;
   } else {
      if (ctxt->lineWidth == 0)
         ctxt->lineWidth = 1;
   }
 
  if (ctxt->lineWidth >= 0) {
      XSetLineAttributes((Display*)fDisplay, ctxt->fGClist[kGCline], ctxt->lineWidth,
                          ctxt->lineStyle, gCapStyle, gJoinStyle);
      if (ctxt->lineStyle == LineOnOffDash)
         XSetLineAttributes((Display*)fDisplay, ctxt->fGClist[kGCdash], ctxt->lineWidth,
                             ctxt->lineStyle, gCapStyle, gJoinStyle);
   }
 
   if (att.GetLineColor() >= 0) {
      SetColor(ctxt, &ctxt->fGClist[kGCline], (Int_t) att.GetLineColor());
      SetColor(ctxt, &ctxt->fGClist[kGCdash], (Int_t) att.GetLineColor());
   }
 
   ctxt->fAttLine = att;
}
 
////////////////////////////////////////////////////////////////////////////////
/// Set marker attributes for specified window
 
void TGX11::SetAttMarker(WinContext_t wctxt, const TAttMarker &att)
{
   auto ctxt = (XWindow_t *) wctxt;
   if (!ctxt)
      return;
 
   SetColor(ctxt, &ctxt->fGClist[kGCmark], att.GetMarkerColor());
 
   Bool_t changed = (att.GetMarkerSize() != ctxt->fAttMarker.GetMarkerSize()) ||
                    (att.GetMarkerStyle() != ctxt->fAttMarker.GetMarkerStyle());
 
   ctxt->fAttMarker = att;
 
   if (!changed)
      return;
 
   Int_t markerstyle = TAttMarker::GetMarkerStyleBase(att.GetMarkerStyle());
   ctxt->markerLineWidth = TAttMarker::GetMarkerLineWidth(att.GetMarkerStyle());
 
   // The fast pixel markers need to be treated separately
   if (markerstyle == 1 || markerstyle == 6 || markerstyle == 7) {
       XSetLineAttributes((Display*)fDisplay, ctxt->fGClist[kGCmark], 0, LineSolid, CapButt, JoinMiter);
   } else {
       XSetLineAttributes((Display*)fDisplay, ctxt->fGClist[kGCmark], ctxt->markerLineWidth,
                          gMarkerLineStyle, gMarkerCapStyle, gMarkerJoinStyle);
   }
 
   Float_t MarkerSizeReduced = att.GetMarkerSize() - TMath::Floor(ctxt->markerLineWidth/2.)/4.;
   Int_t im = Int_t(4*MarkerSizeReduced + 0.5);
   auto &shape = ctxt->markerShape;
   ctxt->markerSize = 0;
   ctxt->markerType = 0;
   if (markerstyle == 2) {
      // + shaped marker
      shape.resize(4);
      shape[0].x = -im;  shape[0].y = 0;
      shape[1].x =  im;  shape[1].y = 0;
      shape[2].x = 0  ;  shape[2].y = -im;
      shape[3].x = 0  ;  shape[3].y = im;
      ctxt->markerType = 4;
   } else if (markerstyle == 3 || markerstyle == 31) {
      // * shaped marker
      shape.resize(8);
      shape[0].x = -im;  shape[0].y = 0;
      shape[1].x =  im;  shape[1].y = 0;
      shape[2].x = 0  ;  shape[2].y = -im;
      shape[3].x = 0  ;  shape[3].y = im;
      im = Int_t(0.707*Float_t(im) + 0.5);
      shape[4].x = -im;  shape[4].y = -im;
      shape[5].x =  im;  shape[5].y = im;
      shape[6].x = -im;  shape[6].y = im;
      shape[7].x =  im;  shape[7].y = -im;
      ctxt->markerType = 4;
   } else if (markerstyle == 4 || markerstyle == 24) {
      // O shaped marker
      shape.resize(0);
      ctxt->markerType = 0;
      ctxt->markerSize = im*2;
   } else if (markerstyle == 5) {
      // X shaped marker
      shape.resize(4);
      im = Int_t(0.707*Float_t(im) + 0.5);
      shape[0].x = -im;  shape[0].y = -im;
      shape[1].x =  im;  shape[1].y = im;
      shape[2].x = -im;  shape[2].y = im;
      shape[3].x =  im;  shape[3].y = -im;
      ctxt->markerType = 4;
   } else if (markerstyle == 6) {
      // + shaped marker (with 1 pixel)
      shape.resize(4);
      shape[0].x = -1 ;  shape[0].y = 0;
      shape[1].x =  1 ;  shape[1].y = 0;
      shape[2].x =  0 ;  shape[2].y = -1;
      shape[3].x =  0 ;  shape[3].y = 1;
      ctxt->markerType = 4;
   } else if (markerstyle == 7) {
      // . shaped marker (with 9 pixel)
      shape.resize(6);
      shape[0].x = -1 ;  shape[0].y = 1;
      shape[1].x =  1 ;  shape[1].y = 1;
      shape[2].x = -1 ;  shape[2].y = 0;
      shape[3].x =  1 ;  shape[3].y = 0;
      shape[4].x = -1 ;  shape[4].y = -1;
      shape[5].x =  1 ;  shape[5].y = -1;
      ctxt->markerType = 4;
   } else if (markerstyle == 8 || markerstyle == 20) {
      // O shaped marker (filled)
      shape.resize(0);
      ctxt->markerType = 1;
      ctxt->markerSize = im*2;
   } else if (markerstyle == 21) {
      // full square
      shape.resize(5);
      shape[0].x = -im;  shape[0].y = -im;
      shape[1].x =  im;  shape[1].y = -im;
      shape[2].x =  im;  shape[2].y = im;
      shape[3].x = -im;  shape[3].y = im;
      shape[4].x = -im;  shape[4].y = -im;
      ctxt->markerType = 3;
   } else if (markerstyle == 22) {
      // full triangle up
      shape.resize(4);
      shape[0].x = -im;  shape[0].y = im;
      shape[1].x =  im;  shape[1].y = im;
      shape[2].x =   0;  shape[2].y = -im;
      shape[3].x = -im;  shape[3].y = im;
      ctxt->markerType = 3;
   } else if (markerstyle == 23) {
      // full triangle down
      shape.resize(4);
      shape[0].x =   0;  shape[0].y = im;
      shape[1].x =  im;  shape[1].y = -im;
      shape[2].x = -im;  shape[2].y = -im;
      shape[3].x =   0;  shape[3].y = im;
      ctxt->markerType = 3;
   } else if (markerstyle == 25) {
      // open square
      shape.resize(5);
      shape[0].x = -im;  shape[0].y = -im;
      shape[1].x =  im;  shape[1].y = -im;
      shape[2].x =  im;  shape[2].y = im;
      shape[3].x = -im;  shape[3].y = im;
      shape[4].x = -im;  shape[4].y = -im;
      ctxt->markerType = 2;
   } else if (markerstyle == 26) {
      // open triangle up
      shape.resize(4);
      shape[0].x = -im;  shape[0].y = im;
      shape[1].x =  im;  shape[1].y = im;
      shape[2].x =   0;  shape[2].y = -im;
      shape[3].x = -im;  shape[3].y = im;
      ctxt->markerType = 2;
   } else if (markerstyle == 27) {
      // open losange
      shape.resize(5);
      Int_t imx = Int_t(2.66*MarkerSizeReduced + 0.5);
      shape[0].x =-imx;  shape[0].y = 0;
      shape[1].x =   0;  shape[1].y = -im;
      shape[2].x = imx;  shape[2].y = 0;
      shape[3].x =   0;  shape[3].y = im;
      shape[4].x =-imx;  shape[4].y = 0;
      ctxt->markerType = 2;
   } else if (markerstyle == 28) {
      // open cross
      shape.resize(13);
      Int_t imx = Int_t(1.33*MarkerSizeReduced + 0.5);
      shape[0].x = -im;  shape[0].y =-imx;
      shape[1].x =-imx;  shape[1].y =-imx;
      shape[2].x =-imx;  shape[2].y = -im;
      shape[3].x = imx;  shape[3].y = -im;
      shape[4].x = imx;  shape[4].y =-imx;
      shape[5].x =  im;  shape[5].y =-imx;
      shape[6].x =  im;  shape[6].y = imx;
      shape[7].x = imx;  shape[7].y = imx;
      shape[8].x = imx;  shape[8].y = im;
      shape[9].x =-imx;  shape[9].y = im;
      shape[10].x=-imx;  shape[10].y= imx;
      shape[11].x= -im;  shape[11].y= imx;
      shape[12].x= -im;  shape[12].y=-imx;
      ctxt->markerType = 2;
   } else if (markerstyle == 29) {
      // full star pentagone
      shape.resize(11);
      Int_t im1 = Int_t(0.66*MarkerSizeReduced + 0.5);
      Int_t im2 = Int_t(2.00*MarkerSizeReduced + 0.5);
      Int_t im3 = Int_t(2.66*MarkerSizeReduced + 0.5);
      Int_t im4 = Int_t(1.33*MarkerSizeReduced + 0.5);
      shape[0].x = -im;  shape[0].y = im4;
      shape[1].x =-im2;  shape[1].y =-im1;
      shape[2].x =-im3;  shape[2].y = -im;
      shape[3].x =   0;  shape[3].y =-im2;
      shape[4].x = im3;  shape[4].y = -im;
      shape[5].x = im2;  shape[5].y =-im1;
      shape[6].x =  im;  shape[6].y = im4;
      shape[7].x = im4;  shape[7].y = im4;
      shape[8].x =   0;  shape[8].y = im;
      shape[9].x =-im4;  shape[9].y = im4;
      shape[10].x= -im;  shape[10].y= im4;
      ctxt->markerType = 3;
   } else if (markerstyle == 30) {
      // open star pentagone
      shape.resize(11);
      Int_t im1 = Int_t(0.66*MarkerSizeReduced + 0.5);
      Int_t im2 = Int_t(2.00*MarkerSizeReduced + 0.5);
      Int_t im3 = Int_t(2.66*MarkerSizeReduced + 0.5);
      Int_t im4 = Int_t(1.33*MarkerSizeReduced + 0.5);
      shape[0].x = -im;  shape[0].y = im4;
      shape[1].x =-im2;  shape[1].y =-im1;
      shape[2].x =-im3;  shape[2].y = -im;
      shape[3].x =   0;  shape[3].y =-im2;
      shape[4].x = im3;  shape[4].y = -im;
      shape[5].x = im2;  shape[5].y =-im1;
      shape[6].x =  im;  shape[6].y = im4;
      shape[7].x = im4;  shape[7].y = im4;
      shape[8].x =   0;  shape[8].y = im;
      shape[9].x =-im4;  shape[9].y = im4;
      shape[10].x= -im;  shape[10].y= im4;
      ctxt->markerType = 2;
   } else if (markerstyle == 32) {
      // open triangle down
      shape.resize(4);
      shape[0].x =   0;  shape[0].y = im;
      shape[1].x =  im;  shape[1].y = -im;
      shape[2].x = -im;  shape[2].y = -im;
      shape[3].x =   0;  shape[3].y = im;
      ctxt->markerType = 2;
   } else if (markerstyle == 33) {
      // full losange
      shape.resize(5);
      Int_t imx = Int_t(2.66*MarkerSizeReduced + 0.5);
      shape[0].x =-imx;  shape[0].y = 0;
      shape[1].x =   0;  shape[1].y = -im;
      shape[2].x = imx;  shape[2].y = 0;
      shape[3].x =   0;  shape[3].y = im;
      shape[4].x =-imx;  shape[4].y = 0;
      ctxt->markerType = 3;
   } else if (markerstyle == 34) {
      // full cross
      shape.resize(13);
      Int_t imx = Int_t(1.33*MarkerSizeReduced + 0.5);
      shape[0].x = -im;  shape[0].y =-imx;
      shape[1].x =-imx;  shape[1].y =-imx;
      shape[2].x =-imx;  shape[2].y = -im;
      shape[3].x = imx;  shape[3].y = -im;
      shape[4].x = imx;  shape[4].y =-imx;
      shape[5].x =  im;  shape[5].y =-imx;
      shape[6].x =  im;  shape[6].y = imx;
      shape[7].x = imx;  shape[7].y = imx;
      shape[8].x = imx;  shape[8].y = im;
      shape[9].x =-imx;  shape[9].y = im;
      shape[10].x=-imx;  shape[10].y= imx;
      shape[11].x= -im;  shape[11].y= imx;
      shape[12].x= -im;  shape[12].y=-imx;
      ctxt->markerType = 3;
   } else if (markerstyle == 35) {
      // diamond with cross
      shape.resize(8);
      shape[0].x =-im;  shape[0].y = 0;
      shape[1].x =  0;  shape[1].y = -im;
      shape[2].x = im;  shape[2].y = 0;
      shape[3].x =  0;  shape[3].y = im;
      shape[4].x =-im;  shape[4].y = 0;
      shape[5].x = im;  shape[5].y = 0;
      shape[6].x =  0;  shape[6].y = im;
      shape[7].x =  0;  shape[7].y =-im;
      ctxt->markerType = 2;
   } else if (markerstyle == 36) {
      // square with diagonal cross
      shape.resize(8);
      shape[0].x = -im;  shape[0].y = -im;
      shape[1].x =  im;  shape[1].y = -im;
      shape[2].x =  im;  shape[2].y = im;
      shape[3].x = -im;  shape[3].y = im;
      shape[4].x = -im;  shape[4].y = -im;
      shape[5].x =  im;  shape[5].y = im;
      shape[6].x = -im;  shape[6].y = im;
      shape[7].x =  im;  shape[7].y = -im;
      ctxt->markerType = 2;
   } else if (markerstyle == 37) {
      // open three triangles
      shape.resize(10);
      Int_t im2 = Int_t(2.0*MarkerSizeReduced + 0.5);
      shape[0].x =   0;  shape[0].y =   0;
      shape[1].x =-im2;  shape[1].y =  im;
      shape[2].x = im2;  shape[2].y =  im;
      shape[3].x =   0;  shape[3].y =   0;
      shape[4].x =-im2;  shape[4].y = -im;
      shape[5].x = -im;  shape[5].y =   0;
      shape[6].x =   0;  shape[6].y =   0;
      shape[7].x =  im;  shape[7].y =   0;
      shape[8].x = im2;  shape[8].y =  -im;
      shape[9].x =   0;  shape[9].y =   0;
      ctxt->markerType = 2;
   } else if (markerstyle == 38) {
      // + shaped marker with octagon
      shape.resize(15);
      Int_t im2 = Int_t(2.0*MarkerSizeReduced + 0.5);
      shape[0].x = -im;  shape[0].y = 0;
      shape[1].x = -im;  shape[1].y =-im2;
      shape[2].x =-im2;  shape[2].y = -im;
      shape[3].x = im2;  shape[3].y = -im;
      shape[4].x =  im;  shape[4].y =-im2;
      shape[5].x =  im;  shape[5].y = im2;
      shape[6].x = im2;  shape[6].y = im;
      shape[7].x =-im2;  shape[7].y = im;
      shape[8].x = -im;  shape[8].y = im2;
      shape[9].x = -im;  shape[9].y = 0;
      shape[10].x = im;  shape[10].y = 0;
      shape[11].x =  0;  shape[11].y = 0;
      shape[12].x =  0;  shape[12].y = -im;
      shape[13].x =  0;  shape[13].y = im;
      shape[14].x =  0;  shape[14].y = 0;
      ctxt->markerType = 2;
   } else if (markerstyle == 39) {
      // filled three triangles
      shape.resize(9);
      Int_t im2 = Int_t(2.0*MarkerSizeReduced + 0.5);
      shape[0].x =   0;  shape[0].y =   0;
      shape[1].x =-im2;  shape[1].y =  im;
      shape[2].x = im2;  shape[2].y =  im;
      shape[3].x =   0;  shape[3].y =   0;
      shape[4].x =-im2;  shape[4].y = -im;
      shape[5].x = -im;  shape[5].y =   0;
      shape[6].x =   0;  shape[6].y =   0;
      shape[7].x =  im;  shape[7].y =   0;
      shape[8].x = im2;  shape[8].y =  -im;
      ctxt->markerType = 3;
   } else if (markerstyle == 40) {
      // four open triangles X
      shape.resize(13);
      Int_t im2 = Int_t(2.0*MarkerSizeReduced + 0.5);
      shape[0].x =     0;  shape[0].y =    0;
      shape[1].x =   im2;  shape[1].y =   im;
      shape[2].x =    im;  shape[2].y =  im2;
      shape[3].x =     0;  shape[3].y =    0;
      shape[4].x =    im;  shape[4].y = -im2;
      shape[5].x =   im2;  shape[5].y =  -im;
      shape[6].x =     0;  shape[6].y =    0;
      shape[7].x =  -im2;  shape[7].y =  -im;
      shape[8].x =   -im;  shape[8].y = -im2;
      shape[9].x =     0;  shape[9].y =    0;
      shape[10].x =   -im;  shape[10].y =  im2;
      shape[11].x =  -im2;  shape[11].y =   im;
      shape[12].x =     0;  shape[12].y =  0;
      ctxt->markerType = 2;
   } else if (markerstyle == 41) {
      // four filled triangles X
      shape.resize(13);
      Int_t im2 = Int_t(2.0*MarkerSizeReduced + 0.5);
      shape[0].x =     0;  shape[0].y =    0;
      shape[1].x =   im2;  shape[1].y =   im;
      shape[2].x =    im;  shape[2].y =  im2;
      shape[3].x =     0;  shape[3].y =    0;
      shape[4].x =    im;  shape[4].y = -im2;
      shape[5].x =   im2;  shape[5].y =  -im;
      shape[6].x =     0;  shape[6].y =    0;
      shape[7].x =  -im2;  shape[7].y =  -im;
      shape[8].x =   -im;  shape[8].y = -im2;
      shape[9].x =     0;  shape[9].y =    0;
      shape[10].x =   -im;  shape[10].y =  im2;
      shape[11].x =  -im2;  shape[11].y =   im;
      shape[12].x =     0;  shape[12].y =  0;
      ctxt->markerType = 3;
   } else if (markerstyle == 42) {
      // open double diamonds
      shape.resize(9);
      Int_t imx = Int_t(MarkerSizeReduced + 0.5);
      shape[0].x=     0;   shape[0].y= im;
      shape[1].x=  -imx;   shape[1].y= imx;
      shape[2].x  = -im;   shape[2].y = 0;
      shape[3].x = -imx;   shape[3].y = -imx;
      shape[4].x =    0;   shape[4].y = -im;
      shape[5].x =  imx;   shape[5].y = -imx;
      shape[6].x =   im;   shape[6].y = 0;
      shape[7].x=   imx;   shape[7].y= imx;
      shape[8].x=     0;   shape[8].y= im;
      ctxt->markerType = 2;
   } else if (markerstyle == 43) {
      // filled double diamonds
      shape.resize(9);
      Int_t imx = Int_t(MarkerSizeReduced + 0.5);
      shape[0].x =    0;   shape[0].y =   im;
      shape[1].x = -imx;   shape[1].y =  imx;
      shape[2].x =  -im;   shape[2].y =    0;
      shape[3].x = -imx;   shape[3].y = -imx;
      shape[4].x =    0;   shape[4].y =  -im;
      shape[5].x =  imx;   shape[5].y = -imx;
      shape[6].x =   im;   shape[6].y =    0;
      shape[7].x =  imx;   shape[7].y =  imx;
      shape[8].x =    0;   shape[8].y =   im;
      ctxt->markerType = 3;
   } else if (markerstyle == 44) {
      // open four triangles plus
      shape.resize(11);
      Int_t im2 = Int_t(2.0*MarkerSizeReduced + 0.5);
      shape[0].x =    0;  shape[0].y =    0;
      shape[1].x =  im2;  shape[1].y =   im;
      shape[2].x = -im2;  shape[2].y =   im;
      shape[3].x =  im2;  shape[3].y =  -im;
      shape[4].x = -im2;  shape[4].y =  -im;
      shape[5].x =    0;  shape[5].y =    0;
      shape[6].x =   im;  shape[6].y =  im2;
      shape[7].x =   im;  shape[7].y = -im2;
      shape[8].x =  -im;  shape[8].y =  im2;
      shape[9].x =  -im;  shape[9].y = -im2;
      shape[10].x =    0;  shape[10].y =    0;
      ctxt->markerType = 2;
   } else if (markerstyle == 45) {
      // filled four triangles plus
      shape.resize(13);
      Int_t im0 = Int_t(0.4*MarkerSizeReduced + 0.5);
      Int_t im2 = Int_t(2.0*MarkerSizeReduced + 0.5);
      shape[0].x =  im0;  shape[0].y =  im0;
      shape[1].x =  im2;  shape[1].y =   im;
      shape[2].x = -im2;  shape[2].y =   im;
      shape[3].x = -im0;  shape[3].y =  im0;
      shape[4].x =  -im;  shape[4].y =  im2;
      shape[5].x =  -im;  shape[5].y = -im2;
      shape[6].x = -im0;  shape[6].y = -im0;
      shape[7].x = -im2;  shape[7].y =  -im;
      shape[8].x =  im2;  shape[8].y =  -im;
      shape[9].x =  im0;  shape[9].y = -im0;
      shape[10].x =   im;  shape[10].y = -im2;
      shape[11].x =   im;  shape[11].y =  im2;
      shape[12].x =  im0;  shape[12].y =  im0;
      ctxt->markerType = 3;
   } else if (markerstyle == 46) {
      // open four triangles X
      shape.resize(13);
      Int_t im2 = Int_t(2.0*MarkerSizeReduced + 0.5);
      shape[0].x =    0;  shape[0].y =  im2;
      shape[1].x = -im2;  shape[1].y =   im;
      shape[2].x =  -im;  shape[2].y =  im2;
      shape[3].x = -im2;  shape[3].y =    0;
      shape[4].x =  -im;  shape[4].y = -im2;
      shape[5].x = -im2;  shape[5].y =  -im;
      shape[6].x =    0;  shape[6].y = -im2;
      shape[7].x =  im2;  shape[7].y =  -im;
      shape[8].x =   im;  shape[8].y = -im2;
      shape[9].x =  im2;  shape[9].y =    0;
      shape[10].x =  im;  shape[10].y = im2;
      shape[11].x = im2;  shape[11].y =  im;
      shape[12].x =   0;  shape[12].y = im2;
      ctxt->markerType = 2;
   } else if (markerstyle == 47) {
      // filled four triangles X
      shape.resize(13);
      Int_t im2 = Int_t(2.0*MarkerSizeReduced + 0.5);
      shape[0].x =    0;  shape[0].y =  im2;
      shape[1].x = -im2;  shape[1].y =   im;
      shape[2].x =  -im;  shape[2].y =  im2;
      shape[3].x = -im2;  shape[3].y =    0;
      shape[4].x =  -im;  shape[4].y = -im2;
      shape[5].x = -im2;  shape[5].y =  -im;
      shape[6].x =    0;  shape[6].y = -im2;
      shape[7].x =  im2;  shape[7].y =  -im;
      shape[8].x =   im;  shape[8].y = -im2;
      shape[9].x =  im2;  shape[9].y =    0;
      shape[10].x =  im;  shape[10].y = im2;
      shape[11].x = im2;  shape[11].y =  im;
      shape[12].x =   0;  shape[12].y = im2;
      ctxt->markerType = 3;
   } else if (markerstyle == 48) {
      // four filled squares X
      shape.resize(17);
      Int_t im2 = Int_t(2.0*MarkerSizeReduced + 0.5);
      shape[0].x =    0;  shape[0].y =  im2*1.005;
      shape[1].x = -im2;  shape[1].y =   im;
      shape[2].x =  -im;  shape[2].y =  im2;
      shape[3].x = -im2;  shape[3].y =    0;
      shape[4].x =  -im;  shape[4].y = -im2;
      shape[5].x = -im2;  shape[5].y =  -im;
      shape[6].x =    0;  shape[6].y = -im2;
      shape[7].x =  im2;  shape[7].y =  -im;
      shape[8].x =   im;  shape[8].y = -im2;
      shape[9].x =  im2;  shape[9].y =    0;
      shape[10].x =  im;  shape[10].y = im2;
      shape[11].x = im2;  shape[11].y =  im;
      shape[12].x =   0;  shape[12].y = im2*0.995;
      shape[13].x =  im2*0.995;  shape[13].y =    0;
      shape[14].x =    0;  shape[14].y = -im2*0.995;
      shape[15].x = -im2*0.995;  shape[15].y =    0;
      shape[16].x =    0;  shape[16].y =  im2*0.995;
      ctxt->markerType = 3;
   } else if (markerstyle == 49) {
      // four filled squares plus
      shape.resize(17);
      Int_t imx = Int_t(1.33*MarkerSizeReduced + 0.5);
      shape[0].x =-imx;  shape[0].y =-imx*1.005;
      shape[1].x =-imx;  shape[1].y = -im;
      shape[2].x = imx;  shape[2].y = -im;
      shape[3].x = imx;  shape[3].y =-imx;
      shape[4].x =  im;  shape[4].y =-imx;
      shape[5].x =  im;  shape[5].y = imx;
      shape[6].x = imx;  shape[6].y = imx;
      shape[7].x = imx;  shape[7].y = im;
      shape[8].x =-imx;  shape[8].y = im;
      shape[9].x =-imx;  shape[9].y = imx;
      shape[10].x = -im;  shape[10].y = imx;
      shape[11].x = -im;  shape[11].y =-imx;
      shape[12].x =-imx;  shape[12].y =-imx*0.995;
      shape[13].x =-imx;  shape[13].y = imx;
      shape[14].x = imx;  shape[14].y = imx;
      shape[15].x = imx;  shape[15].y =-imx;
      shape[16].x =-imx;  shape[16].y =-imx*1.005;
      ctxt->markerType = 3;
   } else {
      // single dot
      shape.resize(0);
      ctxt->markerType = 0;
      ctxt->markerSize = 0;
   }
}
 
////////////////////////////////////////////////////////////////////////////////
/// Set text attributes for specified window
 
void TGX11::SetAttText(WinContext_t wctxt, const TAttText &att)
{
   auto ctxt = (XWindow_t *) wctxt;
   if (!ctxt)
      return;
 
   Int_t txalh = att.GetTextAlign() / 10;
   Int_t txalv = att.GetTextAlign() % 10;
 
   ctxt->textAlign = kAlignNone;
 
   switch (txalh) {
      case 0 :
      case 1 :
         switch (txalv) {  //left
            case 1 :
               ctxt->textAlign = kBLeft;   //bottom
               break;
            case 2 :
               ctxt->textAlign = kMLeft;   //middle
               break;
            case 3 :
               ctxt->textAlign = kTLeft;   //top
               break;
         }
         break;
      case 2 :
         switch (txalv) { //center
            case 1 :
               ctxt->textAlign = kBCenter;   //bottom
               break;
            case 2 :
               ctxt->textAlign = kMCenter;   //middle
               break;
            case 3 :
               ctxt->textAlign = kTCenter;   //top
               break;
         }
         break;
      case 3 :
         switch (txalv) {  //right
            case 1 :
               ctxt->textAlign = kBRight;   //bottom
               break;
            case 2 :
               ctxt->textAlign = kMRight;   //center
               break;
            case 3 :
               ctxt->textAlign = kTRight;   //top
               break;
         }
         break;
   }
 
   SetColor(ctxt, &ctxt->fGClist[kGCtext], att.GetTextColor());
 
   XGCValues values;
   if (XGetGCValues((Display*)fDisplay, ctxt->fGClist[kGCtext], GCForeground | GCBackground, &values)) {
      XSetForeground( (Display*)fDisplay, ctxt->fGClist[kGCinvt], values.background );
      XSetBackground( (Display*)fDisplay, ctxt->fGClist[kGCinvt], values.foreground );
   } else {
      Error("SetAttText", "cannot get GC values");
   }
   XSetBackground((Display*)fDisplay, ctxt->fGClist[kGCtext], GetColor(0).fPixel);
 
   // use first existing font
   for (int i = 0; i < kMAXFONT; i++)
      if (gFont[i].id) {
         ctxt->textFont = gFont[i].id;
         XSetFont((Display*)fDisplay, ctxt->fGClist[kGCtext], ctxt->textFont->fid);
         XSetFont((Display*)fDisplay, ctxt->fGClist[kGCinvt], ctxt->textFont->fid);
         break;
      }
 
   ctxt->fAttText = att;
}
 
////////////////////////////////////////////////////////////////////////////////
/// Set window draw mode
 
void TGX11::SetDrawModeW(WinContext_t wctxt, EDrawMode mode)
{
   fDrawMode = mode;
 
   auto ctxt = (XWindow_t *) wctxt;
   if (!ctxt || !fDisplay)
      return;
 
   auto gxmode = GXcopy;
   if (mode == kXor)
      gxmode = GXxor;
   else if (mode == kInvert)
      gxmode = GXinvert;
   for (int i = 0; i < kMAXGC; i++)
      XSetFunction((Display*)fDisplay, ctxt->fGClist[i], gxmode);
 
   ctxt->drawMode = mode;
}
 
////////////////////////////////////////////////////////////////////////////////
/// Returns window draw mode
 
TVirtualX::EDrawMode TGX11::GetDrawModeW(WinContext_t wctxt)
{
   auto ctxt = (XWindow_t *) wctxt;
   return ctxt ? ctxt->drawMode : kCopy;
}