comparison src/image.c @ 83494:b901f4f12f33

Merged from [e-mail] Patches applied: * [e-mail]/emacs--devo--0--patch-160 Update from CVS * [e-mail]/emacs--devo--0--patch-161 Update from CVS * [e-mail]/emacs--devo--0--patch-162 Update from CVS * [e-mail]/emacs--devo--0--patch-163 Merge from gnus--rel--5.10 * [e-mail]/emacs--devo--0--patch-164 Update from CVS * [e-mail]/emacs--devo--0--patch-165 Update from CVS * [e-mail]/emacs--devo--0--patch-166 Update from CVS * [e-mail]/emacs--devo--0--patch-167 Update from CVS * [e-mail]/emacs--devo--0--patch-168 Update from CVS * [e-mail]/emacs--devo--0--patch-169 Update from CVS * [e-mail]/emacs--devo--0--patch-170 Merge from gnus--rel--5.10 * [e-mail]/emacs--devo--0--patch-171 Update from CVS: man/mh-e.texi (Folders): Various edits. * [e-mail]/emacs--devo--0--patch-172 Update from CVS * [e-mail]/gnus--rel--5.10--patch-58 Update from CVS * [e-mail]/gnus--rel--5.10--patch-59 Update from CVS * [e-mail]/gnus--rel--5.10--patch-60 Update from CVS * [e-mail]/gnus--rel--5.10--patch-61 Update from CVS * [e-mail]/gnus--rel--5.10--patch-62 Merge from emacs--devo--0 * [e-mail]/gnus--rel--5.10--patch-63 Update from CVS * [e-mail]/gnus--rel--5.10--patch-64 Update from CVS git-archimport-id: [e-mail]--2004/emacs--multi-tty--0--patch-534

