cleanup & bugfix in xdraws().

This commit is contained in:
Aurélien Aptel 2010-11-20 22:24:04 +01:00
parent 81a048d6cf
commit b61925b5d6

249
st.c
View File

@ -131,20 +131,17 @@ typedef struct {
char s[ESC_BUF_SIZ]; char s[ESC_BUF_SIZ];
} Key; } Key;
typedef struct {
XFontSet fs;
short lbearing;
short rbearing;
int ascent;
int descent;
} FontInfo;
/* Drawing Context */ /* Drawing Context */
typedef struct { typedef struct {
unsigned long col[256]; unsigned long col[256];
FontInfo font;
FontInfo bfont;
GC gc; GC gc;
struct {
int ascent;
int descent;
short lbearing;
short rbearing;
XFontSet set;
} font, bfont;
} DC; } DC;
/* TODO: use better name for vars... */ /* TODO: use better name for vars... */
@ -222,10 +219,10 @@ static inline int selected(int, int);
static void selcopy(void); static void selcopy(void);
static void selpaste(void); static void selpaste(void);
static int stou(char *, long *); static int utf8decode(char *, long *);
static int utos(long *, char *); static int utf8encode(long *, char *);
static int slen(char *); static int utf8size(char *);
static int canstou(char *, int); static int isfullutf8(char *, int);
static void (*handler[LASTEvent])(XEvent *) = { static void (*handler[LASTEvent])(XEvent *) = {
[KeyPress] = kpress, [KeyPress] = kpress,
@ -254,8 +251,8 @@ static char *opt_cmd = NULL;
static char *opt_title = NULL; static char *opt_title = NULL;
static char *opt_class = NULL; static char *opt_class = NULL;
/* UTF-8 decode */ int
static int stou(char *s, long *u) { utf8decode(char *s, long *u) {
unsigned char c; unsigned char c;
int i, n, rtn; int i, n, rtn;
@ -264,28 +261,28 @@ static int stou(char *s, long *u) {
if(~c&B7) { /* 0xxxxxxx */ if(~c&B7) { /* 0xxxxxxx */
*u = c; *u = c;
return rtn; return rtn;
} else if ((c&(B7|B6|B5)) == (B7|B6)) { /* 110xxxxx */ } else if((c&(B7|B6|B5)) == (B7|B6)) { /* 110xxxxx */
*u = c&(B4|B3|B2|B1|B0); *u = c&(B4|B3|B2|B1|B0);
n = 1; n = 1;
} else if ((c&(B7|B6|B5|B4)) == (B7|B6|B5)) { /* 1110xxxx */ } else if((c&(B7|B6|B5|B4)) == (B7|B6|B5)) { /* 1110xxxx */
*u = c&(B3|B2|B1|B0); *u = c&(B3|B2|B1|B0);
n = 2; n = 2;
} else if ((c&(B7|B6|B5|B4|B3)) == (B7|B6|B5|B4)) { /* 11110xxx */ } else if((c&(B7|B6|B5|B4|B3)) == (B7|B6|B5|B4)) { /* 11110xxx */
*u = c&(B2|B1|B0); *u = c&(B2|B1|B0);
n = 3; n = 3;
} else } else
goto invalid; goto invalid;
for (i=n,++s; i>0; --i,++rtn,++s) { for(i=n,++s; i>0; --i,++rtn,++s) {
c = *s; c = *s;
if ((c&(B7|B6)) != B7) /* 10xxxxxx */ if((c&(B7|B6)) != B7) /* 10xxxxxx */
goto invalid; goto invalid;
*u <<= 6; *u <<= 6;
*u |= c&(B5|B4|B3|B2|B1|B0); *u |= c&(B5|B4|B3|B2|B1|B0);
} }
if ((n == 1 && *u < 0x80) || if((n == 1 && *u < 0x80) ||
(n == 2 && *u < 0x800) || (n == 2 && *u < 0x800) ||
(n == 3 && *u < 0x10000) || (n == 3 && *u < 0x10000) ||
(*u >= 0xD800 && *u <= 0xDFFF)) (*u >= 0xD800 && *u <= 0xDFFF))
goto invalid; goto invalid;
return rtn; return rtn;
invalid: invalid:
@ -293,30 +290,30 @@ invalid:
return rtn; return rtn;
} }
/* UTF-8 encode */ int
static int utos(long *u, char *s) { utf8encode(long *u, char *s) {
unsigned char *sp; unsigned char *sp;
unsigned long uc; unsigned long uc;
int i, n; int i, n;
sp = (unsigned char*) s; sp = (unsigned char*) s;
uc = *u; uc = *u;
if (uc < 0x80) { if(uc < 0x80) {
*sp = uc; /* 0xxxxxxx */ *sp = uc; /* 0xxxxxxx */
return 1; return 1;
} else if (*u < 0x800) { } else if(*u < 0x800) {
*sp = (uc >> 6) | (B7|B6); /* 110xxxxx */ *sp = (uc >> 6) | (B7|B6); /* 110xxxxx */
n = 1; n = 1;
} else if (uc < 0x10000) { } else if(uc < 0x10000) {
*sp = (uc >> 12) | (B7|B6|B5); /* 1110xxxx */ *sp = (uc >> 12) | (B7|B6|B5); /* 1110xxxx */
n = 2; n = 2;
} else if (uc <= 0x10FFFF) { } else if(uc <= 0x10FFFF) {
*sp = (uc >> 18) | (B7|B6|B5|B4); /* 11110xxx */ *sp = (uc >> 18) | (B7|B6|B5|B4); /* 11110xxx */
n = 3; n = 3;
} else { } else {
goto invalid; goto invalid;
} }
for (i=n,++sp; i>0; --i,++sp) for(i=n,++sp; i>0; --i,++sp)
*sp = ((uc >> 6*(i-1)) & (B5|B4|B3|B2|B1|B0)) | B7; /* 10xxxxxx */ *sp = ((uc >> 6*(i-1)) & (B5|B4|B3|B2|B1|B0)) | B7; /* 10xxxxxx */
return n+1; return n+1;
invalid: invalid:
@ -329,34 +326,32 @@ invalid:
/* use this if your buffer is less than UTF_SIZ, it returns 1 if you can decode /* use this if your buffer is less than UTF_SIZ, it returns 1 if you can decode
UTF-8 otherwise return 0 */ UTF-8 otherwise return 0 */
static int canstou(char *s, int b) { int
unsigned char c = *s; isfullutf8(char *s, int b) {
int n; unsigned char *c1, *c2, *c3;
if (b < 1) c1 = (unsigned char *) s;
c2 = (unsigned char *) ++s;
c3 = (unsigned char *) ++s;
if(b < 1)
return 0; return 0;
else if (~c&B7) else if((*c1&(B7|B6|B5)) == (B7|B6) && b == 1)
return 1; return 0;
else if ((c&(B7|B6|B5)) == (B7|B6)) else if((*c1&(B7|B6|B5|B4)) == (B7|B6|B5) &&
n = 1; ((b == 1) ||
else if ((c&(B7|B6|B5|B4)) == (B7|B6|B5)) ((b == 2) && (*c2&(B7|B6)) == B7)))
n = 2; return 0;
else if ((c&(B7|B6|B5|B4|B3)) == (B7|B6|B5|B4)) else if((*c1&(B7|B6|B5|B4|B3)) == (B7|B6|B5|B4) &&
n = 3; ((b == 1) ||
else ((b == 2) && (*c2&(B7|B6)) == B7) ||
return 1; ((b == 3) && (*c2&(B7|B6)) == B7 && (*c3&(B7|B6)) == B7)))
for (--b,++s; n>0&&b>0; --n,--b,++s) {
c = *s;
if ((c&(B7|B6)) != B7)
break;
}
if (n > 0 && b == 0)
return 0; return 0;
else else
return 1; return 1;
} }
static int slen(char *s) { int
utf8size(char *s) {
unsigned char c = *s; unsigned char c = *s;
if (~c&B7) if (~c&B7)
@ -369,13 +364,15 @@ static int slen(char *s) {
return 4; return 4;
} }
static void selinit(void) { void
selinit(void) {
sel.mode = 0; sel.mode = 0;
sel.bx = -1; sel.bx = -1;
sel.clip = NULL; sel.clip = NULL;
} }
static inline int selected(int x, int y) { static inline int
selected(int x, int y) {
if(sel.ey == y && sel.by == y) { if(sel.ey == y && sel.by == y) {
int bx = MIN(sel.bx, sel.ex); int bx = MIN(sel.bx, sel.ex);
int ex = MAX(sel.bx, sel.ex); int ex = MAX(sel.bx, sel.ex);
@ -385,7 +382,8 @@ static inline int selected(int x, int y) {
|| (y==sel.b.y && x>=sel.b.x && (x<=sel.e.x || sel.b.y!=sel.e.y)); || (y==sel.b.y && x>=sel.b.x && (x<=sel.e.x || sel.b.y!=sel.e.y));
} }
static void getbuttoninfo(XEvent *e, int *b, int *x, int *y) { void
getbuttoninfo(XEvent *e, int *b, int *x, int *y) {
if(b) if(b)
*b = e->xbutton.button; *b = e->xbutton.button;
@ -397,13 +395,15 @@ static void getbuttoninfo(XEvent *e, int *b, int *x, int *y) {
sel.e.y = MAX(sel.by, sel.ey); sel.e.y = MAX(sel.by, sel.ey);
} }
static void bpress(XEvent *e) { void
bpress(XEvent *e) {
sel.mode = 1; sel.mode = 1;
sel.ex = sel.bx = e->xbutton.x/xw.cw; sel.ex = sel.bx = e->xbutton.x/xw.cw;
sel.ey = sel.by = e->xbutton.y/xw.ch; sel.ey = sel.by = e->xbutton.y/xw.ch;
} }
static void selcopy() { void
selcopy(void) {
char *str, *ptr; char *str, *ptr;
int ls, x, y, sz, sl; int ls, x, y, sz, sl;
@ -415,7 +415,7 @@ static void selcopy() {
for(y = 0; y < term.row; y++) { for(y = 0; y < term.row; y++) {
for(x = 0; x < term.col; x++) for(x = 0; x < term.col; x++)
if(term.line[y][x].state & GLYPH_SET && (ls = selected(x, y))) { if(term.line[y][x].state & GLYPH_SET && (ls = selected(x, y))) {
sl = slen(term.line[y][x].c); sl = utf8size(term.line[y][x].c);
memcpy(ptr, term.line[y][x].c, sl); memcpy(ptr, term.line[y][x].c, sl);
ptr += sl; ptr += sl;
} }
@ -427,7 +427,8 @@ static void selcopy() {
xsetsel(str); xsetsel(str);
} }
static void selnotify(XEvent *e) { void
selnotify(XEvent *e) {
unsigned long nitems; unsigned long nitems;
unsigned long ofs, rem; unsigned long ofs, rem;
int format; int format;
@ -449,12 +450,13 @@ static void selnotify(XEvent *e) {
} while(rem > 0); } while(rem > 0);
} }
static void selpaste() { void
selpaste() {
XConvertSelection(xw.dis, XA_PRIMARY, XA_STRING, XA_PRIMARY, xw.win, CurrentTime); XConvertSelection(xw.dis, XA_PRIMARY, XA_STRING, XA_PRIMARY, xw.win, CurrentTime);
} }
static void selrequest(XEvent *e) void
{ selrequest(XEvent *e) {
XSelectionRequestEvent *xsre; XSelectionRequestEvent *xsre;
XSelectionEvent xev; XSelectionEvent xev;
Atom xa_targets; Atom xa_targets;
@ -488,7 +490,8 @@ static void selrequest(XEvent *e)
fprintf(stderr, "Error sending SelectionNotify event\n"); fprintf(stderr, "Error sending SelectionNotify event\n");
} }
static void xsetsel(char *str) { void
xsetsel(char *str) {
/* register the selection for both the clipboard and the primary */ /* register the selection for both the clipboard and the primary */
Atom clipboard; Atom clipboard;
@ -504,7 +507,8 @@ static void xsetsel(char *str) {
} }
/* TODO: doubleclick to select word */ /* TODO: doubleclick to select word */
static void brelease(XEvent *e) { void
brelease(XEvent *e) {
int b; int b;
sel.mode = 0; sel.mode = 0;
getbuttoninfo(e, &b, &sel.ex, &sel.ey); getbuttoninfo(e, &b, &sel.ex, &sel.ey);
@ -519,7 +523,8 @@ static void brelease(XEvent *e) {
draw(1); draw(1);
} }
static void bmotion(XEvent *e) { void
bmotion(XEvent *e) {
if (sel.mode) { if (sel.mode) {
getbuttoninfo(e, NULL, &sel.ex, &sel.ey); getbuttoninfo(e, NULL, &sel.ex, &sel.ey);
/* XXX: draw() can't keep up, disabled for now. /* XXX: draw() can't keep up, disabled for now.
@ -528,26 +533,6 @@ static void bmotion(XEvent *e) {
} }
} }
#ifdef DEBUG
void
tdump(void) {
int row, col;
Glyph c;
for(row = 0; row < term.row; row++) {
for(col = 0; col < term.col; col++) {
if(col == term.c.x && row == term.c.y)
putchar('#');
else {
c = term.line[row][col];
putchar(c.state & GLYPH_SET ? c.c : '.');
}
}
putchar('\n');
}
}
#endif
void void
die(const char *errstr, ...) { die(const char *errstr, ...) {
va_list ap; va_list ap;
@ -631,9 +616,9 @@ ttyread(void) {
die("Couldn't read from shell: %s\n", SERRNO); die("Couldn't read from shell: %s\n", SERRNO);
else { else {
buflen += ret; buflen += ret;
for(ptr=buf; buflen>=UTF_SIZ||canstou(ptr,buflen); buflen-=br) { for(ptr=buf; buflen>=UTF_SIZ||isfullutf8(ptr,buflen); buflen-=br) {
br = stou(ptr, &u); br = utf8decode(ptr, &u);
utos(&u, s); utf8encode(&u, s);
tputc(s); tputc(s);
ptr += br; ptr += br;
} }
@ -1460,49 +1445,63 @@ xhints(void)
XSetWMProperties(xw.dis, xw.win, NULL, NULL, NULL, 0, &size, &wm, &class); XSetWMProperties(xw.dis, xw.win, NULL, NULL, NULL, 0, &size, &wm, &class);
} }
XFontSet
xinitfont(char *fontstr)
{
XFontSet set;
char *def, **missing;
int n;
missing = NULL;
set = XCreateFontSet(xw.dis, fontstr, &missing, &n, &def);
if(missing) {
while(n--)
fprintf(stderr, "st: missing fontset: %s\n", missing[n]);
XFreeStringList(missing);
}
return set;
}
void void
xsetfontinfo(FontInfo *fi) xgetfontinfo(XFontSet set, int *ascent, int *descent, short *lbearing, short *rbearing)
{ {
XFontStruct **xfonts; XFontStruct **xfonts;
int fnum; char **font_names;
int i; int i, n;
char **fontnames;
fi->lbearing = 0; *ascent = *descent = *lbearing = *rbearing = 0;
fi->rbearing = 0; n = XFontsOfFontSet(set, &xfonts, &font_names);
fi->ascent = 0; for(i = 0; i < n; i++) {
fi->descent = 0; *ascent = MAX(*ascent, (*xfonts)->ascent);
fnum = XFontsOfFontSet(fi->fs, &xfonts, &fontnames); *descent = MAX(*descent, (*xfonts)->descent);
for(i=0; i<fnum; i++,xfonts++,fontnames++) { *lbearing = MAX(*lbearing, (*xfonts)->min_bounds.lbearing);
puts(*fontnames); *rbearing = MAX(*rbearing, (*xfonts)->max_bounds.rbearing);
if(fi->ascent < (*xfonts)->ascent) xfonts++;
fi->ascent = (*xfonts)->ascent;
if(fi->descent < (*xfonts)->descent)
fi->descent = (*xfonts)->descent;
if(fi->rbearing < (*xfonts)->max_bounds.rbearing)
fi->rbearing = (*xfonts)->max_bounds.rbearing;
if(fi->lbearing < (*xfonts)->min_bounds.lbearing)
fi->lbearing = (*xfonts)->min_bounds.lbearing;
} }
} }
void
initfonts(char *fontstr, char *bfontstr)
{
if((dc.font.set = xinitfont(fontstr)) == NULL ||
(dc.bfont.set = xinitfont(bfontstr)) == NULL)
die("Can't load font %s\n", dc.font.set ? BOLDFONT : FONT);
xgetfontinfo(dc.font.set, &dc.font.ascent, &dc.font.descent,
&dc.font.lbearing, &dc.font.rbearing);
xgetfontinfo(dc.bfont.set, &dc.bfont.ascent, &dc.bfont.descent,
&dc.bfont.lbearing, &dc.bfont.rbearing);
}
void void
xinit(void) { xinit(void) {
XSetWindowAttributes attrs; XSetWindowAttributes attrs;
char **mc;
char *ds;
int nmc;
if(!(xw.dis = XOpenDisplay(NULL))) if(!(xw.dis = XOpenDisplay(NULL)))
die("Can't open display\n"); die("Can't open display\n");
xw.scr = XDefaultScreen(xw.dis); xw.scr = XDefaultScreen(xw.dis);
/* font */ /* font */
if ((dc.font.fs = XCreateFontSet(xw.dis, FONT, &mc, &nmc, &ds)) == NULL || initfonts(FONT, BOLDFONT);
(dc.bfont.fs = XCreateFontSet(xw.dis, BOLDFONT, &mc, &nmc, &ds)) == NULL)
die("Can't load font %s\n", dc.font.fs ? BOLDFONT : FONT);
xsetfontinfo(&dc.font);
xsetfontinfo(&dc.bfont);
/* XXX: Assuming same size for bold font */ /* XXX: Assuming same size for bold font */
xw.cw = dc.font.rbearing - dc.font.lbearing; xw.cw = dc.font.rbearing - dc.font.lbearing;
@ -1550,9 +1549,9 @@ xinit(void) {
} }
void void
xdraws(char *s, Glyph base, int x, int y, int cl, int sl) { xdraws(char *s, Glyph base, int x, int y, int charlen, int bytelen) {
unsigned long xfg, xbg; unsigned long xfg, xbg;
int winx = x*xw.cw, winy = y*xw.ch + dc.font.ascent, width = cl*xw.cw; int winx = x*xw.cw, winy = y*xw.ch + dc.font.ascent, width = charlen*xw.cw;
int i; int i;
if(base.mode & ATTR_REVERSE) if(base.mode & ATTR_REVERSE)
@ -1564,7 +1563,7 @@ xdraws(char *s, Glyph base, int x, int y, int cl, int sl) {
XSetForeground(xw.dis, dc.gc, xfg); XSetForeground(xw.dis, dc.gc, xfg);
if(base.mode & ATTR_GFX) if(base.mode & ATTR_GFX)
for(i = 0; i < cl; i++) { for(i = 0; i < bytelen; i++) {
char c = gfx[(unsigned int)s[i] % 256]; char c = gfx[(unsigned int)s[i] % 256];
if(c) if(c)
s[i] = c; s[i] = c;
@ -1572,8 +1571,8 @@ xdraws(char *s, Glyph base, int x, int y, int cl, int sl) {
s[i] -= 0x5f; s[i] -= 0x5f;
} }
XmbDrawImageString(xw.dis, xw.buf, base.mode & ATTR_BOLD ? dc.bfont.fs : dc.font.fs, XmbDrawImageString(xw.dis, xw.buf, base.mode & ATTR_BOLD ? dc.bfont.set : dc.font.set,
dc.gc, winx, winy, s, sl); dc.gc, winx, winy, s, bytelen);
if(base.mode & ATTR_UNDERLINE) if(base.mode & ATTR_UNDERLINE)
XDrawLine(xw.dis, xw.buf, dc.gc, winx, winy+1, winx+width-1, winy+1); XDrawLine(xw.dis, xw.buf, dc.gc, winx, winy+1, winx+width-1, winy+1);
@ -1594,14 +1593,14 @@ xdrawcursor(void) {
/* remove the old cursor */ /* remove the old cursor */
if(term.line[oldy][oldx].state & GLYPH_SET) { if(term.line[oldy][oldx].state & GLYPH_SET) {
sl = slen(term.line[oldy][oldx].c); sl = utf8size(term.line[oldy][oldx].c);
xdraws(term.line[oldy][oldx].c, term.line[oldy][oldx], oldx, oldy, 1, sl); xdraws(term.line[oldy][oldx].c, term.line[oldy][oldx], oldx, oldy, 1, sl);
} else } else
xclear(oldx, oldy, oldx, oldy); xclear(oldx, oldy, oldx, oldy);
/* draw the new one */ /* draw the new one */
if(!(term.c.state & CURSOR_HIDE) && (xw.state & WIN_FOCUSED)) { if(!(term.c.state & CURSOR_HIDE) && (xw.state & WIN_FOCUSED)) {
sl = slen(g.c); sl = utf8size(g.c);
xdraws(g.c, g, term.c.x, term.c.y, 1, sl); xdraws(g.c, g, term.c.x, term.c.y, 1, sl);
oldx = term.c.x, oldy = term.c.y; oldx = term.c.x, oldy = term.c.y;
} }
@ -1611,7 +1610,7 @@ xdrawcursor(void) {
/* basic drawing routines */ /* basic drawing routines */
void void
xdrawc(int x, int y, Glyph g) { xdrawc(int x, int y, Glyph g) {
int sl = slen(g.c); int sl = utf8size(g.c);
XRectangle r = { x * xw.cw, y * xw.ch, xw.cw, xw.ch }; XRectangle r = { x * xw.cw, y * xw.ch, xw.cw, xw.ch };
XSetBackground(xw.dis, dc.gc, dc.col[g.bg]); XSetBackground(xw.dis, dc.gc, dc.col[g.bg]);
XSetForeground(xw.dis, dc.gc, dc.col[g.fg]); XSetForeground(xw.dis, dc.gc, dc.col[g.fg]);
@ -1663,7 +1662,7 @@ draw(int redraw_all) {
ox = x; ox = x;
base = new; base = new;
} }
sl = slen(new.c); sl = utf8size(new.c);
memcpy(buf+ib, new.c, sl); memcpy(buf+ib, new.c, sl);
ib += sl; ib += sl;
++ic; ++ic;