1 b3994ec5 2003-12-11 devnull #include <u.h>
   2 b3994ec5 2003-12-11 devnull #include <libc.h>
   3 b3994ec5 2003-12-11 devnull #include <draw.h>
   4 b3994ec5 2003-12-11 devnull #include <thread.h>
   5 b3994ec5 2003-12-11 devnull #include <cursor.h>
   6 b3994ec5 2003-12-11 devnull #include <mouse.h>
   7 b3994ec5 2003-12-11 devnull #include <keyboard.h>
   8 b3994ec5 2003-12-11 devnull #include <frame.h>
   9 b3994ec5 2003-12-11 devnull #include <fcall.h>
  10 b3994ec5 2003-12-11 devnull #include <plumb.h>
  11 67dbeee5 2017-10-10 rsc #include <libsec.h>
  12 b3994ec5 2003-12-11 devnull #include "dat.h"
  13 b3994ec5 2003-12-11 devnull #include "fns.h"
  14 b3994ec5 2003-12-11 devnull 	/* for generating syms in mkfile only: */
  15 b3994ec5 2003-12-11 devnull 	#include <bio.h>
  16 b3994ec5 2003-12-11 devnull 	#include "edit.h"
  17 b3994ec5 2003-12-11 devnull 
  18 b3994ec5 2003-12-11 devnull void	mousethread(void*);
  19 b3994ec5 2003-12-11 devnull void	keyboardthread(void*);
  20 b3994ec5 2003-12-11 devnull void	waitthread(void*);
  21 b3994ec5 2003-12-11 devnull void	xfidallocthread(void*);
  22 b3994ec5 2003-12-11 devnull void	newwindowthread(void*);
  23 daea2c7d 2009-09-25 russcox void	plumbproc(void*);
  24 daea2c7d 2009-09-25 russcox int	timefmt(Fmt*);
  25 b3994ec5 2003-12-11 devnull 
  26 b3994ec5 2003-12-11 devnull Reffont	**fontcache;
  27 b3994ec5 2003-12-11 devnull int		nfontcache;
  28 b3994ec5 2003-12-11 devnull char		wdir[512] = ".";
  29 b3994ec5 2003-12-11 devnull Reffont	*reffonts[2];
  30 b3994ec5 2003-12-11 devnull int		snarffd = -1;
  31 b3994ec5 2003-12-11 devnull int		mainpid;
  32 d8c78a8d 2005-01-10 devnull int		swapscrollbuttons = FALSE;
  33 cd5a7378 2008-04-17 rsc char		*mtpt;
  34 b3994ec5 2003-12-11 devnull 
  35 b3994ec5 2003-12-11 devnull enum{
  36 b3994ec5 2003-12-11 devnull 	NSnarf = 1000	/* less than 1024, I/O buffer size */
  37 b3994ec5 2003-12-11 devnull };
  38 b3994ec5 2003-12-11 devnull Rune	snarfrune[NSnarf+1];
  39 b3994ec5 2003-12-11 devnull 
  40 b3994ec5 2003-12-11 devnull char		*fontnames[2] =
  41 b3994ec5 2003-12-11 devnull {
  42 4590ad02 2006-03-19 devnull 	"/lib/font/bit/lucsans/euro.8.font",
  43 cbeb0b26 2006-04-01 devnull 	"/lib/font/bit/lucm/unicode.9.font"
  44 b3994ec5 2003-12-11 devnull };
  45 b3994ec5 2003-12-11 devnull 
  46 b3994ec5 2003-12-11 devnull Command *command;
  47 b3994ec5 2003-12-11 devnull 
  48 334cb1e9 2004-12-27 devnull void	shutdownthread(void*);
  49 b3994ec5 2003-12-11 devnull void	acmeerrorinit(void);
  50 b3994ec5 2003-12-11 devnull void	readfile(Column*, char*);
  51 4da83e7c 2004-03-05 devnull static int	shutdown(void*, char*);
  52 b3994ec5 2003-12-11 devnull 
  53 b3994ec5 2003-12-11 devnull void
  54 b3994ec5 2003-12-11 devnull derror(Display *d, char *errorstr)
  55 b3994ec5 2003-12-11 devnull {
  56 b3994ec5 2003-12-11 devnull 	USED(d);
  57 b3994ec5 2003-12-11 devnull 	error(errorstr);
  58 b3994ec5 2003-12-11 devnull }
  59 b3994ec5 2003-12-11 devnull 
  60 b3994ec5 2003-12-11 devnull void
  61 b3994ec5 2003-12-11 devnull threadmain(int argc, char *argv[])
  62 b3994ec5 2003-12-11 devnull {
  63 b3994ec5 2003-12-11 devnull 	int i;
  64 b3994ec5 2003-12-11 devnull 	char *p, *loadfile;
  65 b3994ec5 2003-12-11 devnull 	Column *c;
  66 b3994ec5 2003-12-11 devnull 	int ncol;
  67 b3994ec5 2003-12-11 devnull 	Display *d;
  68 b3994ec5 2003-12-11 devnull 
  69 b3994ec5 2003-12-11 devnull 	rfork(RFENVG|RFNAMEG);
  70 b3994ec5 2003-12-11 devnull 
  71 b3994ec5 2003-12-11 devnull 	ncol = -1;
  72 b3994ec5 2003-12-11 devnull 
  73 b3994ec5 2003-12-11 devnull 	loadfile = nil;
  74 b3994ec5 2003-12-11 devnull 	ARGBEGIN{
  75 012a8a02 2004-10-22 devnull 	case 'D':
  76 012a8a02 2004-10-22 devnull 		{extern int _threaddebuglevel;
  77 012a8a02 2004-10-22 devnull 		_threaddebuglevel = ~0;
  78 012a8a02 2004-10-22 devnull 		}
  79 012a8a02 2004-10-22 devnull 		break;
  80 5a8e63b2 2004-02-29 devnull 	case 'a':
  81 5a8e63b2 2004-02-29 devnull 		globalautoindent = TRUE;
  82 5a8e63b2 2004-02-29 devnull 		break;
  83 b3994ec5 2003-12-11 devnull 	case 'b':
  84 b3994ec5 2003-12-11 devnull 		bartflag = TRUE;
  85 b3994ec5 2003-12-11 devnull 		break;
  86 b3994ec5 2003-12-11 devnull 	case 'c':
  87 b3994ec5 2003-12-11 devnull 		p = ARGF();
  88 b3994ec5 2003-12-11 devnull 		if(p == nil)
  89 b3994ec5 2003-12-11 devnull 			goto Usage;
  90 b3994ec5 2003-12-11 devnull 		ncol = atoi(p);
  91 b3994ec5 2003-12-11 devnull 		if(ncol <= 0)
  92 b3994ec5 2003-12-11 devnull 			goto Usage;
  93 b3994ec5 2003-12-11 devnull 		break;
  94 b3994ec5 2003-12-11 devnull 	case 'f':
  95 b3994ec5 2003-12-11 devnull 		fontnames[0] = ARGF();
  96 b3994ec5 2003-12-11 devnull 		if(fontnames[0] == nil)
  97 b3994ec5 2003-12-11 devnull 			goto Usage;
  98 b3994ec5 2003-12-11 devnull 		break;
  99 b3994ec5 2003-12-11 devnull 	case 'F':
 100 b3994ec5 2003-12-11 devnull 		fontnames[1] = ARGF();
 101 b3994ec5 2003-12-11 devnull 		if(fontnames[1] == nil)
 102 b3994ec5 2003-12-11 devnull 			goto Usage;
 103 b3994ec5 2003-12-11 devnull 		break;
 104 b3994ec5 2003-12-11 devnull 	case 'l':
 105 b3994ec5 2003-12-11 devnull 		loadfile = ARGF();
 106 b3994ec5 2003-12-11 devnull 		if(loadfile == nil)
 107 cd5a7378 2008-04-17 rsc 			goto Usage;
 108 cd5a7378 2008-04-17 rsc 		break;
 109 cd5a7378 2008-04-17 rsc 	case 'm':
 110 cd5a7378 2008-04-17 rsc 		mtpt = ARGF();
 111 cd5a7378 2008-04-17 rsc 		if(mtpt == nil)
 112 b3994ec5 2003-12-11 devnull 			goto Usage;
 113 b3994ec5 2003-12-11 devnull 		break;
 114 d8c78a8d 2005-01-10 devnull 	case 'r':
 115 d8c78a8d 2005-01-10 devnull 		swapscrollbuttons = TRUE;
 116 d8c78a8d 2005-01-10 devnull 		break;
 117 be36ff68 2004-04-29 devnull 	case 'W':
 118 be36ff68 2004-04-29 devnull 		winsize = ARGF();
 119 be36ff68 2004-04-29 devnull 		if(winsize == nil)
 120 be36ff68 2004-04-29 devnull 			goto Usage;
 121 be36ff68 2004-04-29 devnull 		break;
 122 b3994ec5 2003-12-11 devnull 	default:
 123 b3994ec5 2003-12-11 devnull 	Usage:
 124 be36ff68 2004-04-29 devnull 		fprint(2, "usage: acme -a -c ncol -f fontname -F fixedwidthfontname -l loadfile -W winsize\n");
 125 38c10d1a 2005-01-17 devnull 		threadexitsall("usage");
 126 b3994ec5 2003-12-11 devnull 	}ARGEND
 127 b3994ec5 2003-12-11 devnull 
 128 6d7fdb24 2004-12-27 devnull 	fontnames[0] = estrdup(fontnames[0]);
 129 6d7fdb24 2004-12-27 devnull 	fontnames[1] = estrdup(fontnames[1]);
 130 6d7fdb24 2004-12-27 devnull 
 131 c591e1e6 2004-04-25 devnull 	quotefmtinstall();
 132 daea2c7d 2009-09-25 russcox 	fmtinstall('t', timefmt);
 133 daea2c7d 2009-09-25 russcox 
 134 b3994ec5 2003-12-11 devnull 	cputype = getenv("cputype");
 135 b3994ec5 2003-12-11 devnull 	objtype = getenv("objtype");
 136 c8b6342d 2005-01-13 devnull 	home = getenv("HOME");
 137 81c2c5e7 2012-10-21 rsc 	acmeshell = getenv("acmeshell");
 138 81c2c5e7 2012-10-21 rsc 	if(acmeshell && *acmeshell == '\0')
 139 81c2c5e7 2012-10-21 rsc 		acmeshell = nil;
 140 b3994ec5 2003-12-11 devnull 	p = getenv("tabstop");
 141 b3994ec5 2003-12-11 devnull 	if(p != nil){
 142 b3994ec5 2003-12-11 devnull 		maxtab = strtoul(p, nil, 0);
 143 b3994ec5 2003-12-11 devnull 		free(p);
 144 b3994ec5 2003-12-11 devnull 	}
 145 b3994ec5 2003-12-11 devnull 	if(maxtab == 0)
 146 c96d8325 2012-11-26 rsc 		maxtab = 4;
 147 b3994ec5 2003-12-11 devnull 	if(loadfile)
 148 b3994ec5 2003-12-11 devnull 		rowloadfonts(loadfile);
 149 b3994ec5 2003-12-11 devnull 	putenv("font", fontnames[0]);
 150 b3994ec5 2003-12-11 devnull 	snarffd = open("/dev/snarf", OREAD|OCEXEC);
 151 b3994ec5 2003-12-11 devnull /*
 152 b3994ec5 2003-12-11 devnull 	if(cputype){
 153 b3994ec5 2003-12-11 devnull 		sprint(buf, "/acme/bin/%s", cputype);
 154 b3994ec5 2003-12-11 devnull 		bind(buf, "/bin", MBEFORE);
 155 b3994ec5 2003-12-11 devnull 	}
 156 b3994ec5 2003-12-11 devnull 	bind("/acme/bin", "/bin", MBEFORE);
 157 b3994ec5 2003-12-11 devnull */
 158 b3994ec5 2003-12-11 devnull 	getwd(wdir, sizeof wdir);
 159 b3994ec5 2003-12-11 devnull 
 160 b3994ec5 2003-12-11 devnull /*
 161 b3994ec5 2003-12-11 devnull 	if(geninitdraw(nil, derror, fontnames[0], "acme", nil, Refnone) < 0){
 162 b3994ec5 2003-12-11 devnull 		fprint(2, "acme: can't open display: %r\n");
 163 38c10d1a 2005-01-17 devnull 		threadexitsall("geninitdraw");
 164 b3994ec5 2003-12-11 devnull 	}
 165 b3994ec5 2003-12-11 devnull */
 166 b3994ec5 2003-12-11 devnull 	if(initdraw(derror, fontnames[0], "acme") < 0){
 167 b3994ec5 2003-12-11 devnull 		fprint(2, "acme: can't open display: %r\n");
 168 38c10d1a 2005-01-17 devnull 		threadexitsall("initdraw");
 169 b3994ec5 2003-12-11 devnull 	}
 170 b3994ec5 2003-12-11 devnull 
 171 b3994ec5 2003-12-11 devnull 	d = display;
 172 b3994ec5 2003-12-11 devnull 	font = d->defaultfont;
 173 cbeb0b26 2006-04-01 devnull /*assert(font); */
 174 b3994ec5 2003-12-11 devnull 
 175 b3994ec5 2003-12-11 devnull 	reffont.f = font;
 176 b3994ec5 2003-12-11 devnull 	reffonts[0] = &reffont;
 177 b3994ec5 2003-12-11 devnull 	incref(&reffont.ref);	/* one to hold up 'font' variable */
 178 b3994ec5 2003-12-11 devnull 	incref(&reffont.ref);	/* one to hold up reffonts[0] */
 179 b3994ec5 2003-12-11 devnull 	fontcache = emalloc(sizeof(Reffont*));
 180 b3994ec5 2003-12-11 devnull 	nfontcache = 1;
 181 b3994ec5 2003-12-11 devnull 	fontcache[0] = &reffont;
 182 b3994ec5 2003-12-11 devnull 
 183 b3994ec5 2003-12-11 devnull 	iconinit();
 184 b3994ec5 2003-12-11 devnull 	timerinit();
 185 b3994ec5 2003-12-11 devnull 	rxinit();
 186 b3994ec5 2003-12-11 devnull 
 187 b3994ec5 2003-12-11 devnull 	cwait = threadwaitchan();
 188 b3994ec5 2003-12-11 devnull 	ccommand = chancreate(sizeof(Command**), 0);
 189 b3994ec5 2003-12-11 devnull 	ckill = chancreate(sizeof(Rune*), 0);
 190 b3994ec5 2003-12-11 devnull 	cxfidalloc = chancreate(sizeof(Xfid*), 0);
 191 b3994ec5 2003-12-11 devnull 	cxfidfree = chancreate(sizeof(Xfid*), 0);
 192 b3994ec5 2003-12-11 devnull 	cnewwindow = chancreate(sizeof(Channel*), 0);
 193 b3994ec5 2003-12-11 devnull 	cerr = chancreate(sizeof(char*), 0);
 194 b3994ec5 2003-12-11 devnull 	cedit = chancreate(sizeof(int), 0);
 195 b3994ec5 2003-12-11 devnull 	cexit = chancreate(sizeof(int), 0);
 196 8ad51794 2004-03-25 devnull 	cwarn = chancreate(sizeof(void*), 1);
 197 8ad51794 2004-03-25 devnull 	if(cwait==nil || ccommand==nil || ckill==nil || cxfidalloc==nil || cxfidfree==nil || cerr==nil || cexit==nil || cwarn==nil){
 198 b3994ec5 2003-12-11 devnull 		fprint(2, "acme: can't create initial channels: %r\n");
 199 38c10d1a 2005-01-17 devnull 		threadexitsall("channels");
 200 b3994ec5 2003-12-11 devnull 	}
 201 cb1ac4c4 2008-03-07 rsc 	chansetname(ccommand, "ccommand");
 202 cb1ac4c4 2008-03-07 rsc 	chansetname(ckill, "ckill");
 203 cb1ac4c4 2008-03-07 rsc 	chansetname(cxfidalloc, "cxfidalloc");
 204 cb1ac4c4 2008-03-07 rsc 	chansetname(cxfidfree, "cxfidfree");
 205 cb1ac4c4 2008-03-07 rsc 	chansetname(cnewwindow, "cnewwindow");
 206 cb1ac4c4 2008-03-07 rsc 	chansetname(cerr, "cerr");
 207 cb1ac4c4 2008-03-07 rsc 	chansetname(cedit, "cedit");
 208 cb1ac4c4 2008-03-07 rsc 	chansetname(cexit, "cexit");
 209 cb1ac4c4 2008-03-07 rsc 	chansetname(cwarn, "cwarn");
 210 b3994ec5 2003-12-11 devnull 
 211 b3994ec5 2003-12-11 devnull 	mousectl = initmouse(nil, screen);
 212 b3994ec5 2003-12-11 devnull 	if(mousectl == nil){
 213 b3994ec5 2003-12-11 devnull 		fprint(2, "acme: can't initialize mouse: %r\n");
 214 38c10d1a 2005-01-17 devnull 		threadexitsall("mouse");
 215 b3994ec5 2003-12-11 devnull 	}
 216 b3994ec5 2003-12-11 devnull 	mouse = &mousectl->m;
 217 b3994ec5 2003-12-11 devnull 	keyboardctl = initkeyboard(nil);
 218 b3994ec5 2003-12-11 devnull 	if(keyboardctl == nil){
 219 b3994ec5 2003-12-11 devnull 		fprint(2, "acme: can't initialize keyboard: %r\n");
 220 38c10d1a 2005-01-17 devnull 		threadexitsall("keyboard");
 221 b3994ec5 2003-12-11 devnull 	}
 222 b3994ec5 2003-12-11 devnull 	mainpid = getpid();
 223 2277c5d7 2004-03-21 devnull 	startplumbing();
 224 2277c5d7 2004-03-21 devnull /*
 225 b3994ec5 2003-12-11 devnull 	plumbeditfd = plumbopen("edit", OREAD|OCEXEC);
 226 b3994ec5 2003-12-11 devnull 	if(plumbeditfd < 0)
 227 b3994ec5 2003-12-11 devnull 		fprint(2, "acme: can't initialize plumber: %r\n");
 228 b3994ec5 2003-12-11 devnull 	else{
 229 b3994ec5 2003-12-11 devnull 		cplumb = chancreate(sizeof(Plumbmsg*), 0);
 230 5a8e63b2 2004-02-29 devnull 		threadcreate(plumbproc, nil, STACK);
 231 b3994ec5 2003-12-11 devnull 	}
 232 b3994ec5 2003-12-11 devnull 	plumbsendfd = plumbopen("send", OWRITE|OCEXEC);
 233 2277c5d7 2004-03-21 devnull */
 234 b3994ec5 2003-12-11 devnull 
 235 b3994ec5 2003-12-11 devnull 	fsysinit();
 236 b3994ec5 2003-12-11 devnull 
 237 b3994ec5 2003-12-11 devnull 	#define	WPERCOL	8
 238 b3994ec5 2003-12-11 devnull 	disk = diskinit();
 239 6d7fdb24 2004-12-27 devnull 	if(!loadfile || !rowload(&row, loadfile, TRUE)){
 240 b3994ec5 2003-12-11 devnull 		rowinit(&row, screen->clipr);
 241 b3994ec5 2003-12-11 devnull 		if(ncol < 0){
 242 b3994ec5 2003-12-11 devnull 			if(argc == 0)
 243 b3994ec5 2003-12-11 devnull 				ncol = 2;
 244 b3994ec5 2003-12-11 devnull 			else{
 245 b3994ec5 2003-12-11 devnull 				ncol = (argc+(WPERCOL-1))/WPERCOL;
 246 b3994ec5 2003-12-11 devnull 				if(ncol < 2)
 247 b3994ec5 2003-12-11 devnull 					ncol = 2;
 248 b3994ec5 2003-12-11 devnull 			}
 249 b3994ec5 2003-12-11 devnull 		}
 250 b3994ec5 2003-12-11 devnull 		if(ncol == 0)
 251 b3994ec5 2003-12-11 devnull 			ncol = 2;
 252 b3994ec5 2003-12-11 devnull 		for(i=0; i<ncol; i++){
 253 b3994ec5 2003-12-11 devnull 			c = rowadd(&row, nil, -1);
 254 b3994ec5 2003-12-11 devnull 			if(c==nil && i==0)
 255 b3994ec5 2003-12-11 devnull 				error("initializing columns");
 256 b3994ec5 2003-12-11 devnull 		}
 257 b3994ec5 2003-12-11 devnull 		c = row.col[row.ncol-1];
 258 b3994ec5 2003-12-11 devnull 		if(argc == 0)
 259 b3994ec5 2003-12-11 devnull 			readfile(c, wdir);
 260 b3994ec5 2003-12-11 devnull 		else
 261 b3994ec5 2003-12-11 devnull 			for(i=0; i<argc; i++){
 262 b3994ec5 2003-12-11 devnull 				p = utfrrune(argv[i], '/');
 263 b3994ec5 2003-12-11 devnull 				if((p!=nil && strcmp(p, "/guide")==0) || i/WPERCOL>=row.ncol)
 264 b3994ec5 2003-12-11 devnull 					readfile(c, argv[i]);
 265 b3994ec5 2003-12-11 devnull 				else
 266 b3994ec5 2003-12-11 devnull 					readfile(row.col[i/WPERCOL], argv[i]);
 267 b3994ec5 2003-12-11 devnull 			}
 268 b3994ec5 2003-12-11 devnull 	}
 269 b3994ec5 2003-12-11 devnull 	flushimage(display, 1);
 270 b3994ec5 2003-12-11 devnull 
 271 b3994ec5 2003-12-11 devnull 	acmeerrorinit();
 272 b3994ec5 2003-12-11 devnull 	threadcreate(keyboardthread, nil, STACK);
 273 b3994ec5 2003-12-11 devnull 	threadcreate(mousethread, nil, STACK);
 274 b3994ec5 2003-12-11 devnull 	threadcreate(waitthread, nil, STACK);
 275 b3994ec5 2003-12-11 devnull 	threadcreate(xfidallocthread, nil, STACK);
 276 b3994ec5 2003-12-11 devnull 	threadcreate(newwindowthread, nil, STACK);
 277 334cb1e9 2004-12-27 devnull /*	threadcreate(shutdownthread, nil, STACK); */
 278 93a6f8d7 2005-01-04 devnull 	threadnotify(shutdown, 1);
 279 b3994ec5 2003-12-11 devnull 	recvul(cexit);
 280 b3994ec5 2003-12-11 devnull 	killprocs();
 281 b3994ec5 2003-12-11 devnull 	threadexitsall(nil);
 282 b3994ec5 2003-12-11 devnull }
 283 b3994ec5 2003-12-11 devnull 
 284 b3994ec5 2003-12-11 devnull void
 285 b3994ec5 2003-12-11 devnull readfile(Column *c, char *s)
 286 b3994ec5 2003-12-11 devnull {
 287 b3994ec5 2003-12-11 devnull 	Window *w;
 288 b3994ec5 2003-12-11 devnull 	Rune rb[256];
 289 93611313 2006-06-16 devnull 	int nr;
 290 b3994ec5 2003-12-11 devnull 	Runestr rs;
 291 b3994ec5 2003-12-11 devnull 
 292 b3994ec5 2003-12-11 devnull 	w = coladd(c, nil, nil, -1);
 293 93611313 2006-06-16 devnull 	if(s[0] != '/')
 294 93611313 2006-06-16 devnull 		runesnprint(rb, sizeof rb, "%s/%s", wdir, s);
 295 93611313 2006-06-16 devnull 	else
 296 93611313 2006-06-16 devnull 		runesnprint(rb, sizeof rb, "%s", s);
 297 93611313 2006-06-16 devnull 	nr = runestrlen(rb);
 298 8ad51794 2004-03-25 devnull 	rs = cleanrname(runestr(rb, nr));
 299 b3994ec5 2003-12-11 devnull 	winsetname(w, rs.r, rs.nr);
 300 b3994ec5 2003-12-11 devnull 	textload(&w->body, 0, s, 1);
 301 b3994ec5 2003-12-11 devnull 	w->body.file->mod = FALSE;
 302 b3994ec5 2003-12-11 devnull 	w->dirty = FALSE;
 303 b3994ec5 2003-12-11 devnull 	winsettag(w);
 304 cd1d0ab0 2006-01-12 devnull 	winresize(w, w->r, FALSE, TRUE);
 305 b3994ec5 2003-12-11 devnull 	textscrdraw(&w->body);
 306 b3994ec5 2003-12-11 devnull 	textsetselect(&w->tag, w->tag.file->b.nc, w->tag.file->b.nc);
 307 4a3fb872 2014-04-30 rsc 	xfidlog(w, "new");
 308 b3994ec5 2003-12-11 devnull }
 309 b3994ec5 2003-12-11 devnull 
 310 429f8aa4 2005-02-15 devnull char *ignotes[] = {
 311 429f8aa4 2005-02-15 devnull 	"sys: write on closed pipe",
 312 429f8aa4 2005-02-15 devnull 	"sys: ttin",
 313 429f8aa4 2005-02-15 devnull 	"sys: ttou",
 314 429f8aa4 2005-02-15 devnull 	"sys: tstp",
 315 429f8aa4 2005-02-15 devnull 	nil
 316 429f8aa4 2005-02-15 devnull };
 317 429f8aa4 2005-02-15 devnull 
 318 b3994ec5 2003-12-11 devnull char *oknotes[] ={
 319 b3994ec5 2003-12-11 devnull 	"delete",
 320 b3994ec5 2003-12-11 devnull 	"hangup",
 321 b3994ec5 2003-12-11 devnull 	"kill",
 322 b3994ec5 2003-12-11 devnull 	"exit",
 323 b3994ec5 2003-12-11 devnull 	nil
 324 b3994ec5 2003-12-11 devnull };
 325 b3994ec5 2003-12-11 devnull 
 326 b3994ec5 2003-12-11 devnull int	dumping;
 327 b3994ec5 2003-12-11 devnull 
 328 4da83e7c 2004-03-05 devnull static int
 329 b3994ec5 2003-12-11 devnull shutdown(void *v, char *msg)
 330 b3994ec5 2003-12-11 devnull {
 331 b3994ec5 2003-12-11 devnull 	int i;
 332 b3994ec5 2003-12-11 devnull 
 333 b3994ec5 2003-12-11 devnull 	USED(v);
 334 429f8aa4 2005-02-15 devnull 
 335 429f8aa4 2005-02-15 devnull 	for(i=0; ignotes[i]; i++)
 336 429f8aa4 2005-02-15 devnull 		if(strncmp(ignotes[i], msg, strlen(ignotes[i])) == 0)
 337 429f8aa4 2005-02-15 devnull 			return 1;
 338 c96d8325 2012-11-26 rsc 
 339 b3994ec5 2003-12-11 devnull 	killprocs();
 340 b3994ec5 2003-12-11 devnull 	if(!dumping && strcmp(msg, "kill")!=0 && strcmp(msg, "exit")!=0 && getpid()==mainpid){
 341 b3994ec5 2003-12-11 devnull 		dumping = TRUE;
 342 b3994ec5 2003-12-11 devnull 		rowdump(&row, nil);
 343 b3994ec5 2003-12-11 devnull 	}
 344 b3994ec5 2003-12-11 devnull 	for(i=0; oknotes[i]; i++)
 345 b3994ec5 2003-12-11 devnull 		if(strncmp(oknotes[i], msg, strlen(oknotes[i])) == 0)
 346 b3994ec5 2003-12-11 devnull 			threadexitsall(msg);
 347 b3994ec5 2003-12-11 devnull 	print("acme: %s\n", msg);
 348 b3994ec5 2003-12-11 devnull 	return 0;
 349 b3994ec5 2003-12-11 devnull }
 350 b3994ec5 2003-12-11 devnull 
 351 334cb1e9 2004-12-27 devnull /*
 352 b3994ec5 2003-12-11 devnull void
 353 334cb1e9 2004-12-27 devnull shutdownthread(void *v)
 354 334cb1e9 2004-12-27 devnull {
 355 334cb1e9 2004-12-27 devnull 	char *msg;
 356 334cb1e9 2004-12-27 devnull 	Channel *c;
 357 334cb1e9 2004-12-27 devnull 
 358 334cb1e9 2004-12-27 devnull 	USED(v);
 359 334cb1e9 2004-12-27 devnull 
 360 391363f5 2005-09-26 devnull 	threadsetname("shutdown");
 361 334cb1e9 2004-12-27 devnull 	c = threadnotechan();
 362 334cb1e9 2004-12-27 devnull 	while((msg = recvp(c)) != nil)
 363 334cb1e9 2004-12-27 devnull 		shutdown(nil, msg);
 364 334cb1e9 2004-12-27 devnull }
 365 334cb1e9 2004-12-27 devnull */
 366 334cb1e9 2004-12-27 devnull 
 367 334cb1e9 2004-12-27 devnull void
 368 b3994ec5 2003-12-11 devnull killprocs(void)
 369 b3994ec5 2003-12-11 devnull {
 370 b3994ec5 2003-12-11 devnull 	Command *c;
 371 b3994ec5 2003-12-11 devnull 
 372 b3994ec5 2003-12-11 devnull 	fsysclose();
 373 cbeb0b26 2006-04-01 devnull /*	if(display) */
 374 cbeb0b26 2006-04-01 devnull /*		flushimage(display, 1); */
 375 b3994ec5 2003-12-11 devnull 
 376 b3994ec5 2003-12-11 devnull 	for(c=command; c; c=c->next)
 377 b3994ec5 2003-12-11 devnull 		postnote(PNGROUP, c->pid, "hangup");
 378 b3994ec5 2003-12-11 devnull }
 379 b3994ec5 2003-12-11 devnull 
 380 b3994ec5 2003-12-11 devnull static int errorfd;
 381 b3994ec5 2003-12-11 devnull int erroutfd;
 382 b3994ec5 2003-12-11 devnull 
 383 b3994ec5 2003-12-11 devnull void
 384 b3994ec5 2003-12-11 devnull acmeerrorproc(void *v)
 385 b3994ec5 2003-12-11 devnull {
 386 b3994ec5 2003-12-11 devnull 	char *buf;
 387 b3994ec5 2003-12-11 devnull 	int n;
 388 b3994ec5 2003-12-11 devnull 
 389 b3994ec5 2003-12-11 devnull 	USED(v);
 390 b3994ec5 2003-12-11 devnull 	threadsetname("acmeerrorproc");
 391 b3994ec5 2003-12-11 devnull 	buf = emalloc(8192+1);
 392 334cb1e9 2004-12-27 devnull 	while((n=read(errorfd, buf, 8192)) >= 0){
 393 b3994ec5 2003-12-11 devnull 		buf[n] = '\0';
 394 b3994ec5 2003-12-11 devnull 		sendp(cerr, estrdup(buf));
 395 b3994ec5 2003-12-11 devnull 	}
 396 b3994ec5 2003-12-11 devnull }
 397 b3994ec5 2003-12-11 devnull 
 398 b3994ec5 2003-12-11 devnull void
 399 b3994ec5 2003-12-11 devnull acmeerrorinit(void)
 400 b3994ec5 2003-12-11 devnull {
 401 5a8e63b2 2004-02-29 devnull 	int pfd[2];
 402 b3994ec5 2003-12-11 devnull 
 403 b3994ec5 2003-12-11 devnull 	if(pipe(pfd) < 0)
 404 b3994ec5 2003-12-11 devnull 		error("can't create pipe");
 405 b3994ec5 2003-12-11 devnull #if 0
 406 b3994ec5 2003-12-11 devnull 	sprint(acmeerrorfile, "/srv/acme.%s.%d", getuser(), mainpid);
 407 b3994ec5 2003-12-11 devnull 	fd = create(acmeerrorfile, OWRITE, 0666);
 408 b3994ec5 2003-12-11 devnull 	if(fd < 0){
 409 b3994ec5 2003-12-11 devnull 		remove(acmeerrorfile);
 410 b3994ec5 2003-12-11 devnull   		fd = create(acmeerrorfile, OWRITE, 0666);
 411 b3994ec5 2003-12-11 devnull 		if(fd < 0)
 412 b3994ec5 2003-12-11 devnull 			error("can't create acmeerror file");
 413 b3994ec5 2003-12-11 devnull 	}
 414 b3994ec5 2003-12-11 devnull 	sprint(buf, "%d", pfd[0]);
 415 b3994ec5 2003-12-11 devnull 	write(fd, buf, strlen(buf));
 416 b3994ec5 2003-12-11 devnull 	close(fd);
 417 b3994ec5 2003-12-11 devnull 	/* reopen pfd[1] close on exec */
 418 b3994ec5 2003-12-11 devnull 	sprint(buf, "/fd/%d", pfd[1]);
 419 b3994ec5 2003-12-11 devnull 	errorfd = open(buf, OREAD|OCEXEC);
 420 b3994ec5 2003-12-11 devnull #endif
 421 b3994ec5 2003-12-11 devnull 	fcntl(pfd[0], F_SETFD, FD_CLOEXEC);
 422 b3994ec5 2003-12-11 devnull 	fcntl(pfd[1], F_SETFD, FD_CLOEXEC);
 423 b3994ec5 2003-12-11 devnull 	erroutfd = pfd[0];
 424 b3994ec5 2003-12-11 devnull 	errorfd = pfd[1];
 425 b3994ec5 2003-12-11 devnull 	if(errorfd < 0)
 426 b3994ec5 2003-12-11 devnull 		error("can't re-open acmeerror file");
 427 334cb1e9 2004-12-27 devnull 	proccreate(acmeerrorproc, nil, STACK);
 428 b3994ec5 2003-12-11 devnull }
 429 b3994ec5 2003-12-11 devnull 
 430 2277c5d7 2004-03-21 devnull /*
 431 b3994ec5 2003-12-11 devnull void
 432 b3994ec5 2003-12-11 devnull plumbproc(void *v)
 433 b3994ec5 2003-12-11 devnull {
 434 b3994ec5 2003-12-11 devnull 	Plumbmsg *m;
 435 b3994ec5 2003-12-11 devnull 
 436 b3994ec5 2003-12-11 devnull 	USED(v);
 437 b3994ec5 2003-12-11 devnull 	threadsetname("plumbproc");
 438 b3994ec5 2003-12-11 devnull 	for(;;){
 439 5a8e63b2 2004-02-29 devnull 		m = threadplumbrecv(plumbeditfd);
 440 b3994ec5 2003-12-11 devnull 		if(m == nil)
 441 b3994ec5 2003-12-11 devnull 			threadexits(nil);
 442 b3994ec5 2003-12-11 devnull 		sendp(cplumb, m);
 443 b3994ec5 2003-12-11 devnull 	}
 444 b3994ec5 2003-12-11 devnull }
 445 2277c5d7 2004-03-21 devnull */
 446 b3994ec5 2003-12-11 devnull 
 447 b3994ec5 2003-12-11 devnull void
 448 b3994ec5 2003-12-11 devnull keyboardthread(void *v)
 449 b3994ec5 2003-12-11 devnull {
 450 b3994ec5 2003-12-11 devnull 	Rune r;
 451 b3994ec5 2003-12-11 devnull 	Timer *timer;
 452 b3994ec5 2003-12-11 devnull 	Text *t;
 453 b3994ec5 2003-12-11 devnull 	enum { KTimer, KKey, NKALT };
 454 b3994ec5 2003-12-11 devnull 	static Alt alts[NKALT+1];
 455 b3994ec5 2003-12-11 devnull 
 456 b3994ec5 2003-12-11 devnull 	USED(v);
 457 b3994ec5 2003-12-11 devnull 	alts[KTimer].c = nil;
 458 b3994ec5 2003-12-11 devnull 	alts[KTimer].v = nil;
 459 b3994ec5 2003-12-11 devnull 	alts[KTimer].op = CHANNOP;
 460 b3994ec5 2003-12-11 devnull 	alts[KKey].c = keyboardctl->c;
 461 b3994ec5 2003-12-11 devnull 	alts[KKey].v = &r;
 462 b3994ec5 2003-12-11 devnull 	alts[KKey].op = CHANRCV;
 463 b3994ec5 2003-12-11 devnull 	alts[NKALT].op = CHANEND;
 464 b3994ec5 2003-12-11 devnull 
 465 b3994ec5 2003-12-11 devnull 	timer = nil;
 466 b3994ec5 2003-12-11 devnull 	typetext = nil;
 467 b3994ec5 2003-12-11 devnull 	threadsetname("keyboardthread");
 468 b3994ec5 2003-12-11 devnull 	for(;;){
 469 b3994ec5 2003-12-11 devnull 		switch(alt(alts)){
 470 b3994ec5 2003-12-11 devnull 		case KTimer:
 471 b3994ec5 2003-12-11 devnull 			timerstop(timer);
 472 b3994ec5 2003-12-11 devnull 			t = typetext;
 473 b3994ec5 2003-12-11 devnull 			if(t!=nil && t->what==Tag){
 474 b3994ec5 2003-12-11 devnull 				winlock(t->w, 'K');
 475 b3994ec5 2003-12-11 devnull 				wincommit(t->w, t);
 476 b3994ec5 2003-12-11 devnull 				winunlock(t->w);
 477 b3994ec5 2003-12-11 devnull 				flushimage(display, 1);
 478 b3994ec5 2003-12-11 devnull 			}
 479 b3994ec5 2003-12-11 devnull 			alts[KTimer].c = nil;
 480 b3994ec5 2003-12-11 devnull 			alts[KTimer].op = CHANNOP;
 481 b3994ec5 2003-12-11 devnull 			break;
 482 b3994ec5 2003-12-11 devnull 		case KKey:
 483 b3994ec5 2003-12-11 devnull 		casekeyboard:
 484 b3994ec5 2003-12-11 devnull 			typetext = rowtype(&row, r, mouse->xy);
 485 b3994ec5 2003-12-11 devnull 			t = typetext;
 486 b3994ec5 2003-12-11 devnull 			if(t!=nil && t->col!=nil && !(r==Kdown || r==Kleft || r==Kright))	/* scrolling doesn't change activecol */
 487 b3994ec5 2003-12-11 devnull 				activecol = t->col;
 488 b3994ec5 2003-12-11 devnull 			if(t!=nil && t->w!=nil)
 489 b3994ec5 2003-12-11 devnull 				t->w->body.file->curtext = &t->w->body;
 490 b3994ec5 2003-12-11 devnull 			if(timer != nil)
 491 b3994ec5 2003-12-11 devnull 				timercancel(timer);
 492 b3994ec5 2003-12-11 devnull 			if(t!=nil && t->what==Tag) {
 493 b3994ec5 2003-12-11 devnull 				timer = timerstart(500);
 494 b3994ec5 2003-12-11 devnull 				alts[KTimer].c = timer->c;
 495 b3994ec5 2003-12-11 devnull 				alts[KTimer].op = CHANRCV;
 496 b3994ec5 2003-12-11 devnull 			}else{
 497 b3994ec5 2003-12-11 devnull 				timer = nil;
 498 b3994ec5 2003-12-11 devnull 				alts[KTimer].c = nil;
 499 b3994ec5 2003-12-11 devnull 				alts[KTimer].op = CHANNOP;
 500 b3994ec5 2003-12-11 devnull 			}
 501 b3994ec5 2003-12-11 devnull 			if(nbrecv(keyboardctl->c, &r) > 0)
 502 b3994ec5 2003-12-11 devnull 				goto casekeyboard;
 503 b3994ec5 2003-12-11 devnull 			flushimage(display, 1);
 504 b3994ec5 2003-12-11 devnull 			break;
 505 b3994ec5 2003-12-11 devnull 		}
 506 b3994ec5 2003-12-11 devnull 	}
 507 b3994ec5 2003-12-11 devnull }
 508 b3994ec5 2003-12-11 devnull 
 509 b3994ec5 2003-12-11 devnull void
 510 b3994ec5 2003-12-11 devnull mousethread(void *v)
 511 b3994ec5 2003-12-11 devnull {
 512 b3994ec5 2003-12-11 devnull 	Text *t, *argt;
 513 b3994ec5 2003-12-11 devnull 	int but;
 514 b3994ec5 2003-12-11 devnull 	uint q0, q1;
 515 b3994ec5 2003-12-11 devnull 	Window *w;
 516 b3994ec5 2003-12-11 devnull 	Plumbmsg *pm;
 517 b3994ec5 2003-12-11 devnull 	Mouse m;
 518 b3994ec5 2003-12-11 devnull 	char *act;
 519 8ad51794 2004-03-25 devnull 	enum { MResize, MMouse, MPlumb, MWarnings, NMALT };
 520 b3994ec5 2003-12-11 devnull 	static Alt alts[NMALT+1];
 521 b3994ec5 2003-12-11 devnull 
 522 b3994ec5 2003-12-11 devnull 	USED(v);
 523 b3994ec5 2003-12-11 devnull 	threadsetname("mousethread");
 524 b3994ec5 2003-12-11 devnull 	alts[MResize].c = mousectl->resizec;
 525 b3994ec5 2003-12-11 devnull 	alts[MResize].v = nil;
 526 b3994ec5 2003-12-11 devnull 	alts[MResize].op = CHANRCV;
 527 b3994ec5 2003-12-11 devnull 	alts[MMouse].c = mousectl->c;
 528 b3994ec5 2003-12-11 devnull 	alts[MMouse].v = &mousectl->m;
 529 b3994ec5 2003-12-11 devnull 	alts[MMouse].op = CHANRCV;
 530 b3994ec5 2003-12-11 devnull 	alts[MPlumb].c = cplumb;
 531 b3994ec5 2003-12-11 devnull 	alts[MPlumb].v = &pm;
 532 b3994ec5 2003-12-11 devnull 	alts[MPlumb].op = CHANRCV;
 533 8ad51794 2004-03-25 devnull 	alts[MWarnings].c = cwarn;
 534 8ad51794 2004-03-25 devnull 	alts[MWarnings].v = nil;
 535 8ad51794 2004-03-25 devnull 	alts[MWarnings].op = CHANRCV;
 536 b3994ec5 2003-12-11 devnull 	if(cplumb == nil)
 537 b3994ec5 2003-12-11 devnull 		alts[MPlumb].op = CHANNOP;
 538 b3994ec5 2003-12-11 devnull 	alts[NMALT].op = CHANEND;
 539 c96d8325 2012-11-26 rsc 
 540 b3994ec5 2003-12-11 devnull 	for(;;){
 541 8ad51794 2004-03-25 devnull 		qlock(&row.lk);
 542 8ad51794 2004-03-25 devnull 		flushwarnings();
 543 8ad51794 2004-03-25 devnull 		qunlock(&row.lk);
 544 8ad51794 2004-03-25 devnull 		flushimage(display, 1);
 545 b3994ec5 2003-12-11 devnull 		switch(alt(alts)){
 546 b3994ec5 2003-12-11 devnull 		case MResize:
 547 b3994ec5 2003-12-11 devnull 			if(getwindow(display, Refnone) < 0)
 548 b3994ec5 2003-12-11 devnull 				error("attach to window");
 549 b3994ec5 2003-12-11 devnull 			draw(screen, screen->r, display->white, nil, ZP);
 550 c96d8325 2012-11-26 rsc 			iconinit();
 551 b3994ec5 2003-12-11 devnull 			scrlresize();
 552 b3994ec5 2003-12-11 devnull 			rowresize(&row, screen->clipr);
 553 b3994ec5 2003-12-11 devnull 			break;
 554 b3994ec5 2003-12-11 devnull 		case MPlumb:
 555 b3994ec5 2003-12-11 devnull 			if(strcmp(pm->type, "text") == 0){
 556 b3994ec5 2003-12-11 devnull 				act = plumblookup(pm->attr, "action");
 557 b3994ec5 2003-12-11 devnull 				if(act==nil || strcmp(act, "showfile")==0)
 558 b3994ec5 2003-12-11 devnull 					plumblook(pm);
 559 b3994ec5 2003-12-11 devnull 				else if(strcmp(act, "showdata")==0)
 560 b3994ec5 2003-12-11 devnull 					plumbshow(pm);
 561 b3994ec5 2003-12-11 devnull 			}
 562 8ad51794 2004-03-25 devnull 			plumbfree(pm);
 563 b3994ec5 2003-12-11 devnull 			break;
 564 8ad51794 2004-03-25 devnull 		case MWarnings:
 565 8ad51794 2004-03-25 devnull 			break;
 566 b3994ec5 2003-12-11 devnull 		case MMouse:
 567 b3994ec5 2003-12-11 devnull 			/*
 568 b3994ec5 2003-12-11 devnull 			 * Make a copy so decisions are consistent; mousectl changes
 569 b3994ec5 2003-12-11 devnull 			 * underfoot.  Can't just receive into m because this introduces
 570 b3994ec5 2003-12-11 devnull 			 * another race; see /sys/src/libdraw/mouse.c.
 571 b3994ec5 2003-12-11 devnull 			 */
 572 b3994ec5 2003-12-11 devnull 			m = mousectl->m;
 573 b3994ec5 2003-12-11 devnull 			qlock(&row.lk);
 574 b3994ec5 2003-12-11 devnull 			t = rowwhich(&row, m.xy);
 575 fdf6ef33 2015-06-03 rsc 
 576 fdf6ef33 2015-06-03 rsc 			if((t!=mousetext && t!=nil && t->w!=nil) &&
 577 fdf6ef33 2015-06-03 rsc 				(mousetext==nil || mousetext->w==nil || t->w->id!=mousetext->w->id)) {
 578 fdf6ef33 2015-06-03 rsc 				xfidlog(t->w, "focus");
 579 fdf6ef33 2015-06-03 rsc 			}
 580 fdf6ef33 2015-06-03 rsc 
 581 b3994ec5 2003-12-11 devnull 			if(t!=mousetext && mousetext!=nil && mousetext->w!=nil){
 582 b3994ec5 2003-12-11 devnull 				winlock(mousetext->w, 'M');
 583 b3994ec5 2003-12-11 devnull 				mousetext->eq0 = ~0;
 584 b3994ec5 2003-12-11 devnull 				wincommit(mousetext->w, mousetext);
 585 b3994ec5 2003-12-11 devnull 				winunlock(mousetext->w);
 586 b3994ec5 2003-12-11 devnull 			}
 587 b3994ec5 2003-12-11 devnull 			mousetext = t;
 588 b3994ec5 2003-12-11 devnull 			if(t == nil)
 589 b3994ec5 2003-12-11 devnull 				goto Continue;
 590 b3994ec5 2003-12-11 devnull 			w = t->w;
 591 b3994ec5 2003-12-11 devnull 			if(t==nil || m.buttons==0)
 592 b3994ec5 2003-12-11 devnull 				goto Continue;
 593 b3994ec5 2003-12-11 devnull 			but = 0;
 594 b3994ec5 2003-12-11 devnull 			if(m.buttons == 1)
 595 b3994ec5 2003-12-11 devnull 				but = 1;
 596 b3994ec5 2003-12-11 devnull 			else if(m.buttons == 2)
 597 b3994ec5 2003-12-11 devnull 				but = 2;
 598 b3994ec5 2003-12-11 devnull 			else if(m.buttons == 4)
 599 b3994ec5 2003-12-11 devnull 				but = 3;
 600 b3994ec5 2003-12-11 devnull 			barttext = t;
 601 b3994ec5 2003-12-11 devnull 			if(t->what==Body && ptinrect(m.xy, t->scrollr)){
 602 b3994ec5 2003-12-11 devnull 				if(but){
 603 d8c78a8d 2005-01-10 devnull 					if(swapscrollbuttons){
 604 d8c78a8d 2005-01-10 devnull 						if(but == 1)
 605 d8c78a8d 2005-01-10 devnull 							but = 3;
 606 d8c78a8d 2005-01-10 devnull 						else if(but == 3)
 607 d8c78a8d 2005-01-10 devnull 							but = 1;
 608 d8c78a8d 2005-01-10 devnull 					}
 609 b3994ec5 2003-12-11 devnull 					winlock(w, 'M');
 610 b3994ec5 2003-12-11 devnull 					t->eq0 = ~0;
 611 b3994ec5 2003-12-11 devnull 					textscroll(t, but);
 612 b3994ec5 2003-12-11 devnull 					winunlock(w);
 613 b3994ec5 2003-12-11 devnull 				}
 614 c16f1f73 2004-06-09 devnull 				goto Continue;
 615 c16f1f73 2004-06-09 devnull 			}
 616 c16f1f73 2004-06-09 devnull 			/* scroll buttons, wheels, etc. */
 617 f8dea3c1 2005-12-16 devnull 			if(w != nil && (m.buttons & (8|16))){
 618 c16f1f73 2004-06-09 devnull 				if(m.buttons & 8)
 619 c16f1f73 2004-06-09 devnull 					but = Kscrolloneup;
 620 c16f1f73 2004-06-09 devnull 				else
 621 c16f1f73 2004-06-09 devnull 					but = Kscrollonedown;
 622 c16f1f73 2004-06-09 devnull 				winlock(w, 'M');
 623 c16f1f73 2004-06-09 devnull 				t->eq0 = ~0;
 624 c16f1f73 2004-06-09 devnull 				texttype(t, but);
 625 c16f1f73 2004-06-09 devnull 				winunlock(w);
 626 b3994ec5 2003-12-11 devnull 				goto Continue;
 627 b3994ec5 2003-12-11 devnull 			}
 628 b3994ec5 2003-12-11 devnull 			if(ptinrect(m.xy, t->scrollr)){
 629 b3994ec5 2003-12-11 devnull 				if(but){
 630 b3994ec5 2003-12-11 devnull 					if(t->what == Columntag)
 631 b3994ec5 2003-12-11 devnull 						rowdragcol(&row, t->col, but);
 632 b3994ec5 2003-12-11 devnull 					else if(t->what == Tag){
 633 b3994ec5 2003-12-11 devnull 						coldragwin(t->col, t->w, but);
 634 b3994ec5 2003-12-11 devnull 						if(t->w)
 635 b3994ec5 2003-12-11 devnull 							barttext = &t->w->body;
 636 b3994ec5 2003-12-11 devnull 					}
 637 b3994ec5 2003-12-11 devnull 					if(t->col)
 638 b3994ec5 2003-12-11 devnull 						activecol = t->col;
 639 b3994ec5 2003-12-11 devnull 				}
 640 b3994ec5 2003-12-11 devnull 				goto Continue;
 641 b3994ec5 2003-12-11 devnull 			}
 642 b3994ec5 2003-12-11 devnull 			if(m.buttons){
 643 b3994ec5 2003-12-11 devnull 				if(w)
 644 b3994ec5 2003-12-11 devnull 					winlock(w, 'M');
 645 b3994ec5 2003-12-11 devnull 				t->eq0 = ~0;
 646 b3994ec5 2003-12-11 devnull 				if(w)
 647 b3994ec5 2003-12-11 devnull 					wincommit(w, t);
 648 b3994ec5 2003-12-11 devnull 				else
 649 b3994ec5 2003-12-11 devnull 					textcommit(t, TRUE);
 650 b3994ec5 2003-12-11 devnull 				if(m.buttons & 1){
 651 b3994ec5 2003-12-11 devnull 					textselect(t);
 652 b3994ec5 2003-12-11 devnull 					if(w)
 653 b3994ec5 2003-12-11 devnull 						winsettag(w);
 654 b3994ec5 2003-12-11 devnull 					argtext = t;
 655 b3994ec5 2003-12-11 devnull 					seltext = t;
 656 b3994ec5 2003-12-11 devnull 					if(t->col)
 657 b3994ec5 2003-12-11 devnull 						activecol = t->col;	/* button 1 only */
 658 b3994ec5 2003-12-11 devnull 					if(t->w!=nil && t==&t->w->body)
 659 b3994ec5 2003-12-11 devnull 						activewin = t->w;
 660 b3994ec5 2003-12-11 devnull 				}else if(m.buttons & 2){
 661 b3994ec5 2003-12-11 devnull 					if(textselect2(t, &q0, &q1, &argt))
 662 b3994ec5 2003-12-11 devnull 						execute(t, q0, q1, FALSE, argt);
 663 b3994ec5 2003-12-11 devnull 				}else if(m.buttons & 4){
 664 b3994ec5 2003-12-11 devnull 					if(textselect3(t, &q0, &q1))
 665 b3994ec5 2003-12-11 devnull 						look3(t, q0, q1, FALSE);
 666 b3994ec5 2003-12-11 devnull 				}
 667 b3994ec5 2003-12-11 devnull 				if(w)
 668 b3994ec5 2003-12-11 devnull 					winunlock(w);
 669 b3994ec5 2003-12-11 devnull 				goto Continue;
 670 b3994ec5 2003-12-11 devnull 			}
 671 b3994ec5 2003-12-11 devnull     Continue:
 672 b3994ec5 2003-12-11 devnull 			qunlock(&row.lk);
 673 b3994ec5 2003-12-11 devnull 			break;
 674 b3994ec5 2003-12-11 devnull 		}
 675 b3994ec5 2003-12-11 devnull 	}
 676 b3994ec5 2003-12-11 devnull }
 677 b3994ec5 2003-12-11 devnull 
 678 b3994ec5 2003-12-11 devnull /*
 679 b3994ec5 2003-12-11 devnull  * There is a race between process exiting and our finding out it was ever created.
 680 b3994ec5 2003-12-11 devnull  * This structure keeps a list of processes that have exited we haven't heard of.
 681 b3994ec5 2003-12-11 devnull  */
 682 b3994ec5 2003-12-11 devnull typedef struct Pid Pid;
 683 b3994ec5 2003-12-11 devnull struct Pid
 684 b3994ec5 2003-12-11 devnull {
 685 b3994ec5 2003-12-11 devnull 	int	pid;
 686 b3994ec5 2003-12-11 devnull 	char	msg[ERRMAX];
 687 b3994ec5 2003-12-11 devnull 	Pid	*next;
 688 b3994ec5 2003-12-11 devnull };
 689 b3994ec5 2003-12-11 devnull 
 690 b3994ec5 2003-12-11 devnull void
 691 b3994ec5 2003-12-11 devnull waitthread(void *v)
 692 b3994ec5 2003-12-11 devnull {
 693 b3994ec5 2003-12-11 devnull 	Waitmsg *w;
 694 b3994ec5 2003-12-11 devnull 	Command *c, *lc;
 695 b3994ec5 2003-12-11 devnull 	uint pid;
 696 b3994ec5 2003-12-11 devnull 	int found, ncmd;
 697 b3994ec5 2003-12-11 devnull 	Rune *cmd;
 698 b3994ec5 2003-12-11 devnull 	char *err;
 699 b3994ec5 2003-12-11 devnull 	Text *t;
 700 b3994ec5 2003-12-11 devnull 	Pid *pids, *p, *lastp;
 701 b3994ec5 2003-12-11 devnull 	enum { WErr, WKill, WWait, WCmd, NWALT };
 702 b3994ec5 2003-12-11 devnull 	Alt alts[NWALT+1];
 703 b3994ec5 2003-12-11 devnull 
 704 b3994ec5 2003-12-11 devnull 	USED(v);
 705 b3994ec5 2003-12-11 devnull 	threadsetname("waitthread");
 706 b3994ec5 2003-12-11 devnull 	pids = nil;
 707 b3994ec5 2003-12-11 devnull 	alts[WErr].c = cerr;
 708 b3994ec5 2003-12-11 devnull 	alts[WErr].v = &err;
 709 b3994ec5 2003-12-11 devnull 	alts[WErr].op = CHANRCV;
 710 b3994ec5 2003-12-11 devnull 	alts[WKill].c = ckill;
 711 b3994ec5 2003-12-11 devnull 	alts[WKill].v = &cmd;
 712 b3994ec5 2003-12-11 devnull 	alts[WKill].op = CHANRCV;
 713 b3994ec5 2003-12-11 devnull 	alts[WWait].c = cwait;
 714 b3994ec5 2003-12-11 devnull 	alts[WWait].v = &w;
 715 b3994ec5 2003-12-11 devnull 	alts[WWait].op = CHANRCV;
 716 b3994ec5 2003-12-11 devnull 	alts[WCmd].c = ccommand;
 717 b3994ec5 2003-12-11 devnull 	alts[WCmd].v = &c;
 718 b3994ec5 2003-12-11 devnull 	alts[WCmd].op = CHANRCV;
 719 b3994ec5 2003-12-11 devnull 	alts[NWALT].op = CHANEND;
 720 b3994ec5 2003-12-11 devnull 
 721 b3994ec5 2003-12-11 devnull 	command = nil;
 722 b3994ec5 2003-12-11 devnull 	for(;;){
 723 b3994ec5 2003-12-11 devnull 		switch(alt(alts)){
 724 b3994ec5 2003-12-11 devnull 		case WErr:
 725 b3994ec5 2003-12-11 devnull 			qlock(&row.lk);
 726 b3994ec5 2003-12-11 devnull 			warning(nil, "%s", err);
 727 b3994ec5 2003-12-11 devnull 			free(err);
 728 b3994ec5 2003-12-11 devnull 			flushimage(display, 1);
 729 b3994ec5 2003-12-11 devnull 			qunlock(&row.lk);
 730 b3994ec5 2003-12-11 devnull 			break;
 731 b3994ec5 2003-12-11 devnull 		case WKill:
 732 b3994ec5 2003-12-11 devnull 			found = FALSE;
 733 b3994ec5 2003-12-11 devnull 			ncmd = runestrlen(cmd);
 734 b3994ec5 2003-12-11 devnull 			for(c=command; c; c=c->next){
 735 b3994ec5 2003-12-11 devnull 				/* -1 for blank */
 736 b3994ec5 2003-12-11 devnull 				if(runeeq(c->name, c->nname-1, cmd, ncmd) == TRUE){
 737 b3994ec5 2003-12-11 devnull 					if(postnote(PNGROUP, c->pid, "kill") < 0)
 738 b3994ec5 2003-12-11 devnull 						warning(nil, "kill %S: %r\n", cmd);
 739 b3994ec5 2003-12-11 devnull 					found = TRUE;
 740 b3994ec5 2003-12-11 devnull 				}
 741 b3994ec5 2003-12-11 devnull 			}
 742 b3994ec5 2003-12-11 devnull 			if(!found)
 743 b3994ec5 2003-12-11 devnull 				warning(nil, "Kill: no process %S\n", cmd);
 744 b3994ec5 2003-12-11 devnull 			free(cmd);
 745 b3994ec5 2003-12-11 devnull 			break;
 746 b3994ec5 2003-12-11 devnull 		case WWait:
 747 b3994ec5 2003-12-11 devnull 			pid = w->pid;
 748 b3994ec5 2003-12-11 devnull 			lc = nil;
 749 b3994ec5 2003-12-11 devnull 			for(c=command; c; c=c->next){
 750 b3994ec5 2003-12-11 devnull 				if(c->pid == pid){
 751 b3994ec5 2003-12-11 devnull 					if(lc)
 752 b3994ec5 2003-12-11 devnull 						lc->next = c->next;
 753 b3994ec5 2003-12-11 devnull 					else
 754 b3994ec5 2003-12-11 devnull 						command = c->next;
 755 b3994ec5 2003-12-11 devnull 					break;
 756 b3994ec5 2003-12-11 devnull 				}
 757 b3994ec5 2003-12-11 devnull 				lc = c;
 758 b3994ec5 2003-12-11 devnull 			}
 759 b3994ec5 2003-12-11 devnull 			qlock(&row.lk);
 760 b3994ec5 2003-12-11 devnull 			t = &row.tag;
 761 b3994ec5 2003-12-11 devnull 			textcommit(t, TRUE);
 762 b3994ec5 2003-12-11 devnull 			if(c == nil){
 763 b3994ec5 2003-12-11 devnull 				/* helper processes use this exit status */
 764 b3994ec5 2003-12-11 devnull 				if(strncmp(w->msg, "libthread", 9) != 0){
 765 b3994ec5 2003-12-11 devnull 					p = emalloc(sizeof(Pid));
 766 b3994ec5 2003-12-11 devnull 					p->pid = pid;
 767 b3994ec5 2003-12-11 devnull 					strncpy(p->msg, w->msg, sizeof(p->msg));
 768 b3994ec5 2003-12-11 devnull 					p->next = pids;
 769 b3994ec5 2003-12-11 devnull 					pids = p;
 770 b3994ec5 2003-12-11 devnull 				}
 771 b3994ec5 2003-12-11 devnull 			}else{
 772 b3994ec5 2003-12-11 devnull 				if(search(t, c->name, c->nname)){
 773 b3994ec5 2003-12-11 devnull 					textdelete(t, t->q0, t->q1, TRUE);
 774 b3994ec5 2003-12-11 devnull 					textsetselect(t, 0, 0);
 775 b3994ec5 2003-12-11 devnull 				}
 776 b3994ec5 2003-12-11 devnull 				if(w->msg[0])
 777 334cb1e9 2004-12-27 devnull 					warning(c->md, "%.*S: exit %s\n", c->nname-1, c->name, w->msg);
 778 b3994ec5 2003-12-11 devnull 				flushimage(display, 1);
 779 b3994ec5 2003-12-11 devnull 			}
 780 b3994ec5 2003-12-11 devnull 			qunlock(&row.lk);
 781 b3994ec5 2003-12-11 devnull 			free(w);
 782 b3994ec5 2003-12-11 devnull     Freecmd:
 783 b3994ec5 2003-12-11 devnull 			if(c){
 784 b3994ec5 2003-12-11 devnull 				if(c->iseditcmd)
 785 b3994ec5 2003-12-11 devnull 					sendul(cedit, 0);
 786 b3994ec5 2003-12-11 devnull 				free(c->text);
 787 b3994ec5 2003-12-11 devnull 				free(c->name);
 788 b3994ec5 2003-12-11 devnull 				fsysdelid(c->md);
 789 b3994ec5 2003-12-11 devnull 				free(c);
 790 b3994ec5 2003-12-11 devnull 			}
 791 b3994ec5 2003-12-11 devnull 			break;
 792 b3994ec5 2003-12-11 devnull 		case WCmd:
 793 b3994ec5 2003-12-11 devnull 			/* has this command already exited? */
 794 b3994ec5 2003-12-11 devnull 			lastp = nil;
 795 b3994ec5 2003-12-11 devnull 			for(p=pids; p!=nil; p=p->next){
 796 b3994ec5 2003-12-11 devnull 				if(p->pid == c->pid){
 797 b3994ec5 2003-12-11 devnull 					if(p->msg[0])
 798 b3994ec5 2003-12-11 devnull 						warning(c->md, "%s\n", p->msg);
 799 b3994ec5 2003-12-11 devnull 					if(lastp == nil)
 800 b3994ec5 2003-12-11 devnull 						pids = p->next;
 801 b3994ec5 2003-12-11 devnull 					else
 802 b3994ec5 2003-12-11 devnull 						lastp->next = p->next;
 803 b3994ec5 2003-12-11 devnull 					free(p);
 804 b3994ec5 2003-12-11 devnull 					goto Freecmd;
 805 b3994ec5 2003-12-11 devnull 				}
 806 b3994ec5 2003-12-11 devnull 				lastp = p;
 807 b3994ec5 2003-12-11 devnull 			}
 808 b3994ec5 2003-12-11 devnull 			c->next = command;
 809 b3994ec5 2003-12-11 devnull 			command = c;
 810 b3994ec5 2003-12-11 devnull 			qlock(&row.lk);
 811 b3994ec5 2003-12-11 devnull 			t = &row.tag;
 812 b3994ec5 2003-12-11 devnull 			textcommit(t, TRUE);
 813 b3994ec5 2003-12-11 devnull 			textinsert(t, 0, c->name, c->nname, TRUE);
 814 b3994ec5 2003-12-11 devnull 			textsetselect(t, 0, 0);
 815 b3994ec5 2003-12-11 devnull 			flushimage(display, 1);
 816 b3994ec5 2003-12-11 devnull 			qunlock(&row.lk);
 817 b3994ec5 2003-12-11 devnull 			break;
 818 b3994ec5 2003-12-11 devnull 		}
 819 b3994ec5 2003-12-11 devnull 	}
 820 b3994ec5 2003-12-11 devnull }
 821 b3994ec5 2003-12-11 devnull 
 822 b3994ec5 2003-12-11 devnull void
 823 b3994ec5 2003-12-11 devnull xfidallocthread(void *v)
 824 b3994ec5 2003-12-11 devnull {
 825 b3994ec5 2003-12-11 devnull 	Xfid *xfree, *x;
 826 b3994ec5 2003-12-11 devnull 	enum { Alloc, Free, N };
 827 b3994ec5 2003-12-11 devnull 	static Alt alts[N+1];
 828 b3994ec5 2003-12-11 devnull 
 829 b3994ec5 2003-12-11 devnull 	USED(v);
 830 b3994ec5 2003-12-11 devnull 	threadsetname("xfidallocthread");
 831 b3994ec5 2003-12-11 devnull 	alts[Alloc].c = cxfidalloc;
 832 b3994ec5 2003-12-11 devnull 	alts[Alloc].v = nil;
 833 b3994ec5 2003-12-11 devnull 	alts[Alloc].op = CHANRCV;
 834 b3994ec5 2003-12-11 devnull 	alts[Free].c = cxfidfree;
 835 b3994ec5 2003-12-11 devnull 	alts[Free].v = &x;
 836 b3994ec5 2003-12-11 devnull 	alts[Free].op = CHANRCV;
 837 b3994ec5 2003-12-11 devnull 	alts[N].op = CHANEND;
 838 b3994ec5 2003-12-11 devnull 
 839 b3994ec5 2003-12-11 devnull 	xfree = nil;
 840 b3994ec5 2003-12-11 devnull 	for(;;){
 841 b3994ec5 2003-12-11 devnull 		switch(alt(alts)){
 842 b3994ec5 2003-12-11 devnull 		case Alloc:
 843 b3994ec5 2003-12-11 devnull 			x = xfree;
 844 b3994ec5 2003-12-11 devnull 			if(x)
 845 b3994ec5 2003-12-11 devnull 				xfree = x->next;
 846 b3994ec5 2003-12-11 devnull 			else{
 847 b3994ec5 2003-12-11 devnull 				x = emalloc(sizeof(Xfid));
 848 b3994ec5 2003-12-11 devnull 				x->c = chancreate(sizeof(void(*)(Xfid*)), 0);
 849 334cb1e9 2004-12-27 devnull 				chansetname(x->c, "xc%p", x->c);
 850 b3994ec5 2003-12-11 devnull 				x->arg = x;
 851 b3994ec5 2003-12-11 devnull 				threadcreate(xfidctl, x->arg, STACK);
 852 b3994ec5 2003-12-11 devnull 			}
 853 b3994ec5 2003-12-11 devnull 			sendp(cxfidalloc, x);
 854 b3994ec5 2003-12-11 devnull 			break;
 855 b3994ec5 2003-12-11 devnull 		case Free:
 856 b3994ec5 2003-12-11 devnull 			x->next = xfree;
 857 b3994ec5 2003-12-11 devnull 			xfree = x;
 858 b3994ec5 2003-12-11 devnull 			break;
 859 b3994ec5 2003-12-11 devnull 		}
 860 b3994ec5 2003-12-11 devnull 	}
 861 b3994ec5 2003-12-11 devnull }
 862 b3994ec5 2003-12-11 devnull 
 863 b3994ec5 2003-12-11 devnull /* this thread, in the main proc, allows fsysproc to get a window made without doing graphics */
 864 b3994ec5 2003-12-11 devnull void
 865 b3994ec5 2003-12-11 devnull newwindowthread(void *v)
 866 b3994ec5 2003-12-11 devnull {
 867 b3994ec5 2003-12-11 devnull 	Window *w;
 868 b3994ec5 2003-12-11 devnull 
 869 b3994ec5 2003-12-11 devnull 	USED(v);
 870 b3994ec5 2003-12-11 devnull 	threadsetname("newwindowthread");
 871 b3994ec5 2003-12-11 devnull 
 872 b3994ec5 2003-12-11 devnull 	for(;;){
 873 b3994ec5 2003-12-11 devnull 		/* only fsysproc is talking to us, so synchronization is trivial */
 874 b3994ec5 2003-12-11 devnull 		recvp(cnewwindow);
 875 b3994ec5 2003-12-11 devnull 		w = makenewwindow(nil);
 876 b3994ec5 2003-12-11 devnull 		winsettag(w);
 877 4a3fb872 2014-04-30 rsc 		xfidlog(w, "new");
 878 b3994ec5 2003-12-11 devnull 		sendp(cnewwindow, w);
 879 b3994ec5 2003-12-11 devnull 	}
 880 b3994ec5 2003-12-11 devnull }
 881 b3994ec5 2003-12-11 devnull 
 882 b3994ec5 2003-12-11 devnull Reffont*
 883 b3994ec5 2003-12-11 devnull rfget(int fix, int save, int setfont, char *name)
 884 b3994ec5 2003-12-11 devnull {
 885 b3994ec5 2003-12-11 devnull 	Reffont *r;
 886 b3994ec5 2003-12-11 devnull 	Font *f;
 887 b3994ec5 2003-12-11 devnull 	int i;
 888 b3994ec5 2003-12-11 devnull 
 889 b3994ec5 2003-12-11 devnull 	r = nil;
 890 b3994ec5 2003-12-11 devnull 	if(name == nil){
 891 b3994ec5 2003-12-11 devnull 		name = fontnames[fix];
 892 b3994ec5 2003-12-11 devnull 		r = reffonts[fix];
 893 b3994ec5 2003-12-11 devnull 	}
 894 b3994ec5 2003-12-11 devnull 	if(r == nil){
 895 b3994ec5 2003-12-11 devnull 		for(i=0; i<nfontcache; i++)
 896 b3994ec5 2003-12-11 devnull 			if(strcmp(name, fontcache[i]->f->name) == 0){
 897 b3994ec5 2003-12-11 devnull 				r = fontcache[i];
 898 b3994ec5 2003-12-11 devnull 				goto Found;
 899 b3994ec5 2003-12-11 devnull 			}
 900 b3994ec5 2003-12-11 devnull 		f = openfont(display, name);
 901 b3994ec5 2003-12-11 devnull 		if(f == nil){
 902 b3994ec5 2003-12-11 devnull 			warning(nil, "can't open font file %s: %r\n", name);
 903 b3994ec5 2003-12-11 devnull 			return nil;
 904 b3994ec5 2003-12-11 devnull 		}
 905 b3994ec5 2003-12-11 devnull 		r = emalloc(sizeof(Reffont));
 906 b3994ec5 2003-12-11 devnull 		r->f = f;
 907 6d7fdb24 2004-12-27 devnull 		fontcache = erealloc(fontcache, (nfontcache+1)*sizeof(Reffont*));
 908 b3994ec5 2003-12-11 devnull 		fontcache[nfontcache++] = r;
 909 b3994ec5 2003-12-11 devnull 	}
 910 b3994ec5 2003-12-11 devnull     Found:
 911 b3994ec5 2003-12-11 devnull 	if(save){
 912 b3994ec5 2003-12-11 devnull 		incref(&r->ref);
 913 b3994ec5 2003-12-11 devnull 		if(reffonts[fix])
 914 b3994ec5 2003-12-11 devnull 			rfclose(reffonts[fix]);
 915 b3994ec5 2003-12-11 devnull 		reffonts[fix] = r;
 916 cb1ac4c4 2008-03-07 rsc 		if(name != fontnames[fix]){
 917 6d7fdb24 2004-12-27 devnull 			free(fontnames[fix]);
 918 6d7fdb24 2004-12-27 devnull 			fontnames[fix] = estrdup(name);
 919 6d7fdb24 2004-12-27 devnull 		}
 920 b3994ec5 2003-12-11 devnull 	}
 921 b3994ec5 2003-12-11 devnull 	if(setfont){
 922 b3994ec5 2003-12-11 devnull 		reffont.f = r->f;
 923 b3994ec5 2003-12-11 devnull 		incref(&r->ref);
 924 b3994ec5 2003-12-11 devnull 		rfclose(reffonts[0]);
 925 b3994ec5 2003-12-11 devnull 		font = r->f;
 926 b3994ec5 2003-12-11 devnull 		reffonts[0] = r;
 927 b3994ec5 2003-12-11 devnull 		incref(&r->ref);
 928 b3994ec5 2003-12-11 devnull 		iconinit();
 929 b3994ec5 2003-12-11 devnull 	}
 930 b3994ec5 2003-12-11 devnull 	incref(&r->ref);
 931 b3994ec5 2003-12-11 devnull 	return r;
 932 b3994ec5 2003-12-11 devnull }
 933 b3994ec5 2003-12-11 devnull 
 934 b3994ec5 2003-12-11 devnull void
 935 b3994ec5 2003-12-11 devnull rfclose(Reffont *r)
 936 b3994ec5 2003-12-11 devnull {
 937 b3994ec5 2003-12-11 devnull 	int i;
 938 b3994ec5 2003-12-11 devnull 
 939 b3994ec5 2003-12-11 devnull 	if(decref(&r->ref) == 0){
 940 b3994ec5 2003-12-11 devnull 		for(i=0; i<nfontcache; i++)
 941 b3994ec5 2003-12-11 devnull 			if(r == fontcache[i])
 942 b3994ec5 2003-12-11 devnull 				break;
 943 b3994ec5 2003-12-11 devnull 		if(i >= nfontcache)
 944 b3994ec5 2003-12-11 devnull 			warning(nil, "internal error: can't find font in cache\n");
 945 b3994ec5 2003-12-11 devnull 		else{
 946 b3994ec5 2003-12-11 devnull 			nfontcache--;
 947 b3994ec5 2003-12-11 devnull 			memmove(fontcache+i, fontcache+i+1, (nfontcache-i)*sizeof(Reffont*));
 948 b3994ec5 2003-12-11 devnull 		}
 949 b3994ec5 2003-12-11 devnull 		freefont(r->f);
 950 b3994ec5 2003-12-11 devnull 		free(r);
 951 b3994ec5 2003-12-11 devnull 	}
 952 b3994ec5 2003-12-11 devnull }
 953 b3994ec5 2003-12-11 devnull 
 954 b3994ec5 2003-12-11 devnull Cursor boxcursor = {
 955 b3994ec5 2003-12-11 devnull 	{-7, -7},
 956 b3994ec5 2003-12-11 devnull 	{0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF,
 957 b3994ec5 2003-12-11 devnull 	 0xFF, 0xFF, 0xF8, 0x1F, 0xF8, 0x1F, 0xF8, 0x1F,
 958 b3994ec5 2003-12-11 devnull 	 0xF8, 0x1F, 0xF8, 0x1F, 0xF8, 0x1F, 0xFF, 0xFF,
 959 b3994ec5 2003-12-11 devnull 	 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF},
 960 b3994ec5 2003-12-11 devnull 	{0x00, 0x00, 0x7F, 0xFE, 0x7F, 0xFE, 0x7F, 0xFE,
 961 b3994ec5 2003-12-11 devnull 	 0x70, 0x0E, 0x70, 0x0E, 0x70, 0x0E, 0x70, 0x0E,
 962 b3994ec5 2003-12-11 devnull 	 0x70, 0x0E, 0x70, 0x0E, 0x70, 0x0E, 0x70, 0x0E,
 963 b3994ec5 2003-12-11 devnull 	 0x7F, 0xFE, 0x7F, 0xFE, 0x7F, 0xFE, 0x00, 0x00}
 964 b3994ec5 2003-12-11 devnull };
 965 b3994ec5 2003-12-11 devnull 
 966 b3994ec5 2003-12-11 devnull void
 967 b3994ec5 2003-12-11 devnull iconinit(void)
 968 b3994ec5 2003-12-11 devnull {
 969 b3994ec5 2003-12-11 devnull 	Rectangle r;
 970 b3994ec5 2003-12-11 devnull 	Image *tmp;
 971 b3994ec5 2003-12-11 devnull 
 972 c96d8325 2012-11-26 rsc 	if(tagcols[BACK] == nil) {
 973 c96d8325 2012-11-26 rsc 		/* Blue */
 974 c96d8325 2012-11-26 rsc 		tagcols[BACK] = allocimagemix(display, DPalebluegreen, DWhite);
 975 c96d8325 2012-11-26 rsc 		tagcols[HIGH] = allocimage(display, Rect(0,0,1,1), screen->chan, 1, DPalegreygreen);
 976 c96d8325 2012-11-26 rsc 		tagcols[BORD] = allocimage(display, Rect(0,0,1,1), screen->chan, 1, DPurpleblue);
 977 c96d8325 2012-11-26 rsc 		tagcols[TEXT] = display->black;
 978 c96d8325 2012-11-26 rsc 		tagcols[HTEXT] = display->black;
 979 c96d8325 2012-11-26 rsc 	
 980 c96d8325 2012-11-26 rsc 		/* Yellow */
 981 c96d8325 2012-11-26 rsc 		textcols[BACK] = allocimagemix(display, DPaleyellow, DWhite);
 982 c96d8325 2012-11-26 rsc 		textcols[HIGH] = allocimage(display, Rect(0,0,1,1), screen->chan, 1, DDarkyellow);
 983 c96d8325 2012-11-26 rsc 		textcols[BORD] = allocimage(display, Rect(0,0,1,1), screen->chan, 1, DYellowgreen);
 984 c96d8325 2012-11-26 rsc 		textcols[TEXT] = display->black;
 985 c96d8325 2012-11-26 rsc 		textcols[HTEXT] = display->black;
 986 c96d8325 2012-11-26 rsc 	}
 987 c96d8325 2012-11-26 rsc 	
 988 c96d8325 2012-11-26 rsc 	r = Rect(0, 0, Scrollwid+ButtonBorder, font->height+1);
 989 c96d8325 2012-11-26 rsc 	if(button && eqrect(r, button->r))
 990 c96d8325 2012-11-26 rsc 		return;
 991 b3994ec5 2003-12-11 devnull 
 992 b3994ec5 2003-12-11 devnull 	if(button){
 993 b3994ec5 2003-12-11 devnull 		freeimage(button);
 994 b3994ec5 2003-12-11 devnull 		freeimage(modbutton);
 995 b3994ec5 2003-12-11 devnull 		freeimage(colbutton);
 996 b3994ec5 2003-12-11 devnull 	}
 997 b3994ec5 2003-12-11 devnull 
 998 b3994ec5 2003-12-11 devnull 	button = allocimage(display, r, screen->chan, 0, DNofill);
 999 b3994ec5 2003-12-11 devnull 	draw(button, r, tagcols[BACK], nil, r.min);
1000 c96d8325 2012-11-26 rsc 	r.max.x -= ButtonBorder;
1001 c96d8325 2012-11-26 rsc 	border(button, r, ButtonBorder, tagcols[BORD], ZP);
1002 b3994ec5 2003-12-11 devnull 
1003 b3994ec5 2003-12-11 devnull 	r = button->r;
1004 b3994ec5 2003-12-11 devnull 	modbutton = allocimage(display, r, screen->chan, 0, DNofill);
1005 b3994ec5 2003-12-11 devnull 	draw(modbutton, r, tagcols[BACK], nil, r.min);
1006 c96d8325 2012-11-26 rsc 	r.max.x -= ButtonBorder;
1007 c96d8325 2012-11-26 rsc 	border(modbutton, r, ButtonBorder, tagcols[BORD], ZP);
1008 c96d8325 2012-11-26 rsc 	r = insetrect(r, ButtonBorder);
1009 b3994ec5 2003-12-11 devnull 	tmp = allocimage(display, Rect(0,0,1,1), screen->chan, 1, DMedblue);
1010 b3994ec5 2003-12-11 devnull 	draw(modbutton, r, tmp, nil, ZP);
1011 b3994ec5 2003-12-11 devnull 	freeimage(tmp);
1012 b3994ec5 2003-12-11 devnull 
1013 b3994ec5 2003-12-11 devnull 	r = button->r;
1014 b3994ec5 2003-12-11 devnull 	colbutton = allocimage(display, r, screen->chan, 0, DPurpleblue);
1015 b3994ec5 2003-12-11 devnull 
1016 b3994ec5 2003-12-11 devnull 	but2col = allocimage(display, r, screen->chan, 1, 0xAA0000FF);
1017 b3994ec5 2003-12-11 devnull 	but3col = allocimage(display, r, screen->chan, 1, 0x006600FF);
1018 b3994ec5 2003-12-11 devnull }
1019 b3994ec5 2003-12-11 devnull 
1020 b3994ec5 2003-12-11 devnull /*
1021 b3994ec5 2003-12-11 devnull  * /dev/snarf updates when the file is closed, so we must open our own
1022 b3994ec5 2003-12-11 devnull  * fd here rather than use snarffd
1023 b3994ec5 2003-12-11 devnull  */
1024 b3994ec5 2003-12-11 devnull 
1025 b3994ec5 2003-12-11 devnull /* rio truncates larges snarf buffers, so this avoids using the
1026 b3994ec5 2003-12-11 devnull  * service if the string is huge */
1027 b3994ec5 2003-12-11 devnull 
1028 b3994ec5 2003-12-11 devnull #define MAXSNARF 100*1024
1029 b3994ec5 2003-12-11 devnull 
1030 b3994ec5 2003-12-11 devnull void
1031 b3994ec5 2003-12-11 devnull acmeputsnarf(void)
1032 b3994ec5 2003-12-11 devnull {
1033 5a8e63b2 2004-02-29 devnull 	int i, n;
1034 5a8e63b2 2004-02-29 devnull 	Fmt f;
1035 5a8e63b2 2004-02-29 devnull 	char *s;
1036 b3994ec5 2003-12-11 devnull 
1037 5a8e63b2 2004-02-29 devnull 	if(snarfbuf.nc==0)
1038 b3994ec5 2003-12-11 devnull 		return;
1039 b3994ec5 2003-12-11 devnull 	if(snarfbuf.nc > MAXSNARF)
1040 b3994ec5 2003-12-11 devnull 		return;
1041 5a8e63b2 2004-02-29 devnull 
1042 5a8e63b2 2004-02-29 devnull 	fmtstrinit(&f);
1043 b3994ec5 2003-12-11 devnull 	for(i=0; i<snarfbuf.nc; i+=n){
1044 b3994ec5 2003-12-11 devnull 		n = snarfbuf.nc-i;
1045 b3994ec5 2003-12-11 devnull 		if(n >= NSnarf)
1046 b3994ec5 2003-12-11 devnull 			n = NSnarf;
1047 b3994ec5 2003-12-11 devnull 		bufread(&snarfbuf, i, snarfrune, n);
1048 5a8e63b2 2004-02-29 devnull 		if(fmtprint(&f, "%.*S", n, snarfrune) < 0)
1049 b3994ec5 2003-12-11 devnull 			break;
1050 b3994ec5 2003-12-11 devnull 	}
1051 5a8e63b2 2004-02-29 devnull 	s = fmtstrflush(&f);
1052 5a8e63b2 2004-02-29 devnull 	if(s && s[0])
1053 5a8e63b2 2004-02-29 devnull 		putsnarf(s);
1054 5a8e63b2 2004-02-29 devnull 	free(s);
1055 b3994ec5 2003-12-11 devnull }
1056 b3994ec5 2003-12-11 devnull 
1057 b3994ec5 2003-12-11 devnull void
1058 5a8e63b2 2004-02-29 devnull acmegetsnarf(void)
1059 b3994ec5 2003-12-11 devnull {
1060 5a8e63b2 2004-02-29 devnull 	char *s;
1061 5a8e63b2 2004-02-29 devnull 	int nb, nr, nulls, len;
1062 5a8e63b2 2004-02-29 devnull 	Rune *r;
1063 b3994ec5 2003-12-11 devnull 
1064 5a8e63b2 2004-02-29 devnull 	s = getsnarf();
1065 5a8e63b2 2004-02-29 devnull 	if(s == nil || s[0]==0){
1066 5a8e63b2 2004-02-29 devnull 		free(s);
1067 b3994ec5 2003-12-11 devnull 		return;
1068 5a8e63b2 2004-02-29 devnull 	}
1069 5a8e63b2 2004-02-29 devnull 
1070 5a8e63b2 2004-02-29 devnull 	len = strlen(s);
1071 5a8e63b2 2004-02-29 devnull 	r = runemalloc(len+1);
1072 5a8e63b2 2004-02-29 devnull 	cvttorunes(s, len, r, &nb, &nr, &nulls);
1073 b3994ec5 2003-12-11 devnull 	bufreset(&snarfbuf);
1074 5a8e63b2 2004-02-29 devnull 	bufinsert(&snarfbuf, 0, r, nr);
1075 5a8e63b2 2004-02-29 devnull 	free(r);
1076 5a8e63b2 2004-02-29 devnull 	free(s);
1077 cd5a7378 2008-04-17 rsc }
1078 cd5a7378 2008-04-17 rsc 
1079 cd5a7378 2008-04-17 rsc int
1080 cd5a7378 2008-04-17 rsc ismtpt(char *file)
1081 cd5a7378 2008-04-17 rsc {
1082 cd5a7378 2008-04-17 rsc 	int n;
1083 cd5a7378 2008-04-17 rsc 
1084 5d32c407 2008-05-08 rsc 	if(mtpt == nil)
1085 5d32c407 2008-05-08 rsc 		return 0;
1086 5d32c407 2008-05-08 rsc 
1087 cd5a7378 2008-04-17 rsc 	/* This is not foolproof, but it will stop a lot of them. */
1088 cd5a7378 2008-04-17 rsc 	n = strlen(mtpt);
1089 cd5a7378 2008-04-17 rsc 	return strncmp(file, mtpt, n) == 0 && ((n > 0 && mtpt[n-1] == '/') || file[n] == '/' || file[n] == 0);
1090 daea2c7d 2009-09-25 russcox }
1091 daea2c7d 2009-09-25 russcox 
1092 daea2c7d 2009-09-25 russcox int
1093 daea2c7d 2009-09-25 russcox timefmt(Fmt *f)
1094 daea2c7d 2009-09-25 russcox {
1095 daea2c7d 2009-09-25 russcox 	Tm *tm;
1096 daea2c7d 2009-09-25 russcox 
1097 daea2c7d 2009-09-25 russcox 	tm = localtime(va_arg(f->args, ulong));
1098 daea2c7d 2009-09-25 russcox 	return fmtprint(f, "%04d/%02d/%02d %02d:%02d:%02d",
1099 daea2c7d 2009-09-25 russcox 		tm->year+1900, tm->mon+1, tm->mday, tm->hour, tm->min, tm->sec);
1100 b3994ec5 2003-12-11 devnull }
1101 daea2c7d 2009-09-25 russcox