83493:1bf2ca323037

     unsigned long pixel;
{
  PixMapHandle pixmap = GetGWorldPixMap (ximage);
  short depth = GetPixDepth (pixmap);

  if (depth == 32)
    {
      char *base_addr = GetPixBaseAddr (pixmap);
      short row_bytes = GetPixRowBytes (pixmap);

      ((unsigned long *) (base_addr + y * row_bytes))[x] = 0xff000000 | pixel;
    }
  else if (depth == 1)
    {
      char *base_addr = GetPixBaseAddr (pixmap);
      short row_bytes = GetPixRowBytes (pixmap);

      if (pixel == PIX_MASK_DRAW)

     int x, y;
{
  PixMapHandle pixmap = GetGWorldPixMap (ximage);
  short depth = GetPixDepth (pixmap);

  if (depth == 32)
    {
      char *base_addr = GetPixBaseAddr (pixmap);
      short row_bytes = GetPixRowBytes (pixmap);

      return ((unsigned long *) (base_addr + y * row_bytes))[x] & 0x00ffffff;
    }
  else if (depth == 1)
    {
      char *base_addr = GetPixBaseAddr (pixmap);
      short row_bytes = GetPixRowBytes (pixmap);

      if (base_addr[y * row_bytes + x / 8] & (1 << (~x & 7)))

XDestroyImage (ximg)
     XImagePtr ximg;
{
  UnlockPixels (GetGWorldPixMap (ximg));
}
#endif /* MAC_OS */


/* Functions to access the contents of a bitmap, given an id.  */

  /* If IMG doesn't have a pixmap yet, load it now, using the image
     type dependent loader function.  */
  if (img->pixmap == NO_PIXMAP && !img->load_failed_p)
    img->load_failed_p = img->type->load (f, img) == 0;
}


/* Value is the number of pixels for the ascent of image IMG when
   drawn in face FACE.  */

#endif /* HAVE_X_WINDOWS */
      xfree (img->colors);
      img->colors = NULL;
      img->ncolors = 0;
    }
}

/* Free X resources of image IMG which is used on frame F.  */

static void

83494:b901f4f12f33

     unsigned long pixel;
{
  PixMapHandle pixmap = GetGWorldPixMap (ximage);
  short depth = GetPixDepth (pixmap);

#if defined (WORDS_BIG_ENDIAN) || !USE_CG_DRAWING
  if (depth == 32)
    {
      char *base_addr = GetPixBaseAddr (pixmap);
      short row_bytes = GetPixRowBytes (pixmap);

      ((unsigned long *) (base_addr + y * row_bytes))[x] = 0xff000000 | pixel;
    }
  else
#endif
 if (depth == 1)
    {
      char *base_addr = GetPixBaseAddr (pixmap);
      short row_bytes = GetPixRowBytes (pixmap);

      if (pixel == PIX_MASK_DRAW)

     int x, y;
{
  PixMapHandle pixmap = GetGWorldPixMap (ximage);
  short depth = GetPixDepth (pixmap);

#if defined (WORDS_BIG_ENDIAN) || !USE_CG_DRAWING
  if (depth == 32)
    {
      char *base_addr = GetPixBaseAddr (pixmap);
      short row_bytes = GetPixRowBytes (pixmap);

      return ((unsigned long *) (base_addr + y * row_bytes))[x] & 0x00ffffff;
    }
  else
#endif
  if (depth == 1)
    {
      char *base_addr = GetPixBaseAddr (pixmap);
      short row_bytes = GetPixRowBytes (pixmap);

      if (base_addr[y * row_bytes + x / 8] & (1 << (~x & 7)))

XDestroyImage (ximg)
     XImagePtr ximg;
{
  UnlockPixels (GetGWorldPixMap (ximg));
}

#if USE_CG_DRAWING
static CGImageRef
mac_create_cg_image_from_image (f, img)
     struct frame *f;
     struct image *img;
{
  Pixmap mask;
  CGImageRef result = NULL;

  BLOCK_INPUT;
  if (img->mask)
    mask = img->mask;
  else
    {
      mask = XCreatePixmap (FRAME_X_DISPLAY (f), FRAME_X_WINDOW (f),
			    img->width, img->height, 1);
      if (mask)
	{
	  CGrafPtr old_port;
	  GDHandle old_gdh;
	  Rect r;

	  GetGWorld (&old_port, &old_gdh);
	  SetGWorld (mask, NULL);
	  BackColor (blackColor); /* Don't mask.  */
	  SetRect (&r, 0, 0, img->width, img->height);
	  EraseRect (&r);
	  SetGWorld (old_port, old_gdh);
	}
    }
  if (mask)
    {
      CreateCGImageFromPixMaps (GetGWorldPixMap (img->pixmap),
				GetGWorldPixMap (mask), &result);
      if (mask != img->mask)
	XFreePixmap (FRAME_X_DISPLAY (f), mask);
    }
  UNBLOCK_INPUT;

  return result;
}
#endif /* USE_CG_DRAWING */
#endif /* MAC_OS */


/* Functions to access the contents of a bitmap, given an id.  */

  /* If IMG doesn't have a pixmap yet, load it now, using the image
     type dependent loader function.  */
  if (img->pixmap == NO_PIXMAP && !img->load_failed_p)
    img->load_failed_p = img->type->load (f, img) == 0;

#if defined (MAC_OS) && USE_CG_DRAWING
  if (!img->load_failed_p && img->data.ptr_val == NULL)
    {
      img->data.ptr_val = mac_create_cg_image_from_image (f, img);
      if (img->data.ptr_val == NULL)
	{
	  img->load_failed_p = 1;
	  img->type->free (f, img);
	}
    }
#endif
}


/* Value is the number of pixels for the ascent of image IMG when
   drawn in face FACE.  */

#endif /* HAVE_X_WINDOWS */
      xfree (img->colors);
      img->colors = NULL;
      img->ncolors = 0;
    }

#if defined (MAC_OS) && USE_CG_DRAWING
  if (img->data.ptr_val)
    {
      CGImageRelease (img->data.ptr_val);
      img->data.ptr_val = NULL;
    }
#endif
}

/* Free X resources of image IMG which is used on frame F.  */

static void