1 f73497bb 2008-02-01 rsc #include <u.h>
2 f73497bb 2008-02-01 rsc #include <X11/X.h>
3 f73497bb 2008-02-01 rsc #include <X11/Xatom.h>
4 f73497bb 2008-02-01 rsc #include <X11/Xlib.h>
5 f73497bb 2008-02-01 rsc #include <X11/Xutil.h>
6 f73497bb 2008-02-01 rsc #include <libc.h>
7 f73497bb 2008-02-01 rsc #include <ctype.h>
11 f73497bb 2008-02-01 rsc typedef struct Rectangle Rectangle;
12 f73497bb 2008-02-01 rsc struct Rectangle
19 f73497bb 2008-02-01 rsc #define Dx(r) ((r).max.x - (r).min.x)
20 f73497bb 2008-02-01 rsc #define Dy(r) ((r).max.y - (r).min.y)
22 f73497bb 2008-02-01 rsc typedef struct Win Win;
31 f73497bb 2008-02-01 rsc char *instance;
33 f73497bb 2008-02-01 rsc char *iconname;
36 f73497bb 2008-02-01 rsc Display *dpy;
42 f73497bb 2008-02-01 rsc void getinfo(void);
43 f73497bb 2008-02-01 rsc void listwindows(void);
44 ad8d5423 2008-02-01 rsc int parsewinsize(char*, Rectangle*, int*, int*, int*);
45 f73497bb 2008-02-01 rsc void shove(char*, char*);
50 ad8d5423 2008-02-01 rsc fprint(2, "usage: xshove [window rectangle]\n");
51 f73497bb 2008-02-01 rsc exits("usage");
55 f73497bb 2008-02-01 rsc main(int argc, char **argv)
62 f73497bb 2008-02-01 rsc screen = atoi(EARGF(usage()));
69 f73497bb 2008-02-01 rsc dpy = XOpenDisplay("");
70 f73497bb 2008-02-01 rsc if(dpy == nil)
71 f73497bb 2008-02-01 rsc sysfatal("open display: %r");
73 f73497bb 2008-02-01 rsc root = RootWindow(dpy, screen);
76 f73497bb 2008-02-01 rsc if(argc == 0){
77 f73497bb 2008-02-01 rsc listwindows();
80 f73497bb 2008-02-01 rsc if(argc != 2)
82 f73497bb 2008-02-01 rsc shove(argv[0], argv[1]);
87 f73497bb 2008-02-01 rsc getproperty(Window w, Atom a)
92 f73497bb 2008-02-01 rsc ulong n, dummy;
96 f73497bb 2008-02-01 rsc XGetWindowProperty(dpy, w, a, 0, 100L, 0,
97 f73497bb 2008-02-01 rsc AnyPropertyType, &type, &fmt,
98 f73497bb 2008-02-01 rsc &n, &dummy, &p);
99 f73497bb 2008-02-01 rsc if(p == nil || *p == 0)
101 f73497bb 2008-02-01 rsc return strdup((char*)p);
105 f73497bb 2008-02-01 rsc findname(Window w)
109 f73497bb 2008-02-01 rsc Window dw1, dw2, *xwin;
111 f73497bb 2008-02-01 rsc if(getproperty(w, XA_WM_NAME))
113 f73497bb 2008-02-01 rsc if(!XQueryTree(dpy, w, &dw1, &dw2, &xwin, &nxwin))
115 f73497bb 2008-02-01 rsc for(i=0; i<nxwin; i++)
116 f73497bb 2008-02-01 rsc if((w = findname(xwin[i])) != 0)
122 f73497bb 2008-02-01 rsc getinfo(void)
126 f73497bb 2008-02-01 rsc Window dw1, dw2, *xwin;
127 f73497bb 2008-02-01 rsc XClassHint class;
128 f73497bb 2008-02-01 rsc XWindowAttributes attr;
130 f73497bb 2008-02-01 rsc if(!XQueryTree(dpy, root, &dw1, &dw2, &xwin, &nxwin))
132 f73497bb 2008-02-01 rsc w = mallocz(nxwin*sizeof w[0], 1);
134 f73497bb 2008-02-01 rsc sysfatal("malloc: %r");
136 f73497bb 2008-02-01 rsc Win *ww = w;
137 f73497bb 2008-02-01 rsc for(i=0; i<nxwin; i++){
138 f73497bb 2008-02-01 rsc memset(&attr, 0, sizeof attr);
139 f73497bb 2008-02-01 rsc xwin[i] = findname(xwin[i]);
140 f73497bb 2008-02-01 rsc if(xwin[i] == 0)
142 f73497bb 2008-02-01 rsc XGetWindowAttributes(dpy, xwin[i], &attr);
143 f73497bb 2008-02-01 rsc if(attr.width <= 0 || attr.override_redirect || attr.map_state != IsViewable)
145 f73497bb 2008-02-01 rsc ww->xw = xwin[i];
146 f73497bb 2008-02-01 rsc ww->x = attr.x;
147 f73497bb 2008-02-01 rsc ww->y = attr.y;
148 f73497bb 2008-02-01 rsc ww->dx = attr.width;
149 f73497bb 2008-02-01 rsc ww->dy = attr.height;
150 f73497bb 2008-02-01 rsc XTranslateCoordinates(dpy, ww->xw, root, 0, 0, &ww->x, &ww->y, &dw1);
151 f73497bb 2008-02-01 rsc if(XGetClassHint(dpy, ww->xw, &class)){
152 f73497bb 2008-02-01 rsc ww->class = strdup(class.res_class);
153 f73497bb 2008-02-01 rsc ww->instance = strdup(class.res_name);
155 f73497bb 2008-02-01 rsc ww->iconname = getproperty(ww->xw, XA_WM_ICON_NAME);
156 f73497bb 2008-02-01 rsc ww->name = getproperty(ww->xw, XA_WM_NAME);
159 f73497bb 2008-02-01 rsc nw = ww - w;
163 f73497bb 2008-02-01 rsc listwindows(void)
167 f73497bb 2008-02-01 rsc for(i=0; i<nw; i++){
168 f73497bb 2008-02-01 rsc Win *ww = &w[i];
169 f73497bb 2008-02-01 rsc char rect[50];
170 f73497bb 2008-02-01 rsc snprint(rect, sizeof rect, "%d,%d,%d,%d", ww->x, ww->y, ww->x+ww->dx, ww->y+ww->dy);
171 f73497bb 2008-02-01 rsc print("%08x %-20s %-10s %s\n",
172 f73497bb 2008-02-01 rsc (uint)ww->xw,
174 f73497bb 2008-02-01 rsc ww->instance,
180 f73497bb 2008-02-01 rsc shove(char *name, char *geom)
183 ad8d5423 2008-02-01 rsc int isdelta, havemin, havesize;
184 ad8d5423 2008-02-01 rsc int old, new;
185 f73497bb 2008-02-01 rsc Rectangle r;
187 ad8d5423 2008-02-01 rsc if(parsewinsize(geom, &r, &isdelta, &havemin, &havesize) < 0)
188 f73497bb 2008-02-01 rsc sysfatal("bad window spec: %s", name);
192 ad8d5423 2008-02-01 rsc if(isdelta){
194 ad8d5423 2008-02-01 rsc new = isdelta;
196 f73497bb 2008-02-01 rsc for(i=0; i<nw; i++){
197 f73497bb 2008-02-01 rsc Win *ww = &w[i];
198 f73497bb 2008-02-01 rsc if(ww->instance && strstr(ww->instance, name)
199 f73497bb 2008-02-01 rsc || ww->class && strstr(ww->class, name)){
200 f73497bb 2008-02-01 rsc int value_mask;
201 f73497bb 2008-02-01 rsc XWindowChanges e;
203 f73497bb 2008-02-01 rsc memset(&e, 0, sizeof e);
204 f73497bb 2008-02-01 rsc if(havemin){
205 ad8d5423 2008-02-01 rsc e.x = old*ww->x + new*r.min.x;
206 ad8d5423 2008-02-01 rsc e.y = old*ww->y + new*r.min.y;
208 ad8d5423 2008-02-01 rsc e.x = ww->x;
209 ad8d5423 2008-02-01 rsc e.y = ww->y;
211 ad8d5423 2008-02-01 rsc if(havesize){
212 ad8d5423 2008-02-01 rsc e.width = old*ww->dx + new*Dx(r);
213 ad8d5423 2008-02-01 rsc e.height = old*ww->dy + new*Dy(r);
215 ad8d5423 2008-02-01 rsc e.width = ww->dx;
216 ad8d5423 2008-02-01 rsc e.height = ww->dy;
218 ad8d5423 2008-02-01 rsc value_mask = CWX | CWY | CWWidth | CWHeight;
219 f73497bb 2008-02-01 rsc XConfigureWindow(dpy, ww->xw, value_mask, &e);
220 f73497bb 2008-02-01 rsc XFlush(dpy);
226 ad8d5423 2008-02-01 rsc parsewinsize(char *s, Rectangle *r, int *isdelta, int *havemin, int *havesize)
228 f73497bb 2008-02-01 rsc char c, *os;
229 f73497bb 2008-02-01 rsc int i, j, k, l;
232 ad8d5423 2008-02-01 rsc if(*s == '-'){
234 ad8d5423 2008-02-01 rsc *isdelta = -1;
235 ad8d5423 2008-02-01 rsc }else if(*s == '+'){
237 ad8d5423 2008-02-01 rsc *isdelta = 1;
239 ad8d5423 2008-02-01 rsc *isdelta = 0;
240 f73497bb 2008-02-01 rsc *havemin = 0;
241 ad8d5423 2008-02-01 rsc *havesize = 0;
242 f73497bb 2008-02-01 rsc memset(r, 0, sizeof *r);
243 f73497bb 2008-02-01 rsc if(!isdigit((uchar)*s))
245 f73497bb 2008-02-01 rsc i = strtol(s, &s, 0);
246 f73497bb 2008-02-01 rsc if(*s == 'x'){
248 f73497bb 2008-02-01 rsc if(!isdigit((uchar)*s))
250 f73497bb 2008-02-01 rsc j = strtol(s, &s, 0);
251 f73497bb 2008-02-01 rsc r->max.x = i;
252 f73497bb 2008-02-01 rsc r->max.y = j;
253 ad8d5423 2008-02-01 rsc *havesize = 1;
256 f73497bb 2008-02-01 rsc if(*s != '@')
260 f73497bb 2008-02-01 rsc if(!isdigit((uchar)*s))
262 f73497bb 2008-02-01 rsc i = strtol(s, &s, 0);
263 f73497bb 2008-02-01 rsc if(*s != ',' && *s != ' ')
266 f73497bb 2008-02-01 rsc if(!isdigit((uchar)*s))
268 f73497bb 2008-02-01 rsc j = strtol(s, &s, 0);
271 f73497bb 2008-02-01 rsc r->min.x += i;
272 f73497bb 2008-02-01 rsc r->max.x += i;
273 f73497bb 2008-02-01 rsc r->min.y += j;
274 f73497bb 2008-02-01 rsc r->max.y += j;
275 ad8d5423 2008-02-01 rsc *havesize = 1;
276 f73497bb 2008-02-01 rsc *havemin = 1;
281 f73497bb 2008-02-01 rsc if(c != ' ' && c != ',')
284 f73497bb 2008-02-01 rsc if(!isdigit((uchar)*s))
286 f73497bb 2008-02-01 rsc j = strtol(s, &s, 0);
287 ad8d5423 2008-02-01 rsc if(*s == 0){
288 ad8d5423 2008-02-01 rsc r->min.x = i;
289 ad8d5423 2008-02-01 rsc r->min.y = j;
290 ad8d5423 2008-02-01 rsc *havemin = 1;
296 f73497bb 2008-02-01 rsc if(!isdigit((uchar)*s))
298 f73497bb 2008-02-01 rsc k = strtol(s, &s, 0);
302 f73497bb 2008-02-01 rsc if(!isdigit((uchar)*s))
304 f73497bb 2008-02-01 rsc l = strtol(s, &s, 0);
307 f73497bb 2008-02-01 rsc r->min.x = i;
308 f73497bb 2008-02-01 rsc r->min.y = j;
309 f73497bb 2008-02-01 rsc r->max.x = k;
310 f73497bb 2008-02-01 rsc r->max.y = l;
311 f73497bb 2008-02-01 rsc *havemin = 1;
312 ad8d5423 2008-02-01 rsc *havesize = 1;
316 f73497bb 2008-02-01 rsc werrstr("bad syntax in window size '%s'", os);