JasonWoof Got questions, comments, patches, etc.? Contact Jason Woofenden
applied parts of Connor Lane Smith's cleanup patch.
[st.git] / st.c
diff --git a/st.c b/st.c
index 11ea9fc..01ffa21 100644 (file)
--- a/st.c
+++ b/st.c
@@ -34,8 +34,8 @@
 #endif
 
 #define USAGE \
-       "st-" VERSION ", (c) 2010 st engineers\n" \
-       "usage: st [-t title] [-c class] [-v] [-e cmd]\n"
+       "st-" VERSION ", (c) 2010-2011 st engineers\n" \
+       "usage: st [-t title] [-c class] [-v] [-e command...]\n"
 
 /* Arbitrary sizes */
 #define ESC_TITLE_SIZ 256
@@ -53,7 +53,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,7 +64,7 @@ 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_MOUSE=32 };
 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 };
 
@@ -163,8 +165,8 @@ typedef struct {
 
 #include "config.h"
 
-static void die(const char *errstr, ...);
-static void draw();
+static void die(const char*, ...);
+static void draw(void);
 static void drawregion(int, int, int, int);
 static void execsh(void);
 static void sigchld(int);
@@ -363,11 +365,11 @@ int
 utf8size(char *s) {
        unsigned char c = *s;
 
-       if (~c&B7)
+       if(~c&B7)
                return 1;
-       else if ((c&(B7|B6|B5)) == (B7|B6))
+       else if((c&(B7|B6|B5)) == (B7|B6))
                return 2;
-       else if ((c&(B7|B6|B5|B4)) == (B7|B6|B5))
+       else if((c&(B7|B6|B5|B4)) == (B7|B6|B5))
                return 3;
        else
                return 4;
@@ -398,11 +400,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 +412,38 @@ 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 };
+       
+       if(!IS_SET(MODE_MOUSE))
+               return;
+       
+       /* from urxvt */
+       if(e->xbutton.type == ButtonRelease || button == AnyButton)
+               button = 3;
+       else {
+               button -= Button1;
+               if(button >= 3)
+                       button += 64 - 3;
+       }
+       
+       buf[3] = 32 + button + (state & ShiftMask ? 4 : 0)
+               + (state & Mod4Mask    ? 8  : 0)
+               + (state & ControlMask ? 16 : 0);
+       
+       ttywrite(buf, sizeof(buf));
+}
+
+void
 bpress(XEvent *e) {
+       mousereport(e);
        sel.mode = 1;
-       sel.ex = sel.bx = (e->xbutton.x - BORDER)/xw.cw;
-       sel.ey = sel.by = (e->xbutton.y - BORDER)/xw.ch;
+       sel.ex = sel.bx = X2COL(e->xbutton.x);
+       sel.ey = sel.by = Y2ROW(e->xbutton.y);
 }
 
 void
