rxvt-unicode/src/rxvtimg.C

#include <math.h>
#include "../config.h"
#include "rxvt.h"

#if HAVE_IMG

rxvt_img::rxvt_img (rxvt_screen *screen, XRenderPictFormat *format, int x, int y, int width, int height, int repeat)
: s(screen), x(x), y(y), w(width), h(height), format(format), repeat(repeat),
  pm(0), ref(0)
{
}

rxvt_img::rxvt_img (const rxvt_img &img)
: s(img.s), x(img.x), y(img.y), w(img.w), h(img.h), format(img.format), repeat(img.repeat), pm(img.pm), ref(img.ref)
{
  ++ref->cnt;
}

rxvt_img *
rxvt_img::new_from_root (rxvt_screen *s)
{
  Display *dpy = s->display->dpy;
  unsigned int root_pm_w, root_pm_h;
  Pixmap root_pixmap = s->display->get_pixmap_property (s->display->xa[XA_XROOTPMAP_ID]);
  if (root_pixmap == None)
    root_pixmap = s->display->get_pixmap_property (s->display->xa[XA_ESETROOT_PMAP_ID]);

  if (root_pixmap == None)
    return 0;

  Window wdummy;
  int idummy;
  unsigned int udummy;

  if (!XGetGeometry (dpy, root_pixmap, &wdummy, &idummy, &idummy, &root_pm_w, &root_pm_h, &udummy, &udummy))
    return 0;

  rxvt_img *img = new rxvt_img (
     s,
     XRenderFindVisualFormat (dpy, DefaultVisual (dpy, s->display->screen)),
     0,
     0,
     root_pm_w,
     root_pm_h
  );

  img->pm = root_pixmap;
  img->ref = new pixref (root_pm_w, root_pm_h);
  img->ref->ours = false;

  return img;
}

rxvt_img *
rxvt_img::new_from_pixbuf (rxvt_screen *s, GdkPixbuf *pb)
{
  Display *dpy = s->display->dpy;

  int width  = gdk_pixbuf_get_width  (pb);
  int height = gdk_pixbuf_get_height (pb);

  if (width > 32767 || height > 32767) // well, we *could* upload in chunks
    rxvt_fatal ("rxvt_img::new_from_pixbuf: image too big (maximum size 32768x32768).\n");

  // since we require rgb24/argb32 formats from xrender we assume
  // that both 24 and 32 bpp MUST be supported by any screen that supports xrender
  int depth = gdk_pixbuf_get_has_alpha (pb) ? 32 : 24;

  int byte_order = ecb_big_endian () ? MSBFirst : LSBFirst;

  XImage xi;

  xi.width            = width;
  xi.height           = height;
  xi.xoffset          = 0;
  xi.format           = ZPixmap;
  xi.byte_order       = ImageByteOrder (dpy);
  xi.bitmap_unit      = 0;         //XY only, unused
  xi.bitmap_bit_order = 0;         //XY only, unused
  xi.bitmap_pad       = BitmapPad (dpy);
  xi.depth            = depth;
  xi.bytes_per_line   = 0;
  xi.bits_per_pixel   = 32;         //Z only
  xi.red_mask         = 0x00000000; //Z only, unused
  xi.green_mask       = 0x00000000; //Z only, unused
  xi.blue_mask        = 0x00000000; //Z only, unused
  xi.obdata           = 0;          // probably unused

  bool byte_order_mismatch = byte_order != xi.byte_order;

  if (!XInitImage (&xi))
    rxvt_fatal ("unable to initialise ximage, please report.\n");

  if (height > INT_MAX / xi.bytes_per_line)
    rxvt_fatal ("rxvt_img::new_from_pixbuf: image too big for Xlib.\n");

  xi.data = (char *)rxvt_malloc (height * xi.bytes_per_line);

  int rowstride = gdk_pixbuf_get_rowstride (pb);

  assert (3 + (depth == 32) == gdk_pixbuf_get_n_channels (pb));
  unsigned char *row = gdk_pixbuf_get_pixels (pb);
  char *line = xi.data;

  for (int y = 0; y < height; y++)
    {
      unsigned char *src = row;
      uint32_t      *dst = (uint32_t *)line;

      if (depth == 24)
        for (int x = 0; x < width; x++)
          {
            uint8_t r = *src++;
            uint8_t g = *src++;
            uint8_t b = *src++;

            uint32_t v = (r << 16) | (g << 8) | b;
            
            if (ecb_big_endian () ? !byte_order_mismatch : byte_order_mismatch)
              v = ecb_bswap32 (v);

            *dst++ = v;
          }
      else
        for (int x = 0; x < width; x++)
          {
            uint32_t v = *(uint32_t *)src; src += 4;

            if (ecb_big_endian ())
              v = ecb_bswap32 (v);

            v = ecb_rotl32 (v, 8); // abgr to bgra

            if (!byte_order_mismatch)
              v = ecb_bswap32 (v);

            *dst++ = v;
          }

      row += rowstride;
      line += xi.bytes_per_line;
    }

  rxvt_img *img = new rxvt_img (s, XRenderFindStandardFormat (dpy, depth == 24 ? PictStandardRGB24 : PictStandardARGB32), 0, 0, width, height);
  img->alloc ();

  GC gc = XCreateGC (dpy, img->pm, 0, 0);
  XPutImage (dpy, img->pm, gc, &xi, 0, 0, 0, 0, width, height);
  XFreeGC (dpy, gc);

  free (xi.data);

  return img;
}

rxvt_img *
rxvt_img::new_from_file (rxvt_screen *s, const char *filename)
{
  GError *err = 0;
  GdkPixbuf *pb = gdk_pixbuf_new_from_file (filename, &err);

  if (!pb)
    rxvt_fatal ("rxvt_img::new_from_file: %s\n", err->message);

  rxvt_img *img = new_from_pixbuf (s, pb);

  g_object_unref (pb);

  return img;
}

