7 #include <X11/keysym.h>
12 #define CURSOR_BLINK_ON_DELAY 600
13 #define CURSOR_BLINK_OFF_DELAY 300
16 char *WMTextDidChangeNotification
= "WMTextDidChangeNotification";
17 char *WMTextDidBeginEditingNotification
= "WMTextDidBeginEditingNotification";
18 char *WMTextDidEndEditingNotification
= "WMTextDidEndEditingNotification";
21 typedef struct W_TextField
{
26 struct W_TextField
*nextField
; /* next textfield in the chain */
27 struct W_TextField
*prevField
;
31 int textLen
; /* size of text */
32 int bufferSize
; /* memory allocated for text */
34 int viewPosition
; /* position of text being shown */
36 int cursorPosition
; /* position of the insertion cursor */
39 short offsetWidth
; /* offset of text from border */
42 WMRange prevselection
;
47 WMHandlerID timerID
; /* for cursor blinking */
50 WMAlignment alignment
:2;
52 unsigned int bordered
:1;
54 unsigned int beveled
:1;
56 unsigned int enabled
:1;
58 unsigned int focused
:1;
60 unsigned int cursorOn
:1;
62 unsigned int secure
:1; /* password entry style */
65 unsigned int notIllegalMovement
:1;
70 #define MIN_TEXT_BUFFER 2
71 #define TEXT_BUFFER_INCR 8
74 #define WM_EMACSKEYMASK ControlMask
76 #define WM_EMACSKEY_LEFT XK_b
77 #define WM_EMACSKEY_RIGHT XK_f
78 #define WM_EMACSKEY_HOME XK_a
79 #define WM_EMACSKEY_END XK_e
80 #define WM_EMACSKEY_BS XK_h
81 #define WM_EMACSKEY_DEL XK_d
85 #define DEFAULT_WIDTH 60
86 #define DEFAULT_HEIGHT 20
87 #define DEFAULT_BORDERED True
88 #define DEFAULT_ALIGNMENT WALeft
92 static void destroyTextField(TextField
*tPtr
);
93 static void paintTextField(TextField
*tPtr
);
95 static void handleEvents(XEvent
*event
, void *data
);
96 static void handleTextFieldActionEvents(XEvent
*event
, void *data
);
97 static void resizeTextField();
99 struct W_ViewProcedureTable _TextFieldViewProcedures
= {
106 #define TEXT_WIDTH(tPtr, start) (WMWidthOfString((tPtr)->font, \
107 &((tPtr)->text[(start)]), (tPtr)->textLen - (start) + 1))
109 #define TEXT_WIDTH2(tPtr, start, end) (WMWidthOfString((tPtr)->font, \
110 &((tPtr)->text[(start)]), (end) - (start) + 1))
114 memmv(char *dest
, char *src
, int size
)
119 for (i
=size
-1; i
>=0; i
--) {
122 } else if (dest
< src
) {
123 for (i
=0; i
<size
; i
++) {
131 incrToFit(TextField
*tPtr
)
133 int vp
= tPtr
->viewPosition
;
135 while (TEXT_WIDTH(tPtr
, tPtr
->viewPosition
) > tPtr
->usableWidth
) {
136 tPtr
->viewPosition
++;
138 return vp
!=tPtr
->viewPosition
;
143 incrToFit2(TextField
*tPtr
)
145 int vp
= tPtr
->viewPosition
;
146 while (TEXT_WIDTH2(tPtr
, tPtr
->viewPosition
, tPtr
->cursorPosition
)
147 >= tPtr
->usableWidth
)
148 tPtr
->viewPosition
++;
151 return vp
!=tPtr
->viewPosition
;
156 decrToFit(TextField
*tPtr
)
158 while (TEXT_WIDTH(tPtr
, tPtr
->viewPosition
-1) < tPtr
->usableWidth
159 && tPtr
->viewPosition
>0)
160 tPtr
->viewPosition
--;
168 WMCreateTextField(WMWidget
*parent
)
172 tPtr
= wmalloc(sizeof(TextField
));
173 memset(tPtr
, 0, sizeof(TextField
));
175 tPtr
->widgetClass
= WC_TextField
;
177 tPtr
->view
= W_CreateView(W_VIEW(parent
));
182 tPtr
->view
->self
= tPtr
;
184 tPtr
->view
->attribFlags
|= CWCursor
;
185 tPtr
->view
->attribs
.cursor
= tPtr
->view
->screen
->textCursor
;
187 W_SetViewBackgroundColor(tPtr
->view
, tPtr
->view
->screen
->white
);
189 tPtr
->text
= wmalloc(MIN_TEXT_BUFFER
);
192 tPtr
->bufferSize
= MIN_TEXT_BUFFER
;
194 tPtr
->flags
.enabled
= 1;
196 WMCreateEventHandler(tPtr
->view
, ExposureMask
|StructureNotifyMask
197 |FocusChangeMask
, handleEvents
, tPtr
);
199 W_ResizeView(tPtr
->view
, DEFAULT_WIDTH
, DEFAULT_HEIGHT
);
201 tPtr
->font
= WMRetainFont(tPtr
->view
->screen
->normalFont
);
203 tPtr
->flags
.bordered
= DEFAULT_BORDERED
;
204 tPtr
->flags
.beveled
= True
;
205 tPtr
->flags
.alignment
= DEFAULT_ALIGNMENT
;
207 WMAX((tPtr
->view
->size
.height
- WMFontHeight(tPtr
->font
))/2, 1);
209 WMCreateEventHandler(tPtr
->view
, EnterWindowMask
|LeaveWindowMask
210 |ButtonReleaseMask
|ButtonPressMask
|KeyPressMask
|Button1MotionMask
,
211 handleTextFieldActionEvents
, tPtr
);
213 tPtr
->flags
.cursorOn
= 1;
220 WMInsertTextFieldText(WMTextField
*tPtr
, char *text
, int position
)
224 CHECK_CLASS(tPtr
, WC_TextField
);
231 /* check if buffer will hold the text */
232 if (len
+ tPtr
->textLen
>= tPtr
->bufferSize
) {
233 tPtr
->bufferSize
= tPtr
->textLen
+ len
+ TEXT_BUFFER_INCR
;
234 tPtr
->text
= realloc(tPtr
->text
, tPtr
->bufferSize
);
237 if (position
< 0 || position
>= tPtr
->textLen
) {
238 /* append the text at the end */
239 strcat(tPtr
->text
, text
);
243 tPtr
->textLen
+= len
;
244 tPtr
->cursorPosition
+= len
;
246 /* insert text at position */
247 memmv(&(tPtr
->text
[position
+len
]), &(tPtr
->text
[position
]),
248 tPtr
->textLen
-position
+1);
250 memcpy(&(tPtr
->text
[position
]), text
, len
);
252 tPtr
->textLen
+= len
;
253 if (position
>= tPtr
->cursorPosition
) {
254 tPtr
->cursorPosition
+= len
;
261 paintTextField(tPtr
);
263 WMPostNotificationName(WMTextDidChangeNotification
, tPtr
,
264 (void*)WMInsertTextEvent
);
269 deleteTextFieldRange(WMTextField
*tPtr
, WMRange range
)
271 CHECK_CLASS(tPtr
, WC_TextField
);
273 if (range
.position
>= tPtr
->textLen
)
276 if (range
.count
< 1) {
277 if (range
.position
< 0)
279 tPtr
->text
[range
.position
] = 0;
280 tPtr
->textLen
= range
.position
;
282 tPtr
->cursorPosition
= 0;
283 tPtr
->viewPosition
= 0;
285 if (range
.position
+ range
.count
> tPtr
->textLen
)
286 range
.count
= tPtr
->textLen
- range
.position
;
287 memmv(&(tPtr
->text
[range
.position
]), &(tPtr
->text
[range
.position
+range
.count
]),
288 tPtr
->textLen
- (range
.position
+range
.count
) + 1);
289 tPtr
->textLen
-= range
.count
;
291 if (tPtr
->cursorPosition
> range
.position
)
292 tPtr
->cursorPosition
-= range
.count
;
297 paintTextField(tPtr
);
302 WMDeleteTextFieldRange(WMTextField
*tPtr
, WMRange range
)
304 deleteTextFieldRange(tPtr
, range
);
305 WMPostNotificationName(WMTextDidChangeNotification
, tPtr
,
306 (void*)WMDeleteTextEvent
);
312 WMGetTextFieldText(WMTextField
*tPtr
)
314 CHECK_CLASS(tPtr
, WC_TextField
);
316 return wstrdup(tPtr
->text
);
321 WMSetTextFieldText(WMTextField
*tPtr
, char *text
)
323 if ((text
&& strcmp(tPtr
->text
, text
) == 0) ||
324 (!text
&& tPtr
->textLen
== 0))
331 tPtr
->textLen
= strlen(text
);
333 if (tPtr
->textLen
>= tPtr
->bufferSize
) {
334 tPtr
->bufferSize
= tPtr
->textLen
+ TEXT_BUFFER_INCR
;
335 tPtr
->text
= realloc(tPtr
->text
, tPtr
->bufferSize
);
337 strcpy(tPtr
->text
, text
);
340 if (tPtr->textLen < tPtr->cursorPosition)
341 tPtr->cursorPosition = tPtr->textLen;
343 tPtr
->cursorPosition
= tPtr
->textLen
;
344 tPtr
->viewPosition
= 0;
345 tPtr
->selection
.count
= 0;
347 if (tPtr
->view
->flags
.realized
)
348 paintTextField(tPtr
);
350 WMPostNotificationName(WMTextDidChangeNotification
, tPtr
,
351 (void*)WMSetTextEvent
);
356 WMSetTextFieldFont(WMTextField
*tPtr
, WMFont
*font
)
358 /* TODO: update font change after field is mapped */
359 WMReleaseFont(tPtr
->font
);
360 tPtr
->font
= WMRetainFont(font
);
364 WMSetTextFieldAlignment(WMTextField
*tPtr
, WMAlignment alignment
)
366 tPtr
->flags
.alignment
= alignment
;
367 if (alignment
!=WALeft
) {
368 wwarning("only left alignment is supported in textfields");
372 if (tPtr
->view
->flags
.realized
) {
373 paintTextField(tPtr
);
379 WMSetTextFieldBordered(WMTextField
*tPtr
, Bool bordered
)
381 tPtr
->flags
.bordered
= bordered
;
383 if (tPtr
->view
->flags
.realized
) {
384 paintTextField(tPtr
);
390 WMSetTextFieldBeveled(WMTextField
*tPtr
, Bool flag
)
392 tPtr
->flags
.beveled
= flag
;
394 if (tPtr
->view
->flags
.realized
) {
395 paintTextField(tPtr
);
402 WMSetTextFieldSecure(WMTextField
*tPtr
, Bool flag
)
404 tPtr
->flags
.secure
= flag
;
406 if (tPtr
->view
->flags
.realized
) {
407 paintTextField(tPtr
);
413 WMGetTextFieldEditable(WMTextField
*tPtr
)
415 return tPtr
->flags
.enabled
;
420 WMSetTextFieldEditable(WMTextField
*tPtr
, Bool flag
)
422 tPtr
->flags
.enabled
= flag
;
424 if (tPtr
->view
->flags
.realized
) {
425 paintTextField(tPtr
);
431 WMSelectTextFieldRange(WMTextField
*tPtr
, WMRange range
)
433 if (tPtr
->flags
.enabled
) {
434 if (range
.position
< 0) {
435 range
.count
+= range
.position
;
436 range
.count
= (range
.count
< 0) ? 0 : range
.count
;
438 } else if (range
.position
> tPtr
->textLen
) {
439 range
.position
= tPtr
->textLen
;
443 if (range
.position
+ range
.count
> tPtr
->textLen
)
444 range
.count
= tPtr
->textLen
- range
.position
;
446 tPtr
->prevselection
= tPtr
->selection
; /* check if this is needed */
448 tPtr
->selection
= range
;
450 if (tPtr
->view
->flags
.realized
) {
451 paintTextField(tPtr
);
458 WMSetTextFieldCursorPosition(WMTextField
*tPtr
, unsigned int position
)
460 if (tPtr
->flags
.enabled
) {
461 if (position
> tPtr
->textLen
)
462 position
= tPtr
->textLen
;
464 tPtr
->cursorPosition
= position
;
465 if (tPtr
->view
->flags
.realized
) {
466 paintTextField(tPtr
);
473 WMSetTextFieldNextTextField(WMTextField
*tPtr
, WMTextField
*next
)
475 CHECK_CLASS(tPtr
, WC_TextField
);
477 if (tPtr
->view
->nextFocusChain
)
478 tPtr
->view
->nextFocusChain
->prevFocusChain
= NULL
;
479 tPtr
->view
->nextFocusChain
= NULL
;
483 CHECK_CLASS(next
, WC_TextField
);
485 if (tPtr
->view
->nextFocusChain
)
486 tPtr
->view
->nextFocusChain
->prevFocusChain
= NULL
;
487 if (next
->view
->prevFocusChain
)
488 next
->view
->prevFocusChain
->nextFocusChain
= NULL
;
490 tPtr
->view
->nextFocusChain
= next
->view
;
491 next
->view
->prevFocusChain
= tPtr
->view
;
496 WMSetTextFieldPrevTextField(WMTextField
*tPtr
, WMTextField
*prev
)
498 CHECK_CLASS(tPtr
, WC_TextField
);
500 if (tPtr
->view
->prevFocusChain
)
501 tPtr
->view
->prevFocusChain
->nextFocusChain
= NULL
;
502 tPtr
->view
->prevFocusChain
= NULL
;
506 CHECK_CLASS(prev
, WC_TextField
);
508 if (tPtr
->view
->prevFocusChain
)
509 tPtr
->view
->prevFocusChain
->nextFocusChain
= NULL
;
510 if (prev
->view
->nextFocusChain
)
511 prev
->view
->nextFocusChain
->prevFocusChain
= NULL
;
513 tPtr
->view
->prevFocusChain
= prev
->view
;
514 prev
->view
->nextFocusChain
= tPtr
->view
;
519 resizeTextField(WMTextField
*tPtr
, unsigned int width
, unsigned int height
)
521 W_ResizeView(tPtr
->view
, width
, height
);
524 WMAX((tPtr
->view
->size
.height
- WMFontHeight(tPtr
->font
))/2, 1);
526 tPtr
->usableWidth
= tPtr
->view
->size
.width
- 2*tPtr
->offsetWidth
+ 2;
531 paintCursor(TextField
*tPtr
)
534 WMScreen
*screen
= tPtr
->view
->screen
;
537 cx
= WMWidthOfString(tPtr
->font
, &(tPtr
->text
[tPtr
->viewPosition
]),
538 tPtr
->cursorPosition
-tPtr
->viewPosition
);
540 switch (tPtr
->flags
.alignment
) {
542 textWidth
= WMWidthOfString(tPtr
->font
, tPtr
->text
, tPtr
->textLen
);
543 if (textWidth
< tPtr
->usableWidth
)
544 cx
+= tPtr
->offsetWidth
+ tPtr
->usableWidth
- textWidth
+ 1;
546 cx
+= tPtr
->offsetWidth
+ 1;
549 cx
+= tPtr
->offsetWidth
+ 1;
554 textWidth
= WMWidthOfString(tPtr
->font
, tPtr
->text
, tPtr
->textLen
);
555 if (textWidth
< tPtr
->usableWidth
)
556 cx
+= tPtr
->offsetWidth
+ (tPtr
->usableWidth
-textWidth
)/2;
558 cx
+= tPtr
->offsetWidth
;
562 XDrawRectangle(screen->display, tPtr->view->window, screen->xorGC,
563 cx, tPtr->offsetWidth, 1,
564 tPtr->view->size.height - 2*tPtr->offsetWidth - 1);
565 printf("%d %d\n",cx,tPtr->cursorPosition);
567 XDrawLine(screen
->display
, tPtr
->view
->window
, screen
->xorGC
,
568 cx
, tPtr
->offsetWidth
, cx
,
569 tPtr
->view
->size
.height
- tPtr
->offsetWidth
- 1);
575 drawRelief(WMView
*view
, Bool beveled
)
577 WMScreen
*scr
= view
->screen
;
578 Display
*dpy
= scr
->display
;
582 int width
= view
->size
.width
;
583 int height
= view
->size
.height
;
585 dgc
= WMColorGC(scr
->darkGray
);
588 XDrawRectangle(dpy
, view
->window
, dgc
, 0, 0, width
-1, height
-1);
592 wgc
= WMColorGC(scr
->white
);
593 lgc
= WMColorGC(scr
->gray
);
596 XDrawLine(dpy
, view
->window
, dgc
, 0, 0, width
-1, 0);
597 XDrawLine(dpy
, view
->window
, dgc
, 0, 1, width
-2, 1);
599 XDrawLine(dpy
, view
->window
, dgc
, 0, 0, 0, height
-2);
600 XDrawLine(dpy
, view
->window
, dgc
, 1, 0, 1, height
-3);
603 XDrawLine(dpy
, view
->window
, wgc
, 0, height
-1, width
-1, height
-1);
604 XDrawLine(dpy
, view
->window
, lgc
, 1, height
-2, width
-2, height
-2);
606 XDrawLine(dpy
, view
->window
, wgc
, width
-1, 0, width
-1, height
-1);
607 XDrawLine(dpy
, view
->window
, lgc
, width
-2, 1, width
-2, height
-3);
612 paintTextField(TextField
*tPtr
)
614 W_Screen
*screen
= tPtr
->view
->screen
;
615 W_View
*view
= tPtr
->view
;
622 if (!view
->flags
.realized
|| !view
->flags
.mapped
)
625 if (!tPtr
->flags
.bordered
) {
631 totalWidth
= tPtr
->view
->size
.width
- 2*bd
;
633 if (tPtr
->textLen
> 0) {
634 tw
= WMWidthOfString(tPtr
->font
, &(tPtr
->text
[tPtr
->viewPosition
]),
635 tPtr
->textLen
- tPtr
->viewPosition
);
637 th
= WMFontHeight(tPtr
->font
);
639 ty
= tPtr
->offsetWidth
;
640 switch (tPtr
->flags
.alignment
) {
642 tx
= tPtr
->offsetWidth
+ 1;
643 if (tw
< tPtr
->usableWidth
)
644 XClearArea(screen
->display
, view
->window
, bd
+tw
, bd
,
645 totalWidth
-tw
, view
->size
.height
-2*bd
,
650 tx
= tPtr
->offsetWidth
+ (tPtr
->usableWidth
- tw
) / 2;
651 if (tw
< tPtr
->usableWidth
)
652 XClearArea(screen
->display
, view
->window
, bd
, bd
,
653 totalWidth
, view
->size
.height
-2*bd
, False
);
658 tx
= tPtr
->offsetWidth
+ tPtr
->usableWidth
- tw
- 1;
659 if (tw
< tPtr
->usableWidth
)
660 XClearArea(screen
->display
, view
->window
, bd
, bd
,
661 totalWidth
-tw
, view
->size
.height
-2*bd
, False
);
665 if (!tPtr
->flags
.secure
) {
666 if (!tPtr
->flags
.enabled
)
667 WMSetColorInGC(screen
->darkGray
, screen
->textFieldGC
);
669 WMDrawImageString(screen
, view
->window
, screen
->textFieldGC
,
671 &(tPtr
->text
[tPtr
->viewPosition
]),
672 tPtr
->textLen
- tPtr
->viewPosition
);
674 if (tPtr
->selection
.count
) {
677 count
= tPtr
->selection
.count
< 0
678 ? tPtr
->selection
.position
+ tPtr
->selection
.count
679 : tPtr
->selection
.position
;
682 rx = tx + WMWidthOfString(tPtr->font,
683 &(tPtr->text[tPtr->viewPosition]),
685 - WMWidthOfString(tPtr->font,
686 tPtr->text,tPtr->viewPosition);
688 rx
= tPtr
->offsetWidth
+ 1 + WMWidthOfString(tPtr
->font
,tPtr
->text
,count
)
689 - WMWidthOfString(tPtr
->font
,tPtr
->text
,tPtr
->viewPosition
);
691 XSetBackground(screen
->display
, screen
->textFieldGC
,
692 screen
->gray
->color
.pixel
);
694 WMDrawImageString(screen
, view
->window
, screen
->textFieldGC
,
695 tPtr
->font
, rx
, ty
, &(tPtr
->text
[count
]),
696 abs(tPtr
->selection
.count
));
698 XSetBackground(screen
->display
, screen
->textFieldGC
,
699 screen
->white
->color
.pixel
);
702 if (!tPtr
->flags
.enabled
)
703 WMSetColorInGC(screen
->black
, screen
->textFieldGC
);
706 XClearArea(screen
->display
, view
->window
, bd
, bd
, totalWidth
,
707 view
->size
.height
- 2*bd
, False
);
711 if (tPtr
->flags
.focused
&& tPtr
->flags
.enabled
&& tPtr
->flags
.cursorOn
712 && !tPtr
->flags
.secure
) {
717 if (tPtr
->flags
.bordered
) {
718 drawRelief(view
, tPtr
->flags
.beveled
);
725 blinkCursor(void *data
)
727 TextField
*tPtr
= (TextField
*)data
;
729 if (tPtr
->flags
.cursorOn
) {
730 tPtr
->timerID
= WMAddTimerHandler(CURSOR_BLINK_OFF_DELAY
, blinkCursor
,
733 tPtr
->timerID
= WMAddTimerHandler(CURSOR_BLINK_ON_DELAY
, blinkCursor
,
737 tPtr
->flags
.cursorOn
= !tPtr
->flags
.cursorOn
;
743 handleEvents(XEvent
*event
, void *data
)
745 TextField
*tPtr
= (TextField
*)data
;
747 CHECK_CLASS(data
, WC_TextField
);
750 switch (event
->type
) {
752 if (W_FocusedViewOfToplevel(W_TopLevelOfView(tPtr
->view
))!=tPtr
->view
)
754 tPtr
->flags
.focused
= 1;
756 if (!tPtr
->timerID
) {
757 tPtr
->timerID
= WMAddTimerHandler(CURSOR_BLINK_ON_DELAY
,
761 paintTextField(tPtr
);
763 WMPostNotificationName(WMTextDidBeginEditingNotification
, tPtr
, NULL
);
765 tPtr
->flags
.notIllegalMovement
= 0;
769 tPtr
->flags
.focused
= 0;
772 WMDeleteTimerHandler(tPtr
->timerID
);
773 tPtr
->timerID
= NULL
;
776 paintTextField(tPtr
);
777 if (!tPtr
->flags
.notIllegalMovement
) {
778 WMPostNotificationName(WMTextDidEndEditingNotification
, tPtr
,
779 (void*)WMIllegalTextMovement
);
784 if (event
->xexpose
.count
!=0)
786 paintTextField(tPtr
);
790 destroyTextField(tPtr
);
797 handleTextFieldKeyPress(TextField
*tPtr
, XEvent
*event
)
801 int count
, refresh
= 0;
802 int control_pressed
= 0;
804 if (((XKeyEvent
*) event
)->state
& WM_EMACSKEYMASK
) {
808 count
= XLookupString(&event
->xkey
, buffer
, 63, &ksym
, NULL
);
809 buffer
[count
] = '\0';
811 if (!(event
->xkey
.state
& ShiftMask
)) {
812 if (tPtr
->selection
.count
)
814 tPtr
->prevselection
= tPtr
->selection
;
815 tPtr
->selection
.position
= tPtr
->cursorPosition
;
816 tPtr
->selection
.count
= 0;
819 /* Be careful in any case in this switch statement, never to call
820 * to more than a function that can generate text change notifications.
821 * Only one text change notification should be sent in any case.
822 * Else hazardous things can happen.
823 * Maybe we need a better solution than the function wrapper to inform
824 * functions that change text in text fields, if they need to send a
825 * change notification or not. -Dan
829 if (event
->xkey
.state
& ShiftMask
) {
830 if (tPtr
->view
->prevFocusChain
) {
831 W_SetFocusOfTopLevel(W_TopLevelOfView(tPtr
->view
),
832 tPtr
->view
->prevFocusChain
);
833 tPtr
->flags
.notIllegalMovement
= 1;
835 WMPostNotificationName(WMTextDidEndEditingNotification
, tPtr
,
836 (void*)WMBacktabTextMovement
);
838 if (tPtr
->view
->nextFocusChain
) {
839 W_SetFocusOfTopLevel(W_TopLevelOfView(tPtr
->view
),
840 tPtr
->view
->nextFocusChain
);
841 tPtr
->flags
.notIllegalMovement
= 1;
843 WMPostNotificationName(WMTextDidEndEditingNotification
,
844 tPtr
, (void*)WMTabTextMovement
);
849 WMPostNotificationName(WMTextDidEndEditingNotification
, tPtr
,
850 (void*)WMReturnTextMovement
);
853 case WM_EMACSKEY_LEFT
:
854 if (!control_pressed
) {
859 if (tPtr
->cursorPosition
> 0) {
861 if (event
->xkey
.state
& ControlMask
) {
863 for (i
= tPtr
->cursorPosition
- 1; i
>= 0; i
--)
864 if (tPtr
->text
[i
] == ' ' || i
== 0) {
865 tPtr
->cursorPosition
= i
;
869 tPtr
->cursorPosition
--;
871 if (tPtr
->cursorPosition
< tPtr
->viewPosition
) {
872 tPtr
->viewPosition
= tPtr
->cursorPosition
;
880 case WM_EMACSKEY_RIGHT
:
881 if (!control_pressed
) {
886 if (tPtr
->cursorPosition
< tPtr
->textLen
) {
888 if (event
->xkey
.state
& ControlMask
) {
890 for (i
= tPtr
->cursorPosition
+ 1; i
<= tPtr
->textLen
; i
++)
891 if (tPtr
->text
[i
] == ' ' || i
== tPtr
->textLen
) {
892 tPtr
->cursorPosition
= i
;
896 tPtr
->cursorPosition
++;
898 while (WMWidthOfString(tPtr
->font
,
899 &(tPtr
->text
[tPtr
->viewPosition
]),
900 tPtr
->cursorPosition
-tPtr
->viewPosition
)
901 > tPtr
->usableWidth
) {
902 tPtr
->viewPosition
++;
910 case WM_EMACSKEY_HOME
:
911 if (!control_pressed
) {
916 if (tPtr
->cursorPosition
> 0) {
918 tPtr
->cursorPosition
= 0;
919 if (tPtr
->viewPosition
> 0) {
920 tPtr
->viewPosition
= 0;
928 case WM_EMACSKEY_END
:
929 if (!control_pressed
) {
934 if (tPtr
->cursorPosition
< tPtr
->textLen
) {
936 tPtr
->cursorPosition
= tPtr
->textLen
;
937 tPtr
->viewPosition
= 0;
938 while (WMWidthOfString(tPtr
->font
,
939 &(tPtr
->text
[tPtr
->viewPosition
]),
940 tPtr
->textLen
-tPtr
->viewPosition
)
941 > tPtr
->usableWidth
) {
942 tPtr
->viewPosition
++;
951 if (!control_pressed
) {
955 if (tPtr
->cursorPosition
> 0) {
958 if (tPtr
->prevselection
.count
) {
959 range
.position
= tPtr
->prevselection
.count
< 0
960 ? tPtr
->prevselection
.position
+ tPtr
->prevselection
.count
961 : tPtr
->prevselection
.position
;
963 range
.count
= abs(tPtr
->prevselection
.count
);
965 range
.position
= tPtr
->cursorPosition
- 1;
968 WMDeleteTextFieldRange(tPtr
, range
);
972 case WM_EMACSKEY_DEL
:
973 if (!control_pressed
) {
978 if (tPtr
->cursorPosition
< tPtr
->textLen
|| tPtr
->prevselection
.count
) {
981 if (tPtr
->prevselection
.count
) {
982 range
.position
= tPtr
->prevselection
.count
< 0
983 ? tPtr
->prevselection
.position
+ tPtr
->prevselection
.count
984 : tPtr
->prevselection
.position
;
986 range
.count
= abs(tPtr
->prevselection
.count
);
988 range
.position
= tPtr
->cursorPosition
;
991 WMDeleteTextFieldRange(tPtr
, range
);
997 if (count
> 0 && !iscntrl(buffer
[0])) {
1000 if (tPtr
->prevselection
.count
) {
1001 range
.position
= tPtr
->prevselection
.count
< 0
1002 ? tPtr
->prevselection
.position
+ tPtr
->prevselection
.count
1003 : tPtr
->prevselection
.position
;
1005 range
.count
= abs(tPtr
->prevselection
.count
);
1007 range
.position
= tPtr
->cursorPosition
;
1010 if (tPtr
->prevselection
.count
)
1011 deleteTextFieldRange(tPtr
, range
);
1012 WMInsertTextFieldText(tPtr
, buffer
, tPtr
->cursorPosition
);
1018 if (event
->xkey
.state
& ShiftMask
) {
1019 if (tPtr
->selection
.count
== 0)
1020 tPtr
->selection
.position
= tPtr
->cursorPosition
;
1021 tPtr
->selection
.count
= tPtr
->cursorPosition
- tPtr
->selection
.position
;
1024 tPtr
->prevselection
.count
= 0;
1026 paintTextField(tPtr
);
1032 pointToCursorPosition(TextField
*tPtr
, int x
)
1037 if (tPtr
->flags
.bordered
)
1040 a
= tPtr
->viewPosition
;
1041 b
= tPtr
->viewPosition
+ tPtr
->textLen
;
1042 if (WMWidthOfString(tPtr
->font
, &(tPtr
->text
[tPtr
->viewPosition
]),
1043 tPtr
->textLen
-tPtr
->viewPosition
) < x
)
1044 return tPtr
->textLen
;
1046 while (a
< b
&& b
-a
>1) {
1048 tw
= WMWidthOfString(tPtr
->font
, &(tPtr
->text
[tPtr
->viewPosition
]),
1049 mid
- tPtr
->viewPosition
);
1062 handleTextFieldActionEvents(XEvent
*event
, void *data
)
1064 TextField
*tPtr
= (TextField
*)data
;
1066 CHECK_CLASS(data
, WC_TextField
);
1068 switch (event
->type
) {
1070 if (tPtr
->flags
.enabled
&& tPtr
->flags
.focused
)
1071 handleTextFieldKeyPress(tPtr
, event
);
1075 if (tPtr
->flags
.enabled
&& (event
->xmotion
.state
& Button1Mask
)) {
1078 if (tPtr
->viewPosition
< tPtr
->textLen
&& event
->xmotion
.x
>
1079 tPtr
->usableWidth
) {
1080 if (WMWidthOfString(tPtr
->font
,
1081 &(tPtr
->text
[tPtr
->viewPosition
]),
1082 tPtr
->cursorPosition
-tPtr
->viewPosition
)
1083 > tPtr
->usableWidth
) {
1084 tPtr
->viewPosition
++;
1087 else if (tPtr
->viewPosition
> 0 && event
->xmotion
.x
< 0) {
1089 tPtr
->viewPosition
--;
1092 if (!tPtr
->selection
.count
) {
1093 tPtr
->selection
.position
= tPtr
->cursorPosition
;
1096 tPtr
->cursorPosition
= pointToCursorPosition(tPtr
, event
->xmotion
.x
);
1098 tPtr
->selection
.count
= tPtr
->cursorPosition
- tPtr
->selection
.position
;
1101 printf("notify %d %d\n",event->xmotion.x,tPtr->usableWidth);
1105 paintTextField(tPtr
);
1111 switch (tPtr
->flags
.alignment
) {
1114 textWidth
= WMWidthOfString(tPtr
->font
, tPtr
->text
, tPtr
->textLen
);
1115 if (tPtr
->flags
.enabled
&& !tPtr
->flags
.focused
) {
1116 WMSetFocusToWidget(tPtr
);
1117 } else if (tPtr
->flags
.focused
) {
1118 tPtr
->selection
.count
= 0;
1120 if(textWidth
< tPtr
->usableWidth
){
1121 tPtr
->cursorPosition
= pointToCursorPosition(tPtr
,
1122 event
->xbutton
.x
- tPtr
->usableWidth
1125 else tPtr
->cursorPosition
= pointToCursorPosition(tPtr
,
1128 tPtr->cursorPosition = pointToCursorPosition(tPtr,
1130 tPtr->cursorPosition += tPtr->usableWidth - textWidth;
1133 tPtr->cursorPosition = pointToCursorPosition(tPtr,
1136 paintTextField(tPtr
);
1140 if (tPtr
->flags
.enabled
&& !tPtr
->flags
.focused
) {
1141 WMSetFocusToWidget(tPtr
);
1142 tPtr
->cursorPosition
= pointToCursorPosition(tPtr
,
1144 paintTextField(tPtr
);
1145 } else if (tPtr
->flags
.focused
) {
1146 tPtr
->cursorPosition
= pointToCursorPosition(tPtr
,
1148 tPtr
->selection
.count
= 0;
1149 paintTextField(tPtr
);
1151 if (event
->xbutton
.button
== Button2
&& tPtr
->flags
.enabled
) {
1154 text
= W_GetTextSelection(tPtr
->view
->screen
,
1155 tPtr
->view
->screen
->clipboardAtom
);
1157 text
= W_GetTextSelection(tPtr
->view
->screen
, XA_CUT_BUFFER0
);
1160 WMInsertTextFieldText(tPtr
, text
, tPtr
->cursorPosition
);
1162 WMPostNotificationName(WMTextDidChangeNotification
, tPtr
, NULL
);
1172 XSetSelectionOwner(tPtr
->view
->screen
->display
,
1173 XA_PRIMARY
, None
, CurrentTime
);
1174 count
= tPtr
->selection
.count
< 0
1175 ? tPtr
->selection
.position
+ tPtr
->selection
.count
1176 : tPtr
->selection
.position
;
1177 XStoreBuffer(tPtr
->view
->screen
->display
,
1178 &tPtr
->text
[count
] , abs(tPtr
->selection
.count
), 0);
1186 destroyTextField(TextField
*tPtr
)
1190 WMDeleteTimerHandler(tPtr
->timerID
);
1193 WMReleaseFont(tPtr
->font
);