JasonWoof Got questions, comments, patches, etc.? Contact Jason Woofenden
some minor fixes
[st.git] / st.c
diff --git a/st.c b/st.c
index 6a6ea75..abaa7bf 100644 (file)
--- a/st.c
+++ b/st.c
@@ -6,6 +6,7 @@
 #include <limits.h>
 #include <locale.h>
 #include <stdarg.h>
+#include <stdbool.h>
 #include <stdio.h>
 #include <stdlib.h>
 #include <string.h>
 #include <sys/ioctl.h>
 #include <sys/select.h>
 #include <sys/stat.h>
+#include <sys/time.h>
 #include <sys/types.h>
 #include <sys/wait.h>
+#include <time.h>
 #include <unistd.h>
 #include <X11/Xatom.h>
 #include <X11/Xlib.h>
@@ -22,9 +25,6 @@
 #include <X11/cursorfont.h>
 #include <X11/keysym.h>
 
-#include <sys/time.h>
-#include <time.h>
-
 #if   defined(__linux)
  #include <pty.h>
 #elif defined(__OpenBSD__) || defined(__NetBSD__) || defined(__APPLE__)
 #endif
 
 #define USAGE \
-       "st-" VERSION ", (c) 2010 st engineers\n" \
-       "usage: st [-t title] [-c class] [-v] [-e cmd]\n"
+       "st " VERSION " (c) 2010-2012 st engineers\n" \
+       "usage: st [-t title] [-c class] [-w windowid] [-v] [-e command...]\n"
+
+/* XEMBED messages */
+#define XEMBED_FOCUS_IN  4
+#define XEMBED_FOCUS_OUT 5
 
 /* Arbitrary sizes */
 #define ESC_TITLE_SIZ 256
 #define ESC_ARG_SIZ   16
 #define DRAW_BUF_SIZ  1024
 #define UTF_SIZ       4
+#define XK_NO_MOD     UINT_MAX
+#define XK_ANY_MOD    0
+
+#define SELECT_TIMEOUT (20*1000) /* 20 ms */
+#define DRAW_TIMEOUT  (20*1000) /* 20 ms */
 
 #define SERRNO strerror(errno)
 #define MIN(a, b)  ((a) < (b) ? (a) : (b))
@@ -53,7 +62,9 @@
 #define LIMIT(x, a, b)    (x) = (x) < (a) ? (a) : (x) > (b) ? (b) : (x)
 #define ATTRCMP(a, b) ((a).mode != (b).mode || (a).fg != (b).fg || (a).bg != (b).bg)
 #define IS_SET(flag) (term.mode & (flag))
-#define TIMEDIFFERENCE(t1, t2) ((t1.tv_sec-t2.tv_sec)*1000 + (t1.tv_usec-t2.tv_usec)/1000)
+#define TIMEDIFF(t1, t2) ((t1.tv_sec-t2.tv_sec)*1000 + (t1.tv_usec-t2.tv_usec)/1000)
+#define X2COL(x) (((x) - BORDER)/xw.cw)
+#define Y2ROW(y) (((y) - BORDER)/xw.ch)
 
 /* Attribute, Cursor, Character state, Terminal mode, Screen draw mode */
 enum { ATTR_NULL=0 , ATTR_REVERSE=1 , ATTR_UNDERLINE=2, ATTR_BOLD=4, ATTR_GFX=8 };
@@ -62,13 +73,17 @@ enum { CURSOR_UP, CURSOR_DOWN, CURSOR_LEFT, CURSOR_RIGHT,
 enum { CURSOR_DEFAULT = 0, CURSOR_HIDE = 1, CURSOR_WRAPNEXT = 2 };
 enum { GLYPH_SET=1, GLYPH_DIRTY=2 };
 enum { MODE_WRAP=1, MODE_INSERT=2, MODE_APPKEYPAD=4, MODE_ALTSCREEN=8,
-       MODE_CRLF=16 };
+       MODE_CRLF=16, MODE_MOUSEBTN=32, MODE_MOUSEMOTION=64, MODE_MOUSE=32|64, MODE_REVERSE=128 };
 enum { ESC_START=1, ESC_CSI=2, ESC_OSC=4, ESC_TITLE=8, ESC_ALTCHARSET=16 };
 enum { WIN_VISIBLE=1, WIN_REDRAW=2, WIN_FOCUSED=4 };
 
 #undef B0
 enum { B0=1, B1=2, B2=4, B3=8, B4=16, B5=32, B6=64, B7=128 };
 