void
rxvt_img::destroy ()
{
  if (--ref->cnt)
    return;

  if (pm && ref->ours)
    XFreePixmap (s->display->dpy, pm);

  delete ref;
}

rxvt_img::~rxvt_img ()
{
  destroy ();
}

void
rxvt_img::alloc ()
{
  pm = XCreatePixmap (s->display->dpy, s->display->root, w, h, format->depth);
  ref = new pixref (w, h);
}

Picture
rxvt_img::src_picture ()
{
  Display *dpy = s->display->dpy;

  XRenderPictureAttributes pa;
  pa.repeat = repeat;
  Picture pic = XRenderCreatePicture (dpy, pm, format, CPRepeat, &pa);

  return pic;
}

void
rxvt_img::unshare ()
{
  if (ref->cnt == 1 && ref->ours)
    return;

  Pixmap pm2 = XCreatePixmap (s->display->dpy, s->display->root, ref->w, ref->h, format->depth);
  GC gc = XCreateGC (s->display->dpy, pm, 0, 0);
  XCopyArea (s->display->dpy, pm, pm2, gc, 0, 0, ref->w, ref->h, 0, 0);
  XFreeGC (s->display->dpy, gc);

  destroy ();

  pm = pm2;
  ref = new pixref (ref->w, ref->h);
}

void
rxvt_img::fill (const rxvt_color &c)
{
  XGCValues gcv;
  gcv.foreground = c;
  GC gc = XCreateGC (s->display->dpy, pm, GCForeground, &gcv);
  XFillRectangle (s->display->dpy, pm, gc, 0, 0, w, h);
  XFreeGC (s->display->dpy, gc);
}

static void
get_gaussian_kernel (int radius, int width, double *kernel, XFixed *params)
{
  double sigma = radius / 2.0;
  double scale = sqrt (2.0 * M_PI) * sigma;
  double sum = 0.0;

  for (int i = 0; i < width; i++)
    {
      double x = i - width / 2;
      kernel[i] = exp (-(x * x) / (2.0 * sigma * sigma)) / scale;
      sum += kernel[i];
    }

  params[0] = XDoubleToFixed (width);
  params[1] = XDoubleToFixed (1);

  for (int i = 0; i < width; i++)
    params[i+2] = XDoubleToFixed (kernel[i] / sum);
}

rxvt_img *
rxvt_img::blur (int rh, int rv)
{
  if (!(s->display->flags & DISPLAY_HAS_RENDER_CONV))
    return clone ();

  Display *dpy = s->display->dpy;
  int size = max (rh, rv) * 2 + 1;
  double *kernel = (double *)malloc (size * sizeof (double));
  XFixed *params = (XFixed *)malloc ((size + 2) * sizeof (XFixed));
  rxvt_img *img = new rxvt_img (s, format, x, y, w, h, repeat);
  img->alloc ();

  XRenderPictureAttributes pa;
  pa.repeat = RepeatPad;
  Picture src = XRenderCreatePicture (dpy, pm, format, CPRepeat, &pa);
  Picture dst = XRenderCreatePicture (dpy, img->pm, format, 0, 0);

  Pixmap tmp_pm = XCreatePixmap (dpy, pm, w, h, format->depth);
  Picture tmp = XRenderCreatePicture (dpy, tmp_pm , format, CPRepeat, &pa);
  XFreePixmap (dpy, tmp_pm);

  if (kernel && params)
    {
      size = rh * 2 + 1;
      get_gaussian_kernel (rh, size, kernel, params);

      XRenderSetPictureFilter (dpy, src, FilterConvolution, params, size+2);
      XRenderComposite (dpy,
                        PictOpSrc,
                        src,
                        None,
                        tmp,
                        0, 0,
                        0, 0,
                        0, 0,
                        w, h);

      size = rv * 2 + 1;
      get_gaussian_kernel (rv, size, kernel, params);
      ::swap (params[0], params[1]);

      XRenderSetPictureFilter (dpy, tmp, FilterConvolution, params, size+2);
      XRenderComposite (dpy,
                        PictOpSrc,
                        tmp,
                        None,
                        dst,
                        0, 0,
                        0, 0,
                        0, 0,
                        w, h);
    }

  free (kernel);
  free (params);
  XRenderFreePicture (dpy, src);
  XRenderFreePicture (dpy, dst);
  XRenderFreePicture (dpy, tmp);

  return img;
}

static Picture
create_xrender_mask (Display *dpy, Drawable drawable, Bool argb)
{
  Pixmap pixmap = XCreatePixmap (dpy, drawable, 1, 1, argb ? 32 : 8);

  XRenderPictFormat *format = XRenderFindStandardFormat (dpy, argb ? PictStandardARGB32 : PictStandardA8);
  XRenderPictureAttributes pa;
  pa.repeat = True;
  Picture mask = XRenderCreatePicture (dpy, pixmap, format, CPRepeat, &pa);

  XFreePixmap (dpy, pixmap);

  return mask;
}

static void
extract (int32_t cl0, int32_t cl1, int32_t &c, unsigned short &xc)
{
  int32_t x = clamp (c, cl0, cl1);
  c -= x;
  xc = x;
}

static bool
extract (int32_t cl0, int32_t cl1, int32_t &r, int32_t &g, int32_t &b, int32_t &a, unsigned short &xr, unsigned short &xg, unsigned short &xb, unsigned short &xa)
{
  extract (cl0, cl1, r, xr);
  extract (cl0, cl1, g, xg);
  extract (cl0, cl1, b, xb);
  extract (cl0, cl1, a, xa);

  return xr | xg | xb | xa;
}