@@ -523,43 +553,39 @@ xsetsel(char *str) {
 void
 brelease(XEvent *e) {
        int b;
+
        sel.mode = 0;
        getbuttoninfo(e, &b, &sel.ex, &sel.ey);
-       
+       mousereport(e);
        if(sel.bx == sel.ex && sel.by == sel.ey) {
                sel.bx = -1;
                if(b == 2)
                        selpaste();
-
                else if(b == 1) {
-                       /* double click to select word */
                        struct timeval now;
                        gettimeofday(&now, NULL);
 
-                       if(TIMEDIFFERENCE(now, sel.tclick1) <= DOUBLECLICK_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(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(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(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();
                        }
-
-                       /* triple click on the line */
-                       if(TIMEDIFFERENCE(now, sel.tclick2) <= TRIPLECLICK_TIMEOUT) {
-                               sel.b.x = sel.bx = 0;
-                               sel.e.x = sel.ex = term.col;
-                               sel.b.y = sel.e.y = sel.ey;
-                               selcopy();
-                       }
                }
-       } else {
-               if(b == 1) 
-                       selcopy();
-       }
+       } else if(b == 1)
+               selcopy();
        memcpy(&sel.tclick2, &sel.tclick1, sizeof(struct timeval));
        gettimeofday(&sel.tclick1, NULL);
        draw();
@@ -568,7 +594,7 @@ brelease(XEvent *e) {
 void
 bmotion(XEvent *e) {
        if(sel.mode) {
-               int oldey = sel.ey, 
+               int oldey = sel.ey,
                        oldex = sel.ex;
                getbuttoninfo(e, NULL, &sel.ex, &sel.ey);
 
@@ -602,7 +628,7 @@ execsh(void) {
        exit(EXIT_FAILURE);
 }
 
-void 
+void
 sigchld(int a) {
        int stat = 0;
        if(waitpid(pid, &stat, 0) < 0)
@@ -655,7 +681,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 */
@@ -683,10 +709,6 @@ ttyread(void) {
 
 void
 ttywrite(const char *s, size_t n) {
-       {size_t nn;
-               for(nn = 0; nn < n; nn++)
-                       dump(s[nn]);
-       }
        if(write(cmdfd, s, n) == -1)
                die("write error on tty: %s\n", SERRNO);
 }
@@ -715,8 +737,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};
        
@@ -771,9 +793,9 @@ 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;
        }
 }
@@ -903,47 +925,47 @@ 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) {
+                       if(i + 2 < l && attr[i + 1] == 5) {
                                i += 2;
-                               if (BETWEEN(attr[i], 0, 255))
+                               if(BETWEEN(attr[i], 0, 255))
                                        term.c.attr.fg = attr[i];
                                else
                                        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;
                        break;
                case 48:
-                       if (i + 2 < l && attr[i + 1] == 5) {
+                       if(i + 2 < l && attr[i + 1] == 5) {
                                i += 2;
-                               if (BETWEEN(attr[i], 0, 255))
+                               if(BETWEEN(attr[i], 0, 255))
                                        term.c.attr.bg = attr[i];
                                else
                                        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;
@@ -957,7 +979,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;
@@ -977,7 +999,7 @@ tsetscroll(int t, int b) {
                b = temp;
        }
        term.top = t;
-       term.bot = b;    
+       term.bot = b;
 }
 
 void
@@ -1094,6 +1116,9 @@ csihandle(void) {
                        case 25:
                                term.c.state |= CURSOR_HIDE;
                                break;
+                       case 1000: /* disable X11 xterm mouse reporting */
+                               term.mode &= ~MODE_MOUSE;
+                               break;
                        case 1049: /* = 1047 and 1048 */
                        case 1047:
                                if(IS_SET(MODE_ALTSCREEN)) {
@@ -1157,6 +1182,9 @@ csihandle(void) {
                        case 25:
                                term.c.state &= ~CURSOR_HIDE;
                                break;
+                       case 1000: /* enable X11 xterm mouse reporting */
+                               term.mode |= MODE_MOUSE;
+                               break;
                        case 1049: /* = 1047 and 1048 */
                        case 1047:
                                if(IS_SET(MODE_ALTSCREEN))
@@ -1202,7 +1230,7 @@ csihandle(void) {
 }
 
 void
-csidump(void) { 
+csidump(void) {
        int i;
        printf("ESC [ %s", escseq.priv ? "? " : "");
        if(escseq.narg)
@@ -1235,7 +1263,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;
@@ -1348,7 +1376,6 @@ tputc(char *c) {
                                tmoveto(term.c.x+1, term.c.y);
                        else
                                term.c.state |= CURSOR_WRAPNEXT;
-                       break;
                }
        }
 }
@@ -1447,7 +1474,7 @@ xloadcols(void) {
        unsigned long white = WhitePixel(xw.dpy, xw.scr);
 
        for(i = 0; i < 16; i++) {
-               if (!XAllocNamedColor(xw.dpy, xw.cmap, colorname[i], &color, &color)) {
+               if(!XAllocNamedColor(xw.dpy, xw.cmap, colorname[i], &color, &color)) {
                        dc.col[i] = white;
                        fprintf(stderr, "Could not allocate color '%s'\n", colorname[i]);
                } else
@@ -1461,7 +1488,7 @@ xloadcols(void) {
                                color.red = r == 0 ? 0 : 0x3737 + 0x2828 * r;
                                color.green = g == 0 ? 0 : 0x3737 + 0x2828 * g;
                                color.blue = b == 0 ? 0 : 0x3737 + 0x2828 * b;
-                               if (!XAllocColor(xw.dpy, xw.cmap, &color)) {
+                               if(!XAllocColor(xw.dpy, xw.cmap, &color)) {
                                        dc.col[i] = white;
                                        fprintf(stderr, "Could not allocate color %d\n", i);
                                } else
@@ -1488,8 +1515,7 @@ xclear(int x1, int y1, int x2, int y2) {
 }
 
 void
-xhints(void)
-{
+xhints(void) {
        XClassHint class = {opt_class ? opt_class : TNAME, TNAME};
        XWMHints wm = {.flags = InputHint, .input = 1};
        XSizeHints size = {
@@ -1505,8 +1531,7 @@ xhints(void)
 }
 
 XFontSet
-xinitfont(char *fontstr)
-{
+xinitfont(char *fontstr) {
        XFontSet set;
        char *def, **missing;
        int n;
@@ -1522,8 +1547,7 @@ xinitfont(char *fontstr)
 }
 
 void
-xgetfontinfo(XFontSet set, int *ascent, int *descent, short *lbearing, short *rbearing)
-{
+xgetfontinfo(XFontSet set, int *ascent, int *descent, short *lbearing, short *rbearing) {
        XFontStruct **xfonts;
        char **font_names;
        int i, n;
@@ -1540,8 +1564,7 @@ xgetfontinfo(XFontSet set, int *ascent, int *descent, short *lbearing, short *rb
 }
 
 void
-initfonts(char *fontstr, char *bfontstr)
-{
+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);
@@ -1564,7 +1587,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 */
@@ -1596,8 +1619,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);
@@ -1605,7 +1628,7 @@ 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});
 
@@ -1640,7 +1663,7 @@ 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);
@@ -1674,42 +1697,8 @@ xdrawcursor(void) {
        }
 }
 
-#ifdef DEBUG
-/* basic drawing routines */
-void
-xdrawc(int x, int y, Glyph g) {
-       int sl = utf8size(g.c);
-       XRectangle r = { x * xw.cw, y * xw.ch, xw.cw, xw.ch };
-       XSetBackground(xw.dpy, dc.gc, dc.col[g.bg]);
-       XSetForeground(xw.dpy, dc.gc, dc.col[g.fg]);
-       XmbDrawImageString(xw.dpy, xw.buf, g.mode&ATTR_BOLD?dc.bfont.fs:dc.font.fs,
-           dc.gc, r.x, r.y+dc.font.ascent, g.c, sl);
-}
-
-void 
-drawregion(int x0, int x1, int y0, int y1) {
-       draw();
-}
-
 void
 draw() {
-       int x, y;
-
-       xclear(0, 0, term.col-1, term.row-1);
-       for(y = 0; y < term.row; y++)
-               for(x = 0; x < term.col; x++)
-                       if(term.line[y][x].state & GLYPH_SET)
-                               xdrawc(x, y, term.line[y][x]);
-
-       xdrawcursor();
-       XCopyArea(xw.dpy, xw.buf, xw.win, dc.gc, 0, 0, xw.bufw, xw.bufh, BORDER, BORDER);
-       XFlush(xw.dpy);
-}
-
-#else
-/* optimized drawing routine */
-void 
-draw() {
        drawregion(0, 0, term.col, term.row);
 }
 
@@ -1753,8 +1742,6 @@ drawregion(int x1, int y1, int x2, int y2) {
        XCopyArea(xw.dpy, xw.buf, xw.win, dc.gc, 0, 0, xw.bufw, xw.bufh, BORDER, BORDER);
 }
 
-#endif
-
 void
 expose(XEvent *ev) {
        XExposeEvent *e = &ev->xexpose;
@@ -1835,6 +1822,7 @@ kpress(XEvent *ev) {
                case XK_Down:
                case XK_Left:
                case XK_Right:
+                       /* XXX: shift up/down doesn't work */
                        sprintf(buf, "\033%c%c", IS_SET(MODE_APPKEYPAD) ? 'O' : '[', (shift ? "dacb":"DACB")[ksym - XK_Left]);
                        ttywrite(buf, 3);
                        break;
@@ -1895,11 +1883,11 @@ run(void) {
                }
                if(FD_ISSET(cmdfd, &rfd)) {
                        ttyread();
-                       draw(); 
+                       draw();
                }
                while(XPending(xw.dpy)) {
                        XNextEvent(xw.dpy, &ev);
-                       if (XFilterEvent(&ev, xw.win))
+                       if(XFilterEvent(&ev, xw.win))
                                continue;
                        if(handler[ev.type])
                                (handler[ev.type])(&ev);
@@ -1919,17 +1907,17 @@ main(int argc, char *argv[]) {
                case 'c':
                        if(++i < argc) opt_class = argv[i];
                        break;
-               case 'e':
+               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();