+typedef unsigned char uchar;
+typedef unsigned int uint;
+typedef unsigned long ulong;
+
 typedef struct {
        char c[UTF_SIZ];     /* character code */
        char mode;  /* attribute flags */
@@ -103,6 +118,7 @@ typedef struct {
        int col;        /* nb col */
        Line* line;     /* screen */
        Line* alt;      /* alternate screen */
+       bool* dirty; /* dirtyness of lines */
        TCursor c;      /* cursor */
        int top;        /* top    scroll limit */
        int bot;        /* bottom scroll limit */
@@ -118,6 +134,7 @@ typedef struct {
        Colormap cmap;
        Window win;
        Pixmap buf;
+       Atom xembed;
        XIM xim;
        XIC xic;
        int scr;
@@ -128,17 +145,18 @@ typedef struct {
        int ch; /* char height */
        int cw; /* char width  */
        char state; /* focus, redraw, visible */
+       struct timeval lastdraw;
 } XWindow;
 
 typedef struct {
        KeySym k;
-       unsigned int mask;
+       uint mask;
        char s[ESC_BUF_SIZ];
 } Key;
 
 /* Drawing Context */
 typedef struct {
-       unsigned long col[256];
+       ulong col[256];
        GC gc;
        struct {
                int ascent;
@@ -169,6 +187,7 @@ static void drawregion(int, int, int, int);
 static void execsh(void);
 static void sigchld(int);
 static void run(void);
+static bool last_draw_too_old(void);
 
 static void csidump(void);
 static void csihandle(void);
@@ -194,6 +213,7 @@ static void tsetattr(int*, int);
 static void tsetchar(char*);
 static void tsetscroll(int, int);
 static void tswapscreen(void);
+static void tfulldirt(void);
 
 static void ttynew(void);
 static void ttyread(void);
@@ -203,6 +223,7 @@ static void ttywrite(const char *, size_t);
 static void xdraws(char *, Glyph, int, int, int, int);
 static void xhints(void);
 static void xclear(int, int, int, int);
+static void xcopy(int, int, int, int);
 static void xdrawcursor(void);
 static void xinit(void);
 static void xloadcols(void);
@@ -213,8 +234,9 @@ static void xresize(int, int);
 static void expose(XEvent *);
 static void visibility(XEvent *);
 static void unmap(XEvent *);
-static char* kmap(KeySym, unsigned int state);
+static char* kmap(KeySym, uint);
 static void kpress(XEvent *);
+static void cmessage(XEvent *);
 static void resize(XEvent *);
 static void focus(XEvent *);
 static void brelease(XEvent *);
@@ -224,9 +246,10 @@ static void selnotify(XEvent *);
 static void selrequest(XEvent *);
 
 static void selinit(void);
-static inline int selected(int, int);
+static inline bool selected(int, int);
 static void selcopy(void);
 static void selpaste();
+static void selscroll(int, int);
 
 static int utf8decode(char *, long *);
 static int utf8encode(long *, char *);
@@ -235,6 +258,7 @@ static int isfullutf8(char *, int);
 
 static void (*handler[LASTEvent])(XEvent *) = {
        [KeyPress] = kpress,
+       [ClientMessage] = cmessage,
        [ConfigureNotify] = resize,
        [VisibilityNotify] = visibility,
        [UnmapNotify] = unmap,
@@ -258,35 +282,36 @@ static pid_t pid;
 static Selection sel;
 static char **opt_cmd  = NULL;
 static char *opt_title = NULL;
+static char *opt_embed = NULL;
 static char *opt_class = NULL;
 
 int
 utf8decode(char *s, long *u) {
-       unsigned char c;
+       uchar c;
        int i, n, rtn;
 
        rtn = 1;
        c = *s;
-       if(~c&B7) { /* 0xxxxxxx */
+       if(~c & B7) { /* 0xxxxxxx */
                *u = c;
                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);
                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);
                n = 2;
-       } else if((c&(B7|B6|B5|B4|B3)) == (B7|B6|B5|B4)) { /* 11110xxx */
-               *u = c&(B2|B1|B0);
+       } else if((c & (B7|B6|B5|B4|B3)) == (B7|B6|B5|B4)) { /* 11110xxx */
+               *u = c & (B2|B1|B0);
                n = 3;
        } else
                goto invalid;
-       for(i=n,++s; i>0; --i,++rtn,++s) {
+       for(i = n, ++s; i > 0; --i, ++rtn, ++s) {
                c = *s;
-               if((c&(B7|B6)) != B7) /* 10xxxxxx */
+               if((c & (B7|B6)) != B7) /* 10xxxxxx */
                        goto invalid;
                *u <<= 6;
-               *u |= c&(B5|B4|B3|B2|B1|B0);
+               *u |= c & (B5|B4|B3|B2|B1|B0);
        }
        if((n == 1 && *u < 0x80) ||
           (n == 2 && *u < 0x800) ||
@@ -301,11 +326,11 @@ invalid:
 
 int
 utf8encode(long *u, char *s) {
-       unsigned char *sp;
-       unsigned long uc;
+       uchar *sp;
+       ulong uc;
        int i, n;
 
-       sp = (unsigned char*) s;
+       sp = (uchar*) s;
        uc = *u;
        if(uc < 0x80) {
                *sp = uc; /* 0xxxxxxx */
@@ -337,11 +362,11 @@ invalid:
    UTF-8 otherwise return 0 */
 int
 isfullutf8(char *s, int b) {
-       unsigned char *c1, *c2, *c3;
+       uchar *c1, *c2, *c3;
 
-       c1 = (unsigned char *) s;
-       c2 = (unsigned char *) ++s;
-       c3 = (unsigned char *) ++s;
+       c1 = (uchar *) s;
+       c2 = (uchar *) ++s;
+       c3 = (uchar *) ++s;
        if(b < 1)
                return 0;
        else if((*c1&(B7|B6|B5)) == (B7|B6) && b == 1)
@@ -361,7 +386,7 @@ isfullutf8(char *s, int b) {
 
 int
 utf8size(char *s) {
-       unsigned char c = *s;
+       uchar c = *s;
 
        if(~c&B7)
                return 1;
@@ -385,7 +410,7 @@ selinit(void) {
                sel.xtarget = XA_STRING;
 }
 
-static inline int
+static inline bool
 selected(int x, int y) {
        if(sel.ey == y && sel.by == y) {
                int bx = MIN(sel.bx, sel.ex);
@@ -398,11 +423,11 @@ selected(int x, int y) {
 
 void
 getbuttoninfo(XEvent *e, int *b, int *x, int *y) {
-       if(b) 
+       if(b)
                *b = e->xbutton.button;
 
-       *x = (e->xbutton.x - BORDER)/xw.cw;
-       *y = (e->xbutton.y - BORDER)/xw.ch;
+       *x = X2COL(e->xbutton.x);
+       *y = Y2ROW(e->xbutton.y);
        sel.b.x = sel.by < sel.ey ? sel.bx : sel.ex;
        sel.b.y = MIN(sel.by, sel.ey);
        sel.e.x = sel.by < sel.ey ? sel.ex : sel.bx;
@@ -410,10 +435,51 @@ getbuttoninfo(XEvent *e, int *b, int *x, int *y) {
 }
 
 void
+mousereport(XEvent *e) {
+       int x = X2COL(e->xbutton.x);
+       int y = Y2ROW(e->xbutton.y);
+       int button = e->xbutton.button;
+       int state = e->xbutton.state;
+       char buf[] = { '\033', '[', 'M', 0, 32+x+1, 32+y+1 };
+       static int ob, ox, oy;
+       
+       /* from urxvt */
+       if(e->xbutton.type == MotionNotify) {
+               if(!IS_SET(MODE_MOUSEMOTION) || (x == ox && y == oy))
+                       return;
+               button = ob + 32;
+               ox = x, oy = y;
+       } else if(e->xbutton.type == ButtonRelease || button == AnyButton) {
+               button = 3;
+       } else {
+               button -= Button1;
+               if(button >= 3)
+                       button += 64 - 3;
+               if(e->xbutton.type == ButtonPress) {
+                       ob = button;
+                       ox = x, oy = y;
+               }
+       }
+       
+       buf[3] = 32 + button + (state & ShiftMask ? 4 : 0)
+               + (state & Mod4Mask    ? 8  : 0)
+               + (state & ControlMask ? 16 : 0);
+       
+       ttywrite(buf, sizeof(buf));
+}
+
+void
 bpress(XEvent *e) {
-       sel.mode = 1;
-       sel.ex = sel.bx = (e->xbutton.x - BORDER)/xw.cw;
-       sel.ey = sel.by = (e->xbutton.y - BORDER)/xw.ch;
+       if(IS_SET(MODE_MOUSE))
+               mousereport(e);
+       else if(e->xbutton.button == Button1) {
+               if(sel.bx != -1)
+                       for(int i=sel.b.y; i<=sel.e.y; i++)
+                               term.dirty[i] = 1;
+               sel.mode = 1;
+               sel.ex = sel.bx = X2COL(e->xbutton.x);
+               sel.ey = sel.by = Y2ROW(e->xbutton.y);
+       }
 }
 
 void
@@ -443,10 +509,9 @@ selcopy(void) {
 
 void
 selnotify(XEvent *e) {
-       unsigned long nitems;
-       unsigned long ofs, rem;
+       ulong nitems, ofs, rem;
        int format;
-       unsigned char *data;
+       uchar *data;
        Atom type;
 
        ofs = 0;
@@ -490,12 +555,12 @@ selrequest(XEvent *e) {
                Atom string = sel.xtarget;
                XChangeProperty(xsre->display, xsre->requestor, xsre->property,
                                XA_ATOM, 32, PropModeReplace,
-                               (unsigned char *) &string, 1);
+                               (uchar *) &string, 1);
                xev.property = xsre->property;
-       } else if(xsre->target == sel.xtarget) {
+       } else if(xsre->target == sel.xtarget && sel.clip != NULL) {
                XChangeProperty(xsre->display, xsre->requestor, xsre->property,
                                xsre->target, 8, PropModeReplace,
-                               (unsigned char *) sel.clip, strlen(sel.clip));
+                               (uchar *) sel.clip, strlen(sel.clip));
                xev.property = xsre->property;
        }
 
@@ -522,39 +587,42 @@ xsetsel(char *str) {
 
 void
 brelease(XEvent *e) {
-       int b;
-
-       sel.mode = 0;
-       getbuttoninfo(e, &b, &sel.ex, &sel.ey);
-       if(sel.bx == sel.ex && sel.by == sel.ey) {
-               sel.bx = -1;
-               if(b == 2)
-                       selpaste();
-               else if(b == 1) {
+       if(IS_SET(MODE_MOUSE)) {
+               mousereport(e);
+               return;
+       }
+       if(e->xbutton.button == Button2)
+               selpaste();
+       else if(e->xbutton.button == Button1) {
+               sel.mode = 0;
+               getbuttoninfo(e, NULL, &sel.ex, &sel.ey);
+               term.dirty[sel.ey] = 1;
+               if(sel.bx == sel.ex && sel.by == sel.ey) {
                        struct timeval now;
+                       sel.bx = -1;
                        gettimeofday(&now, NULL);
 
-                       if(TIMEDIFFERENCE(now, sel.tclick2) <= TRIPLECLICK_TIMEOUT) {
+                       if(TIMEDIFF(now, sel.tclick2) <= TRIPLECLICK_TIMEOUT) {
                                /* triple click on the line */
                                sel.b.x = sel.bx = 0;
                                sel.e.x = sel.ex = term.col;
                                sel.b.y = sel.e.y = sel.ey;
                                selcopy();
-                       } else if(TIMEDIFFERENCE(now, sel.tclick1) <= DOUBLECLICK_TIMEOUT) {
+                       } else if(TIMEDIFF(now, sel.tclick1) <= DOUBLECLICK_TIMEOUT) {
                                /* double click to select word */
                                sel.bx = sel.ex;
-                               while(term.line[sel.ey][sel.bx-1].state & GLYPH_SET && 
+                               while(sel.bx > 0 && term.line[sel.ey][sel.bx-1].state & GLYPH_SET &&
                                          term.line[sel.ey][sel.bx-1].c[0] != ' ') sel.bx--;
                                sel.b.x = sel.bx;
-                               while(term.line[sel.ey][sel.ex+1].state & GLYPH_SET && 
+                               while(sel.ex < term.col-1 && term.line[sel.ey][sel.ex+1].state & GLYPH_SET &&
                                          term.line[sel.ey][sel.ex+1].c[0] != ' ') sel.ex++;
                                sel.e.x = sel.ex;
                                sel.b.y = sel.e.y = sel.ey;
                                selcopy();
                        }
-               }
-       } else if(b == 1) 
-               selcopy();
+               } else
+                       selcopy();
+       }
        memcpy(&sel.tclick2, &sel.tclick1, sizeof(struct timeval));
        gettimeofday(&sel.tclick1, NULL);
        draw();
@@ -562,15 +630,20 @@ brelease(XEvent *e) {
 
 void
 bmotion(XEvent *e) {
+       if(IS_SET(MODE_MOUSE)) {
+               mousereport(e);
+               return;
+       }
        if(sel.mode) {
-               int oldey = sel.ey, 
-                       oldex = sel.ex;
+               int oldey = sel.ey, oldex = sel.ex;
                getbuttoninfo(e, NULL, &sel.ex, &sel.ey);
 
                if(oldey != sel.ey || oldex != sel.ex) {
                        int starty = MIN(oldey, sel.ey);
                        int endy = MAX(oldey, sel.ey);
-                       drawregion(0, (starty > 0 ? starty : 0), term.col, (sel.ey < term.row ? endy+1 : term.row));
+                       for(int i = starty; i <= endy; i++)
+                               term.dirty[i] = 1;
+                       draw();
                }
        }
 }
@@ -597,7 +670,7 @@ execsh(void) {
        exit(EXIT_FAILURE);
 }
 
-void 
+void
 sigchld(int a) {
        int stat = 0;
        if(waitpid(pid, &stat, 0) < 0)
@@ -650,7 +723,7 @@ dump(char c) {
 void
 ttyread(void) {
        static char buf[BUFSIZ];
-       static int buflen = 0; 
+       static int buflen = 0;
        char *ptr;
        char s[UTF_SIZ];
        int charsize; /* size of utf8 char in bytes */
@@ -694,6 +767,14 @@ ttyresize(int x, int y) {
 }
 
 void
+tfulldirt(void)
+{
+       int i;
+       for(i = 0; i < term.row; i++)
+               term.dirty[i] = 1;
+}
+
+void
 tcursor(int mode) {
        static TCursor c;
 
@@ -706,8 +787,8 @@ tcursor(int mode) {
 void
 treset(void) {
        term.c = (TCursor){{
-               .mode = ATTR_NULL, 
-               .fg = DefaultFG, 
+               .mode = ATTR_NULL,
+               .fg = DefaultFG,
                .bg = DefaultBG
        }, .x = 0, .y = 0, .state = CURSOR_DEFAULT};
        
@@ -722,9 +803,12 @@ tnew(int col, int row) {
        term.row = row, term.col = col;
        term.line = malloc(term.row * sizeof(Line));
        term.alt  = malloc(term.row * sizeof(Line));
-       for(row = 0 ; row < term.row; row++) {
+       term.dirty = malloc(term.row * sizeof(*term.dirty));
+
+       for(row = 0; row < term.row; row++) {
                term.line[row] = malloc(term.col * sizeof(Glyph));
                term.alt [row] = malloc(term.col * sizeof(Glyph));
+               term.dirty[row] = 0;
        }
        /* setup screen */
        treset();
@@ -736,6 +820,7 @@ tswapscreen(void) {
        term.line = term.alt;
        term.alt = tmp;
        term.mode ^= MODE_ALTSCREEN;
+       tfulldirt();
 }
 
 void
@@ -751,7 +836,12 @@ tscrolldown(int orig, int n) {
                temp = term.line[i];
                term.line[i] = term.line[i-n];
                term.line[i-n] = temp;
+
+               term.dirty[i] = 1;
+               term.dirty[i-n] = 1;
        }
+
+       selscroll(orig, n);
 }
 
 void
@@ -762,10 +852,38 @@ tscrollup(int orig, int n) {
        
        tclearregion(0, orig, term.col-1, orig+n-1);
        
-       for(i = orig; i <= term.bot-n; i++) { 
+       for(i = orig; i <= term.bot-n; i++) {
                 temp = term.line[i];
-                term.line[i] = term.line[i+n]; 
+                term.line[i] = term.line[i+n];
                 term.line[i+n] = temp;
+
+                term.dirty[i] = 1;
+                term.dirty[i+n] = 1;
+       }
+
+       selscroll(orig, -n);
+}
+
+void
+selscroll(int orig, int n) {
+       if(sel.bx == -1)
+               return;
+       
+       if(BETWEEN(sel.by, orig, term.bot) || BETWEEN(sel.ey, orig, term.bot)) {
+               if((sel.by += n) > term.bot || (sel.ey += n) < term.top) {
+                       sel.bx = -1;
+                       return;
+               }
+               if(sel.by < term.top) {
+                       sel.by = term.top;
+                       sel.bx = 0;
+               }
+               if(sel.ey > term.bot) {
+                       sel.ey = term.bot;
+                       sel.ex = term.col;
+               }
+               sel.b.y = sel.by, sel.b.x = sel.bx;
+               sel.e.y = sel.ey, sel.e.x = sel.ex;
        }
 }
 
@@ -814,6 +932,7 @@ tmoveto(int x, int y) {
 
 void
 tsetchar(char *c) {
+       term.dirty[term.c.y] = 1;
        term.line[term.c.y][term.c.x] = term.c.attr;
        memcpy(term.line[term.c.y][term.c.x].c, c, UTF_SIZ);
        term.line[term.c.y][term.c.x].state |= GLYPH_SET;
@@ -833,9 +952,11 @@ tclearregion(int x1, int y1, int x2, int y2) {
        LIMIT(y1, 0, term.row-1);
        LIMIT(y2, 0, term.row-1);
 
-       for(y = y1; y <= y2; y++)
+       for(y = y1; y <= y2; y++) {
+               term.dirty[y] = 1;
                for(x = x1; x <= x2; x++)
                        term.line[y][x].state = 0;
+       }
 }
 
 void
@@ -843,6 +964,8 @@ tdeletechar(int n) {
        int src = term.c.x + n;
        int dst = term.c.x;
        int size = term.col - src;
+       
+       term.dirty[term.c.y] = 1;
 
        if(src >= term.col) {
                tclearregion(term.c.x, term.c.y, term.col-1, term.c.y);
@@ -858,6 +981,8 @@ tinsertblank(int n) {
        int dst = src + n;
        int size = term.col - dst;
 
+       term.dirty[term.c.y] = 1;
+
        if(dst >= term.col) {
                tclearregion(term.c.x, term.c.y, term.col-1, term.c.y);
                return;
@@ -894,22 +1019,22 @@ tsetattr(int *attr, int l) {
                        term.c.attr.bg = DefaultBG;
                        break;
                case 1:
-                       term.c.attr.mode |= ATTR_BOLD;   
+                       term.c.attr.mode |= ATTR_BOLD;
                        break;
-               case 4: 
+               case 4:
                        term.c.attr.mode |= ATTR_UNDERLINE;
                        break;
-               case 7: 
-                       term.c.attr.mode |= ATTR_REVERSE;       
+               case 7:
+                       term.c.attr.mode |= ATTR_REVERSE;
                        break;
-               case 22: 
-                       term.c.attr.mode &= ~ATTR_BOLD;  
+               case 22:
+                       term.c.attr.mode &= ~ATTR_BOLD;
                        break;
-               case 24: 
+               case 24:
                        term.c.attr.mode &= ~ATTR_UNDERLINE;
                        break;
-               case 27: 
-                       term.c.attr.mode &= ~ATTR_REVERSE;       
+               case 27:
+                       term.c.attr.mode &= ~ATTR_REVERSE;
                        break;
                case 38:
                        if(i + 2 < l && attr[i + 1] == 5) {
@@ -920,7 +1045,7 @@ tsetattr(int *attr, int l) {
                                        fprintf(stderr, "erresc: bad fgcolor %d\n", attr[i]);
                        }
                        else
-                               fprintf(stderr, "erresc: gfx attr %d unknown\n", attr[i]); 
+                               fprintf(stderr, "erresc: gfx attr %d unknown\n", attr[i]);
                        break;
                case 39:
                        term.c.attr.fg = DefaultFG;
@@ -934,7 +1059,7 @@ tsetattr(int *attr, int l) {
                                        fprintf(stderr, "erresc: bad bgcolor %d\n", attr[i]);
                        }
                        else
-                               fprintf(stderr, "erresc: gfx attr %d unknown\n", attr[i]); 
+                               fprintf(stderr, "erresc: gfx attr %d unknown\n", attr[i]);
                        break;
                case 49:
                        term.c.attr.bg = DefaultBG;
@@ -948,7 +1073,7 @@ tsetattr(int *attr, int l) {
                                term.c.attr.fg = attr[i] - 90 + 8;
                        else if(BETWEEN(attr[i], 100, 107))
                                term.c.attr.fg = attr[i] - 100 + 8;
-                       else 
+                       else
                                fprintf(stderr, "erresc: gfx attr %d unknown\n", attr[i]), csidump();
                        
                        break;
@@ -968,7 +1093,7 @@ tsetscroll(int t, int b) {
                b = temp;
        }
        term.top = t;
-       term.bot = b;    
+       term.bot = b;
 }
 
 void
@@ -1023,6 +1148,7 @@ csihandle(void) {
                break;
        /* XXX: (CSI n I) CHT -- Cursor Forward Tabulation <n> tab stops */
        case 'J': /* ED -- Clear screen */
+               sel.bx = -1;
                switch(escseq.arg[0]) {
                case 0: /* below */
                        tclearregion(term.c.x, term.c.y, term.col-1, term.c.y);
@@ -1072,7 +1198,11 @@ csihandle(void) {
                        case 1:
                                term.mode &= ~MODE_APPKEYPAD;
                                break;
-                       case 5: /* TODO: DECSCNM -- Remove reverse video */
+                       case 5: /* DECSCNM -- Remove reverse video */
+                               if(IS_SET(MODE_REVERSE)) {
+                                       term.mode &= ~MODE_REVERSE;
+                                       draw();
+                               }
                                break;
                        case 7:
                                term.mode &= ~MODE_WRAP;
@@ -1085,13 +1215,20 @@ csihandle(void) {
                        case 25:
                                term.c.state |= CURSOR_HIDE;
                                break;
+                       case 1000: /* disable X11 xterm mouse reporting */
+                               term.mode &= ~MODE_MOUSEBTN;
+                               break;
+                       case 1002:
+                               term.mode &= ~MODE_MOUSEMOTION;
+                               break;
                        case 1049: /* = 1047 and 1048 */
+                       case 47:
                        case 1047:
                                if(IS_SET(MODE_ALTSCREEN)) {
                                        tclearregion(0, 0, term.col-1, term.row-1);
                                        tswapscreen();
                                }
-                               if(escseq.arg[0] == 1047)
+                               if(escseq.arg[0] != 1049)
                                        break;
                        case 1048:
                                tcursor(CURSOR_LOAD);
@@ -1133,7 +1270,10 @@ csihandle(void) {
                                term.mode |= MODE_APPKEYPAD;
                                break;
                        case 5: /* DECSCNM -- Reverve video */
-                               /* TODO: set REVERSE on the whole screen (f) */
+                               if(!IS_SET(MODE_REVERSE)) {
+                                       term.mode |= MODE_REVERSE;
+                                       draw();
+                               }
                                break;
                        case 7:
                                term.mode |= MODE_WRAP;
@@ -1148,13 +1288,20 @@ csihandle(void) {
                        case 25:
                                term.c.state &= ~CURSOR_HIDE;
                                break;
+                       case 1000: /* 1000,1002: enable xterm mouse report */
+                               term.mode |= MODE_MOUSEBTN;
+                               break;
+                       case 1002:
+                               term.mode |= MODE_MOUSEMOTION;
+                               break;
                        case 1049: /* = 1047 and 1048 */
+                       case 47:
                        case 1047:
                                if(IS_SET(MODE_ALTSCREEN))
                                        tclearregion(0, 0, term.col-1, term.row-1);
                                else
                                        tswapscreen();
-                               if(escseq.arg[0] == 1047)
+                               if(escseq.arg[0] != 1049)
                                        break;
                        case 1048:
                                tcursor(CURSOR_SAVE);
@@ -1193,7 +1340,7 @@ csihandle(void) {
 }
 
 void
-csidump(void) { 
+csidump(void) {
        int i;
        printf("ESC [ %s", escseq.priv ? "? " : "");
        if(escseq.narg)
@@ -1226,7 +1373,7 @@ tputc(char *c) {
                                csiparse(), csihandle();
                        }
                        /* TODO: handle other OSC */
-               } else if(term.esc & ESC_OSC) { 
+               } else if(term.esc & ESC_OSC) {
                        if(ascii == ';') {
                                term.titlelen = 0;
                                term.esc = ESC_START | ESC_TITLE;
@@ -1302,11 +1449,13 @@ tputc(char *c) {
                                break;
                        default:
                                fprintf(stderr, "erresc: unknown sequence ESC 0x%02X '%c'\n",
-                                   (unsigned char) ascii, isprint(ascii)?ascii:'.');
+                                   (uchar) ascii, isprint(ascii)?ascii:'.');
                                term.esc = 0;
                        }
                }
        } else {
+               if(sel.bx != -1 && BETWEEN(term.c.y, sel.by, sel.ey))
+                       sel.bx = -1;
                switch(ascii) {
                case '\t':
                        tputtab();
@@ -1374,9 +1523,11 @@ tresize(int col, int row) {
        /* resize to new height */
        term.line = realloc(term.line, row * sizeof(Line));
        term.alt  = realloc(term.alt,  row * sizeof(Line));
+       term.dirty = realloc(term.dirty, row * sizeof(*term.dirty));
 
        /* resize each row to new width, zero-pad if needed */
        for(i = 0; i < minrow; i++) {
+               term.dirty[i] = 1;
                term.line[i] = realloc(term.line[i], col * sizeof(Glyph));
                term.alt[i]  = realloc(term.alt[i],  col * sizeof(Glyph));
                for(x = mincol; x < col; x++) {
@@ -1387,6 +1538,7 @@ tresize(int col, int row) {
 
        /* allocate any new rows */
        for(/* i == minrow */; i < row; i++) {
+               term.dirty[i] = 1;
                term.line[i] = calloc(col, sizeof(Glyph));
                term.alt [i] = calloc(col, sizeof(Glyph));
        }
@@ -1397,6 +1549,7 @@ tresize(int col, int row) {
        tmoveto(term.c.x, term.c.y);
        /* reset scrolling region */
        tsetscroll(0, row-1);
+
        return (slide > 0);
 }
 
@@ -1434,9 +1587,9 @@ void
 xloadcols(void) {
        int i, r, g, b;
        XColor color;
-       unsigned long white = WhitePixel(xw.dpy, xw.scr);
+       ulong white = WhitePixel(xw.dpy, xw.scr);
 
-       for(i = 0; i < 16; i++) {
+       for(i = 0; i < LEN(colorname); i++) {
                if(!XAllocNamedColor(xw.dpy, xw.cmap, colorname[i], &color, &color)) {
                        dc.col[i] = white;
                        fprintf(stderr, "Could not allocate color '%s'\n", colorname[i]);
@@ -1471,7 +1624,7 @@ xloadcols(void) {
 
 void
 xclear(int x1, int y1, int x2, int y2) {
-       XSetForeground(xw.dpy, dc.gc, dc.col[DefaultBG]);
+       XSetForeground(xw.dpy, dc.gc, dc.col[IS_SET(MODE_REVERSE) ? DefaultFG : DefaultBG]);
        XFillRectangle(xw.dpy, xw.buf, dc.gc,
                       x1 * xw.cw, y1 * xw.ch,
                       (x2-x1+1) * xw.cw, (y2-y1+1) * xw.ch);
@@ -1541,6 +1694,7 @@ void
 xinit(void) {
        XSetWindowAttributes attrs;
        Cursor cursor;
+       Window parent;
 
        if(!(xw.dpy = XOpenDisplay(NULL)))
                die("Can't open display\n");
@@ -1550,7 +1704,7 @@ xinit(void) {
        initfonts(FONT, BOLDFONT);
 
        /* XXX: Assuming same size for bold font */
-       xw.cw = dc.font.rbearing - dc.font.lbearing;
+       xw.cw = dc.font.rbearing - dc.font.lbearing;
        xw.ch = dc.font.ascent + dc.font.descent;
 
        /* colors */
@@ -1558,8 +1712,8 @@ xinit(void) {
        xloadcols();
 
        /* window - default size */
-       xw.bufh = 24 * xw.ch;
-       xw.bufw = 80 * xw.cw;
+       xw.bufh = term.row * xw.ch;
+       xw.bufw = term.col * xw.cw;
        xw.h = xw.bufh + 2*BORDER;
        xw.w = xw.bufw + 2*BORDER;
 
@@ -1568,10 +1722,12 @@ xinit(void) {
        attrs.bit_gravity = NorthWestGravity;
        attrs.event_mask = FocusChangeMask | KeyPressMask
                | ExposureMask | VisibilityChangeMask | StructureNotifyMask
-               | PointerMotionMask | ButtonPressMask | ButtonReleaseMask;
+               | ButtonMotionMask | ButtonPressMask | ButtonReleaseMask
+               | EnterWindowMask | LeaveWindowMask;
        attrs.colormap = xw.cmap;
 
-       xw.win = XCreateWindow(xw.dpy, XRootWindow(xw.dpy, xw.scr), 0, 0,
+       parent = opt_embed ? strtol(opt_embed, NULL, 0) : XRootWindow(xw.dpy, xw.scr);
+       xw.win = XCreateWindow(xw.dpy, parent, 0, 0,
                        xw.w, xw.h, 0, XDefaultDepth(xw.dpy, xw.scr), InputOutput,
                        XDefaultVisual(xw.dpy, xw.scr),
                        CWBackPixel | CWBorderPixel | CWBitGravity | CWEventMask
@@ -1582,8 +1738,8 @@ xinit(void) {
 
        /* input methods */
        xw.xim = XOpenIM(xw.dpy, NULL, NULL, NULL);
-       xw.xic = XCreateIC(xw.xim, XNInputStyle, XIMPreeditNothing 
-                                          | XIMStatusNothing, XNClientWindow, xw.win, 
+       xw.xic = XCreateIC(xw.xim, XNInputStyle, XIMPreeditNothing
+                                          | XIMStatusNothing, XNClientWindow, xw.win,
                                           XNFocusWindow, xw.win, NULL);
        /* gc */
        dc.gc = XCreateGC(xw.dpy, xw.win, 0, NULL);
@@ -1591,33 +1747,41 @@ xinit(void) {
        /* white cursor, black outline */
        cursor = XCreateFontCursor(xw.dpy, XC_xterm);
        XDefineCursor(xw.dpy, xw.win, cursor);
-       XRecolorCursor(xw.dpy, cursor, 
+       XRecolorCursor(xw.dpy, cursor,
                &(XColor){.red = 0xffff, .green = 0xffff, .blue = 0xffff},
                &(XColor){.red = 0x0000, .green = 0x0000, .blue = 0x0000});
 
+       xw.xembed = XInternAtom(xw.dpy, "_XEMBED", False);
+
+       XStoreName(xw.dpy, xw.win, opt_title ? opt_title : "st");
        XMapWindow(xw.dpy, xw.win);
        xhints();
-       XStoreName(xw.dpy, xw.win, opt_title ? opt_title : "st");
        XSync(xw.dpy, 0);
 }
 
 void
 xdraws(char *s, Glyph base, int x, int y, int charlen, int bytelen) {
-       unsigned long xfg, xbg;
+       ulong xfg = dc.col[base.fg], xbg = dc.col[base.bg], temp;
        int winx = x*xw.cw, winy = y*xw.ch + dc.font.ascent, width = charlen*xw.cw;
        int i;
+       
+       /* only switch default fg/bg if term is in RV mode */
+       if(IS_SET(MODE_REVERSE)) {
+               if(base.fg == DefaultFG)
+                       xfg = dc.col[DefaultBG];
+               if(base.bg == DefaultBG)
+                       xbg = dc.col[DefaultFG];
+       }
 
        if(base.mode & ATTR_REVERSE)
-               xfg = dc.col[base.bg], xbg = dc.col[base.fg];
-       else
-               xfg = dc.col[base.fg], xbg = dc.col[base.bg];
+               temp = xfg, xfg = xbg, xbg = temp;
 
        XSetBackground(xw.dpy, dc.gc, xbg);
        XSetForeground(xw.dpy, dc.gc, xfg);
 
        if(base.mode & ATTR_GFX) {
                for(i = 0; i < bytelen; i++) {
-                       char c = gfx[(unsigned int)s[i] % 256];
+                       char c = gfx[(uint)s[i] % 256];
                        if(c)
                                s[i] = c;
                        else if(s[i] > 0x5f)
@@ -1626,12 +1790,20 @@ xdraws(char *s, Glyph base, int x, int y, int charlen, int bytelen) {
        }
 
        XmbDrawImageString(xw.dpy, xw.buf, base.mode & ATTR_BOLD ? dc.bfont.set : dc.font.set,
-           dc.gc, winx, winy, s, bytelen);
+               dc.gc, winx, winy, s, bytelen);
        
        if(base.mode & ATTR_UNDERLINE)
                XDrawLine(xw.dpy, xw.buf, dc.gc, winx, winy+1, winx+width-1, winy+1);
 }
 
+/* copy buffer pixmap to screen pixmap */
+void
+xcopy(int x, int y, int cols, int rows) {
+       int src_x = x*xw.cw, src_y = y*xw.ch, src_w = cols*xw.cw, src_h = rows*xw.ch;
+       int dst_x = BORDER+src_x, dst_y = BORDER+src_y;
+       XCopyArea(xw.dpy, xw.buf, xw.win, dc.gc, src_x, src_y, src_w, src_h, dst_x, dst_y);
+}
+
 void
 xdrawcursor(void) {
        static int oldx = 0;
@@ -1651,18 +1823,25 @@ xdrawcursor(void) {
                xdraws(term.line[oldy][oldx].c, term.line[oldy][oldx], oldx, oldy, 1, sl);
        } else
                xclear(oldx, oldy, oldx, oldy);
-       
+
+       xcopy(oldx, oldy, 1, 1);
+
        /* draw the new one */
        if(!(term.c.state & CURSOR_HIDE) && (xw.state & WIN_FOCUSED)) {
                sl = utf8size(g.c);
+               if(IS_SET(MODE_REVERSE))
+                       g.mode |= ATTR_REVERSE, g.fg = DefaultCS, g.bg = DefaultFG;
                xdraws(g.c, g, term.c.x, term.c.y, 1, sl);
                oldx = term.c.x, oldy = term.c.y;
        }
+
+       xcopy(term.c.x, term.c.y, 1, 1);
 }
 
-void 
+void
 draw() {
        drawregion(0, 0, term.col, term.row);
+       gettimeofday(&xw.lastdraw, NULL);
 }
 
 void
@@ -1674,8 +1853,11 @@ drawregion(int x1, int y1, int x2, int y2) {
        if(!(xw.state & WIN_VISIBLE))
                return;
 
-       xclear(x1, y1, x2-1, y2-1);
        for(y = y1; y < y2; y++) {
+               if(!term.dirty[y])
+                       continue;
+               xclear(0, y, term.col, y);
+               term.dirty[y] = 0;
                base = term.line[y][0];
                ic = ib = ox = 0;
                for(x = x1; x < x2; x++) {
@@ -1683,7 +1865,7 @@ drawregion(int x1, int y1, int x2, int y2) {
                        if(sel.bx != -1 && *(new.c) && selected(x, y))
                                new.mode ^= ATTR_REVERSE;
                        if(ib > 0 && (!(new.state & GLYPH_SET) || ATTRCMP(base, new) ||
-                                       ib >= DRAW_BUF_SIZ-UTF_SIZ)) {
+                                                 ib >= DRAW_BUF_SIZ-UTF_SIZ)) {
                                xdraws(buf, base, ox, y, ic, ib);
                                ic = ib = 0;
                        }
@@ -1700,9 +1882,9 @@ drawregion(int x1, int y1, int x2, int y2) {
                }
                if(ib > 0)
                        xdraws(buf, base, ox, y, ic, ib);
+               xcopy(0, y, term.col, 1);
        }
        xdrawcursor();
-       XCopyArea(xw.dpy, xw.buf, xw.win, dc.gc, 0, 0, xw.bufw, xw.bufh, BORDER, BORDER);
 }
 
 void
@@ -1711,7 +1893,7 @@ expose(XEvent *ev) {
        if(xw.state & WIN_REDRAW) {
                if(!e->count) {
                        xw.state &= ~WIN_REDRAW;
-                       draw();
+                       xcopy(0, 0, term.col, term.row);
                }
        } else
                XCopyArea(xw.dpy, xw.buf, xw.win, dc.gc, e->x-BORDER, e->y-BORDER,
@@ -1752,11 +1934,14 @@ focus(XEvent *ev) {
 }
 
 char*
-kmap(KeySym k, unsigned int state) {
+kmap(KeySym k, uint state) {
        int i;
-       for(i = 0; i < LEN(key); i++)
-               if(key[i].k == k && (key[i].mask == 0 || key[i].mask & state))
+       state &= ~Mod2Mask;
+       for(i = 0; i < LEN(key); i++) {
+               uint mask = key[i].mask;
+               if(key[i].k == k && ((state & mask) == mask || (mask == XK_NO_MOD && !state)))
                        return (char*)key[i].s;
+       }
        return NULL;
 }
 
@@ -1811,6 +1996,21 @@ kpress(XEvent *ev) {
 }
 
 void
+cmessage(XEvent *e) {
+       /* See xembed specs
+          http://standards.freedesktop.org/xembed-spec/xembed-spec-latest.html */
+       if (e->xclient.message_type == xw.xembed && e->xclient.format == 32) {
+               if (e->xclient.data.l[1] == XEMBED_FOCUS_IN) {
+                       xw.state |= WIN_FOCUSED;
+                       xseturgency(0);
+               } else if (e->xclient.data.l[1] == XEMBED_FOCUS_OUT) {
+                       xw.state &= ~WIN_FOCUSED;
+               }
+               draw();
+       }
+}
+
+void
 resize(XEvent *e) {
        int col, row;
        
@@ -1829,25 +2029,42 @@ resize(XEvent *e) {
        xresize(col, row);
 }
 
+bool
+last_draw_too_old(void) {
+       struct timeval now;
+       gettimeofday(&now, NULL);
+       return TIMEDIFF(now, xw.lastdraw) >= DRAW_TIMEOUT/1000;
+}
+
 void
 run(void) {
        XEvent ev;
        fd_set rfd;
        int xfd = XConnectionNumber(xw.dpy);
-
+       struct timeval timeout = {0};
+       bool stuff_to_print = 0;
+       
        for(;;) {
                FD_ZERO(&rfd);
                FD_SET(cmdfd, &rfd);
                FD_SET(xfd, &rfd);
-               if(select(MAX(xfd, cmdfd)+1, &rfd, NULL, NULL, NULL) < 0) {
+               timeout.tv_sec  = 0;
+               timeout.tv_usec = SELECT_TIMEOUT;
+               if(select(MAX(xfd, cmdfd)+1, &rfd, NULL, NULL, &timeout) < 0) {
                        if(errno == EINTR)
                                continue;
                        die("select failed: %s\n", SERRNO);
                }
                if(FD_ISSET(cmdfd, &rfd)) {
                        ttyread();
-                       draw(); 
+                       stuff_to_print = 1;
+               }
+
+               if(stuff_to_print && last_draw_too_old()) {
+                       stuff_to_print = 0;
+                       draw();
                }
+
                while(XPending(xw.dpy)) {
                        XNextEvent(xw.dpy, &ev);
                        if(XFilterEvent(&ev, xw.win))
@@ -1870,17 +2087,20 @@ main(int argc, char *argv[]) {
                case 'c':
                        if(++i < argc) opt_class = argv[i];
                        break;
+               case 'w':
+                       if(++i < argc) opt_embed = argv[i];
+                       break;
                case 'e':
+                       /* eat every remaining arguments */
                        if(++i < argc) opt_cmd = &argv[i];
-                       break;
+                       goto run;
                case 'v':
                default:
                        die(USAGE);
                }
-               /* -e eats every remaining arguments */
-               if(opt_cmd)
-                       break;
        }
+
+ run:
        setlocale(LC_CTYPE, "");
        tnew(80, 24);
        ttynew();