void
rxvt_img::brightness (int32_t r, int32_t g, int32_t b, int32_t a)
{
  unshare ();

  Display *dpy = s->display->dpy;
  Picture dst = XRenderCreatePicture (dpy, pm, format, 0, 0);

  // loop should not be needed for brightness, as only -1..1 makes sense
  //while (r | g | b | a)
    {
      unsigned short xr, xg, xb, xa;
      XRenderColor mask_c;

      if (extract (0, 65535, r, g, b, a, mask_c.red, mask_c.green, mask_c.blue, mask_c.alpha))
        XRenderFillRectangle (dpy, PictOpAdd, dst, &mask_c, 0, 0, w, h);

      if (extract (-65535, 0, r, g, b, a, mask_c.red, mask_c.green, mask_c.blue, mask_c.alpha))
        {
          XRenderColor mask_w = { 65535, 65535, 65535, 65535 };
          XRenderFillRectangle (dpy, PictOpDifference, dst, &mask_w, 0, 0, w, h);
          mask_c.red   = -mask_c.red; //TODO: verify that doing clamp, assign, and negation does the right thing
          mask_c.green = -mask_c.green;
          mask_c.blue  = -mask_c.blue;
          mask_c.alpha = -mask_c.alpha;
          XRenderFillRectangle (dpy, PictOpAdd, dst, &mask_c, 0, 0, w, h);
          XRenderFillRectangle (dpy, PictOpDifference, dst, &mask_w, 0, 0, w, h);
        }
    }


  XRenderFreePicture (dpy, dst);
}

void
rxvt_img::contrast (int32_t r, int32_t g, int32_t b, int32_t a)
{
  if (!(s->display->flags & DISPLAY_HAS_RENDER_MUL))
    {
      rxvt_warn ("rxvt_img::contrast operation not supported on this display, RENDER extension too old.\n");
      return;
    }

  unshare ();

  Display *dpy = s->display->dpy;
  Picture src = create_xrender_mask (dpy, pm, True);
  Picture dst = XRenderCreatePicture (dpy, pm, format, 0, 0);

  XRenderColor mask_c;
  mask_c.red   = r;
  mask_c.green = g;
  mask_c.blue  = b;
  mask_c.alpha = a;
  XRenderFillRectangle (dpy, PictOpSrc, src, &mask_c, 0, 0, 1, 1);

  XRenderComposite (dpy, PictOpMultiply, src, None, dst, 0, 0, 0, 0, 0, 0, w, h);

  XRenderFreePicture (dpy, src);
  XRenderFreePicture (dpy, dst);
}

rxvt_img *
rxvt_img::clone ()
{
  return new rxvt_img (*this);
}

static XRenderPictFormat *
find_alpha_format_for (Display *dpy, XRenderPictFormat *format)
{
  if (format->direct.alphaMask)
    return format; // already has alpha

  // try to find a suitable alpha format, one bit alpha is enough for our purposes
  if (format->type == PictTypeDirect)
    for (int n = 0; XRenderPictFormat *f = XRenderFindFormat (dpy, 0, 0, n); ++n)
      if (f->direct.alphaMask
          && f->type == PictTypeDirect
          && ecb_popcount32 (f->direct.redMask  ) >= ecb_popcount32 (format->direct.redMask  )
          && ecb_popcount32 (f->direct.greenMask) >= ecb_popcount32 (format->direct.greenMask)
          && ecb_popcount32 (f->direct.blueMask ) >= ecb_popcount32 (format->direct.blueMask ))
        return f;

  // should be a very good fallback
  return XRenderFindStandardFormat (dpy, PictStandardARGB32);
}

rxvt_img *
rxvt_img::reify ()
{
  if (x == 0 && y == 0 && w == ref->w && h == ref->h)
    return clone ();

  Display *dpy = s->display->dpy;

  // add an alpha channel if...
  bool alpha = !format->direct.alphaMask // pixmap has none yet
               && (x || y)               // we need one because of non-zero offset
               && repeat == RepeatNone;  // and we have no good pixels to fill with

  rxvt_img *img = new rxvt_img (s, alpha ? find_alpha_format_for (dpy, format) : format, 0, 0, w, h, repeat);
  img->alloc ();

  Picture src = src_picture ();
  Picture dst = XRenderCreatePicture (dpy, img->pm, img->format, 0, 0);
  
  if (alpha)
    {
      XRenderColor rc = { 0, 0, 0, 0 };
      XRenderFillRectangle (dpy, PictOpSrc, dst, &rc, 0, 0, w, h);//TODO: split into four fillrectangles
      XRenderComposite (dpy, PictOpSrc, src, None, dst, 0, 0, 0, 0, -x, -y, ref->w, ref->h);
    }
  else
    XRenderComposite (dpy, PictOpSrc, src, None, dst, x, y, 0, 0, 0, 0, w, h);

  XRenderFreePicture (dpy, src);
  XRenderFreePicture (dpy, dst);

  return img;
}

rxvt_img *
rxvt_img::sub_rect (int x, int y, int width, int height)
{
  rxvt_img *img = clone ();

  img->x += x;
  img->y += y;

  if (w != width || h != height)
    {
      img->w = width;
      img->h = height;

      rxvt_img *img2 = img->reify ();
      delete img;
      img = img2;
    }

  return img;
}

rxvt_img *
rxvt_img::transform (int new_width, int new_height, double matrix[9])
{
  rxvt_img *img = new rxvt_img (s, format, 0, 0, new_width, new_height, repeat);
  img->alloc ();

  Display *dpy = s->display->dpy;
  Picture src = src_picture ();
  Picture dst = XRenderCreatePicture (dpy, img->pm, img->format, 0, 0);

  XTransform xfrm;

  for (int i = 0; i < 3; ++i)
    for (int j = 0; j < 3; ++j)
      xfrm.matrix [i][j] = XDoubleToFixed (matrix [i * 3 + j]);

  xfrm.matrix [0][2] -= XDoubleToFixed (x);//TODO
  xfrm.matrix [1][2] -= XDoubleToFixed (y);

  XRenderSetPictureFilter (dpy, src, "good", 0, 0);
  XRenderSetPictureTransform (dpy, src, &xfrm);
  XRenderComposite (dpy, PictOpSrc, src, None, dst, 0, 0, 0, 0, 0, 0, new_width, new_height);

  XRenderFreePicture (dpy, src);
  XRenderFreePicture (dpy, dst);

  return img;
}

