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;
}

#if 0
rxvt_img::rxvt_img (rxvt_screen *screen, XRenderPictFormat *format, int width, int height, Pixmap pixmap)
: s(screen), x(0), y(0), w(width), h(height), format(format), repeat(RepeatNormal), shared(false), pm(pixmap)
{
}
#endif

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;

  XImage xi;

  xi.width            = width;
  xi.height           = height;
  xi.xoffset          = 0;
  xi.format           = ZPixmap;
  xi.byte_order       = MSBFirst; // maybe go for host byte order, because servers are usually local?
  xi.bitmap_unit      = 32;
  xi.bitmap_bit_order = MSBFirst;
  xi.bitmap_pad       = BitmapPad (dpy);
  xi.depth            = depth;
  xi.bytes_per_line   = 0;
  xi.bits_per_pixel   = 32;
  xi.red_mask         = 0x00ff0000;
  xi.green_mask       = 0x0000ff00;
  xi.blue_mask        = 0x000000ff;

  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 r, g, b, a;
      unsigned char *data = row;

      if (depth == 24)
        for (int x = 0; x < width; x++)
          {
            asm volatile("nop");
            r = *data++;
            g = *data++;
            b = *data++;
            *line++ = 0;
            *line++ = r;
            *line++ = g;
            *line++ = b;
            asm volatile("nop");
          }
      else
        for (int x = 0; x < width; x++)
          {
            uint32_t v = *(uint32_t *)data; data += 4;
            v = ecb_big_endian () ? ecb_rotr32 (v, 8) : ecb_rotl32 (v, 8);
            *(uint32_t *)line = x; line += 4;
          }

      row += rowstride;
    }

  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;

  //TODO: maybe should reify instead
  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 ();

  Picture src = src_picture ();

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

  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, src, 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;
}

void
rxvt_img::brightness (unsigned short r, unsigned short g, unsigned short b, unsigned short a)
{
  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, PictOpAdd, src, None, dst, 0, 0, 0, 0, 0, 0, w, h);

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

void
rxvt_img::contrast (unsigned short r, unsigned short g, unsigned short b, unsigned short a)
{
  if (!(s->display->flags & DISPLAY_HAS_RENDER_MUL))
    return;

  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;

  bool alpha = !format->direct.alphaMask
               && (x || y)
               && repeat == RepeatNone;

  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]);

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

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