1 /*-
2 * Copyright (c) 1999 Kazutaka YOKOTA <yokota@zodiac.mech.utsunomiya-u.ac.jp>
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer as
10 * the first lines of this file unmodified.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 * notice, this list of conditions and the following disclaimer in the
13 * documentation and/or other materials provided with the distribution.
14 *
15 * THIS SOFTWARE IS PROVIDED BY THE AUTHORS ``AS IS'' AND ANY EXPRESS OR
16 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
17 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
18 * IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR ANY DIRECT, INDIRECT,
19 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
20 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
21 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
22 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
23 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
24 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
25 *
26 * $FreeBSD: src/sys/dev/syscons/scmouse.c,v 1.12.2.3 2001/07/28 12:51:47 yokota Exp $
27 */
28
29 #include "opt_syscons.h"
30
31 #include <sys/param.h>
32 #include <sys/systm.h>
33 #include <sys/kernel.h>
34 #include <sys/conf.h>
35 #include <sys/signalvar.h>
36 #include <sys/proc.h>
37 #include <sys/tty.h>
38 #include <sys/thread2.h>
39
40 #include <machine/console.h>
41 #include <sys/mouse.h>
42
43 #include "syscons.h"
44
45 #ifdef SC_TWOBUTTON_MOUSE
46 #define SC_MOUSE_PASTEBUTTON MOUSE_BUTTON3DOWN /* right button */
47 #define SC_MOUSE_EXTENDBUTTON MOUSE_BUTTON2DOWN /* not really used */
48 #else
49 #define SC_MOUSE_PASTEBUTTON MOUSE_BUTTON2DOWN /* middle button */
50 #define SC_MOUSE_EXTENDBUTTON MOUSE_BUTTON3DOWN /* right button */
51 #endif /* SC_TWOBUTTON_MOUSE */
52
53 #define SC_WAKEUP_DELTA 20
54
55 #ifndef SC_NO_SYSMOUSE
56
57 static int cut_buffer_size;
58 static u_char *cut_buffer;
59
60 /* local functions */
61 static void sc_mouse_init(void *);
62 static void sc_mouse_uninit(void *);
63
64 static void set_mouse_pos(scr_stat *scp);
65 #ifndef SC_NO_CUTPASTE
66 static int skip_spc_right(scr_stat *scp, int p);
67 static int skip_spc_left(scr_stat *scp, int p);
68 static void mouse_cut(scr_stat *scp);
69 static void mouse_cut_start(scr_stat *scp);
70 static void mouse_cut_end(scr_stat *scp);
71 static void mouse_cut_word(scr_stat *scp);
72 static void mouse_cut_line(scr_stat *scp);
73 static void mouse_cut_extend(scr_stat *scp);
74 static void mouse_paste(scr_stat *scp);
75 #endif /* SC_NO_CUTPASTE */
76
77 static struct lwkt_token scmouse_tok = LWKT_TOKEN_INITIALIZER(scmouse_tok);
78
79 #ifndef SC_NO_CUTPASTE
80 /* allocate a cut buffer */
81 void
sc_alloc_cut_buffer(scr_stat * scp,int wait)82 sc_alloc_cut_buffer(scr_stat *scp, int wait)
83 {
84 u_char *p;
85
86 if ((cut_buffer == NULL)
87 || (cut_buffer_size < scp->xsize * scp->ysize + 1)) {
88 p = cut_buffer;
89 cut_buffer = NULL;
90 if (p != NULL)
91 kfree(p, M_SYSCONS);
92 cut_buffer_size = scp->xsize * scp->ysize + 1;
93 p = kmalloc(cut_buffer_size, M_SYSCONS, (wait) ? M_WAITOK : M_NOWAIT);
94 if (p != NULL)
95 p[0] = '\0';
96 cut_buffer = p;
97 }
98 }
99 #endif /* SC_NO_CUTPASTE */
100
101 /* move mouse */
102 void
sc_mouse_move(scr_stat * scp,int x,int y)103 sc_mouse_move(scr_stat *scp, int x, int y)
104 {
105 crit_enter();
106 scp->mouse_xpos = scp->mouse_oldxpos = x;
107 scp->mouse_ypos = scp->mouse_oldypos = y;
108 if (scp->font_height <= 0)
109 scp->mouse_pos = scp->mouse_oldpos = 0;
110 else
111 scp->mouse_pos = scp->mouse_oldpos =
112 (y / scp->font_height - scp->yoff) * scp->xsize +
113 x / scp->font_width - scp->xoff;
114 scp->status |= MOUSE_MOVED;
115 crit_exit();
116 }
117
118 /* adjust mouse position */
119 static void
set_mouse_pos(scr_stat * scp)120 set_mouse_pos(scr_stat *scp)
121 {
122 if (scp->mouse_xpos < scp->xoff * scp->font_width)
123 scp->mouse_xpos = scp->xoff * scp->font_width;
124 if (scp->mouse_ypos < scp->yoff * scp->font_height)
125 scp->mouse_ypos = scp->yoff * scp->font_height;
126 if (ISGRAPHSC(scp)) {
127 if (scp->mouse_xpos > scp->xpixel - 1)
128 scp->mouse_xpos = scp->xpixel - 1;
129 if (scp->mouse_ypos > scp->ypixel - 1)
130 scp->mouse_ypos = scp->ypixel - 1;
131 return;
132 } else {
133 if (scp->mouse_xpos > (scp->xsize + scp->xoff) * scp->font_width - 1)
134 scp->mouse_xpos = (scp->xsize + scp->xoff) * scp->font_width - 1;
135 if (scp->mouse_ypos > (scp->ysize + scp->yoff) * scp->font_height - 1)
136 scp->mouse_ypos = (scp->ysize + scp->yoff) * scp->font_height - 1;
137 }
138
139 if (scp->mouse_xpos != scp->mouse_oldxpos ||
140 scp->mouse_ypos != scp->mouse_oldypos) {
141 scp->status |= MOUSE_MOVED;
142 scp->mouse_pos =
143 (scp->mouse_ypos / scp->font_height - scp->yoff) * scp->xsize +
144 scp->mouse_xpos / scp->font_width - scp->xoff;
145 #ifndef SC_NO_CUTPASTE
146 if ((scp->status & MOUSE_VISIBLE) && (scp->status & MOUSE_CUTTING))
147 mouse_cut(scp);
148 #endif
149 }
150 }
151
152 #ifndef SC_NO_CUTPASTE
153
154 void
sc_draw_mouse_image(scr_stat * scp)155 sc_draw_mouse_image(scr_stat *scp)
156 {
157 if (ISGRAPHSC(scp))
158 return;
159
160 atomic_add_int(&scp->sc->videoio_in_progress, 1);
161 (*scp->rndr->draw_mouse)(scp, scp->mouse_xpos, scp->mouse_ypos, TRUE);
162 scp->mouse_oldpos = scp->mouse_pos;
163 scp->mouse_oldxpos = scp->mouse_xpos;
164 scp->mouse_oldypos = scp->mouse_ypos;
165 scp->status |= MOUSE_VISIBLE;
166 atomic_add_int(&scp->sc->videoio_in_progress, -1);
167 }
168
169 void
sc_remove_mouse_image(scr_stat * scp)170 sc_remove_mouse_image(scr_stat *scp)
171 {
172 int size;
173 int i;
174
175 if (ISGRAPHSC(scp))
176 return;
177
178 atomic_add_int(&scp->sc->videoio_in_progress, 1);
179 (*scp->rndr->draw_mouse)(scp,
180 (scp->mouse_oldpos%scp->xsize + scp->xoff) *
181 scp->font_width,
182 (scp->mouse_oldpos/scp->xsize + scp->yoff) *
183 scp->font_height,
184 FALSE);
185 size = scp->xsize * scp->ysize;
186 i = scp->mouse_oldpos;
187 mark_for_update(scp, i);
188 mark_for_update(scp, i);
189 if (i + scp->xsize + 1 < size) {
190 mark_for_update(scp, i + scp->xsize + 1);
191 } else if (i + scp->xsize < size) {
192 mark_for_update(scp, i + scp->xsize);
193 } else if (i + 1 < size) {
194 mark_for_update(scp, i + 1);
195 }
196 scp->status &= ~MOUSE_VISIBLE;
197 atomic_add_int(&scp->sc->videoio_in_progress, -1);
198 }
199
200 int
sc_inside_cutmark(scr_stat * scp,int pos)201 sc_inside_cutmark(scr_stat *scp, int pos)
202 {
203 int start;
204 int end;
205
206 if (scp->mouse_cut_end < 0)
207 return FALSE;
208 if (scp->mouse_cut_start <= scp->mouse_cut_end) {
209 start = scp->mouse_cut_start;
210 end = scp->mouse_cut_end;
211 } else {
212 start = scp->mouse_cut_end;
213 end = scp->mouse_cut_start - 1;
214 }
215 return ((start <= pos) && (pos <= end));
216 }
217
218 void
sc_remove_cutmarking(scr_stat * scp)219 sc_remove_cutmarking(scr_stat *scp)
220 {
221 crit_enter();
222 if (scp->mouse_cut_end >= 0) {
223 mark_for_update(scp, scp->mouse_cut_start);
224 mark_for_update(scp, scp->mouse_cut_end);
225 }
226 scp->mouse_cut_start = scp->xsize*scp->ysize;
227 scp->mouse_cut_end = -1;
228 crit_exit();
229 scp->status &= ~MOUSE_CUTTING;
230 }
231
232 void
sc_remove_all_cutmarkings(sc_softc_t * sc)233 sc_remove_all_cutmarkings(sc_softc_t *sc)
234 {
235 scr_stat *scp;
236 int i;
237
238 /* delete cut markings in all vtys */
239 for (i = 0; i < sc->vtys; ++i) {
240 scp = SC_STAT(sc->dev[i]);
241 if (scp == NULL)
242 continue;
243 sc_remove_cutmarking(scp);
244 }
245 }
246
247 void
sc_remove_all_mouse(sc_softc_t * sc)248 sc_remove_all_mouse(sc_softc_t *sc)
249 {
250 scr_stat *scp;
251 int i;
252
253 for (i = 0; i < sc->vtys; ++i) {
254 scp = SC_STAT(sc->dev[i]);
255 if (scp == NULL)
256 continue;
257 if (scp->status & MOUSE_VISIBLE) {
258 scp->status &= ~MOUSE_VISIBLE;
259 mark_all(scp);
260 }
261 }
262 }
263
264 #define IS_SPACE_CHAR(c) (((c) & 0xff) == ' ')
265
266 /* skip spaces to right */
267 static int
skip_spc_right(scr_stat * scp,int p)268 skip_spc_right(scr_stat *scp, int p)
269 {
270 int c;
271 int i;
272
273 for (i = p % scp->xsize; i < scp->xsize; ++i) {
274 c = sc_vtb_getc(&scp->vtb, p);
275 if (!IS_SPACE_CHAR(c))
276 break;
277 ++p;
278 }
279 return i;
280 }
281
282 /* skip spaces to left */
283 static int
skip_spc_left(scr_stat * scp,int p)284 skip_spc_left(scr_stat *scp, int p)
285 {
286 int c;
287 int i;
288
289 for (i = p-- % scp->xsize - 1; i >= 0; --i) {
290 c = sc_vtb_getc(&scp->vtb, p);
291 if (!IS_SPACE_CHAR(c))
292 break;
293 --p;
294 }
295 return i;
296 }
297
298 /* copy marked region to the cut buffer */
299 static void
mouse_cut(scr_stat * scp)300 mouse_cut(scr_stat *scp)
301 {
302 int start;
303 int end;
304 int from;
305 int to;
306 int blank;
307 int c;
308 int p;
309 int i;
310
311 start = scp->mouse_cut_start;
312 if (scp->mouse_pos >= start) {
313 from = start;
314 to = end = scp->mouse_pos;
315 } else {
316 from = end = scp->mouse_pos;
317 to = start - 1;
318 }
319 for (p = from, i = blank = 0; p <= to; ++p) {
320 cut_buffer[i] = sc_vtb_getc(&scp->vtb, p);
321 /* remember the position of the last non-space char */
322 if (!IS_SPACE_CHAR(cut_buffer[i++]))
323 blank = i; /* the first space after the last non-space */
324 /* trim trailing blank when crossing lines */
325 if ((p % scp->xsize) == (scp->xsize - 1)) {
326 cut_buffer[blank] = '\r';
327 i = blank + 1;
328 }
329 }
330 cut_buffer[i] = '\0';
331
332 /* scan towards the end of the last line */
333 --p;
334 for (i = p % scp->xsize; i < scp->xsize; ++i) {
335 c = sc_vtb_getc(&scp->vtb, p);
336 if (!IS_SPACE_CHAR(c))
337 break;
338 ++p;
339 }
340 /* if there is nothing but blank chars, trim them, but mark towards eol */
341 if (i >= scp->xsize) {
342 if (end >= start)
343 to = end = p - 1;
344 else
345 to = start = p;
346 cut_buffer[blank++] = '\r';
347 cut_buffer[blank] = '\0';
348 }
349
350 /* remove the current marking */
351 crit_enter();
352 if (scp->mouse_cut_start <= scp->mouse_cut_end) {
353 mark_for_update(scp, scp->mouse_cut_start);
354 mark_for_update(scp, scp->mouse_cut_end);
355 } else if (scp->mouse_cut_end >= 0) {
356 mark_for_update(scp, scp->mouse_cut_end);
357 mark_for_update(scp, scp->mouse_cut_start);
358 }
359
360 /* mark the new region */
361 scp->mouse_cut_start = start;
362 scp->mouse_cut_end = end;
363 mark_for_update(scp, from);
364 mark_for_update(scp, to);
365 crit_exit();
366 }
367
368 /* a mouse button is pressed, start cut operation */
369 static void
mouse_cut_start(scr_stat * scp)370 mouse_cut_start(scr_stat *scp)
371 {
372 int i;
373 int j;
374
375 if (scp->status & MOUSE_VISIBLE) {
376 i = scp->mouse_cut_start;
377 j = scp->mouse_cut_end;
378 sc_remove_all_cutmarkings(scp->sc);
379 if (scp->mouse_pos == i && i == j) {
380 cut_buffer[0] = '\0';
381 } else if (skip_spc_right(scp, scp->mouse_pos) >= scp->xsize) {
382 /* if the pointer is on trailing blank chars, mark towards eol */
383 i = skip_spc_left(scp, scp->mouse_pos) + 1;
384 crit_enter();
385 scp->mouse_cut_start = rounddown(scp->mouse_pos, scp->xsize) + i;
386 scp->mouse_cut_end =
387 (scp->mouse_pos / scp->xsize + 1) * scp->xsize - 1;
388 crit_exit();
389 cut_buffer[0] = '\r';
390 cut_buffer[1] = '\0';
391 scp->status |= MOUSE_CUTTING;
392 } else {
393 crit_enter();
394 scp->mouse_cut_start = scp->mouse_pos;
395 scp->mouse_cut_end = scp->mouse_cut_start;
396 crit_exit();
397 cut_buffer[0] = sc_vtb_getc(&scp->vtb, scp->mouse_cut_start);
398 cut_buffer[1] = '\0';
399 scp->status |= MOUSE_CUTTING;
400 }
401 mark_all(scp); /* this is probably overkill XXX */
402 }
403 }
404
405 /* end of cut operation */
406 static void
mouse_cut_end(scr_stat * scp)407 mouse_cut_end(scr_stat *scp)
408 {
409 if (scp->status & MOUSE_VISIBLE)
410 scp->status &= ~MOUSE_CUTTING;
411 }
412
413 /* copy a word under the mouse pointer */
414 static void
mouse_cut_word(scr_stat * scp)415 mouse_cut_word(scr_stat *scp)
416 {
417 int start;
418 int end;
419 int sol;
420 int eol;
421 int c;
422 int i;
423 int j;
424
425 /*
426 * Because we don't have locale information in the kernel,
427 * we only distinguish space char and non-space chars. Punctuation
428 * chars, symbols and other regular chars are all treated alike.
429 */
430 if (scp->status & MOUSE_VISIBLE) {
431 /* remove the current cut mark */
432 crit_enter();
433 if (scp->mouse_cut_start <= scp->mouse_cut_end) {
434 mark_for_update(scp, scp->mouse_cut_start);
435 mark_for_update(scp, scp->mouse_cut_end);
436 } else if (scp->mouse_cut_end >= 0) {
437 mark_for_update(scp, scp->mouse_cut_end);
438 mark_for_update(scp, scp->mouse_cut_start);
439 }
440 scp->mouse_cut_start = scp->xsize*scp->ysize;
441 scp->mouse_cut_end = -1;
442 crit_exit();
443
444 sol = rounddown(scp->mouse_pos, scp->xsize);
445 eol = sol + scp->xsize;
446 c = sc_vtb_getc(&scp->vtb, scp->mouse_pos);
447 if (IS_SPACE_CHAR(c)) {
448 /* blank space */
449 for (j = scp->mouse_pos; j >= sol; --j) {
450 c = sc_vtb_getc(&scp->vtb, j);
451 if (!IS_SPACE_CHAR(c))
452 break;
453 }
454 start = ++j;
455 for (j = scp->mouse_pos; j < eol; ++j) {
456 c = sc_vtb_getc(&scp->vtb, j);
457 if (!IS_SPACE_CHAR(c))
458 break;
459 }
460 end = j - 1;
461 } else {
462 /* non-space word */
463 for (j = scp->mouse_pos; j >= sol; --j) {
464 c = sc_vtb_getc(&scp->vtb, j);
465 if (IS_SPACE_CHAR(c))
466 break;
467 }
468 start = ++j;
469 for (j = scp->mouse_pos; j < eol; ++j) {
470 c = sc_vtb_getc(&scp->vtb, j);
471 if (IS_SPACE_CHAR(c))
472 break;
473 }
474 end = j - 1;
475 }
476
477 /* copy the found word */
478 for (i = 0, j = start; j <= end; ++j)
479 cut_buffer[i++] = sc_vtb_getc(&scp->vtb, j);
480 cut_buffer[i] = '\0';
481 scp->status |= MOUSE_CUTTING;
482
483 /* mark the region */
484 crit_enter();
485 scp->mouse_cut_start = start;
486 scp->mouse_cut_end = end;
487 mark_for_update(scp, start);
488 mark_for_update(scp, end);
489 crit_exit();
490 }
491 }
492
493 /* copy a line under the mouse pointer */
494 static void
mouse_cut_line(scr_stat * scp)495 mouse_cut_line(scr_stat *scp)
496 {
497 int i;
498 int j;
499
500 if (scp->status & MOUSE_VISIBLE) {
501 /* remove the current cut mark */
502 crit_enter();
503 if (scp->mouse_cut_start <= scp->mouse_cut_end) {
504 mark_for_update(scp, scp->mouse_cut_start);
505 mark_for_update(scp, scp->mouse_cut_end);
506 } else if (scp->mouse_cut_end >= 0) {
507 mark_for_update(scp, scp->mouse_cut_end);
508 mark_for_update(scp, scp->mouse_cut_start);
509 }
510
511 /* mark the entire line */
512 scp->mouse_cut_start = rounddown(scp->mouse_pos, scp->xsize);
513 scp->mouse_cut_end = scp->mouse_cut_start + scp->xsize - 1;
514 mark_for_update(scp, scp->mouse_cut_start);
515 mark_for_update(scp, scp->mouse_cut_end);
516 crit_exit();
517
518 /* copy the line into the cut buffer */
519 for (i = 0, j = scp->mouse_cut_start; j <= scp->mouse_cut_end; ++j)
520 cut_buffer[i++] = sc_vtb_getc(&scp->vtb, j);
521 cut_buffer[i++] = '\r';
522 cut_buffer[i] = '\0';
523 scp->status |= MOUSE_CUTTING;
524 }
525 }
526
527 /* extend the marked region to the mouse pointer position */
528 static void
mouse_cut_extend(scr_stat * scp)529 mouse_cut_extend(scr_stat *scp)
530 {
531 int start;
532 int end;
533
534 if ((scp->status & MOUSE_VISIBLE) && !(scp->status & MOUSE_CUTTING)
535 && (scp->mouse_cut_end >= 0)) {
536 if (scp->mouse_cut_start <= scp->mouse_cut_end) {
537 start = scp->mouse_cut_start;
538 end = scp->mouse_cut_end;
539 } else {
540 start = scp->mouse_cut_end;
541 end = scp->mouse_cut_start - 1;
542 }
543 crit_enter();
544 if (scp->mouse_pos > end) {
545 scp->mouse_cut_start = start;
546 scp->mouse_cut_end = end;
547 } else if (scp->mouse_pos < start) {
548 scp->mouse_cut_start = end + 1;
549 scp->mouse_cut_end = start;
550 } else {
551 if (scp->mouse_pos - start > end + 1 - scp->mouse_pos) {
552 scp->mouse_cut_start = start;
553 scp->mouse_cut_end = end;
554 } else {
555 scp->mouse_cut_start = end + 1;
556 scp->mouse_cut_end = start;
557 }
558 }
559 crit_exit();
560 mouse_cut(scp);
561 scp->status |= MOUSE_CUTTING;
562 }
563 }
564
565 /* paste cut buffer contents into the current vty */
566 static void
mouse_paste(scr_stat * scp)567 mouse_paste(scr_stat *scp)
568 {
569 if (scp->status & MOUSE_VISIBLE)
570 sc_paste(scp, cut_buffer, strlen(cut_buffer));
571 }
572
573 #endif /* SC_NO_CUTPASTE */
574
575 static void
sc_mouse_exit1_proc(struct proc * p)576 sc_mouse_exit1_proc(struct proc *p)
577 {
578 scr_stat *scp;
579
580 scp = p->p_drv_priv;
581 KKASSERT(scp != NULL);
582
583 lwkt_gettoken(&scmouse_tok);
584 KKASSERT(scp->mouse_proc == p);
585 KKASSERT(scp->mouse_pid == p->p_pid);
586
587 scp->mouse_signal = 0;
588 scp->mouse_proc = NULL;
589 scp->mouse_pid = 0;
590 lwkt_reltoken(&scmouse_tok);
591
592 PRELE(p);
593 p->p_flags &= ~P_SCMOUSE;
594 p->p_drv_priv = NULL;
595 }
596
597 /*
598 * sc_mouse_exit1:
599 *
600 * Handle exit1 for processes registered as MOUSE_MODE handlers.
601 * We must remove a process hold, established when MOUSE_MODE
602 * was enabled.
603 */
604 static void
sc_mouse_exit1(struct thread * td)605 sc_mouse_exit1(struct thread *td)
606 {
607 struct proc *p;
608
609 p = td->td_proc;
610 KKASSERT(p != NULL);
611
612 if ((p->p_flags & P_SCMOUSE) == 0)
613 return;
614
615
616 sc_mouse_exit1_proc(p);
617 }
618
619 int
sc_mouse_ioctl(struct tty * tp,u_long cmd,caddr_t data,int flag)620 sc_mouse_ioctl(struct tty *tp, u_long cmd, caddr_t data, int flag)
621 {
622 mouse_info_t *mouse;
623 scr_stat *cur_scp;
624 scr_stat *scp;
625 int f;
626
627 scp = SC_STAT(tp->t_dev);
628
629 switch (cmd) {
630
631 case CONS_MOUSECTL: /* control mouse arrow */
632 mouse = (mouse_info_t*) data;
633 cur_scp = scp->sc->cur_scp;
634
635 switch (mouse->operation) {
636 /*
637 * Setup a process to receive signals on mouse events.
638 */
639 case MOUSE_MODE:
640 lwkt_gettoken(&scmouse_tok);
641
642 if (!ISSIGVALID(mouse->u.mode.signal)) {
643 /* Setting MOUSE_MODE w/ an invalid signal is used to disarm */
644 if (scp->mouse_proc == curproc) {
645 sc_mouse_exit1_proc(curproc);
646 lwkt_reltoken(&scmouse_tok);
647 return 0;
648 } else {
649 lwkt_reltoken(&scmouse_tok);
650 return EINVAL;
651 }
652 } else {
653 /* Only one mouse process per syscons */
654 if (scp->mouse_proc) {
655 lwkt_reltoken(&scmouse_tok);
656 return EINVAL;
657 }
658
659 /* Only one syscons signal source per process */
660 if (curproc->p_flags & P_SCMOUSE) {
661 lwkt_reltoken(&scmouse_tok);
662 return EINVAL;
663 }
664
665 /*
666 * Process is stabilized by a hold, which is removed from
667 * sc_mouse_exit1. scp's mouse_{signal,proc,pid} fields
668 * are synchronized by the MP Lock.
669 */
670 scp->mouse_signal = mouse->u.mode.signal;
671 scp->mouse_proc = curproc;
672 scp->mouse_pid = curproc->p_pid;
673 curproc->p_flags |= P_SCMOUSE;
674 KKASSERT(curproc->p_drv_priv == NULL);
675 curproc->p_drv_priv = scp;
676 PHOLD(curproc);
677
678 lwkt_reltoken(&scmouse_tok);
679 return 0;
680 }
681 /*NOTREACHED*/
682 break;
683
684 case MOUSE_SHOW:
685 crit_enter();
686 if (!(scp->sc->flags & SC_MOUSE_ENABLED)) {
687 scp->sc->flags |= SC_MOUSE_ENABLED;
688 cur_scp->status &= ~MOUSE_HIDDEN;
689 if (!ISGRAPHSC(cur_scp))
690 mark_all(cur_scp);
691 crit_exit();
692 return 0;
693 } else {
694 crit_exit();
695 return EINVAL;
696 }
697 break;
698
699 case MOUSE_HIDE:
700 crit_enter();
701 if (scp->sc->flags & SC_MOUSE_ENABLED) {
702 scp->sc->flags &= ~SC_MOUSE_ENABLED;
703 sc_remove_all_mouse(scp->sc);
704 crit_exit();
705 return 0;
706 } else {
707 crit_exit();
708 return EINVAL;
709 }
710 break;
711
712 case MOUSE_MOVEABS:
713 crit_enter();
714 scp->mouse_xpos = mouse->u.data.x;
715 scp->mouse_ypos = mouse->u.data.y;
716 set_mouse_pos(scp);
717 crit_exit();
718 break;
719
720 case MOUSE_MOVEREL:
721 crit_enter();
722 scp->mouse_xpos += mouse->u.data.x;
723 scp->mouse_ypos += mouse->u.data.y;
724 set_mouse_pos(scp);
725 crit_exit();
726 break;
727
728 case MOUSE_GETINFO:
729 mouse->u.data.x = scp->mouse_xpos;
730 mouse->u.data.y = scp->mouse_ypos;
731 mouse->u.data.z = 0;
732 mouse->u.data.buttons = scp->mouse_buttons;
733 return 0;
734
735 case MOUSE_ACTION:
736 case MOUSE_MOTION_EVENT:
737 /* send out mouse event on /dev/sysmouse */
738 #if 0
739 /* this should maybe only be settable from /dev/consolectl SOS */
740 if (SC_VTY(tp->t_dev) != SC_CONSOLECTL)
741 return ENOTTY;
742 #endif
743 crit_enter();
744 if (mouse->u.data.x != 0 || mouse->u.data.y != 0) {
745 cur_scp->mouse_xpos += mouse->u.data.x;
746 cur_scp->mouse_ypos += mouse->u.data.y;
747 set_mouse_pos(cur_scp);
748 }
749 f = 0;
750 if (mouse->operation == MOUSE_ACTION) {
751 f = cur_scp->mouse_buttons ^ mouse->u.data.buttons;
752 cur_scp->mouse_buttons = mouse->u.data.buttons;
753 }
754 crit_exit();
755
756 if (sysmouse_event(mouse) == 0)
757 return 0;
758
759 /*
760 * If any buttons are down or the mouse has moved a lot,
761 * stop the screen saver.
762 */
763 if (((mouse->operation == MOUSE_ACTION) && mouse->u.data.buttons)
764 || (mouse->u.data.x*mouse->u.data.x
765 + mouse->u.data.y*mouse->u.data.y
766 >= SC_WAKEUP_DELTA*SC_WAKEUP_DELTA)) {
767 sc_touch_scrn_saver();
768 }
769
770 cur_scp->status &= ~MOUSE_HIDDEN;
771
772 lwkt_gettoken(&scmouse_tok);
773 if (cur_scp->mouse_signal) {
774 KKASSERT(cur_scp->mouse_proc != NULL);
775 ksignal(cur_scp->mouse_proc, cur_scp->mouse_signal);
776 lwkt_reltoken(&scmouse_tok);
777 break;
778 }
779 lwkt_reltoken(&scmouse_tok);
780
781 if (ISGRAPHSC(cur_scp) || (cut_buffer == NULL))
782 break;
783
784 #ifndef SC_NO_CUTPASTE
785 if ((mouse->operation == MOUSE_ACTION) && f) {
786 /* process button presses */
787 if (cur_scp->mouse_buttons & MOUSE_BUTTON1DOWN)
788 mouse_cut_start(cur_scp);
789 else
790 mouse_cut_end(cur_scp);
791 if (cur_scp->mouse_buttons & MOUSE_BUTTON2DOWN ||
792 cur_scp->mouse_buttons & MOUSE_BUTTON3DOWN)
793 mouse_paste(cur_scp);
794 }
795 #endif /* SC_NO_CUTPASTE */
796 break;
797
798 case MOUSE_BUTTON_EVENT:
799 if ((mouse->u.event.id & MOUSE_BUTTONS) == 0)
800 return EINVAL;
801 if (mouse->u.event.value < 0)
802 return EINVAL;
803 #if 0
804 /* this should maybe only be settable from /dev/consolectl SOS */
805 if (SC_VTY(tp->t_dev) != SC_CONSOLECTL)
806 return ENOTTY;
807 #endif
808 if (mouse->u.event.value > 0)
809 cur_scp->mouse_buttons |= mouse->u.event.id;
810 else
811 cur_scp->mouse_buttons &= ~mouse->u.event.id;
812
813 if (sysmouse_event(mouse) == 0)
814 return 0;
815
816 /* if a button is held down, stop the screen saver */
817 if (mouse->u.event.value > 0)
818 sc_touch_scrn_saver();
819
820 cur_scp->status &= ~MOUSE_HIDDEN;
821
822 lwkt_gettoken(&scmouse_tok);
823 if (cur_scp->mouse_signal) {
824 KKASSERT(cur_scp->mouse_proc != NULL);
825 ksignal(cur_scp->mouse_proc, cur_scp->mouse_signal);
826 lwkt_reltoken(&scmouse_tok);
827 break;
828 }
829 lwkt_reltoken(&scmouse_tok);
830
831 if (ISGRAPHSC(cur_scp) || (cut_buffer == NULL))
832 break;
833
834 #ifndef SC_NO_CUTPASTE
835 switch (mouse->u.event.id) {
836 case MOUSE_BUTTON1DOWN:
837 switch (mouse->u.event.value % 4) {
838 case 0: /* up */
839 mouse_cut_end(cur_scp);
840 break;
841 case 1: /* single click: start cut operation */
842 mouse_cut_start(cur_scp);
843 break;
844 case 2: /* double click: cut a word */
845 mouse_cut_word(cur_scp);
846 mouse_cut_end(cur_scp);
847 break;
848 case 3: /* triple click: cut a line */
849 mouse_cut_line(cur_scp);
850 mouse_cut_end(cur_scp);
851 break;
852 }
853 break;
854 case SC_MOUSE_PASTEBUTTON:
855 switch (mouse->u.event.value) {
856 case 0: /* up */
857 break;
858 default:
859 mouse_paste(cur_scp);
860 break;
861 }
862 break;
863 case SC_MOUSE_EXTENDBUTTON:
864 switch (mouse->u.event.value) {
865 case 0: /* up */
866 if (!(cur_scp->mouse_buttons & MOUSE_BUTTON1DOWN))
867 mouse_cut_end(cur_scp);
868 break;
869 default:
870 mouse_cut_extend(cur_scp);
871 break;
872 }
873 break;
874 }
875 #endif /* SC_NO_CUTPASTE */
876 break;
877
878 case MOUSE_MOUSECHAR:
879 if (mouse->u.mouse_char < 0) {
880 mouse->u.mouse_char = scp->sc->mouse_char;
881 } else {
882 if (mouse->u.mouse_char >= (unsigned char)-1 - 4)
883 return EINVAL;
884 crit_enter();
885 sc_remove_all_mouse(scp->sc);
886 #ifndef SC_NO_FONT_LOADING
887 if (ISTEXTSC(cur_scp) && (cur_scp->font != NULL))
888 sc_load_font(cur_scp, 0, cur_scp->font_height,
889 cur_scp->font,
890 cur_scp->sc->mouse_char, 4);
891 #endif
892 scp->sc->mouse_char = mouse->u.mouse_char;
893 crit_exit();
894 }
895 break;
896
897 default:
898 return EINVAL;
899 }
900
901 return 0;
902 }
903
904 return ENOIOCTL;
905 }
906
907 void
sc_mouse_init(void * unused)908 sc_mouse_init(void *unused)
909 {
910 at_exit(sc_mouse_exit1);
911 }
912
913 void
sc_mouse_uninit(void * unused)914 sc_mouse_uninit(void *unused)
915 {
916 }
917
918 SYSINIT(sc_mouse_init, SI_SUB_DRIVERS, SI_ORDER_ANY, sc_mouse_init, NULL);
919 SYSUNINIT(sc_mouse_uninit, SI_SUB_DRIVERS, SI_ORDER_ANY, sc_mouse_uninit, NULL);
920
921 #endif /* SC_NO_SYSMOUSE */
922