rxvt_img *
rxvt_img::scale (int new_width, int new_height)
{
  if (w == new_width && h == new_height)
    return clone ();

  double matrix[9] = {
    w  / (double)new_width, 0, 0,
    0, h / (double)new_height, 0,
    0,                      0, 1
  };

  int old_repeat_mode = repeat;
  repeat = RepeatPad; // not right, but xrender can't proeprly scale it seems

  rxvt_img *img = transform (new_width, new_height, matrix);

  repeat = old_repeat_mode;
  img->repeat = repeat;

  return img;
}

rxvt_img *
rxvt_img::rotate (int new_width, int new_height, int x, int y, double phi)
{
  double s = sin (phi);
  double c = cos (phi);

  double matrix[9] = {
    c, -s, -c * x + s * y + x,
    s,  c, -s * x - c * y + y,
    0,  0,                  1
  };

  return transform (new_width, new_height, matrix);
}

rxvt_img *
rxvt_img::convert_format (XRenderPictFormat *new_format, const rxvt_color &bg)
{
  if (new_format == format)
    return clone ();

  rxvt_img *img = new rxvt_img (s, new_format, x, y, w, h, repeat);
  img->alloc ();

  Display *dpy = s->display->dpy;
  Picture src = src_picture ();
  Picture dst = XRenderCreatePicture (dpy, img->pm, new_format, 0, 0);
  int op = PictOpSrc;

  if (format->direct.alphaMask && !new_format->direct.alphaMask)
    {
      // does it have to be that complicated
      rgba c;
      bg.get (c);

      XRenderColor rc = { c.r, c.g, c.b, 0xffff };
      XRenderFillRectangle (dpy, PictOpSrc, dst, &rc, 0, 0, w, h);

      op = PictOpOver;
    }

  XRenderComposite (dpy, op, src, None, dst, 0, 0, 0, 0, 0, 0, w, h);

  XRenderFreePicture (dpy, src);
  XRenderFreePicture (dpy, dst);

  return img;
}

rxvt_img *
rxvt_img::blend (rxvt_img *img, double factor)
{
  rxvt_img *img2 = clone ();
  Display *dpy = s->display->dpy;
  Picture src = img->src_picture ();
  Picture dst = XRenderCreatePicture (dpy, img2->pm, img2->format, 0, 0);
  Picture mask = create_xrender_mask (dpy, img->pm, False);

  XRenderColor mask_c;

  mask_c.alpha = float_to_component (factor);
  mask_c.red   =
  mask_c.green =
  mask_c.blue  = 0;
  XRenderFillRectangle (dpy, PictOpSrc, mask, &mask_c, 0, 0, 1, 1);

  XRenderComposite (dpy, PictOpOver, src, mask, dst, 0, 0, 0, 0, 0, 0, w, h);

  XRenderFreePicture (dpy, src);
  XRenderFreePicture (dpy, dst);
  XRenderFreePicture (dpy, mask);

  return img2;
}

#endif

