Add history to some dialog boxes
[wmaker-crm.git] / WINGs / wtextfield.c
1
2 #include "WINGsP.h"
3 #include "wconfig.h"
4
5 #include <X11/keysym.h>
6 #include <X11/Xatom.h>
7
8 #include <ctype.h>
9
10 #define CURSOR_BLINK_ON_DELAY 600
11 #define CURSOR_BLINK_OFF_DELAY 300
12
13 char *WMTextDidChangeNotification = "WMTextDidChangeNotification";
14 char *WMTextDidBeginEditingNotification = "WMTextDidBeginEditingNotification";
15 char *WMTextDidEndEditingNotification = "WMTextDidEndEditingNotification";
16
17 typedef struct W_TextField {
18 W_Class widgetClass;
19 W_View *view;
20
21 #if 0
22 struct W_TextField *nextField; /* next textfield in the chain */
23 struct W_TextField *prevField;
24 #endif
25
26 char *text;
27 int textLen; /* size of text */
28 int bufferSize; /* memory allocated for text */
29
30 int viewPosition; /* position of text being shown */
31
32 int cursorPosition; /* position of the insertion cursor */
33
34 short usableWidth;
35 short offsetWidth; /* offset of text from border */
36
37 WMRange selection;
38
39 WMFont *font;
40
41 WMTextFieldDelegate *delegate;
42
43 #if 0
44 WMHandlerID timerID; /* for cursor blinking */
45 #endif
46 struct {
47 WMAlignment alignment:2;
48
49 unsigned int bordered:1;
50
51 unsigned int beveled:1;
52
53 unsigned int enabled:1;
54
55 unsigned int focused:1;
56
57 unsigned int cursorOn:1;
58
59 unsigned int secure:1; /* password entry style */
60
61 unsigned int pointerGrabbed:1;
62
63 unsigned int ownsSelection:1;
64
65 unsigned int waitingSelection:1; /* requested selection, but
66 * didnt get yet */
67
68 unsigned int notIllegalMovement:1;
69 } flags;
70 } TextField;
71
72 #define NOTIFY(T,C,N,A) { WMNotification *notif = WMCreateNotification(N,T,A);\
73 if ((T)->delegate && (T)->delegate->C)\
74 (*(T)->delegate->C)((T)->delegate,notif);\
75 WMPostNotification(notif);\
76 WMReleaseNotification(notif);}
77
78 #define MIN_TEXT_BUFFER 2
79 #define TEXT_BUFFER_INCR 8
80
81 #define WM_EMACSKEYMASK ControlMask
82
83 #define WM_EMACSKEY_LEFT XK_b
84 #define WM_EMACSKEY_RIGHT XK_f
85 #define WM_EMACSKEY_HOME XK_a
86 #define WM_EMACSKEY_END XK_e
87 #define WM_EMACSKEY_BS XK_h
88 #define WM_EMACSKEY_DEL XK_d
89
90 #define DEFAULT_WIDTH 60
91 #define DEFAULT_HEIGHT 20
92 #define DEFAULT_BORDERED True
93 #define DEFAULT_ALIGNMENT WALeft
94
95 static void destroyTextField(TextField * tPtr);
96 static void paintTextField(TextField * tPtr);
97
98 static void handleEvents(XEvent * event, void *data);
99 static void handleTextFieldActionEvents(XEvent * event, void *data);
100 static void didResizeTextField();
101
102 struct W_ViewDelegate _TextFieldViewDelegate = {
103 NULL,
104 NULL,
105 didResizeTextField,
106 NULL,
107 NULL
108 };
109
110 static void lostSelection(WMView * view, Atom selection, void *cdata);
111
112 static WMData *requestHandler(WMView * view, Atom selection, Atom target, void *cdata, Atom * type);
113
114 static WMSelectionProcs selectionHandler = {
115 requestHandler,
116 lostSelection,
117 NULL
118 };
119
120 #define TEXT_WIDTH(tPtr, start) (WMWidthOfString((tPtr)->font, \
121 &((tPtr)->text[(start)]), (tPtr)->textLen - (start)))
122
123 #define TEXT_WIDTH2(tPtr, start, end) (WMWidthOfString((tPtr)->font, \
124 &((tPtr)->text[(start)]), (end) - (start)))
125
126 static INLINE int oneUTF8CharBackward(char *str, int len)
127 {
128 unsigned char *ustr = (unsigned char *)str;
129 int pos = 0;
130
131 while (len-- > 0 && ustr[--pos] >= 0x80 && ustr[pos] <= 0xbf) ;
132 return pos;
133 }
134
135 static INLINE int oneUTF8CharForward(char *str, int len)
136 {
137 unsigned char *ustr = (unsigned char *)str;
138 int pos = 0;
139
140 while (len-- > 0 && ustr[++pos] >= 0x80 && ustr[pos] <= 0xbf) ;
141 return pos;
142 }
143
144 // find the beginning of the UTF8 char pointed by str
145 static INLINE int seekUTF8CharStart(char *str, int len)
146 {
147 unsigned char *ustr = (unsigned char *)str;
148 int pos = 0;
149
150 while (len-- > 0 && ustr[pos] >= 0x80 && ustr[pos] <= 0xbf)
151 --pos;
152 return pos;
153 }
154
155 static void normalizeRange(TextField * tPtr, WMRange * range)
156 {
157 if (range->position < 0 && range->count < 0)
158 range->count = 0;
159
160 if (range->count == 0) {
161 /*range->position = 0; why is this? */
162 return;
163 }
164
165 /* (1,-2) ~> (0,1) ; (1,-1) ~> (0,1) ; (2,-1) ~> (1,1) */
166 if (range->count < 0) { /* && range->position >= 0 */
167 if (range->position + range->count < 0) {
168 range->count = range->position;
169 range->position = 0;
170 } else {
171 range->count = -range->count;
172 range->position -= range->count;
173 }
174 /* (-2,1) ~> (0,0) ; (-1,1) ~> (0,0) ; (-1,2) ~> (0,1) */
175 } else if (range->position < 0) { /* && range->count > 0 */
176 if (range->position + range->count < 0) {
177 range->position = range->count = 0;
178 } else {
179 range->count += range->position;
180 range->position = 0;
181 }
182 }
183
184 if (range->position + range->count > tPtr->textLen)
185 range->count = tPtr->textLen - range->position;
186 }
187
188 static void memmv(char *dest, char *src, int size)
189 {
190 int i;
191
192 if (dest > src) {
193 for (i = size - 1; i >= 0; i--) {
194 dest[i] = src[i];
195 }
196 } else if (dest < src) {
197 for (i = 0; i < size; i++) {
198 dest[i] = src[i];
199 }
200 }
201 }
202
203 static int incrToFit(TextField * tPtr)
204 {
205 int vp = tPtr->viewPosition;
206
207 while (TEXT_WIDTH(tPtr, tPtr->viewPosition) > tPtr->usableWidth) {
208 tPtr->viewPosition += oneUTF8CharForward(&tPtr->text[tPtr->viewPosition],
209 tPtr->textLen - tPtr->viewPosition);
210 }
211 return vp != tPtr->viewPosition;
212 }
213
214 static int incrToFit2(TextField * tPtr)
215 {
216 int vp = tPtr->viewPosition;
217
218 while (TEXT_WIDTH2(tPtr, tPtr->viewPosition, tPtr->cursorPosition)
219 >= tPtr->usableWidth)
220 tPtr->viewPosition += oneUTF8CharForward(&tPtr->text[tPtr->viewPosition],
221 tPtr->cursorPosition - tPtr->viewPosition);
222 return vp != tPtr->viewPosition;
223 }
224
225 static void decrToFit(TextField * tPtr)
226 {
227 int vp = tPtr->viewPosition;
228
229 while (vp > 0 && (vp += oneUTF8CharBackward(&tPtr->text[vp], vp),
230 TEXT_WIDTH(tPtr, vp)) < tPtr->usableWidth) {
231 tPtr->viewPosition = vp;
232 }
233 }
234
235 #undef TEXT_WIDTH
236 #undef TEXT_WIDTH2
237
238 static WMData *requestHandler(WMView * view, Atom selection, Atom target, void *cdata, Atom * type)
239 {
240 TextField *tPtr = view->self;
241 int count;
242 Display *dpy = tPtr->view->screen->display;
243 Atom _TARGETS;
244 Atom TEXT = XInternAtom(dpy, "TEXT", False);
245 Atom COMPOUND_TEXT = XInternAtom(dpy, "COMPOUND_TEXT", False);
246 WMData *data;
247
248 count = tPtr->selection.count < 0
249 ? tPtr->selection.position + tPtr->selection.count : tPtr->selection.position;
250
251 if (target == XA_STRING || target == TEXT || target == COMPOUND_TEXT) {
252
253 data = WMCreateDataWithBytes(&(tPtr->text[count]), abs(tPtr->selection.count));
254 WMSetDataFormat(data, 8);
255 *type = target;
256
257 return data;
258 }
259
260 _TARGETS = XInternAtom(dpy, "TARGETS", False);
261 if (target == _TARGETS) {
262 Atom *ptr;
263
264 ptr = wmalloc(4 * sizeof(Atom));
265 ptr[0] = _TARGETS;
266 ptr[1] = XA_STRING;
267 ptr[2] = TEXT;
268 ptr[3] = COMPOUND_TEXT;
269
270 data = WMCreateDataWithBytes(ptr, 4 * 4);
271 WMSetDataFormat(data, 32);
272
273 *type = target;
274 return data;
275 }
276
277 return NULL;
278
279 }
280
281 static void lostSelection(WMView * view, Atom selection, void *cdata)
282 {
283 TextField *tPtr = (WMTextField *) view->self;
284
285 if (tPtr->flags.ownsSelection) {
286 WMDeleteSelectionHandler(view, selection, CurrentTime);
287 tPtr->flags.ownsSelection = 0;
288 }
289 if (tPtr->selection.count != 0) {
290 tPtr->selection.count = 0;
291 paintTextField(tPtr);
292 }
293 }
294
295 static void selectionNotification(void *observerData, WMNotification * notification)
296 {
297 WMView *observerView = (WMView *) observerData;
298 WMView *newOwnerView = (WMView *) WMGetNotificationClientData(notification);
299
300 if (observerView != newOwnerView) {
301 /*
302 //if (tPtr->flags.ownsSelection)
303 // WMDeleteSelectionHandler(observerView, XA_PRIMARY, CurrentTime);
304 */
305 lostSelection(observerView, XA_PRIMARY, NULL);
306 }
307 }
308
309 static void realizeObserver(void *self, WMNotification * not)
310 {
311 W_CreateIC(((TextField *) self)->view);
312 }
313
314 WMTextField *WMCreateTextField(WMWidget * parent)
315 {
316 TextField *tPtr;
317
318 tPtr = wmalloc(sizeof(TextField));
319 memset(tPtr, 0, sizeof(TextField));
320
321 tPtr->widgetClass = WC_TextField;
322
323 tPtr->view = W_CreateView(W_VIEW(parent));
324 if (!tPtr->view) {
325 wfree(tPtr);
326 return NULL;
327 }
328 tPtr->view->self = tPtr;
329
330 tPtr->view->delegate = &_TextFieldViewDelegate;
331
332 tPtr->view->attribFlags |= CWCursor;
333 tPtr->view->attribs.cursor = tPtr->view->screen->textCursor;
334
335 W_SetViewBackgroundColor(tPtr->view, tPtr->view->screen->white);
336
337 tPtr->text = wmalloc(MIN_TEXT_BUFFER);
338 tPtr->text[0] = 0;
339 tPtr->textLen = 0;
340 tPtr->bufferSize = MIN_TEXT_BUFFER;
341
342 tPtr->flags.enabled = 1;
343
344 WMCreateEventHandler(tPtr->view, ExposureMask | StructureNotifyMask | FocusChangeMask, handleEvents, tPtr);
345
346 tPtr->font = WMRetainFont(tPtr->view->screen->normalFont);
347
348 tPtr->flags.bordered = DEFAULT_BORDERED;
349 tPtr->flags.beveled = True;
350 tPtr->flags.alignment = DEFAULT_ALIGNMENT;
351 tPtr->offsetWidth = WMAX((tPtr->view->size.height - WMFontHeight(tPtr->font)) / 2, 1);
352
353 W_ResizeView(tPtr->view, DEFAULT_WIDTH, DEFAULT_HEIGHT);
354
355 WMCreateEventHandler(tPtr->view, EnterWindowMask | LeaveWindowMask
356 | ButtonReleaseMask | ButtonPressMask | KeyPressMask | Button1MotionMask,
357 handleTextFieldActionEvents, tPtr);
358
359 WMAddNotificationObserver(selectionNotification, tPtr->view,
360 WMSelectionOwnerDidChangeNotification, (void *)XA_PRIMARY);
361
362 WMAddNotificationObserver(realizeObserver, tPtr, WMViewRealizedNotification, tPtr->view);
363
364 tPtr->flags.cursorOn = 1;
365
366 return tPtr;
367 }
368
369 void WMSetTextFieldDelegate(WMTextField * tPtr, WMTextFieldDelegate * delegate)
370 {
371 CHECK_CLASS(tPtr, WC_TextField);
372
373 tPtr->delegate = delegate;
374 }
375
376 WMTextFieldDelegate *WMGetTextFieldDelegate(WMTextField * tPtr)
377 {
378 CHECK_CLASS(tPtr, WC_TextField);
379
380 return tPtr->delegate;
381 }
382
383 void WMInsertTextFieldText(WMTextField * tPtr, char *text, int position)
384 {
385 int len;
386
387 CHECK_CLASS(tPtr, WC_TextField);
388
389 if (!text)
390 return;
391
392 len = strlen(text);
393
394 /* check if buffer will hold the text */
395 if (len + tPtr->textLen >= tPtr->bufferSize) {
396 tPtr->bufferSize = tPtr->textLen + len + TEXT_BUFFER_INCR;
397 tPtr->text = wrealloc(tPtr->text, tPtr->bufferSize);
398 }
399
400 if (position < 0 || position >= tPtr->textLen) {
401 /* append the text at the end */
402 strcat(tPtr->text, text);
403 tPtr->textLen += len;
404 tPtr->cursorPosition += len;
405 incrToFit(tPtr);
406 } else {
407 /* insert text at position */
408 memmv(&(tPtr->text[position + len]), &(tPtr->text[position]), tPtr->textLen - position + 1);
409
410 memcpy(&(tPtr->text[position]), text, len);
411
412 tPtr->textLen += len;
413 if (position >= tPtr->cursorPosition) {
414 tPtr->cursorPosition += len;
415 incrToFit2(tPtr);
416 } else {
417 incrToFit(tPtr);
418 }
419 }
420
421 paintTextField(tPtr);
422 }
423
424 void WMDeleteTextFieldRange(WMTextField * tPtr, WMRange range)
425 {
426 CHECK_CLASS(tPtr, WC_TextField);
427
428 normalizeRange(tPtr, &range);
429
430 if (!range.count)
431 return;
432
433 memmv(&(tPtr->text[range.position]), &(tPtr->text[range.position + range.count]),
434 tPtr->textLen - (range.position + range.count) + 1);
435
436 /* better than nothing ;) */
437 if (tPtr->cursorPosition > range.position)
438 tPtr->viewPosition += oneUTF8CharBackward(&tPtr->text[tPtr->viewPosition], tPtr->viewPosition);
439 tPtr->textLen -= range.count;
440 tPtr->cursorPosition = range.position;
441
442 decrToFit(tPtr);
443
444 paintTextField(tPtr);
445 }
446
447 char *WMGetTextFieldText(WMTextField * tPtr)
448 {
449 CHECK_CLASS(tPtr, WC_TextField);
450
451 return wstrdup(tPtr->text);
452 }
453
454 void WMSetTextFieldText(WMTextField * tPtr, char *text)
455 {
456 CHECK_CLASS(tPtr, WC_TextField);
457
458 if ((text && strcmp(tPtr->text, text) == 0) || (!text && tPtr->textLen == 0))
459 return;
460
461 if (text == NULL) {
462 tPtr->text[0] = 0;
463 tPtr->textLen = 0;
464 } else {
465 tPtr->textLen = strlen(text);
466
467 if (tPtr->textLen >= tPtr->bufferSize) {
468 tPtr->bufferSize = tPtr->textLen + TEXT_BUFFER_INCR;
469 tPtr->text = wrealloc(tPtr->text, tPtr->bufferSize);
470 }
471 strcpy(tPtr->text, text);
472 }
473
474 tPtr->cursorPosition = tPtr->selection.position = tPtr->textLen;
475 tPtr->viewPosition = 0;
476 tPtr->selection.count = 0;
477
478 if (tPtr->view->flags.realized)
479 paintTextField(tPtr);
480 }
481
482 void WMSetTextFieldAlignment(WMTextField * tPtr, WMAlignment alignment)
483 {
484 CHECK_CLASS(tPtr, WC_TextField);
485
486 tPtr->flags.alignment = alignment;
487
488 if (alignment != WALeft) {
489 wwarning("only left alignment is supported in textfields");
490 return;
491 }
492
493 if (tPtr->view->flags.realized) {
494 paintTextField(tPtr);
495 }
496 }
497
498 void WMSetTextFieldBordered(WMTextField * tPtr, Bool bordered)
499 {
500 CHECK_CLASS(tPtr, WC_TextField);
501
502 tPtr->flags.bordered = bordered;
503
504 if (tPtr->view->flags.realized) {
505 paintTextField(tPtr);
506 }
507 }
508
509 void WMSetTextFieldBeveled(WMTextField * tPtr, Bool flag)
510 {
511 CHECK_CLASS(tPtr, WC_TextField);
512
513 tPtr->flags.beveled = ((flag == 0) ? 0 : 1);
514
515 if (tPtr->view->flags.realized) {
516 paintTextField(tPtr);
517 }
518 }
519
520 void WMSetTextFieldSecure(WMTextField * tPtr, Bool flag)
521 {
522 CHECK_CLASS(tPtr, WC_TextField);
523
524 tPtr->flags.secure = ((flag == 0) ? 0 : 1);
525
526 if (tPtr->view->flags.realized) {
527 paintTextField(tPtr);
528 }
529 }
530
531 Bool WMGetTextFieldEditable(WMTextField * tPtr)
532 {
533 CHECK_CLASS(tPtr, WC_TextField);
534
535 return tPtr->flags.enabled;
536 }
537
538 void WMSetTextFieldEditable(WMTextField * tPtr, Bool flag)
539 {
540 CHECK_CLASS(tPtr, WC_TextField);
541
542 tPtr->flags.enabled = ((flag == 0) ? 0 : 1);
543
544 if (tPtr->view->flags.realized) {
545 paintTextField(tPtr);
546 }
547 }
548
549 void WMSelectTextFieldRange(WMTextField * tPtr, WMRange range)
550 {
551 CHECK_CLASS(tPtr, WC_TextField);
552
553 if (tPtr->flags.enabled) {
554 normalizeRange(tPtr, &range);
555
556 tPtr->selection = range;
557
558 tPtr->cursorPosition = range.position + range.count;
559
560 if (tPtr->view->flags.realized) {
561 paintTextField(tPtr);
562 }
563 }
564 }
565
566 void WMSetTextFieldCursorPosition(WMTextField * tPtr, unsigned int position)
567 {
568 CHECK_CLASS(tPtr, WC_TextField);
569
570 if (tPtr->flags.enabled) {
571 if (position > tPtr->textLen)
572 position = tPtr->textLen;
573
574 tPtr->cursorPosition = position;
575 if (tPtr->view->flags.realized) {
576 paintTextField(tPtr);
577 }
578 }
579 }
580
581 unsigned WMGetTextFieldCursorPosition(WMTextField *tPtr)
582 {
583 CHECK_CLASS(tPtr, WC_TextField);
584
585 return tPtr->cursorPosition;
586 }
587
588 void WMSetTextFieldNextTextField(WMTextField * tPtr, WMTextField * next)
589 {
590 CHECK_CLASS(tPtr, WC_TextField);
591 if (next == NULL) {
592 if (tPtr->view->nextFocusChain)
593 tPtr->view->nextFocusChain->prevFocusChain = NULL;
594 tPtr->view->nextFocusChain = NULL;
595 return;
596 }
597
598 CHECK_CLASS(next, WC_TextField);
599
600 if (tPtr->view->nextFocusChain)
601 tPtr->view->nextFocusChain->prevFocusChain = NULL;
602 if (next->view->prevFocusChain)
603 next->view->prevFocusChain->nextFocusChain = NULL;
604
605 tPtr->view->nextFocusChain = next->view;
606 next->view->prevFocusChain = tPtr->view;
607 }
608
609 void WMSetTextFieldPrevTextField(WMTextField * tPtr, WMTextField * prev)
610 {
611 CHECK_CLASS(tPtr, WC_TextField);
612 if (prev == NULL) {
613 if (tPtr->view->prevFocusChain)
614 tPtr->view->prevFocusChain->nextFocusChain = NULL;
615 tPtr->view->prevFocusChain = NULL;
616 return;
617 }
618
619 CHECK_CLASS(prev, WC_TextField);
620
621 if (tPtr->view->prevFocusChain)
622 tPtr->view->prevFocusChain->nextFocusChain = NULL;
623 if (prev->view->nextFocusChain)
624 prev->view->nextFocusChain->prevFocusChain = NULL;
625
626 tPtr->view->prevFocusChain = prev->view;
627 prev->view->nextFocusChain = tPtr->view;
628 }
629
630 void WMSetTextFieldFont(WMTextField * tPtr, WMFont * font)
631 {
632 CHECK_CLASS(tPtr, WC_TextField);
633
634 if (tPtr->font)
635 WMReleaseFont(tPtr->font);
636 tPtr->font = WMRetainFont(font);
637
638 tPtr->offsetWidth = WMAX((tPtr->view->size.height - WMFontHeight(tPtr->font)) / 2, 1);
639
640 if (tPtr->view->flags.realized) {
641 paintTextField(tPtr);
642 }
643 }
644
645 WMFont *WMGetTextFieldFont(WMTextField * tPtr)
646 {
647 return tPtr->font;
648 }
649
650 static void didResizeTextField(W_ViewDelegate * self, WMView * view)
651 {
652 WMTextField *tPtr = (WMTextField *) view->self;
653
654 tPtr->offsetWidth = WMAX((tPtr->view->size.height - WMFontHeight(tPtr->font)) / 2, 1);
655
656 tPtr->usableWidth = tPtr->view->size.width - 2 * tPtr->offsetWidth /*+ 2 */ ;
657 }
658
659 static char *makeHiddenString(int length)
660 {
661 char *data = wmalloc(length + 1);
662
663 memset(data, '*', length);
664 data[length] = '\0';
665
666 return data;
667 }
668
669 static void paintCursor(TextField * tPtr)
670 {
671 int cx;
672 WMScreen *screen = tPtr->view->screen;
673 int textWidth;
674 char *text;
675
676 if (tPtr->flags.secure)
677 text = makeHiddenString(strlen(tPtr->text));
678 else
679 text = tPtr->text;
680
681 cx = WMWidthOfString(tPtr->font, &(text[tPtr->viewPosition]), tPtr->cursorPosition - tPtr->viewPosition);
682
683 switch (tPtr->flags.alignment) {
684 case WARight:
685 textWidth = WMWidthOfString(tPtr->font, text, tPtr->textLen);
686 if (textWidth < tPtr->usableWidth)
687 cx += tPtr->offsetWidth + tPtr->usableWidth - textWidth + 1;
688 else
689 cx += tPtr->offsetWidth + 1;
690 break;
691 case WALeft:
692 cx += tPtr->offsetWidth + 1;
693 break;
694 case WAJustified:
695 /* not supported */
696 case WACenter:
697 textWidth = WMWidthOfString(tPtr->font, text, tPtr->textLen);
698 if (textWidth < tPtr->usableWidth)
699 cx += tPtr->offsetWidth + (tPtr->usableWidth - textWidth) / 2;
700 else
701 cx += tPtr->offsetWidth;
702 break;
703 }
704 /*
705 XDrawRectangle(screen->display, tPtr->view->window, screen->xorGC,
706 cx, tPtr->offsetWidth, 1,
707 tPtr->view->size.height - 2*tPtr->offsetWidth - 1);
708 printf("%d %d\n",cx,tPtr->cursorPosition);
709 */
710
711 XDrawLine(screen->display, tPtr->view->window, screen->xorGC,
712 cx, tPtr->offsetWidth, cx, tPtr->view->size.height - tPtr->offsetWidth - 1);
713
714 W_SetPreeditPositon(tPtr->view, cx, 0);
715
716 if (tPtr->flags.secure) {
717 wfree(text);
718 }
719 }
720
721 static void drawRelief(WMView * view, Bool beveled)
722 {
723 WMScreen *scr = view->screen;
724 Display *dpy = scr->display;
725 GC wgc;
726 GC lgc;
727 GC dgc;
728 int width = view->size.width;
729 int height = view->size.height;
730
731 dgc = WMColorGC(scr->darkGray);
732
733 if (!beveled) {
734 XDrawRectangle(dpy, view->window, dgc, 0, 0, width - 1, height - 1);
735
736 return;
737 }
738 wgc = WMColorGC(scr->white);
739 lgc = WMColorGC(scr->gray);
740
741 /* top left */
742 XDrawLine(dpy, view->window, dgc, 0, 0, width - 1, 0);
743 XDrawLine(dpy, view->window, dgc, 0, 1, width - 2, 1);
744
745 XDrawLine(dpy, view->window, dgc, 0, 0, 0, height - 2);
746 XDrawLine(dpy, view->window, dgc, 1, 0, 1, height - 3);
747
748 /* bottom right */
749 XDrawLine(dpy, view->window, wgc, 0, height - 1, width - 1, height - 1);
750 XDrawLine(dpy, view->window, lgc, 1, height - 2, width - 2, height - 2);
751
752 XDrawLine(dpy, view->window, wgc, width - 1, 0, width - 1, height - 1);
753 XDrawLine(dpy, view->window, lgc, width - 2, 1, width - 2, height - 3);
754 }
755
756 static void paintTextField(TextField * tPtr)
757 {
758 W_Screen *screen = tPtr->view->screen;
759 W_View *view = tPtr->view;
760 W_View viewbuffer;
761 int tx, ty, tw, th;
762 int rx;
763 int bd;
764 int totalWidth;
765 char *text;
766 Pixmap drawbuffer;
767 WMColor *color;
768
769 if (!view->flags.realized || !view->flags.mapped)
770 return;
771
772 if (!tPtr->flags.bordered) {
773 bd = 0;
774 } else {
775 bd = 2;
776 }
777
778 if (tPtr->flags.secure) {
779 text = makeHiddenString(strlen(tPtr->text));
780 } else {
781 text = tPtr->text;
782 }
783
784 totalWidth = tPtr->view->size.width - 2 * bd;
785
786 drawbuffer = XCreatePixmap(screen->display, view->window,
787 view->size.width, view->size.height, screen->depth);
788 XFillRectangle(screen->display, drawbuffer, WMColorGC(screen->white),
789 0, 0, view->size.width, view->size.height);
790 /* this is quite dirty */
791 viewbuffer.screen = view->screen;
792 viewbuffer.size = view->size;
793 viewbuffer.window = drawbuffer;
794
795 if (tPtr->textLen > 0) {
796 tw = WMWidthOfString(tPtr->font, &(text[tPtr->viewPosition]), tPtr->textLen - tPtr->viewPosition);
797
798 th = WMFontHeight(tPtr->font);
799
800 ty = tPtr->offsetWidth;
801 switch (tPtr->flags.alignment) {
802 case WALeft:
803 tx = tPtr->offsetWidth + 1;
804 if (tw < tPtr->usableWidth)
805 XFillRectangle(screen->display, drawbuffer,
806 WMColorGC(screen->white),
807 bd + tw, bd, totalWidth - tw, view->size.height - 2 * bd);
808 break;
809
810 case WACenter:
811 tx = tPtr->offsetWidth + (tPtr->usableWidth - tw) / 2;
812 if (tw < tPtr->usableWidth)
813 XClearArea(screen->display, view->window, bd, bd,
814 totalWidth, view->size.height - 2 * bd, False);
815 break;
816
817 default:
818 case WARight:
819 tx = tPtr->offsetWidth + tPtr->usableWidth - tw - 1;
820 if (tw < tPtr->usableWidth)
821 XClearArea(screen->display, view->window, bd, bd,
822 totalWidth - tw, view->size.height - 2 * bd, False);
823 break;
824 }
825
826 color = tPtr->flags.enabled ? screen->black : screen->darkGray;
827
828 WMDrawImageString(screen, drawbuffer, color, screen->white,
829 tPtr->font, tx, ty, &(text[tPtr->viewPosition]),
830 tPtr->textLen - tPtr->viewPosition);
831
832 if (tPtr->selection.count) {
833 int count, count2;
834
835 count = tPtr->selection.count < 0
836 ? tPtr->selection.position + tPtr->selection.count : tPtr->selection.position;
837 count2 = abs(tPtr->selection.count);
838 if (count < tPtr->viewPosition) {
839 count2 = abs(count2 - abs(tPtr->viewPosition - count));
840 count = tPtr->viewPosition;
841 }
842
843 rx = tPtr->offsetWidth + 1 + WMWidthOfString(tPtr->font, text, count)
844 - WMWidthOfString(tPtr->font, text, tPtr->viewPosition);
845
846 WMDrawImageString(screen, drawbuffer, color, screen->gray,
847 tPtr->font, rx, ty, &(text[count]), count2);
848 }
849 } else {
850 XFillRectangle(screen->display, drawbuffer, WMColorGC(screen->white),
851 bd, bd, totalWidth, view->size.height - 2 * bd);
852 }
853
854 /* draw relief */
855 if (tPtr->flags.bordered) {
856 drawRelief(&viewbuffer, tPtr->flags.beveled);
857 }
858
859 if (tPtr->flags.secure)
860 wfree(text);
861 XCopyArea(screen->display, drawbuffer, view->window,
862 screen->copyGC, 0, 0, view->size.width, view->size.height, 0, 0);
863 XFreePixmap(screen->display, drawbuffer);
864
865 /* draw cursor */
866 if (tPtr->flags.focused && tPtr->flags.enabled && tPtr->flags.cursorOn) {
867 paintCursor(tPtr);
868 }
869 }
870
871 #if 0
872 static void blinkCursor(void *data)
873 {
874 TextField *tPtr = (TextField *) data;
875
876 if (tPtr->flags.cursorOn) {
877 tPtr->timerID = WMAddTimerHandler(CURSOR_BLINK_OFF_DELAY, blinkCursor, data);
878 } else {
879 tPtr->timerID = WMAddTimerHandler(CURSOR_BLINK_ON_DELAY, blinkCursor, data);
880 }
881 paintCursor(tPtr);
882 tPtr->flags.cursorOn = !tPtr->flags.cursorOn;
883 }
884 #endif
885
886 static void handleEvents(XEvent * event, void *data)
887 {
888 TextField *tPtr = (TextField *) data;
889
890 CHECK_CLASS(data, WC_TextField);
891
892 switch (event->type) {
893 case FocusIn:
894 W_FocusIC(tPtr->view);
895 if (W_FocusedViewOfToplevel(W_TopLevelOfView(tPtr->view)) != tPtr->view)
896 return;
897 tPtr->flags.focused = 1;
898 #if 0
899 if (!tPtr->timerID) {
900 tPtr->timerID = WMAddTimerHandler(CURSOR_BLINK_ON_DELAY, blinkCursor, tPtr);
901 }
902 #endif
903 paintTextField(tPtr);
904
905 NOTIFY(tPtr, didBeginEditing, WMTextDidBeginEditingNotification, NULL);
906
907 tPtr->flags.notIllegalMovement = 0;
908 break;
909
910 case FocusOut:
911 W_UnFocusIC(tPtr->view);
912 tPtr->flags.focused = 0;
913 #if 0
914 if (tPtr->timerID)
915 WMDeleteTimerHandler(tPtr->timerID);
916 tPtr->timerID = NULL;
917 #endif
918
919 paintTextField(tPtr);
920 if (!tPtr->flags.notIllegalMovement) {
921 NOTIFY(tPtr, didEndEditing, WMTextDidEndEditingNotification,
922 (void *)WMIllegalTextMovement);
923 }
924 break;
925
926 case Expose:
927 if (event->xexpose.count != 0)
928 break;
929 paintTextField(tPtr);
930 break;
931
932 case DestroyNotify:
933 destroyTextField(tPtr);
934 break;
935 }
936 }
937
938 static void handleTextFieldKeyPress(TextField * tPtr, XEvent * event)
939 {
940 char buffer[64];
941 KeySym ksym;
942 char *textEvent = NULL;
943 void *data = NULL;
944 int count, refresh = 0;
945 int control_pressed = 0;
946 int cancelSelection = 1;
947 Bool shifted, controled, modified;
948 Bool relay = True;
949
950 /*printf("(%d,%d) -> ", tPtr->selection.position, tPtr->selection.count); */
951 if (((XKeyEvent *) event)->state & WM_EMACSKEYMASK)
952 control_pressed = 1;
953
954 shifted = (event->xkey.state & ShiftMask ? True : False);
955 controled = (event->xkey.state & ControlMask ? True : False);
956 modified = shifted || controled;
957
958 count = W_LookupString(tPtr->view, &event->xkey, buffer, 63, &ksym, NULL);
959 //count = XLookupString(&event->xkey, buffer, 63, &ksym, NULL);
960 buffer[count] = '\0';
961
962 switch (ksym) {
963 case XK_Tab:
964 #ifdef XK_ISO_Left_Tab
965 case XK_ISO_Left_Tab:
966 #endif
967 if (!controled) {
968 if (shifted) {
969 if (tPtr->view->prevFocusChain) {
970 W_SetFocusOfTopLevel(W_TopLevelOfView(tPtr->view),
971 tPtr->view->prevFocusChain);
972 tPtr->flags.notIllegalMovement = 1;
973 }
974 data = (void *)WMBacktabTextMovement;
975 } else {
976 if (tPtr->view->nextFocusChain) {
977 W_SetFocusOfTopLevel(W_TopLevelOfView(tPtr->view),
978 tPtr->view->nextFocusChain);
979 tPtr->flags.notIllegalMovement = 1;
980 }
981 data = (void *)WMTabTextMovement;
982 }
983 textEvent = WMTextDidEndEditingNotification;
984
985 cancelSelection = 0;
986
987 relay = False;
988 }
989 break;
990
991 case XK_Escape:
992 if (!modified) {
993 data = (void *)WMEscapeTextMovement;
994 textEvent = WMTextDidEndEditingNotification;
995
996 relay = False;
997 }
998 break;
999
1000 case XK_Return:
1001 if (!modified) {
1002 data = (void *)WMReturnTextMovement;
1003 textEvent = WMTextDidEndEditingNotification;
1004
1005 relay = False;
1006 }
1007 break;
1008
1009 case WM_EMACSKEY_LEFT:
1010 if (!control_pressed)
1011 goto normal_key;
1012 else
1013 controled = False;
1014
1015 #ifdef XK_KP_Left
1016 case XK_KP_Left:
1017 #endif
1018 case XK_Left:
1019 if (tPtr->cursorPosition > 0) {
1020 int i;
1021 paintCursor(tPtr);
1022
1023 i = tPtr->cursorPosition;
1024 i += oneUTF8CharBackward(&tPtr->text[i], i);
1025 if (controled) {
1026 while (i > 0 && tPtr->text[i] != ' ')
1027 i--;
1028 while (i > 0 && tPtr->text[i] == ' ')
1029 i--;
1030
1031 tPtr->cursorPosition = (i > 0) ? i + 1 : 0;
1032 } else
1033 tPtr->cursorPosition = i;
1034
1035 if (tPtr->cursorPosition < tPtr->viewPosition) {
1036 tPtr->viewPosition = tPtr->cursorPosition;
1037 refresh = 1;
1038 } else
1039 paintCursor(tPtr);
1040 }
1041 if (shifted)
1042 cancelSelection = 0;
1043
1044 relay = False;
1045
1046 break;
1047
1048 case WM_EMACSKEY_RIGHT:
1049 if (!control_pressed)
1050 goto normal_key;
1051 else
1052 controled = False;
1053
1054 #ifdef XK_KP_Right
1055 case XK_KP_Right:
1056 #endif
1057 case XK_Right:
1058 if (tPtr->cursorPosition < tPtr->textLen) {
1059 int i;
1060 paintCursor(tPtr);
1061
1062 i = tPtr->cursorPosition;
1063 if (controled) {
1064 while (tPtr->text[i] && tPtr->text[i] != ' ')
1065 i++;
1066 while (tPtr->text[i] == ' ')
1067 i++;
1068 } else {
1069 i += oneUTF8CharForward(&tPtr->text[i], tPtr->textLen - i);
1070 }
1071 tPtr->cursorPosition = i;
1072
1073 refresh = incrToFit2(tPtr);
1074
1075 if (!refresh)
1076 paintCursor(tPtr);
1077 }
1078 if (shifted)
1079 cancelSelection = 0;
1080
1081 relay = False;
1082
1083 break;
1084
1085 case WM_EMACSKEY_HOME:
1086 if (!control_pressed)
1087 goto normal_key;
1088 else
1089 controled = False;
1090
1091 #ifdef XK_KP_Home
1092 case XK_KP_Home:
1093 #endif
1094 case XK_Home:
1095 if (!controled) {
1096 if (tPtr->cursorPosition > 0) {
1097 paintCursor(tPtr);
1098 tPtr->cursorPosition = 0;
1099 if (tPtr->viewPosition > 0) {
1100 tPtr->viewPosition = 0;
1101 refresh = 1;
1102 } else
1103 paintCursor(tPtr);
1104 }
1105 if (shifted)
1106 cancelSelection = 0;
1107
1108 relay = False;
1109 }
1110 break;
1111
1112 case WM_EMACSKEY_END:
1113 if (!control_pressed)
1114 goto normal_key;
1115 else
1116 controled = False;
1117
1118 #ifdef XK_KP_End
1119 case XK_KP_End:
1120 #endif
1121 case XK_End:
1122 if (!controled) {
1123 if (tPtr->cursorPosition < tPtr->textLen) {
1124 paintCursor(tPtr);
1125 tPtr->cursorPosition = tPtr->textLen;
1126 tPtr->viewPosition = 0;
1127
1128 refresh = incrToFit(tPtr);
1129
1130 if (!refresh)
1131 paintCursor(tPtr);
1132 }
1133 if (shifted)
1134 cancelSelection = 0;
1135
1136 relay = False;
1137 }
1138 break;
1139
1140 case WM_EMACSKEY_BS:
1141 if (!control_pressed)
1142 goto normal_key;
1143 else
1144 modified = False;
1145
1146 case XK_BackSpace:
1147 if (!modified) {
1148 if (tPtr->selection.count) {
1149 WMDeleteTextFieldRange(tPtr, tPtr->selection);
1150 data = (void *)WMDeleteTextEvent;
1151 textEvent = WMTextDidChangeNotification;
1152 } else if (tPtr->cursorPosition > 0) {
1153 int i = oneUTF8CharBackward(&tPtr->text[tPtr->cursorPosition],
1154 tPtr->cursorPosition);
1155 WMRange range;
1156 range.position = tPtr->cursorPosition + i;
1157 range.count = -i;
1158 WMDeleteTextFieldRange(tPtr, range);
1159 data = (void *)WMDeleteTextEvent;
1160 textEvent = WMTextDidChangeNotification;
1161 }
1162
1163 relay = False;
1164 }
1165 break;
1166
1167 case WM_EMACSKEY_DEL:
1168 if (!control_pressed)
1169 goto normal_key;
1170 else
1171 modified = False;
1172
1173 #ifdef XK_KP_Delete
1174 case XK_KP_Delete:
1175 #endif
1176 case XK_Delete:
1177 if (!modified) {
1178 if (tPtr->selection.count) {
1179 WMDeleteTextFieldRange(tPtr, tPtr->selection);
1180 data = (void *)WMDeleteTextEvent;
1181 textEvent = WMTextDidChangeNotification;
1182 } else if (tPtr->cursorPosition < tPtr->textLen) {
1183 WMRange range;
1184 range.position = tPtr->cursorPosition;
1185 range.count = oneUTF8CharForward(&tPtr->text[tPtr->cursorPosition],
1186 tPtr->textLen - tPtr->cursorPosition);
1187 WMDeleteTextFieldRange(tPtr, range);
1188 data = (void *)WMDeleteTextEvent;
1189 textEvent = WMTextDidChangeNotification;
1190 }
1191
1192 relay = False;
1193 }
1194 break;
1195
1196 normal_key:
1197 default:
1198 if (!controled) {
1199 if (count > 0 && !iscntrl(buffer[0])) {
1200 if (tPtr->selection.count)
1201 WMDeleteTextFieldRange(tPtr, tPtr->selection);
1202 WMInsertTextFieldText(tPtr, buffer, tPtr->cursorPosition);
1203 data = (void *)WMInsertTextEvent;
1204 textEvent = WMTextDidChangeNotification;
1205
1206 relay = False;
1207 }
1208 }
1209 break;
1210 }
1211
1212 if (relay) {
1213 WMRelayToNextResponder(W_VIEW(tPtr), event);
1214 return;
1215 }
1216
1217 /* Do not allow text selection in secure text fields */
1218 if (cancelSelection || tPtr->flags.secure) {
1219 lostSelection(tPtr->view, XA_PRIMARY, NULL);
1220
1221 if (tPtr->selection.count) {
1222 tPtr->selection.count = 0;
1223 refresh = 1;
1224 }
1225 tPtr->selection.position = tPtr->cursorPosition;
1226 } else {
1227 if (tPtr->selection.count != tPtr->cursorPosition - tPtr->selection.position) {
1228
1229 tPtr->selection.count = tPtr->cursorPosition - tPtr->selection.position;
1230
1231 refresh = 1;
1232 }
1233 }
1234
1235 /*printf("(%d,%d)\n", tPtr->selection.position, tPtr->selection.count); */
1236
1237 if (textEvent) {
1238 WMNotification *notif = WMCreateNotification(textEvent, tPtr, data);
1239
1240 if (tPtr->delegate) {
1241 if (textEvent == WMTextDidBeginEditingNotification && tPtr->delegate->didBeginEditing)
1242 (*tPtr->delegate->didBeginEditing) (tPtr->delegate, notif);
1243
1244 else if (textEvent == WMTextDidEndEditingNotification && tPtr->delegate->didEndEditing)
1245 (*tPtr->delegate->didEndEditing) (tPtr->delegate, notif);
1246
1247 else if (textEvent == WMTextDidChangeNotification && tPtr->delegate->didChange)
1248 (*tPtr->delegate->didChange) (tPtr->delegate, notif);
1249 }
1250
1251 WMPostNotification(notif);
1252 WMReleaseNotification(notif);
1253 }
1254
1255 if (refresh)
1256 paintTextField(tPtr);
1257
1258 /*printf("(%d,%d)\n", tPtr->selection.position, tPtr->selection.count); */
1259 }
1260
1261 static int pointToCursorPosition(TextField * tPtr, int x)
1262 {
1263 int a, b, pos, prev, tw;
1264
1265 if (tPtr->flags.bordered)
1266 x -= 2;
1267
1268 if (WMWidthOfString(tPtr->font, &(tPtr->text[tPtr->viewPosition]),
1269 tPtr->textLen - tPtr->viewPosition) <= x)
1270 return tPtr->textLen;
1271
1272 a = tPtr->viewPosition;
1273 b = tPtr->textLen;
1274
1275 /* we halve the text until we get into a 10 byte vicinity of x */
1276 while (b - a > 10) {
1277 pos = (a + b) / 2;
1278 pos += seekUTF8CharStart(&tPtr->text[pos], pos - a);
1279 tw = WMWidthOfString(tPtr->font, &(tPtr->text[tPtr->viewPosition]), pos - tPtr->viewPosition);
1280 if (tw > x) {
1281 b = pos;
1282 } else if (tw < x) {
1283 a = pos;
1284 } else {
1285 return pos;
1286 }
1287 }
1288
1289 /* at this point x can be positioned on any glyph between 'a' and 'b-1'
1290 * inclusive, with the exception of the left border of the 'a' glyph and
1291 * the right border or the 'b-1' glyph
1292 *
1293 * ( <--- range for x's position ---> )
1294 * a a+1 .......................... b-1 b
1295 */
1296 pos = prev = a;
1297 while (pos <= b) {
1298 tw = WMWidthOfString(tPtr->font, &(tPtr->text[tPtr->viewPosition]), pos - tPtr->viewPosition);
1299 if (tw > x) {
1300 return prev;
1301 } else if (pos == b) {
1302 break;
1303 }
1304 prev = pos;
1305 pos += oneUTF8CharForward(&tPtr->text[pos], b - pos);
1306 }
1307
1308 return b;
1309 }
1310
1311 static void pasteText(WMView * view, Atom selection, Atom target, Time timestamp, void *cdata, WMData * data)
1312 {
1313 TextField *tPtr = (TextField *) view->self;
1314 char *str;
1315
1316 tPtr->flags.waitingSelection = 0;
1317
1318 if (data != NULL) {
1319 str = (char *)WMDataBytes(data);
1320
1321 WMInsertTextFieldText(tPtr, str, tPtr->cursorPosition);
1322 NOTIFY(tPtr, didChange, WMTextDidChangeNotification, (void *)WMInsertTextEvent);
1323 } else {
1324 int n;
1325
1326 str = XFetchBuffer(tPtr->view->screen->display, &n, 0);
1327
1328 if (str != NULL) {
1329 str[n] = 0;
1330 WMInsertTextFieldText(tPtr, str, tPtr->cursorPosition);
1331 XFree(str);
1332 NOTIFY(tPtr, didChange, WMTextDidChangeNotification, (void *)WMInsertTextEvent);
1333 }
1334 }
1335 }
1336
1337 static void handleTextFieldActionEvents(XEvent * event, void *data)
1338 {
1339 TextField *tPtr = (TextField *) data;
1340 static int move = 0;
1341 static Time lastButtonReleasedEvent = 0;
1342 static Time lastButtonReleasedEvent2 = 0;
1343 Display *dpy = event->xany.display;
1344
1345 CHECK_CLASS(data, WC_TextField);
1346
1347 switch (event->type) {
1348 case KeyPress:
1349 if (tPtr->flags.waitingSelection) {
1350 return;
1351 }
1352 if (tPtr->flags.enabled && tPtr->flags.focused) {
1353 handleTextFieldKeyPress(tPtr, event);
1354 XDefineCursor(dpy, W_VIEW(tPtr)->window, W_VIEW(tPtr)->screen->invisibleCursor);
1355 tPtr->flags.pointerGrabbed = 1;
1356 }
1357 break;
1358
1359 case MotionNotify:
1360
1361 if (tPtr->flags.pointerGrabbed) {
1362 tPtr->flags.pointerGrabbed = 0;
1363 XDefineCursor(dpy, W_VIEW(tPtr)->window, W_VIEW(tPtr)->screen->textCursor);
1364 }
1365 if (tPtr->flags.waitingSelection) {
1366 return;
1367 }
1368
1369 if (tPtr->flags.enabled && (event->xmotion.state & Button1Mask)) {
1370
1371 if (tPtr->viewPosition < tPtr->textLen && event->xmotion.x > tPtr->usableWidth) {
1372 if (WMWidthOfString(tPtr->font,
1373 &(tPtr->text[tPtr->viewPosition]),
1374 tPtr->cursorPosition - tPtr->viewPosition)
1375 > tPtr->usableWidth) {
1376 tPtr->viewPosition += oneUTF8CharForward(&tPtr->text[tPtr->viewPosition],
1377 tPtr->textLen -
1378 tPtr->viewPosition);
1379 }
1380 } else if (tPtr->viewPosition > 0 && event->xmotion.x < 0) {
1381 paintCursor(tPtr);
1382 tPtr->viewPosition += oneUTF8CharBackward(&tPtr->text[tPtr->viewPosition],
1383 tPtr->viewPosition);
1384 }
1385
1386 tPtr->cursorPosition = pointToCursorPosition(tPtr, event->xmotion.x);
1387
1388 /* Do not allow text selection in secure textfields */
1389 if (tPtr->flags.secure) {
1390 tPtr->selection.position = tPtr->cursorPosition;
1391 }
1392
1393 tPtr->selection.count = tPtr->cursorPosition - tPtr->selection.position;
1394
1395 paintCursor(tPtr);
1396 paintTextField(tPtr);
1397
1398 }
1399 break;
1400
1401 case ButtonPress:
1402 if (tPtr->flags.pointerGrabbed) {
1403 tPtr->flags.pointerGrabbed = 0;
1404 XDefineCursor(dpy, W_VIEW(tPtr)->window, W_VIEW(tPtr)->screen->textCursor);
1405 break;
1406 }
1407
1408 if (tPtr->flags.waitingSelection) {
1409 break;
1410 }
1411
1412 move = 1;
1413 switch (tPtr->flags.alignment) {
1414 int textWidth;
1415 case WARight:
1416 textWidth = WMWidthOfString(tPtr->font, tPtr->text, tPtr->textLen);
1417 if (tPtr->flags.enabled && !tPtr->flags.focused) {
1418 WMSetFocusToWidget(tPtr);
1419 }
1420 if (tPtr->flags.focused) {
1421 tPtr->selection.position = tPtr->cursorPosition;
1422 tPtr->selection.count = 0;
1423 }
1424 if (textWidth < tPtr->usableWidth) {
1425 tPtr->cursorPosition = pointToCursorPosition(tPtr,
1426 event->xbutton.x - tPtr->usableWidth
1427 + textWidth);
1428 } else
1429 tPtr->cursorPosition = pointToCursorPosition(tPtr, event->xbutton.x);
1430
1431 paintTextField(tPtr);
1432 break;
1433
1434 case WALeft:
1435 if (tPtr->flags.enabled && !tPtr->flags.focused) {
1436 WMSetFocusToWidget(tPtr);
1437 }
1438 if (tPtr->flags.focused && event->xbutton.button == Button1) {
1439 tPtr->cursorPosition = pointToCursorPosition(tPtr, event->xbutton.x);
1440 tPtr->selection.position = tPtr->cursorPosition;
1441 tPtr->selection.count = 0;
1442 paintTextField(tPtr);
1443 }
1444 if (event->xbutton.button == Button2 && tPtr->flags.enabled) {
1445 char *text;
1446 int n;
1447
1448 if (!WMRequestSelection(tPtr->view, XA_PRIMARY, XA_STRING,
1449 event->xbutton.time, pasteText, NULL)) {
1450 text = XFetchBuffer(tPtr->view->screen->display, &n, 0);
1451
1452 if (text) {
1453 text[n] = 0;
1454 WMInsertTextFieldText(tPtr, text, tPtr->cursorPosition);
1455 XFree(text);
1456 NOTIFY(tPtr, didChange, WMTextDidChangeNotification,
1457 (void *)WMInsertTextEvent);
1458 }
1459 } else {
1460 tPtr->flags.waitingSelection = 1;
1461 }
1462 }
1463 break;
1464 default:
1465 break;
1466 }
1467 break;
1468
1469 case ButtonRelease:
1470 if (tPtr->flags.pointerGrabbed) {
1471 tPtr->flags.pointerGrabbed = 0;
1472 XDefineCursor(dpy, W_VIEW(tPtr)->window, W_VIEW(tPtr)->screen->textCursor);
1473 }
1474 if (tPtr->flags.waitingSelection) {
1475 break;
1476 }
1477
1478 if (!tPtr->flags.secure && tPtr->selection.count != 0) {
1479 int start, count;
1480 XRotateBuffers(dpy, 1);
1481
1482 count = abs(tPtr->selection.count);
1483 if (tPtr->selection.count < 0)
1484 start = tPtr->selection.position - count;
1485 else
1486 start = tPtr->selection.position;
1487
1488 XStoreBuffer(dpy, &tPtr->text[start], count, 0);
1489 }
1490
1491 move = 0;
1492
1493 if (!tPtr->flags.secure &&
1494 event->xbutton.time - lastButtonReleasedEvent <= WINGsConfiguration.doubleClickDelay) {
1495
1496 if (event->xbutton.time - lastButtonReleasedEvent2 <=
1497 2 * WINGsConfiguration.doubleClickDelay) {
1498 tPtr->selection.position = 0;
1499 tPtr->selection.count = tPtr->textLen;
1500 } else {
1501 int pos, cnt;
1502 char *txt;
1503 pos = tPtr->selection.position;
1504 cnt = tPtr->selection.count;
1505 txt = tPtr->text;
1506 while (pos >= 0) {
1507 if (txt[pos] == ' ' || txt[pos] == '\t')
1508 break;
1509 pos--;
1510 }
1511 pos++;
1512
1513 while (pos + cnt < tPtr->textLen) {
1514 if (txt[pos + cnt] == ' ' || txt[pos + cnt] == '\t')
1515 break;
1516 cnt++;
1517 }
1518 tPtr->selection.position = pos;
1519 tPtr->selection.count = cnt;
1520 }
1521 paintTextField(tPtr);
1522
1523 if (!tPtr->flags.ownsSelection) {
1524 tPtr->flags.ownsSelection =
1525 WMCreateSelectionHandler(tPtr->view,
1526 XA_PRIMARY,
1527 event->xbutton.time, &selectionHandler, NULL);
1528 }
1529 } else if (!tPtr->flags.secure && tPtr->selection.count != 0 && !tPtr->flags.ownsSelection) {
1530 tPtr->flags.ownsSelection =
1531 WMCreateSelectionHandler(tPtr->view,
1532 XA_PRIMARY, event->xbutton.time, &selectionHandler, NULL);
1533 }
1534
1535 lastButtonReleasedEvent2 = lastButtonReleasedEvent;
1536 lastButtonReleasedEvent = event->xbutton.time;
1537
1538 break;
1539 }
1540 }
1541
1542 static void destroyTextField(TextField * tPtr)
1543 {
1544 #if 0
1545 if (tPtr->timerID)
1546 WMDeleteTimerHandler(tPtr->timerID);
1547 #endif
1548
1549 W_DestroyIC(tPtr->view);
1550
1551 WMReleaseFont(tPtr->font);
1552 /*// use lostSelection() instead of WMDeleteSelectionHandler here? */
1553 WMDeleteSelectionHandler(tPtr->view, XA_PRIMARY, CurrentTime);
1554 WMRemoveNotificationObserver(tPtr);
1555
1556 if (tPtr->text)
1557 wfree(tPtr->text);
1558
1559 wfree(tPtr);
1560 }