mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-26 23:31:55 -08:00
Code Issues Projects Releases Wiki Activity

(w32_draw_fringe_bitmap): Copy unadapted code from

Browse source 
xterm.c to handle overlayed fringe bitmaps and to use cursor color
for displaying cursor in fringe.
(w32_define_fringe_bitmap, w32_destroy_fringe_bitmap): New W32
specific functions to define and destroy fringe bitmaps in fringe_bmp.
(w32_redisplay_interface): Add them to redisplay_interface.
(w32_term_init): Call w32_init_fringe instead of explicitly
defining fringe bitmaps in fringe_bmp array.
(x_delete_display): Call w32_reset_fringes instead of explicitly
destroying fringe bitmaps in fringe_bmp array.
This commit is contained in:
Kim F. Storm 2004-02-08 23:20:23 +00:00
parent 288670f579
commit 4fa0780f70
1 changed files with 60 additions and 35 deletions
Download patch file Download diff file Expand all files Collapse all files

95
src/w32term.c
View file

@ -698,13 +698,13 @@ w32_draw_fringe_bitmap (w, row, p)
else
w32_clip_to_row (w, row, hdc);
if (p->bx >= 0)
if (p->bx >= 0 !p->overlay_p)
{
w32_fill_area (f, hdc, face->background,
p->bx, p->by, p->nx, p->ny);
}
if (p->which != NO_FRINGE_BITMAP)
if (p->which)
{
HBITMAP pixmap = fringe_bmp[p->which];
HDC compat_hdc;
@ -717,10 +717,38 @@ w32_draw_fringe_bitmap (w, row, p)
SetTextColor (hdc, face->background);
SetBkColor (hdc, face->foreground);
#if 0 /* TODO: fringe overlay_p and cursor_p */
SetBkColor (hdc, (p->cursor_p
? (p->overlay_p ? face->background
: f->output_data.w32->cursor_pixel)
: face->foreground));
if (p->overlay_p)
{
clipmask = XCreatePixmapFromBitmapData (display,
FRAME_X_DISPLAY_INFO (f)->root_window,
bits, p->wd, p->h,
1, 0, 1);
gcv.clip_mask = clipmask;
gcv.clip_x_origin = p->x;
gcv.clip_y_origin = p->y;
XChangeGC (display, gc, GCClipMask | GCClipXOrigin | GCClipYOrigin, &gcv);
}
#endif
BitBlt (hdc, p->x, p->y, p->wd, p->h,
compat_hdc, 0, p->dh,
SRCCOPY);
#if 0 /* TODO: fringe overlay_p and cursor_p */
if (p->overlay_p)
{
gcv.clip_mask = (Pixmap) 0;
XChangeGC (display, gc, GCClipMask, &gcv);
XFreePixmap (display, clipmask);
}
#endif
SelectObject (compat_hdc, horig_obj);
DeleteDC (compat_hdc);
RestoreDC (hdc, -1);
@ -731,6 +759,32 @@ w32_draw_fringe_bitmap (w, row, p)
release_frame_dc (f, hdc);
}
static void
w32_define_fringe_bitmap (which, bits, h, wd)
int which;
unsigned char *bits;
int h, wd;
{
unsigned short *w32bits
= (unsigned short *)alloca (h * sizeof (unsigned short));
unsigned short *wb = w32bits;
int j;
for (j = 0; j < h; j++)
*wb++ = (unsigned short)*bits++;
fringe_bmp[which] = CreateBitmap (wd, h, 1, 1, w32bits);
}
static void
w32_destroy_fringe_bitmap (which)
int which;
{
if (fringe_bmp[which])
DeleteObject (fringe_bmp[which]);
fringe_bmp[which] = 0;
}
/* This is called when starting Emacs and when restarting after
suspend. When starting Emacs, no window is mapped. And nothing
@ -6221,32 +6275,7 @@ w32_term_init (display_name, xrm_option, resource_name)
horizontally reflected compared to how they appear on X, so we
need to bitswap and convert to unsigned shorts before creating
the bitmaps. */
{
int i, j;
for (i = NO_FRINGE_BITMAP + 1; i < MAX_FRINGE_BITMAPS; i++)
{
int h = fringe_bitmaps[i].height;
int wd = fringe_bitmaps[i].width;
unsigned short *w32bits
= (unsigned short *)alloca (h * sizeof (unsigned short));
unsigned short *wb = w32bits;
unsigned char *bits = fringe_bitmaps[i].bits;
for (j = 0; j < h; j++)
{
static unsigned char swap_nibble[16]
= { 0x0, 0x8, 0x4, 0xc, /* 0000 1000 0100 1100 */
0x2, 0xa, 0x6, 0xe, /* 0010 1010 0110 1110 */
0x1, 0x9, 0x5, 0xd, /* 0001 1001 0101 1101 */
0x3, 0xb, 0x7, 0xf }; /* 0011 1011 0111 1111 */
unsigned char b = *bits++;
*wb++ = (unsigned short)((swap_nibble[b & 0xf]<<4)
| (swap_nibble[(b>>4) & 0xf]));
}
fringe_bmp[i] = CreateBitmap (wd, h, 1, 1, w32bits);
}
}
w32_init_fringe ();
#ifndef F_SETOWN_BUG
#ifdef F_SETOWN
@ -6314,13 +6343,7 @@ x_delete_display (dpyinfo)
xfree (dpyinfo->font_table);
xfree (dpyinfo->w32_id_name);
/* Destroy row bitmaps. */
{
int i;
for (i = NO_FRINGE_BITMAP + 1; i < MAX_FRINGE_BITMAPS; i++)
DeleteObject (fringe_bmp[i]);
}
w32_reset_fringes ();
}
/* Set up use of W32. */
@ -6351,6 +6374,8 @@ static struct redisplay_interface w32_redisplay_interface =
w32_get_glyph_overhangs,
x_fix_overlapping_area,
w32_draw_fringe_bitmap,
w32_define_fringe_bitmap,
w32_destroy_fringe_bitmap,
w32_per_char_metric,
w32_encode_char,
NULL, /* w32_compute_glyph_string_overhangs */