Revision:	1.70
Committed:	Sat Jun 9 11:41:28 2012 UTC (11 years, 11 months ago) by root
Content type:	text/plain
Branch:	MAIN
Changes since 1.69:	+2 -3 lines
Log Message:	* empty log message *
#	User	Rev	Content
1	sf-exg	1.6	#include <math.h>
2	root	1.1	#include "../config.h"
3			#include "rxvt.h"
4
5			#if HAVE_IMG
6
7	root	1.41	rxvt_img::rxvt_img (rxvt_screen screen, XRenderPictFormat format, int x, int y, int width, int height, int repeat)
8			: s(screen), x(x), y(y), w(width), h(height), format(format), repeat(repeat),
9	root	1.34	pm(0), ref(0)
10	root	1.1	{
11			}
12
13	root	1.32	rxvt_img::rxvt_img (const rxvt_img &img)
14	root	1.34	: s(img.s), x(img.x), y(img.y), w(img.w), h(img.h), format(img.format), repeat(img.repeat), pm(img.pm), ref(img.ref)
15	root	1.32	{
16	root	1.34	++ref->cnt;
17	root	1.32	}
18
19	root	1.4	rxvt_img *
20	sf-exg	1.21	rxvt_img::new_from_root (rxvt_screen *s)
21			{
22			Display *dpy = s->display->dpy;
23			unsigned int root_pm_w, root_pm_h;
24			Pixmap root_pixmap = s->display->get_pixmap_property (s->display->xa[XA_XROOTPMAP_ID]);
25			if (root_pixmap == None)
26			root_pixmap = s->display->get_pixmap_property (s->display->xa[XA_ESETROOT_PMAP_ID]);
27
28			if (root_pixmap == None)
29			return 0;
30
31			Window wdummy;
32			int idummy;
33			unsigned int udummy;
34
35			if (!XGetGeometry (dpy, root_pixmap, &wdummy, &idummy, &idummy, &root_pm_w, &root_pm_h, &udummy, &udummy))
36			return 0;
37
38			rxvt_img *img = new rxvt_img (
39			s,
40			XRenderFindVisualFormat (dpy, DefaultVisual (dpy, s->display->screen)),
41	root	1.33	0,
42			0,
43	sf-exg	1.21	root_pm_w,
44	root	1.32	root_pm_h
45	sf-exg	1.21	);
46
47	root	1.32	img->pm = root_pixmap;
48	root	1.34	img->ref = new pixref (root_pm_w, root_pm_h);
49			img->ref->ours = false;
50	sf-exg	1.21
51			return img;
52			}
53
54			rxvt_img *
55	root	1.47	rxvt_img::new_from_pixbuf (rxvt_screen s, GdkPixbuf pb)
56			{
57	root	1.48	Display *dpy = s->display->dpy;
58
59	root	1.47	int width = gdk_pixbuf_get_width (pb);
60			int height = gdk_pixbuf_get_height (pb);
61
62			if (width > 32767 \|\| height > 32767) // well, we could upload in chunks
63			rxvt_fatal ("rxvt_img::new_from_pixbuf: image too big (maximum size 32768x32768).\n");
64
65			// since we require rgb24/argb32 formats from xrender we assume
66			// that both 24 and 32 bpp MUST be supported by any screen that supports xrender
67			int depth = gdk_pixbuf_get_has_alpha (pb) ? 32 : 24;
68
69	root	1.54	int byte_order = ecb_big_endian () ? MSBFirst : LSBFirst;
70
71	root	1.47	XImage xi;
72
73			xi.width = width;
74			xi.height = height;
75			xi.xoffset = 0;
76			xi.format = ZPixmap;
77	root	1.54	xi.byte_order = ImageByteOrder (dpy);
78	root	1.55	xi.bitmap_unit = 0; //XY only, unused
79			xi.bitmap_bit_order = 0; //XY only, unused
80	root	1.48	xi.bitmap_pad = BitmapPad (dpy);
81	root	1.47	xi.depth = depth;
82			xi.bytes_per_line = 0;
83	root	1.51	xi.bits_per_pixel = 32; //Z only
84	root	1.52	xi.red_mask = 0x00000000; //Z only, unused
85			xi.green_mask = 0x00000000; //Z only, unused
86			xi.blue_mask = 0x00000000; //Z only, unused
87			xi.obdata = 0; // probably unused
88	root	1.47
89	root	1.54	bool byte_order_mismatch = byte_order != xi.byte_order;
90
91	root	1.47	if (!XInitImage (&xi))
92			rxvt_fatal ("unable to initialise ximage, please report.\n");
93
94			if (height > INT_MAX / xi.bytes_per_line)
95			rxvt_fatal ("rxvt_img::new_from_pixbuf: image too big for Xlib.\n");
96
97			xi.data = (char )rxvt_malloc (height xi.bytes_per_line);
98
99			int rowstride = gdk_pixbuf_get_rowstride (pb);
100
101			assert (3 + (depth == 32) == gdk_pixbuf_get_n_channels (pb));
102			unsigned char *row = gdk_pixbuf_get_pixels (pb);
103			char *line = xi.data;
104
105			for (int y = 0; y < height; y++)
106			{
107	root	1.50	unsigned char *src = row;
108			uint32_t dst = (uint32_t )line;
109	root	1.47
110			if (depth == 24)
111			for (int x = 0; x < width; x++)
112			{
113	root	1.50	uint8_t r = *src++;
114			uint8_t g = *src++;
115			uint8_t b = *src++;
116
117	root	1.53	uint32_t v = (r << 16) \| (g << 8) \| b;
118	root	1.50
119	root	1.56	if (ecb_big_endian () ? !byte_order_mismatch : byte_order_mismatch)
120	root	1.54	v = ecb_bswap32 (v);
121
122	root	1.51	*dst++ = v;
123	root	1.47	}
124			else
125			for (int x = 0; x < width; x++)
126			{
127	root	1.50	uint32_t v = (uint32_t )src; src += 4;
128	root	1.51
129	root	1.57	if (ecb_big_endian ())
130	root	1.51	v = ecb_bswap32 (v);
131
132	root	1.58	v = ecb_rotl32 (v, 8); // abgr to bgra
133	root	1.52
134	root	1.57	if (!byte_order_mismatch)
135	root	1.54	v = ecb_bswap32 (v);
136
137	root	1.51	*dst++ = v;
138	root	1.47	}
139
140			row += rowstride;
141	root	1.50	line += xi.bytes_per_line;
142	root	1.47	}
143
144			rxvt_img *img = new rxvt_img (s, XRenderFindStandardFormat (dpy, depth == 24 ? PictStandardRGB24 : PictStandardARGB32), 0, 0, width, height);
145			img->alloc ();
146
147			GC gc = XCreateGC (dpy, img->pm, 0, 0);
148			XPutImage (dpy, img->pm, gc, &xi, 0, 0, 0, 0, width, height);
149			XFreeGC (dpy, gc);
150
151			free (xi.data);
152
153			return img;
154			}
155
156			rxvt_img *
157	root	1.4	rxvt_img::new_from_file (rxvt_screen s, const char filename)
158			{
159	root	1.11	GError *err = 0;
160	root	1.4	GdkPixbuf *pb = gdk_pixbuf_new_from_file (filename, &err);
161
162			if (!pb)
163	root	1.11	rxvt_fatal ("rxvt_img::new_from_file: %s\n", err->message);
164	root	1.4
165	root	1.47	rxvt_img *img = new_from_pixbuf (s, pb);
166	root	1.4
167	sf-exg	1.26	g_object_unref (pb);
168
169	root	1.4	return img;
170			}
171
172	root	1.32	void
173			rxvt_img::destroy ()
174			{
175	root	1.34	if (--ref->cnt)
176	root	1.32	return;
177
178	root	1.34	if (pm && ref->ours)
179	root	1.32	XFreePixmap (s->display->dpy, pm);
180
181	root	1.34	delete ref;
182	root	1.32	}
183
184	root	1.1	rxvt_img::~rxvt_img ()
185			{
186	root	1.32	destroy ();
187			}
188
189			void
190			rxvt_img::alloc ()
191			{
192			pm = XCreatePixmap (s->display->dpy, s->display->root, w, h, format->depth);
193	root	1.34	ref = new pixref (w, h);
194			}
195
196			Picture
197			rxvt_img::src_picture ()
198			{
199			Display *dpy = s->display->dpy;
200
201			XRenderPictureAttributes pa;
202			pa.repeat = repeat;
203			Picture pic = XRenderCreatePicture (dpy, pm, format, CPRepeat, &pa);
204
205			return pic;
206	root	1.1	}
207
208			void
209	root	1.11	rxvt_img::unshare ()
210			{
211	root	1.34	if (ref->cnt == 1 && ref->ours)
212	root	1.11	return;
213
214	root	1.34	Pixmap pm2 = XCreatePixmap (s->display->dpy, s->display->root, ref->w, ref->h, format->depth);
215	root	1.32	GC gc = XCreateGC (s->display->dpy, pm, 0, 0);
216	root	1.34	XCopyArea (s->display->dpy, pm, pm2, gc, 0, 0, ref->w, ref->h, 0, 0);
217	root	1.32	XFreeGC (s->display->dpy, gc);
218	root	1.11
219	root	1.32	destroy ();
220	root	1.11
221	root	1.32	pm = pm2;
222	root	1.34	ref = new pixref (ref->w, ref->h);
223	root	1.11	}
224
225			void
226	root	1.1	rxvt_img::fill (const rxvt_color &c)
227			{
228			XGCValues gcv;
229			gcv.foreground = c;
230			GC gc = XCreateGC (s->display->dpy, pm, GCForeground, &gcv);
231			XFillRectangle (s->display->dpy, pm, gc, 0, 0, w, h);
232	root	1.3	XFreeGC (s->display->dpy, gc);
233	root	1.1	}
234
235	sf-exg	1.6	static void
236			get_gaussian_kernel (int radius, int width, double kernel, XFixed params)
237			{
238			double sigma = radius / 2.0;
239			double scale = sqrt (2.0 * M_PI) * sigma;
240			double sum = 0.0;
241
242			for (int i = 0; i < width; i++)
243			{
244			double x = i - width / 2;
245			kernel[i] = exp (-(x * x) / (2.0 * sigma * sigma)) / scale;
246			sum += kernel[i];
247			}
248
249			params[0] = XDoubleToFixed (width);
250			params[1] = XDoubleToFixed (1);
251
252			for (int i = 0; i < width; i++)
253			params[i+2] = XDoubleToFixed (kernel[i] / sum);
254			}
255
256	sf-exg	1.22	rxvt_img *
257	root	1.3	rxvt_img::blur (int rh, int rv)
258			{
259	sf-exg	1.6	if (!(s->display->flags & DISPLAY_HAS_RENDER_CONV))
260	sf-exg	1.22	return clone ();
261	sf-exg	1.6
262			Display *dpy = s->display->dpy;
263			int size = max (rh, rv) * 2 + 1;
264			double kernel = (double )malloc (size * sizeof (double));
265			XFixed params = (XFixed )malloc ((size + 2) * sizeof (XFixed));
266	root	1.41	rxvt_img *img = new rxvt_img (s, format, x, y, w, h, repeat);
267	root	1.32	img->alloc ();
268	sf-exg	1.6
269			XRenderPictureAttributes pa;
270			pa.repeat = RepeatPad;
271	sf-exg	1.61	Picture src = XRenderCreatePicture (dpy, pm, format, CPRepeat, &pa);
272			Picture dst = XRenderCreatePicture (dpy, img->pm, format, 0, 0);
273	sf-exg	1.22
274			Pixmap tmp_pm = XCreatePixmap (dpy, pm, w, h, format->depth);
275			Picture tmp = XRenderCreatePicture (dpy, tmp_pm , format, CPRepeat, &pa);
276			XFreePixmap (dpy, tmp_pm);
277	sf-exg	1.6
278			if (kernel && params)
279			{
280			size = rh * 2 + 1;
281			get_gaussian_kernel (rh, size, kernel, params);
282
283			XRenderSetPictureFilter (dpy, src, FilterConvolution, params, size+2);
284			XRenderComposite (dpy,
285			PictOpSrc,
286			src,
287			None,
288	sf-exg	1.22	tmp,
289	sf-exg	1.6	0, 0,
290			0, 0,
291			0, 0,
292			w, h);
293
294			size = rv * 2 + 1;
295			get_gaussian_kernel (rv, size, kernel, params);
296			::swap (params[0], params[1]);
297
298	sf-exg	1.60	XRenderSetPictureFilter (dpy, tmp, FilterConvolution, params, size+2);
299	sf-exg	1.6	XRenderComposite (dpy,
300			PictOpSrc,
301	sf-exg	1.22	tmp,
302	sf-exg	1.6	None,
303			dst,
304			0, 0,
305			0, 0,
306			0, 0,
307			w, h);
308			}
309
310			free (kernel);
311			free (params);
312			XRenderFreePicture (dpy, src);
313			XRenderFreePicture (dpy, dst);
314	sf-exg	1.22	XRenderFreePicture (dpy, tmp);
315
316			return img;
317	sf-exg	1.6	}
318
319			static Picture
320			create_xrender_mask (Display *dpy, Drawable drawable, Bool argb)
321			{
322			Pixmap pixmap = XCreatePixmap (dpy, drawable, 1, 1, argb ? 32 : 8);
323
324			XRenderPictFormat *format = XRenderFindStandardFormat (dpy, argb ? PictStandardARGB32 : PictStandardA8);
325			XRenderPictureAttributes pa;
326			pa.repeat = True;
327			Picture mask = XRenderCreatePicture (dpy, pixmap, format, CPRepeat, &pa);
328
329			XFreePixmap (dpy, pixmap);
330
331			return mask;
332	root	1.3	}
333
334	root	1.67	static void
335			extract (int32_t cl0, int32_t cl1, int32_t &c, unsigned short &xc)
336			{
337			int32_t x = clamp (c, cl0, cl1);
338			c -= x;
339			xc = x;
340			}
341
342			static bool
343			extract (int32_t cl0, int32_t cl1, int32_t &r, int32_t &g, int32_t &b, int32_t &a, unsigned short &xr, unsigned short &xg, unsigned short &xb, unsigned short &xa)
344			{
345			extract (cl0, cl1, r, xr);
346			extract (cl0, cl1, g, xg);
347			extract (cl0, cl1, b, xb);
348			extract (cl0, cl1, a, xa);
349
350			return xr \| xg \| xb \| xa;
351			}
352
353	root	1.3	void
354	root	1.67	rxvt_img::brightness (int32_t r, int32_t g, int32_t b, int32_t a)
355	root	1.3	{
356	root	1.67	unshare ();
357
358	sf-exg	1.6	Display *dpy = s->display->dpy;
359			Picture dst = XRenderCreatePicture (dpy, pm, format, 0, 0);
360
361	root	1.69	// loop should not be needed for brightness, as only -1..1 makes sense
362	root	1.70	//while (r \| g \| b \| a)
363	root	1.67	{
364			unsigned short xr, xg, xb, xa;
365			XRenderColor mask_c;
366
367			if (extract (0, 65535, r, g, b, a, mask_c.red, mask_c.green, mask_c.blue, mask_c.alpha))
368			XRenderFillRectangle (dpy, PictOpAdd, dst, &mask_c, 0, 0, w, h);
369
370			if (extract (-65535, 0, r, g, b, a, mask_c.red, mask_c.green, mask_c.blue, mask_c.alpha))
371			{
372			XRenderColor mask_w = { 65535, 65535, 65535, 65535 };
373			XRenderFillRectangle (dpy, PictOpDifference, dst, &mask_w, 0, 0, w, h);
374	root	1.70	mask_c.red = -mask_c.red; //TODO: verify that doing clamp, assign, and negation does the right thing
375	root	1.68	mask_c.green = -mask_c.green;
376			mask_c.blue = -mask_c.blue;
377			mask_c.alpha = -mask_c.alpha;
378	root	1.67	XRenderFillRectangle (dpy, PictOpAdd, dst, &mask_c, 0, 0, w, h);
379			XRenderFillRectangle (dpy, PictOpDifference, dst, &mask_w, 0, 0, w, h);
380			}
381			}
382	sf-exg	1.6
383	sf-exg	1.23
384			XRenderFreePicture (dpy, dst);
385	root	1.3	}
386
387			void
388	root	1.67	rxvt_img::contrast (int32_t r, int32_t g, int32_t b, int32_t a)
389	root	1.1	{
390	sf-exg	1.6	if (!(s->display->flags & DISPLAY_HAS_RENDER_MUL))
391	root	1.64	{
392			rxvt_warn ("rxvt_img::contrast operation not supported on this display, RENDER extension too old.\n");
393			return;
394			}
395	sf-exg	1.6
396	root	1.67	unshare ();
397
398	sf-exg	1.6	Display *dpy = s->display->dpy;
399			Picture src = create_xrender_mask (dpy, pm, True);
400			Picture dst = XRenderCreatePicture (dpy, pm, format, 0, 0);
401
402			XRenderColor mask_c;
403	sf-exg	1.31	mask_c.red = r;
404			mask_c.green = g;
405			mask_c.blue = b;
406			mask_c.alpha = a;
407	sf-exg	1.6	XRenderFillRectangle (dpy, PictOpSrc, src, &mask_c, 0, 0, 1, 1);
408
409			XRenderComposite (dpy, PictOpMultiply, src, None, dst, 0, 0, 0, 0, 0, 0, w, h);
410	sf-exg	1.23
411			XRenderFreePicture (dpy, src);
412			XRenderFreePicture (dpy, dst);
413	root	1.1	}
414
415	root	1.3	rxvt_img *
416	root	1.11	rxvt_img::clone ()
417	root	1.3	{
418	root	1.32	return new rxvt_img (*this);
419	root	1.3	}
420
421	root	1.46	static XRenderPictFormat *
422			find_alpha_format_for (Display dpy, XRenderPictFormat format)
423			{
424			if (format->direct.alphaMask)
425			return format; // already has alpha
426
427			// try to find a suitable alpha format, one bit alpha is enough for our purposes
428			if (format->type == PictTypeDirect)
429			for (int n = 0; XRenderPictFormat *f = XRenderFindFormat (dpy, 0, 0, n); ++n)
430			if (f->direct.alphaMask
431			&& f->type == PictTypeDirect
432			&& ecb_popcount32 (f->direct.redMask ) >= ecb_popcount32 (format->direct.redMask )
433			&& ecb_popcount32 (f->direct.greenMask) >= ecb_popcount32 (format->direct.greenMask)
434			&& ecb_popcount32 (f->direct.blueMask ) >= ecb_popcount32 (format->direct.blueMask ))
435			return f;
436
437			// should be a very good fallback
438			return XRenderFindStandardFormat (dpy, PictStandardARGB32);
439			}
440
441	root	1.3	rxvt_img *
442	root	1.33	rxvt_img::reify ()
443	root	1.19	{
444	root	1.35	if (x == 0 && y == 0 && w == ref->w && h == ref->h)
445			return clone ();
446
447	root	1.40	Display *dpy = s->display->dpy;
448
449	root	1.62	// add an alpha channel if...
450			bool alpha = !format->direct.alphaMask // pixmap has none yet
451			&& (x \|\| y) // we need one because of non-zero offset
452			&& repeat == RepeatNone; // and we have no good pixels to fill with
453	root	1.40
454	root	1.46	rxvt_img *img = new rxvt_img (s, alpha ? find_alpha_format_for (dpy, format) : format, 0, 0, w, h, repeat);
455	root	1.32	img->alloc ();
456	root	1.19
457	root	1.34	Picture src = src_picture ();
458			Picture dst = XRenderCreatePicture (dpy, img->pm, img->format, 0, 0);
459	root	1.33
460	root	1.42	if (alpha)
461			{
462			XRenderColor rc = { 0, 0, 0, 0 };
463	root	1.44	XRenderFillRectangle (dpy, PictOpSrc, dst, &rc, 0, 0, w, h);//TODO: split into four fillrectangles
464	root	1.42	XRenderComposite (dpy, PictOpSrc, src, None, dst, 0, 0, 0, 0, -x, -y, ref->w, ref->h);
465			}
466			else
467			XRenderComposite (dpy, PictOpSrc, src, None, dst, x, y, 0, 0, 0, 0, w, h);
468
469	root	1.33	XRenderFreePicture (dpy, src);
470			XRenderFreePicture (dpy, dst);
471	root	1.19
472	root	1.33	return img;
473			}
474	root	1.19
475	root	1.33	rxvt_img *
476			rxvt_img::sub_rect (int x, int y, int width, int height)
477			{
478			rxvt_img *img = clone ();
479
480			img->x += x;
481			img->y += y;
482	root	1.19
483	root	1.37	if (w != width \|\| h != height)
484			{
485			img->w = width;
486			img->h = height;
487
488	root	1.39	rxvt_img *img2 = img->reify ();
489			delete img;
490			img = img2;
491	root	1.37	}
492	root	1.36
493	root	1.19	return img;
494			}
495
496			rxvt_img *
497	root	1.30	rxvt_img::transform (int new_width, int new_height, double matrix[9])
498	root	1.3	{
499	root	1.41	rxvt_img *img = new rxvt_img (s, format, 0, 0, new_width, new_height, repeat);
500	root	1.32	img->alloc ();
501	root	1.12
502			Display *dpy = s->display->dpy;
503	root	1.34	Picture src = src_picture ();
504			Picture dst = XRenderCreatePicture (dpy, img->pm, img->format, 0, 0);
505	root	1.12
506			XTransform xfrm;
507
508			for (int i = 0; i < 3; ++i)
509			for (int j = 0; j < 3; ++j)
510			xfrm.matrix [i][j] = XDoubleToFixed (matrix [i * 3 + j]);
511
512	root	1.44	xfrm.matrix [0][2] -= XDoubleToFixed (x);//TODO
513			xfrm.matrix [1][2] -= XDoubleToFixed (y);
514	root	1.33
515	root	1.17	XRenderSetPictureFilter (dpy, src, "good", 0, 0);
516	root	1.12	XRenderSetPictureTransform (dpy, src, &xfrm);
517			XRenderComposite (dpy, PictOpSrc, src, None, dst, 0, 0, 0, 0, 0, 0, new_width, new_height);
518
519			XRenderFreePicture (dpy, src);
520			XRenderFreePicture (dpy, dst);
521
522			return img;
523	root	1.3	}
524
525			rxvt_img *
526			rxvt_img::scale (int new_width, int new_height)
527			{
528	sf-exg	1.43	if (w == new_width && h == new_height)
529			return clone ();
530
531	root	1.11	double matrix[9] = {
532	root	1.16	w / (double)new_width, 0, 0,
533			0, h / (double)new_height, 0,
534	root	1.11	0, 0, 1
535			};
536
537	root	1.42	int old_repeat_mode = repeat;
538			repeat = RepeatPad; // not right, but xrender can't proeprly scale it seems
539
540			rxvt_img *img = transform (new_width, new_height, matrix);
541
542			repeat = old_repeat_mode;
543			img->repeat = repeat;
544
545			return img;
546	root	1.3	}
547
548	sf-exg	1.7	rxvt_img *
549	root	1.30	rxvt_img::rotate (int new_width, int new_height, int x, int y, double phi)
550	root	1.17	{
551			double s = sin (phi);
552			double c = cos (phi);
553
554			double matrix[9] = {
555			c, -s, -c * x + s * y + x,
556			s, c, -s * x - c * y + y,
557			0, 0, 1
558			};
559
560	root	1.30	return transform (new_width, new_height, matrix);
561	root	1.17	}
562
563			rxvt_img *
564	root	1.45	rxvt_img::convert_format (XRenderPictFormat *new_format, const rxvt_color &bg)
565	sf-exg	1.7	{
566	root	1.32	if (new_format == format)
567			return clone ();
568
569	root	1.45	rxvt_img *img = new rxvt_img (s, new_format, x, y, w, h, repeat);
570	root	1.32	img->alloc ();
571	root	1.9
572	sf-exg	1.7	Display *dpy = s->display->dpy;
573	root	1.34	Picture src = src_picture ();
574	root	1.8	Picture dst = XRenderCreatePicture (dpy, img->pm, new_format, 0, 0);
575	root	1.27	int op = PictOpSrc;
576	sf-exg	1.7
577	root	1.29	if (format->direct.alphaMask && !new_format->direct.alphaMask)
578	root	1.27	{
579			// does it have to be that complicated
580			rgba c;
581			bg.get (c);
582
583			XRenderColor rc = { c.r, c.g, c.b, 0xffff };
584	root	1.28	XRenderFillRectangle (dpy, PictOpSrc, dst, &rc, 0, 0, w, h);
585	root	1.27
586			op = PictOpOver;
587			}
588
589			XRenderComposite (dpy, op, src, None, dst, 0, 0, 0, 0, 0, 0, w, h);
590	sf-exg	1.7
591			XRenderFreePicture (dpy, src);
592			XRenderFreePicture (dpy, dst);
593
594			return img;
595			}
596	root	1.3
597	sf-exg	1.24	rxvt_img *
598			rxvt_img::blend (rxvt_img *img, double factor)
599			{
600			rxvt_img *img2 = clone ();
601			Display *dpy = s->display->dpy;
602	sf-exg	1.38	Picture src = img->src_picture ();
603	sf-exg	1.24	Picture dst = XRenderCreatePicture (dpy, img2->pm, img2->format, 0, 0);
604			Picture mask = create_xrender_mask (dpy, img->pm, False);
605
606			XRenderColor mask_c;
607
608			mask_c.alpha = float_to_component (factor);
609			mask_c.red =
610			mask_c.green =
611			mask_c.blue = 0;
612			XRenderFillRectangle (dpy, PictOpSrc, mask, &mask_c, 0, 0, 1, 1);
613
614			XRenderComposite (dpy, PictOpOver, src, mask, dst, 0, 0, 0, 0, 0, 0, w, h);
615
616			XRenderFreePicture (dpy, src);
617			XRenderFreePicture (dpy, dst);
618			XRenderFreePicture (dpy, mask);
619
620			return img2;
621			}
622
623	root	1.1	#endif
624