textbox/suggestion fixups, update to lossless, canvas scaling
[goodguy/history.git] / cinelerra-5.1 / guicast / bctextbox.C
1 /*
2  * CINELERRA
3  * Copyright (C) 1997-2014 Adam Williams <broadcast at earthling dot net>
4  *
5  * This program is free software; you can redistribute it and/or modify
6  * it under the terms of the GNU General Public License as published by
7  * the Free Software Foundation; either version 2 of the License, or
8  * (at your option) any later version.
9  *
10  * This program is distributed in the hope that it will be useful,
11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13  * GNU General Public License for more details.
14  *
15  * You should have received a copy of the GNU General Public License
16  * along with this program; if not, write to the Free Software
17  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
18  *
19  */
20
21 #include "bcclipboard.h"
22 #include "bclistboxitem.h"
23 #include "bcresources.h"
24 #include "bcsignals.h"
25 #include "bctextbox.h"
26 #include "clip.h"
27 #include "colors.h"
28 #include <ctype.h>
29 #include "cursors.h"
30 #include "filesystem.h"
31 #include "keys.h"
32 #include <math.h>
33 #include "bctimer.h"
34 #include "vframe.h"
35
36 #include <string.h>
37 #include <unistd.h>
38 #include <wchar.h>
39 #include <wctype.h>
40
41 #define VERTICAL_MARGIN 2
42 #define VERTICAL_MARGIN_NOBORDER 0
43 #define HORIZONTAL_MARGIN 4
44 #define HORIZONTAL_MARGIN_NOBORDER 2
45
46 BC_TextBox::BC_TextBox(int x, int y, int w, int rows,
47         int size, char *text, int has_border, int font)
48  : BC_SubWindow(x, y, w, 0, -1)
49 {
50         is_utf8 = 1;
51         skip_cursor = 0;
52         reset_parameters(rows, has_border, font, size);
53         if( size > 0 )
54                 tstrcpy(text);
55         else    // text referenced directly
56                 this->text = text;
57 }
58
59 BC_TextBox::BC_TextBox(int x, int y, int w, int rows,
60         int size, wchar_t *wtext, int has_border, int font)
61  : BC_SubWindow(x, y, w, 0, -1)
62 {
63         is_utf8 = 1;
64         skip_cursor = 0;
65         wsize = size > 0 ? size : wcslen(wtext);
66         if( size <= 0 ) size = 2*wsize;
67         reset_parameters(rows, has_border, font, size);
68         this->wtext = new wchar_t[wsize+1];
69         wcsncpy(this->wtext, wtext, wsize);
70         this->wtext[wsize] = 0;
71 }
72
73 BC_TextBox::BC_TextBox(int x, int y, int w, int rows,
74         const char *text, int has_border, int font, int is_utf8)
75  : BC_SubWindow(x, y, w, 0, -1)
76 {
77         this->is_utf8 = is_utf8;
78         skip_cursor = 0;
79         reset_parameters(rows, has_border, font, BCTEXTLEN);
80         tstrcpy(text);
81 }
82
83 BC_TextBox::BC_TextBox(int x, int y, int w, int rows,
84         const wchar_t *wtext, int has_border, int font, int is_utf8)
85  : BC_SubWindow(x, y, w, 0, -1)
86 {
87         this->is_utf8 = is_utf8;
88         skip_cursor = 0;
89         reset_parameters(rows, has_border, font, BCTEXTLEN);
90         wsize = BCTEXTLEN;
91         wtext = new wchar_t[wsize+1];
92         wcsncpy(this->wtext, wtext, wsize);
93         this->wtext[wsize] = 0;
94 }
95
96 BC_TextBox::BC_TextBox(int x, int y, int w, int rows,
97         int64_t text, int has_border, int font)
98  : BC_SubWindow(x, y, w, 0, -1)
99 {
100         is_utf8 = 1;
101         skip_cursor = 0;
102         reset_parameters(rows, has_border, font, BCSTRLEN);
103         snprintf(this->text, this->tsize, "%jd", text);
104         dirty = 1;  wtext_update();
105 }
106
107 BC_TextBox::BC_TextBox(int x, int y, int w, int rows,
108         float text, int has_border, int font, int precision)
109  : BC_SubWindow(x, y, w, 0, -1)
110 {
111         is_utf8 = 1;
112         skip_cursor = 0;
113         reset_parameters(rows, has_border, font, BCSTRLEN);
114         this->precision = precision;
115         snprintf(this->text, this->tsize, "%0.*f", precision, text);
116         dirty = 1;  wtext_update();
117 }
118
119 BC_TextBox::BC_TextBox(int x, int y, int w, int rows,
120         int text, int has_border, int font)
121  : BC_SubWindow(x, y, w, 0, -1)
122 {
123         is_utf8 = 1;
124         skip_cursor = 0;
125         reset_parameters(rows, has_border, font, BCSTRLEN);
126         snprintf(this->text, this->tsize, "%d", text);
127         dirty = 1;  wtext_update();
128 }
129
130 BC_TextBox::~BC_TextBox()
131 {
132         if(skip_cursor) delete skip_cursor;
133         delete suggestions_popup;
134         suggestions->remove_all_objects();
135         delete suggestions;
136         delete [] positions;
137         delete [] wtext;
138         if( size > 0 )
139                 delete [] text;
140 }
141
142 int BC_TextBox::reset_parameters(int rows, int has_border, int font, int size)
143 {
144         suggestions = new ArrayList<BC_ListBoxItem*>;
145         suggestions_popup = 0;
146         suggestion_column = 0;
147
148         this->rows = rows;
149         this->has_border = has_border;
150         this->font = font;
151         this->size = size;
152         this->tsize = size >= 0 ? size : -size;
153         this->text = size > 0 ? new char[size+1] : 0;
154         if( this->text ) this->text[0] = 0;
155         text_start = 0;
156         text_end = 0;
157         highlight_letter1 = highlight_letter2 = 0;
158         highlight_letter3 = highlight_letter4 = 0;
159         ibeam_letter = 0;
160         active = 0;
161         text_selected = 0;
162         word_selected = 0;
163         line_selected = 0;
164         unicode_active = -1;
165         text_x = 0;
166         enabled = 1;
167         highlighted = 0;
168         precision = 4;
169         if (!skip_cursor)
170                 skip_cursor = new Timer;
171         wtext = 0;
172         wsize = 0;
173         wlen = 0;
174         positions = 0;
175         plen = 0;
176         keypress_draw = 1;
177         last_keypress = 0;
178         separators = 0;
179         yscroll = 0;
180         dirty = 1;
181         return 0;
182 }
183
184 int BC_TextBox::tstrlen()
185 {
186         if( !tsize ) return strlen(text);
187         return strnlen(text, tsize);
188 }
189
190 int BC_TextBox::tstrcmp(const char *cp)
191 {
192         if( !tsize ) return strcmp(text, cp);
193         return strncmp(text, cp, tsize);
194 }
195
196 char *BC_TextBox::tstrcpy(const char *cp)
197 {
198         dirty = 1;
199         if( cp ) {
200                 if( !tsize )
201                         return strcpy(text, cp);
202                 strncpy(text, cp, tsize);
203                 text[tsize-1] = 0;
204         }
205         else
206                 text[0] = 0;
207         return text;
208 }
209
210 char *BC_TextBox::tstrcat(const char *cp)
211 {
212         dirty = 1;
213         if( !tsize ) return strcat(text, cp);
214         char *result = strncat(text, cp, tsize);
215         text[tsize-1] = 0;
216         return result;
217 }
218
219 int BC_TextBox::wtext_update()
220 {
221         if( dirty ) {
222                 const char *src_enc = is_utf8 ? "UTF8" : BC_Resources::encoding;
223                 const char *dst_enc = BC_Resources::wide_encoding;
224                 int nsize = tsize > 0 ? tsize : strlen(text) + BCTEXTLEN;
225                 if( nsize > wsize || !wtext ) {
226                         wchar_t *ntext = new wchar_t[nsize+1];
227                         memcpy(ntext, wtext, wsize*sizeof(wtext[0]));
228                         delete [] wtext;  wtext = ntext;  wsize = nsize;
229                         int *npositions = new int[nsize+1];
230                         if( plen > 0 )
231                                 memcpy(npositions, positions, (plen+1)*sizeof(positions[0]));
232                         else
233                                 npositions[0] = 0;
234                         delete [] positions;  positions = npositions;  plen = nsize;
235                 }
236                 wlen = BC_Resources::encode(src_enc, dst_enc, text, strlen(text),
237                         (char*)wtext, wsize*sizeof(wchar_t)) / sizeof(wchar_t);
238                 dirty = 0;
239         }
240         wtext[wlen] = 0;
241         return wlen;
242 }
243
244 int BC_TextBox::text_update(const wchar_t *wcp, int wsz, char *tcp, int tsz)
245 {
246         const char *src_enc = BC_Resources::wide_encoding;
247         const char *dst_enc = BC_Resources::encoding;
248         if( wsz < 0 ) wsz = wcslen(wcp);
249         int len = BC_Resources::encode(src_enc, dst_enc,
250                 (char*)wcp, wsz*sizeof(wchar_t), tcp, tsz);
251         tcp[len] = 0;
252         return len;
253 }
254
255 int BC_TextBox::initialize()
256 {
257         if (!skip_cursor)
258                 skip_cursor = new Timer;
259         skip_cursor->update();
260 // Get dimensions
261         text_ascent = get_text_ascent(font) + 1;
262         text_descent = get_text_descent(font) + 1;
263         text_height = text_ascent + text_descent;
264         ibeam_letter = wtext_update();
265         if(has_border)
266         {
267                 left_margin = right_margin = HORIZONTAL_MARGIN;
268                 top_margin = bottom_margin = VERTICAL_MARGIN;
269         }
270         else
271         {
272                 left_margin = right_margin = HORIZONTAL_MARGIN_NOBORDER;
273                 top_margin = bottom_margin = VERTICAL_MARGIN_NOBORDER;
274         }
275         h = get_row_h(rows);
276         text_x = left_margin;
277         text_y = top_margin;
278         find_ibeam(0);
279
280 // Create the subwindow
281         BC_SubWindow::initialize();
282
283         BC_Resources *resources = get_resources();
284         if(has_border)
285         {
286                 back_color = resources->text_background;
287                 high_color = resources->text_background_hi;
288         }
289         else
290         {
291                 high_color = resources->text_background_noborder_hi;
292                 back_color = bg_color;
293         }
294
295         draw(0);
296         set_cursor(IBEAM_CURSOR, 0, 0);
297         show_window(0);
298         return 0;
299 }
300
301 int BC_TextBox::calculate_h(BC_WindowBase *gui,
302         int font,
303         int has_border,
304         int rows)
305 {
306         return rows * (gui->get_text_ascent(font) + 1 +
307                 gui->get_text_descent(font) + 1) +
308                 2 * (has_border ? VERTICAL_MARGIN : VERTICAL_MARGIN_NOBORDER);
309 }
310
311 void BC_TextBox::set_precision(int precision)
312 {
313         this->precision = precision;
314 }
315
316 // Compute suggestions for a path
317 int BC_TextBox::calculate_suggestions(ArrayList<BC_ListBoxItem*> *entries, const char *filter)
318 {
319 // Let user delete suggestion
320         if(get_last_keypress() != BACKSPACE) {
321 // Compute suggestions
322                 FileSystem fs;
323                 ArrayList<char*> suggestions;
324                 const char *current_text = get_text();
325                 int suggestion_column = 0;
326                 char dirname[BCTEXTLEN];  dirname[0] = 0;
327                 if( current_text[0] == '/' || current_text[0] == '~' )
328                         strncpy(dirname, current_text, sizeof(dirname));
329                 else if( !entries )
330                         getcwd(dirname, sizeof(dirname));
331 // If directory, tabulate it
332                 if( dirname[0] ) {
333                         if( filter ) fs.set_filter(filter);
334                         char *prefix, *cp;
335                         strncpy(dirname, current_text, sizeof(dirname));
336                         if( (cp=strrchr(dirname, '/')) ||
337                             (cp=strrchr(dirname, '~')) ) *++cp = 0;
338                         fs.parse_tildas(dirname);
339                         fs.update(dirname);
340                         cp = (char *)current_text;
341                         if( (prefix=strrchr(cp, '/')) ||
342                             (prefix=strrchr(cp, '~')) ) ++prefix;
343                         suggestion_column = !prefix ? 0 : prefix - cp;
344                         int prefix_len = prefix ? strlen(prefix) : 0;
345 // only include items where the filename matches the basename prefix
346                         for(int i = 0; i < fs.total_files(); i++) {
347                                 char *current_name = fs.get_entry(i)->name;
348                                 if( prefix_len>0 && strncmp(prefix, current_name, prefix_len) ) continue;
349                                 suggestions.append(current_name);
350                         }
351                 }
352                 else if(entries) {
353                         char *prefix = (char *)current_text;
354                         int prefix_len = strlen(prefix);
355                         for(int i = 0; i < entries->size(); i++) {
356                                 char *current_name = entries->get(i)->get_text();
357                                 if( prefix_len>0 && strncmp(prefix, current_name, prefix_len) ) continue;
358                                 suggestions.append(current_name);
359                         }
360                 }
361                 set_suggestions(&suggestions, suggestion_column);
362         }
363
364         return 1;
365 }
366
367 void BC_TextBox::no_suggestions()
368 {
369         if( suggestions_popup ) {
370                 delete suggestions_popup;
371                 suggestions_popup = 0;
372                 activate();
373         }
374 }
375
376 void BC_TextBox::set_suggestions(ArrayList<char*> *suggestions, int column)
377 {
378 // Copy the array
379         this->suggestions->remove_all_objects();
380         this->suggestion_column = column;
381
382         if(suggestions) {
383                 for(int i = 0; i < suggestions->size(); i++) {
384                         this->suggestions->append(new BC_ListBoxItem(suggestions->get(i)));
385                 }
386
387 // Show the popup without taking focus
388                 if( suggestions->size() > 1 ) {
389                         if( !suggestions_popup ) {
390                                 suggestions_popup = new BC_TextBoxSuggestions(this, x, y);
391                                 get_parent()->add_subwindow(suggestions_popup);
392                                 suggestions_popup->set_is_suggestions(1);
393                         }
394                         else {
395                                 suggestions_popup->update(this->suggestions, 0, 0, 1);
396                         }
397                         suggestions_popup->activate(0);
398                 }
399                 else
400 // Show the highlighted text
401                 if( suggestions->size() == 1 ) {
402                         highlight_letter1 = wtext_update();
403                         text_update(wtext,wlen, text,tsize);
404                         char *current_suggestion = suggestions->get(0);
405                         int col = highlight_letter1 - suggestion_column;
406                         if( col < 0 ) col = 0;
407                         char *cur = current_suggestion + col;
408                         tstrcat(cur);
409                         draw(0);  // update positions
410                         highlight_letter2 = wtext_update();
411 //printf("BC_TextBox::set_suggestions %d %d\n", __LINE__, suggestion_column);
412
413                         draw(1);
414                         no_suggestions();
415                 }
416         }
417
418 // Clear the popup
419         if( !suggestions || !this->suggestions->size() )
420                 no_suggestions();
421 }
422
423 void BC_TextBox::wset_selection(int char1, int char2, int ibeam)
424 {
425         highlight_letter1 = char1;
426         highlight_letter2 = char2;
427         ibeam_letter = ibeam;
428         draw(1);
429 }
430
431 // count utf8 chars in text which occur before cp
432 int BC_TextBox::wcpos(const char *text, const char *cp)
433 {
434         int len = 0;
435         const unsigned char *bp = (const unsigned char *)text;
436         const unsigned char *ep = (const unsigned char *)cp;
437         while( bp < ep && *bp != 0 ) {
438                 ++len;
439                 int ch = *bp++;
440                 if( ch < 0x80 ) continue;
441                 int i = ch - 0x0c0;
442                 int n = i<0? 0 : i<32? 1 : i<48? 2 : i<56? 3 : i<60? 4 : 5;
443                 for( i=n; bp < ep && --i>=0 && (*bp&0xc0) == 0x80; ++bp );
444         }
445         return len;
446 }
447
448 void BC_TextBox::set_selection(int char1, int char2, int ibeam)
449 {
450         const char *cp = get_text();
451         wset_selection(wcpos(cp, cp+char1), wcpos(cp, cp+char2), wcpos(cp, cp+ibeam));
452 }
453
454 int BC_TextBox::update(const char *text)
455 {
456 //printf("BC_TextBox::update 1 %d %s %s\n", tstrcmp(text), text, this->text);
457 // Don't update if contents are the same
458         if(!tstrcmp(text)) return 0;
459         tstrcpy(text);
460         int wtext_len = wtext_update();
461         if(highlight_letter1 > wtext_len) highlight_letter1 = wtext_len;
462         if(highlight_letter2 > wtext_len) highlight_letter2 = wtext_len;
463         if(ibeam_letter > wtext_len) ibeam_letter = wtext_len;
464         draw(1);
465         return 0;
466 }
467
468 int BC_TextBox::update(const wchar_t *wtext)
469 {
470         int wtext_len = wcslen(wtext);
471         if( wtext_len >= wsize ) wtext_len = wsize;
472         wcsncpy(this->wtext, wtext, wtext_len);
473         wlen = wtext_len;
474         if(highlight_letter1 > wtext_len) highlight_letter1 = wtext_len;
475         if(highlight_letter2 > wtext_len) highlight_letter2 = wtext_len;
476         if(ibeam_letter > wtext_len) ibeam_letter = wtext_len;
477         draw(1);
478         return 0;
479 }
480
481 int BC_TextBox::update(int64_t value)
482 {
483         char string[BCTEXTLEN];
484         sprintf(string, "%jd", value);
485         update(string);
486         return 0;
487 }
488
489 int BC_TextBox::update(float value)
490 {
491         char string[BCTEXTLEN];
492         sprintf(string, "%0.*f", precision, value);
493         update(string);
494         return 0;
495 }
496
497 void BC_TextBox::disable()
498 {
499         if(enabled) {
500                 enabled = 0;
501                 deactivate();
502                 draw(1);
503         }
504 }
505
506 void BC_TextBox::enable()
507 {
508         if(!enabled) {
509                 enabled = 1;
510                 if(top_level) {
511                         draw(1);
512                 }
513         }
514 }
515
516 int BC_TextBox::get_enabled()
517 {
518         return enabled;
519 }
520
521 int BC_TextBox::pixels_to_rows(BC_WindowBase *window, int font, int pixels)
522 {
523         return (pixels - 4) /
524                 (window->get_text_ascent(font) + 1 +
525                         window->get_text_descent(font) + 1);
526 }
527
528 int BC_TextBox::calculate_row_h(int rows,
529         BC_WindowBase *parent_window,
530         int has_border,
531         int font)
532 {
533         return rows *
534                 (parent_window->get_text_ascent(font) + 1 +
535                 parent_window->get_text_descent(font) + 1) +
536                 (has_border ? 4 : 0);
537 }
538
539 const char* BC_TextBox::get_text()
540 {
541         int wtext_len = wtext_update();
542         text_update(wtext,wtext_len, text,tsize);
543         return text;
544 }
545
546 const wchar_t* BC_TextBox::get_wtext()
547 {
548         wtext_update();
549         return wtext;
550 }
551
552 void BC_TextBox::set_text(char *text, int isz)
553 {
554         if( size > 0 || isz < 0 ) return;
555         this->text = text;
556         tsize = isz;
557         size = -isz;
558         dirty = 1;
559         wtext_update();
560         draw(1);
561 }
562
563 int BC_TextBox::get_text_rows()
564 {
565         int wtext_len = wtext_update();
566         int result = 1;
567         for(int i = 0; i < wtext_len; i++) {
568                 if(wtext[i] == '\n') result++;
569         }
570         return result;
571 }
572
573
574 int BC_TextBox::get_row_h(int rows)
575 {
576         return rows * text_height + top_margin + bottom_margin;
577 }
578
579 int BC_TextBox::reposition_window(int x, int y, int w, int rows)
580 {
581         int new_h = get_h();
582         if(w < 0) w = get_w();
583         if(rows != -1)
584         {
585                 new_h = get_row_h(rows);
586                 this->rows = rows;
587         }
588
589         if(x != get_x() ||
590                 y != get_y() ||
591                 w != get_w() ||
592                 new_h != get_h())
593         {
594 // printf("BC_TextBox::reposition_window 1 %d %d %d %d %d %d %d %d\n",
595 // x, get_x(), y, get_y(), w, get_w(), new_h, get_h());
596                 BC_WindowBase::reposition_window(x, y, w, new_h);
597                 draw(0);
598         }
599         return 0;
600 }
601
602 void BC_TextBox::draw_border()
603 {
604         BC_Resources *resources = get_resources();
605 // Clear margins
606         set_color(background_color);
607         draw_box(0, 0, left_margin, get_h());
608         draw_box(get_w() - right_margin, 0, right_margin, get_h());
609
610         if(has_border)
611         {
612                 if(highlighted)
613                         draw_3d_border(0, 0, w, h,
614                                 resources->text_border1,
615                                 resources->text_border2_hi,
616                                 resources->text_border3_hi,
617                                 resources->text_border4);
618                 else
619                         draw_3d_border(0, 0, w, h,
620                                 resources->text_border1,
621                                 resources->text_border2,
622                                 resources->text_border3,
623                                 resources->text_border4);
624         }
625 }
626
627 void BC_TextBox::draw_cursor()
628 {
629 //      set_color(background_color);
630
631         if(ibeam_x >= 0 &&
632                 ibeam_y >= 0)
633         {
634         set_color(WHITE);
635         set_inverse();
636
637         draw_box(ibeam_x + text_x,
638                 ibeam_y + text_y,
639                 BCCURSORW,
640                 text_height);
641         set_opaque();
642         }
643 }
644
645
646 void BC_TextBox::draw(int flush)
647 {
648         int i, j, k;
649         int row_begin, row_end;
650         int highlight_x1, highlight_x2;
651         int need_ibeam = 1;
652         BC_Resources *resources = get_resources();
653
654 //printf("BC_TextBox::draw %d %s\n", __LINE__, text);
655 // Background
656         if(has_border)
657                 background_color = resources->text_background;
658         else if(highlighted)
659                 background_color = high_color;
660         else
661                 background_color = back_color;
662         set_color(background_color);
663         draw_box(0, 0, w, h);
664
665         int wtext_len = wtext_update();
666
667 // Draw text with selection
668         set_font(font);
669
670         for(i=0, j=0, k=text_y; i < wtext_len && k < get_h(); k += text_height) {
671 // Draw row of text
672                 row_begin = i;
673                 wchar_t *wtext_row = &wtext[i];
674                 for(j=0; j<BCTEXTLEN-1 && i<wtext_len && wtext[i]!='\n'; ++i, ++j);
675                 if( (row_end=i) < wtext_len ) ++i;
676
677                 if(k > top_margin-text_height && k < get_h()-bottom_margin) {
678 // Draw highlighted region of row
679                         if( highlight_letter2 > highlight_letter1 &&
680                             highlight_letter2 > row_begin &&
681                             highlight_letter1 <= row_end ) {
682                                 int color = active && enabled && get_has_focus() ?
683                                         resources->text_highlight :
684                                         resources->text_inactive_highlight;
685                                 if( unicode_active >= 0 )
686                                         color ^= LTBLUE;
687                                 set_color(color);
688                                 if(highlight_letter1 >= row_begin &&
689                                         highlight_letter1 <= row_end)
690                                         highlight_x1 = positions[highlight_letter1];
691                                 else
692                                         highlight_x1 = 0;
693
694                                 if(highlight_letter2 > row_begin &&
695                                         highlight_letter2 <= row_end)
696                                         highlight_x2 = positions[highlight_letter2];
697                                 else
698                                         highlight_x2 = get_w();
699
700                                 draw_box(highlight_x1 + text_x, k,
701                                         highlight_x2 - highlight_x1, text_height);
702                         }
703
704 // Draw text over highlight
705                         int len = row_end - row_begin;
706                         if( len > 0 ) {
707                                 set_color(enabled ? resources->text_default : DMGREY);
708                                 draw_wtext(text_x, k + text_ascent, wtext_row, len,
709                                         0, &positions[wtext_row - wtext]);
710                         }
711                         else
712                                 positions[wtext_row - wtext] = 0;
713
714 // Get ibeam location
715                         if(ibeam_letter >= row_begin && ibeam_letter <= row_end) {
716                                 need_ibeam = 0;
717                                 ibeam_y = k - text_y;
718                                 ibeam_x = positions[ibeam_letter];
719                         }
720                 }
721         }
722
723 //printf("BC_TextBox::draw 3 %d\n", ibeam_y);
724         if(need_ibeam) {
725 //              ibeam_x = ibeam_y = !wtext_len ? 0 : -1;
726                 ibeam_x = 0;  ibeam_y = k - text_y;
727         }
728
729 //printf("BC_TextBox::draw 4 %d\n", ibeam_y);
730 // Draw solid cursor
731         if (active)
732                 draw_cursor();
733
734 // Border
735         draw_border();
736         flash(flush);
737 }
738
739 int BC_TextBox::focus_in_event()
740 {
741         draw(1);
742         return 1;
743 }
744
745 int BC_TextBox::focus_out_event()
746 {
747         draw(1);
748         return 1;
749 }
750
751 int BC_TextBox::cursor_enter_event()
752 {
753         if(top_level->event_win == win && enabled)
754         {
755                 tooltip_done = 0;
756                 if( !active ) {
757                         top_level->deactivate();
758                         activate();
759                 }
760                 if(!highlighted)
761                 {
762                         highlighted = 1;
763                         draw_border();
764                         flash(1);
765                 }
766         }
767         return 0;
768 }
769
770 int BC_TextBox::cursor_leave_event()
771 {
772         if(highlighted)
773         {
774                 highlighted = 0;
775                 draw_border();
776                 hide_tooltip();
777         }
778         if( !suggestions_popup )
779                 deactivate();
780         return 0;
781 }
782
783 int BC_TextBox::button_press_event()
784 {
785         const int debug = 0;
786
787         if(!enabled) return 0;
788         if(get_buttonpress() != WHEEL_UP &&
789                 get_buttonpress() != WHEEL_DOWN &&
790                 get_buttonpress() != LEFT_BUTTON &&
791                 get_buttonpress() != MIDDLE_BUTTON) return 0;
792
793
794
795         if(debug) printf("BC_TextBox::button_press_event %d\n", __LINE__);
796
797         int cursor_letter = 0;
798         int wtext_len = wtext_update();
799         int update_scroll = 0;
800
801
802         if(top_level->event_win == win)
803         {
804                 if(!active)
805                 {
806                         hide_tooltip();
807                         top_level->deactivate();
808                         activate();
809                 }
810
811
812                 if(get_buttonpress() == WHEEL_UP)
813                 {
814                         text_y += text_height;
815                         text_y = MIN(text_y, top_margin);
816                         update_scroll = 1;
817                 }
818                 else
819                 if(get_buttonpress() == WHEEL_DOWN)
820                 {
821                         int min_y = -(get_text_rows() *
822                                 text_height -
823                                 get_h() +
824                                 bottom_margin);
825                         text_y -= text_height;
826                         text_y = MAX(text_y, min_y);
827                         text_y = MIN(text_y, top_margin);
828                         update_scroll = 1;
829                 }
830                 else
831                 {
832
833                 cursor_letter = get_cursor_letter(top_level->cursor_x, top_level->cursor_y);
834
835         //printf("BC_TextBox::button_press_event %d %d\n", __LINE__, cursor_letter);
836
837
838                 if(get_triple_click())
839                 {
840         //printf("BC_TextBox::button_press_event %d\n", __LINE__);
841                         line_selected = 1;
842                         select_line(highlight_letter1, highlight_letter2, cursor_letter);
843                         highlight_letter3 = highlight_letter1;
844                         highlight_letter4 = highlight_letter2;
845                         ibeam_letter = highlight_letter2;
846                         copy_selection(PRIMARY_SELECTION);
847                 }
848                 else
849                 if(get_double_click())
850                 {
851                         word_selected = 1;
852                         select_word(highlight_letter1, highlight_letter2, cursor_letter);
853                         highlight_letter3 = highlight_letter1;
854                         highlight_letter4 = highlight_letter2;
855                         ibeam_letter = highlight_letter2;
856                         copy_selection(PRIMARY_SELECTION);
857                 }
858                 else
859                 if(get_buttonpress() == MIDDLE_BUTTON)
860                 {
861                         highlight_letter3 = highlight_letter4 =
862                                 ibeam_letter = highlight_letter1 =
863                                 highlight_letter2 = cursor_letter;
864                         paste_selection(PRIMARY_SELECTION);
865                 }
866                 else
867                 {
868                         text_selected = 1;
869                         highlight_letter3 = highlight_letter4 =
870                                 ibeam_letter = highlight_letter1 =
871                                 highlight_letter2 = cursor_letter;
872                 }
873
874
875         // Handle scrolling by highlighting text
876                 if(text_selected || word_selected || line_selected)
877                 {
878                         set_repeat(top_level->get_resources()->scroll_repeat);
879                 }
880
881                 if(ibeam_letter < 0) ibeam_letter = 0;
882                 if(ibeam_letter > wtext_len) ibeam_letter = wtext_len;
883                 }
884
885                 draw(1);
886                 if(update_scroll && yscroll)
887                 {
888                         yscroll->update_length(get_text_rows(),
889                                 get_text_row(),
890                                 yscroll->get_handlelength(),
891                                 1);
892                 }
893                 handle_event();
894                 return 1;
895         }
896         else
897         if(active && suggestions_popup && (!yscroll || !yscroll->is_event_win()))
898         {
899                 if( suggestions_popup->button_press_event() )
900                         return suggestions_popup->handle_event();
901         }
902
903         return 0;
904 }
905
906 int BC_TextBox::button_release_event()
907 {
908         if(active)
909         {
910                 hide_tooltip();
911                 if(text_selected || word_selected || line_selected)
912                 {
913                         text_selected = 0;
914                         word_selected = 0;
915                         line_selected = 0;
916
917 // Stop scrolling by highlighting text
918                         unset_repeat(top_level->get_resources()->scroll_repeat);
919                 }
920         }
921         return 0;
922 }
923
924 int BC_TextBox::cursor_motion_event()
925 {
926         int cursor_letter, letter1, letter2;
927         if(active)
928         {
929                 if(text_selected || word_selected || line_selected)
930                 {
931                         cursor_letter = get_cursor_letter(top_level->cursor_x,
932                                 top_level->cursor_y);
933
934 //printf("BC_TextBox::cursor_motion_event %d cursor_letter=%d\n", __LINE__, cursor_letter);
935
936                         if(line_selected)
937                         {
938                                 select_line(letter1, letter2, cursor_letter);
939                         }
940                         else
941                         if(word_selected)
942                         {
943                                 select_word(letter1, letter2, cursor_letter);
944                         }
945                         else
946                         if(text_selected)
947                         {
948                                 letter1 = letter2 = cursor_letter;
949                         }
950
951                         if(letter1 <= highlight_letter3)
952                         {
953                                 highlight_letter1 = letter1;
954                                 highlight_letter2 = highlight_letter4;
955                                 ibeam_letter = letter1;
956                         }
957                         else
958                         if(letter2 >= highlight_letter4)
959                         {
960                                 highlight_letter2 = letter2;
961                                 highlight_letter1 = highlight_letter3;
962                                 ibeam_letter = letter2;
963                         }
964
965                         copy_selection(PRIMARY_SELECTION);
966
967
968
969
970                         draw(1);
971                         return 1;
972                 }
973         }
974
975         return 0;
976 }
977
978 int BC_TextBox::activate()
979 {
980         if( !active ) {
981                 active = 1;
982                 top_level->set_active_subwindow(this);
983                 top_level->set_repeat(top_level->get_resources()->blink_rate);
984         }
985         draw(1);
986         return 0;
987 }
988
989 int BC_TextBox::deactivate()
990 {
991         if( active ) {
992                 active = 0;
993                 top_level->set_active_subwindow(0);
994                 top_level->unset_repeat(top_level->get_resources()->blink_rate);
995         }
996         draw(1);
997         return 0;
998 }
999
1000 int BC_TextBox::repeat_event(int64_t duration)
1001 {
1002         int result = 0;
1003         int cursor_y = get_cursor_y();
1004         //int cursor_x = get_cursor_x();
1005
1006         if(duration == top_level->get_resources()->tooltip_delay &&
1007                 tooltip_text && tooltip_text[0] != 0 && highlighted)
1008         {
1009                 show_tooltip();
1010                 tooltip_done = 1;
1011                 result = 1;
1012         }
1013
1014         if(duration == top_level->get_resources()->blink_rate &&
1015                 active &&
1016                 get_has_focus())
1017         {
1018 // don't flash if keypress
1019                 if(skip_cursor->get_difference() < 500)
1020                 {
1021 // printf("BC_TextBox::repeat_event 1 %lld %lld\n",
1022 // skip_cursor->get_difference(),
1023 // duration);
1024                         result = 1;
1025                 }
1026                 else
1027                 {
1028                         if(!(text_selected || word_selected || line_selected))
1029                         {
1030                                 draw_cursor();
1031                                 flash(1);
1032                         }
1033                         result = 1;
1034                 }
1035         }
1036
1037         if(duration == top_level->get_resources()->scroll_repeat &&
1038                 (text_selected || word_selected || line_selected))
1039         {
1040                 int difference = 0;
1041                 if(get_cursor_y() < top_margin)
1042                 {
1043                         difference = get_cursor_y() - top_margin ;
1044                 }
1045                 else
1046                 if(get_cursor_y() > get_h() - bottom_margin)
1047                 {
1048                         difference = get_cursor_y() -
1049                                 (get_h() - bottom_margin);
1050                 }
1051                 if(difference != 0) {
1052                         int min_y = -(get_text_rows() * text_height -
1053                                 get_h() + bottom_margin);
1054
1055                         text_y -= difference;
1056 // printf("BC_TextBox::repeat_event %d %d %d\n",
1057 // __LINE__,
1058 // text_y,
1059 // min_y);
1060                         text_y = MAX(min_y, text_y);
1061                         text_y = MIN(text_y, top_margin);
1062
1063                         draw(1);
1064                         motion_event();
1065                         result = 1;
1066                 }
1067
1068                 if(get_cursor_x() < left_margin)
1069                 {
1070                         int difference = left_margin - get_cursor_x();
1071
1072                         text_x += difference;
1073                         text_x = MIN(text_x, left_margin);
1074                         draw(1);
1075                         result = 1;
1076                 }
1077                 else if(get_cursor_x() > get_w() - right_margin)
1078                 {
1079                         int difference = get_cursor_x() - (get_w() - right_margin);
1080                         int new_text_x = text_x - difference;
1081
1082 // Get width of current row
1083                         int min_x = 0;
1084                         int row_width = 0;
1085                         int wtext_len = wtext_update();
1086                         int row_begin = 0;
1087                         int row_end = 0;
1088                         for(int i = 0, k = text_y; i < wtext_len; k += text_height)
1089                         {
1090                                 row_begin = i;
1091                                 while(wtext[i] != '\n' && i < wtext_len) {
1092                                         i++;
1093                                 }
1094                                 row_end = i;
1095                                 if(wtext[i] == '\n') i++;
1096
1097                                 if(cursor_y >= k && cursor_y < k + text_height) {
1098                                         row_width = get_text_width(font,
1099                                                 wtext + row_begin,
1100                                                 row_end - row_begin);
1101
1102                                         break;
1103                                 }
1104                         }
1105
1106                         min_x = -row_width + get_w() - left_margin - BCCURSORW;
1107                         new_text_x = MAX(new_text_x, min_x);
1108                         new_text_x = MIN(new_text_x, left_margin);
1109
1110                         if(new_text_x < text_x) text_x = new_text_x;
1111                         draw(1);
1112                         result = 1;
1113                 }
1114         }
1115
1116         return result;
1117 }
1118
1119 void BC_TextBox::default_keypress(int &dispatch_event, int &result)
1120 {
1121         int key = top_level->get_keypress(), len;
1122         if( (key == RETURN) || ( key >= 32 && key <= 255 ) ) {
1123                 wchar_t *wkeys = top_level->get_wkeystring(&len);
1124                 if( key == RETURN ) { wkeys[0] = '\n';  wkeys[1] = 0;  len = 1; }
1125                 insert_text(wkeys, len);
1126                 find_ibeam(1);
1127                 draw(1);
1128                 dispatch_event = 1;
1129                 result = 1;
1130         }
1131 }
1132
1133 int BC_TextBox::keypress_event()
1134 {
1135 // Result == 2 contents changed
1136 // Result == 1 trapped keypress
1137 // Result == 0 nothing
1138         int result = 0;
1139         int dispatch_event = 0;
1140
1141         if(!active || !enabled) return 0;
1142
1143         int wtext_len = wtext_update();
1144         last_keypress = get_keypress();
1145
1146         if( unicode_active >= 0 ) {
1147                 wchar_t wch = 0;
1148                 int wlen =  -1;
1149                 switch( last_keypress ) {
1150 //unicode active acitons
1151                 case RETURN: {
1152                         for( int i=highlight_letter1+1; i<highlight_letter2; ++i ) {
1153                                 int ch = nib(wtext[i]);
1154                                 if( ch < 0 ) return 1;
1155                                 wch = (wch<<4) + ch;
1156                         }
1157                         if( wch ) {
1158                                 dispatch_event = 1;
1159                                 unicode_active = -1;
1160                                 result = 1;
1161                                 wlen = 1;
1162                                 break;
1163                         } } // fall through
1164                 case ESC: {
1165                         unicode_active = -1;
1166                         result = 1;
1167                         wlen = 0;
1168                         break; }
1169                 case BACKSPACE: {
1170                         if(ibeam_letter > 0) {
1171                                 delete_selection(ibeam_letter - 1, ibeam_letter, wtext_len);
1172                                 highlight_letter2 = --ibeam_letter;
1173                                 if( highlight_letter1 >= highlight_letter2 )
1174                                         unicode_active = -1;
1175                         }
1176                         result = 1;
1177                         wlen = 0;
1178                         break; }
1179                 case '0': case '1': case '2': case '3': case '4':
1180                 case '5': case '6': case '7': case '8': case '9':
1181                 case 'A': case 'B': case 'C': case 'D': case 'E': case 'F':
1182                 case 'a': case 'b': case 'c': case 'd': case 'e': case 'f': {
1183                         int n = nib(last_keypress);
1184                         wch = n < 10 ? '0'+n : 'A'+n-10;
1185                         result = 1;
1186                         wlen = 1;
1187                         break; }
1188 //normal actions
1189                 case TAB:
1190                 case LEFTTAB:
1191                         break;
1192 //ignored actions
1193                 default:
1194                         result = 1;
1195                         break;
1196                 }
1197                 if( wlen >= 0 ) {
1198                         insert_text(&wch, wlen);
1199                         find_ibeam(1);
1200                         if( unicode_active >= 0 )
1201                                 highlight_letter2 = ibeam_letter;
1202                         else
1203                                 highlight_letter1 = highlight_letter2 = 0;
1204                         draw(1);
1205                 }
1206         }
1207
1208         if( !result ) {
1209 //printf("BC_TextBox::keypress_event %d %x\n", __LINE__, last_keypress)
1210                 switch(last_keypress) {
1211                 case ESC: {
1212 // Deactivate the suggestions
1213                         if( suggestions_popup ) {
1214                                 no_suggestions();
1215                                 result = 1;
1216                         }
1217                         else {
1218                                 top_level->deactivate();
1219                                 result = 0;
1220                         }
1221                         break; }
1222
1223                 case RETURN: {
1224                         if( rows == 1 ) {
1225                                 highlight_letter1 = highlight_letter2 = 0;
1226                                 ibeam_letter = wtext_update();
1227                                 top_level->deactivate();
1228                                 dispatch_event = 1;
1229                                 result = 0;
1230                         }
1231                         else {
1232                                 default_keypress(dispatch_event, result);
1233                         }
1234                         break; }
1235
1236
1237 // Handle like a default keypress
1238                 case TAB: {
1239                         top_level->cycle_textboxes(1);
1240                         result = 1;
1241                         break; }
1242
1243                 case LEFTTAB: {
1244                         top_level->cycle_textboxes(-1);
1245                         result = 1;
1246                         break; }
1247
1248                 case LEFT: {
1249                         if(ibeam_letter > 0) {
1250                                 int old_ibeam_letter = ibeam_letter;
1251 // Single character
1252                                 if(!ctrl_down()) {
1253                                         ibeam_letter--;
1254                                 }
1255                                 else {
1256 // Word
1257                                         ibeam_letter--;
1258                                         while(ibeam_letter > 0 && isalnum(wtext[ibeam_letter - 1]))
1259                                                 ibeam_letter--;
1260                                 }
1261
1262 // Extend selection
1263                                 if(top_level->shift_down()) {
1264 // Initialize highlighting
1265                                         if(highlight_letter1 == highlight_letter2) {
1266                                                 highlight_letter1 = ibeam_letter;
1267                                                 highlight_letter2 = old_ibeam_letter;
1268                                         }
1269                                         else if(highlight_letter1 == old_ibeam_letter) {
1270 // Extend left highlight
1271                                                 highlight_letter1 = ibeam_letter;
1272                                         }
1273                                         else if(highlight_letter2 == old_ibeam_letter) {
1274 // Shrink right highlight
1275                                                 highlight_letter2 = ibeam_letter;
1276                                         }
1277                                 }
1278                                 else {
1279                                         highlight_letter1 = highlight_letter2 = ibeam_letter;
1280                                 }
1281
1282
1283                                 find_ibeam(1);
1284                                 if(keypress_draw) draw(1);
1285                         }
1286                         result = 1;
1287                         break; }
1288
1289                 case RIGHT: {
1290                         if(ibeam_letter < wtext_len) {
1291                                 int old_ibeam_letter = ibeam_letter;
1292 // Single character
1293                                 if(!ctrl_down()) {
1294                                         ibeam_letter++;
1295                                 }
1296                                 else {
1297 // Word
1298                                         while(ibeam_letter < wtext_len && isalnum(wtext[ibeam_letter++]));
1299                                 }
1300
1301
1302
1303 // Extend selection
1304                                 if(top_level->shift_down()) {
1305 // Initialize highlighting
1306                                         if(highlight_letter1 == highlight_letter2) {
1307                                                 highlight_letter1 = old_ibeam_letter;
1308                                                 highlight_letter2 = ibeam_letter;
1309                                         }
1310                                         else if(highlight_letter1 == old_ibeam_letter) {
1311 // Shrink left highlight
1312                                                 highlight_letter1 = ibeam_letter;
1313                                         }
1314                                         else if(highlight_letter2 == old_ibeam_letter) {
1315 // Expand right highlight
1316                                                 highlight_letter2 = ibeam_letter;
1317                                         }
1318                                 }
1319                                 else {
1320                                         highlight_letter1 = highlight_letter2 = ibeam_letter;
1321                                 }
1322
1323                                 find_ibeam(1);
1324                                 if(keypress_draw) draw(1);
1325                         }
1326                         result = 1;
1327                         break; }
1328
1329                 case UP: {
1330                         if( suggestions && suggestions_popup ) {
1331 // Pass to suggestions popup
1332 //printf("BC_TextBox::keypress_event %d\n", __LINE__);
1333                                 suggestions_popup->activate(1);
1334                                 suggestions_popup->keypress_event();
1335                                 result = 1;
1336                         }
1337                         else if(ibeam_letter > 0) {
1338 //printf("BC_TextBox::keypress_event 1 %d %d %d\n", ibeam_x, ibeam_y, ibeam_letter);
1339                                 int new_letter = get_cursor_letter2(ibeam_x + text_x,
1340                                         ibeam_y + text_y - text_height);
1341 //printf("BC_TextBox::keypress_event 2 %d %d %d\n", ibeam_x, ibeam_y, new_letter);
1342
1343 // Extend selection
1344                                 if(top_level->shift_down()) {
1345 // Initialize highlighting
1346                                         if(highlight_letter1 == highlight_letter2) {
1347                                                 highlight_letter1 = new_letter;
1348                                                 highlight_letter2 = ibeam_letter;
1349                                         }
1350                                         else if(highlight_letter1 == ibeam_letter) {
1351 // Expand left highlight
1352                                                 highlight_letter1 = new_letter;
1353                                         }
1354                                         else if(highlight_letter2 == ibeam_letter) {
1355 // Shrink right highlight
1356                                                 highlight_letter2 = new_letter;
1357                                         }
1358                                 }
1359                                 else
1360                                         highlight_letter1 = highlight_letter2 = new_letter;
1361
1362                                 if(highlight_letter1 > highlight_letter2) {
1363                                         int temp = highlight_letter1;
1364                                         highlight_letter1 = highlight_letter2;
1365                                         highlight_letter2 = temp;
1366                                 }
1367                                 ibeam_letter = new_letter;
1368
1369                                 find_ibeam(1);
1370                                 if(keypress_draw) draw(1);
1371                         }
1372                         result = 1;
1373                         break; }
1374
1375                 case PGUP: {
1376                         if(ibeam_letter > 0) {
1377                                 int new_letter = get_cursor_letter2(ibeam_x + text_x,
1378                                         ibeam_y + text_y - get_h());
1379
1380 // Extend selection
1381                                 if(top_level->shift_down()) {
1382 // Initialize highlighting
1383                                         if(highlight_letter1 == highlight_letter2) {
1384                                                 highlight_letter1 = new_letter;
1385                                                 highlight_letter2 = ibeam_letter;
1386                                         }
1387                                         else if(highlight_letter1 == ibeam_letter) {
1388 // Expand left highlight
1389                                                 highlight_letter1 = new_letter;
1390                                         }
1391                                         else if(highlight_letter2 == ibeam_letter) {
1392 // Shrink right highlight
1393                                                 highlight_letter2 = new_letter;
1394                                         }
1395                                 }
1396                                 else
1397                                         highlight_letter1 = highlight_letter2 = new_letter;
1398
1399                                 if(highlight_letter1 > highlight_letter2) {
1400                                         int temp = highlight_letter1;
1401                                         highlight_letter1 = highlight_letter2;
1402                                         highlight_letter2 = temp;
1403                                 }
1404                                 ibeam_letter = new_letter;
1405
1406                                 find_ibeam(1);
1407                                 if(keypress_draw) draw(1);
1408                         }
1409                         result = 1;
1410                         break; }
1411
1412                 case DOWN: {
1413 // printf("BC_TextBox::keypress_event %d %p %p\n",
1414 // __LINE__,
1415 // suggestions,
1416 // suggestions_popup);
1417                         if( suggestions && suggestions_popup ) {
1418 // Pass to suggestions popup
1419                                 suggestions_popup->activate(1);
1420                                 suggestions_popup->keypress_event();
1421                                 result = 1;
1422                         }
1423                         else
1424 //                      if(ibeam_letter > 0)
1425                         {
1426 // Extend selection
1427                                 int new_letter = get_cursor_letter2(ibeam_x + text_x,
1428                                         ibeam_y + text_y + text_height);
1429 //printf("BC_TextBox::keypress_event 10 %d\n", new_letter);
1430
1431                                 if(top_level->shift_down()) {
1432 // Initialize highlighting
1433                                         if(highlight_letter1 == highlight_letter2) {
1434                                                 highlight_letter1 = new_letter;
1435                                                 highlight_letter2 = ibeam_letter;
1436                                         }
1437                                         else if(highlight_letter1 == ibeam_letter) {
1438 // Shrink left highlight
1439                                                 highlight_letter1 = new_letter;
1440                                         }
1441                                         else if(highlight_letter2 == ibeam_letter) {
1442 // Expand right highlight
1443                                                 highlight_letter2 = new_letter;
1444                                         }
1445                                 }
1446                                 else
1447                                         highlight_letter1 = highlight_letter2 = new_letter;
1448
1449                                 if(highlight_letter1 > highlight_letter2) {
1450                                         int temp = highlight_letter1;
1451                                         highlight_letter1 = highlight_letter2;
1452                                         highlight_letter2 = temp;
1453                                 }
1454                                 ibeam_letter = new_letter;
1455
1456                                 find_ibeam(1);
1457                                 if(keypress_draw) draw(1);
1458
1459 //printf("BC_TextBox::keypress_event 20 %d\n", ibeam_letter);
1460                         }
1461                         result = 1;
1462                         break; }
1463
1464                 case PGDN: {
1465 // Extend selection
1466                         int new_letter = get_cursor_letter2(ibeam_x + text_x,
1467                                 ibeam_y + text_y + get_h());
1468 //printf("BC_TextBox::keypress_event 10 %d\n", new_letter);
1469
1470                         if(top_level->shift_down()) {
1471 // Initialize highlighting
1472                                 if(highlight_letter1 == highlight_letter2) {
1473                                         highlight_letter1 = new_letter;
1474                                         highlight_letter2 = ibeam_letter;
1475                                 }
1476                                 else if(highlight_letter1 == ibeam_letter) {
1477 // Shrink left highlight
1478                                         highlight_letter1 = new_letter;
1479                                 }
1480                                 else if(highlight_letter2 == ibeam_letter) {
1481 // Expand right highlight
1482                                         highlight_letter2 = new_letter;
1483                                 }
1484                         }
1485                         else
1486                                 highlight_letter1 = highlight_letter2 = new_letter;
1487
1488                         if(highlight_letter1 > highlight_letter2) {
1489                                 int temp = highlight_letter1;
1490                                 highlight_letter1 = highlight_letter2;
1491                                 highlight_letter2 = temp;
1492                         }
1493                         ibeam_letter = new_letter;
1494
1495                         find_ibeam(1);
1496                         if(keypress_draw) draw(1);
1497
1498 //printf("BC_TextBox::keypress_event 20 %d\n", ibeam_letter);
1499                         result = 1;
1500                         break; }
1501
1502                 case END: {
1503                         no_suggestions();
1504
1505                         int old_ibeam_letter = ibeam_letter;
1506
1507                         while(ibeam_letter < wtext_len && wtext[ibeam_letter] != '\n')
1508                                 ibeam_letter++;
1509
1510                         if(top_level->shift_down()) {
1511 // Begin selection
1512                                 if(highlight_letter1 == highlight_letter2) {
1513                                         highlight_letter2 = ibeam_letter;
1514                                         highlight_letter1 = old_ibeam_letter;
1515                                 }
1516                                 else if(highlight_letter1 == old_ibeam_letter) {
1517 // Shrink selection
1518                                         highlight_letter1 = highlight_letter2;
1519                                         highlight_letter2 = ibeam_letter;
1520                                 }
1521                                 else if(highlight_letter2 == old_ibeam_letter) {
1522 // Extend selection
1523                                         highlight_letter2 = ibeam_letter;
1524                                 }
1525                         }
1526                         else
1527                                 highlight_letter1 = highlight_letter2 = ibeam_letter;
1528
1529                         find_ibeam(1);
1530                         if(keypress_draw) draw(1);
1531                         result = 1;
1532                         break; }
1533
1534                 case HOME: {
1535                         no_suggestions();
1536
1537                         int old_ibeam_letter = ibeam_letter;
1538
1539                         while(ibeam_letter > 0 && wtext[ibeam_letter - 1] != '\n')
1540                                 ibeam_letter--;
1541
1542                         if(top_level->shift_down())
1543                         {
1544 // Begin selection
1545                                 if(highlight_letter1 == highlight_letter2)
1546                                 {
1547                                         highlight_letter2 = old_ibeam_letter;
1548                                         highlight_letter1 = ibeam_letter;
1549                                 }
1550                                 else
1551 // Extend selection
1552                                 if(highlight_letter1 == old_ibeam_letter)
1553                                 {
1554                                         highlight_letter1 = ibeam_letter;
1555                                 }
1556                                 else
1557 // Shrink selection
1558                                 if(highlight_letter2 == old_ibeam_letter)
1559                                 {
1560                                         highlight_letter2 = highlight_letter1;
1561                                         highlight_letter1 = ibeam_letter;
1562                                 }
1563                         }
1564                         else
1565                                 highlight_letter1 = highlight_letter2 = ibeam_letter;
1566
1567                         find_ibeam(1);
1568                         if(keypress_draw) draw(1);
1569                         result = 1;
1570                         break; }
1571
1572                 case BACKSPACE: {
1573                         no_suggestions();
1574
1575                         if(highlight_letter1 == highlight_letter2) {
1576                                 if(ibeam_letter > 0) {
1577                                         delete_selection(ibeam_letter - 1, ibeam_letter, wtext_len);
1578                                         ibeam_letter--;
1579                                 }
1580                         }
1581                         else {
1582                                 delete_selection(highlight_letter1, highlight_letter2, wtext_len);
1583                                 highlight_letter2 = ibeam_letter = highlight_letter1;
1584                         }
1585
1586                         find_ibeam(1);
1587                         if(keypress_draw) draw(1);
1588                         dispatch_event = 1;
1589                         result = 1;
1590                         break; }
1591
1592                 case DELETE: {
1593 //printf("BC_TextBox::keypress_event %d\n", __LINE__);
1594                         if(highlight_letter1 == highlight_letter2) {
1595                                 if(ibeam_letter < wtext_len) {
1596                                         delete_selection(ibeam_letter, ibeam_letter + 1, wtext_len);
1597                                 }
1598                         }
1599                         else {
1600                                 delete_selection(highlight_letter1, highlight_letter2, wtext_len);
1601                                 highlight_letter2 = ibeam_letter = highlight_letter1;
1602                         }
1603
1604                         find_ibeam(1);
1605                         if(keypress_draw) draw(1);
1606                         dispatch_event = 1;
1607                         result = 1;
1608                         break; }
1609
1610                 default: {
1611                         if( ctrl_down() ) {
1612                                 switch( get_keypress() ) {
1613                                 case 'c': case 'C': {
1614                                         if(highlight_letter1 != highlight_letter2) {
1615                                                 copy_selection(SECONDARY_SELECTION);
1616                                                 result = 1;
1617                                         }
1618                                         break; }
1619                                 case 'v': case 'V': {
1620                                         paste_selection(SECONDARY_SELECTION);
1621                                         find_ibeam(1);
1622                                         if(keypress_draw) draw(1);
1623                                         dispatch_event = 1;
1624                                         result = 1;
1625                                         break; }
1626                                 case 'x': case 'X': {
1627                                         if(highlight_letter1 != highlight_letter2) {
1628                                                 copy_selection(SECONDARY_SELECTION);
1629                                                 delete_selection(highlight_letter1, highlight_letter2, wtext_len);
1630                                                 highlight_letter2 = ibeam_letter = highlight_letter1;
1631                                         }
1632
1633                                         find_ibeam(1);
1634                                         if(keypress_draw) draw(1);
1635                                         dispatch_event = 1;
1636                                         result = 1;
1637                                         break; }
1638                                 case 'u': case 'U': {
1639                                         if( shift_down() ) {
1640                                                 unicode_active = ibeam_letter;
1641                                                 wchar_t wkey = 'U';
1642                                                 insert_text(&wkey, 1);
1643                                                 find_ibeam(1);
1644                                                 highlight_letter1 = unicode_active;
1645                                                 highlight_letter2 = ibeam_letter;
1646                                                 draw(1);
1647                                                 result = 1;
1648                                         }
1649                                         break; }
1650                                 }
1651                                 break;
1652                         }
1653
1654                         default_keypress(dispatch_event, result);
1655                         break; }
1656                 }
1657         }
1658
1659         if(result) skip_cursor->update();
1660         if(dispatch_event && handle_event())
1661                 result = 1;
1662
1663         return result;
1664 }
1665
1666
1667 int BC_TextBox::uses_text()
1668 {
1669         return 1;
1670 }
1671
1672
1673 void BC_TextBox::delete_selection(int letter1, int letter2, int wtext_len)
1674 {
1675         int i, j;
1676         for(i=letter1, j=letter2; j<wtext_len; i++, j++) {
1677                 wtext[i] = wtext[j];
1678         }
1679         wtext[i] = 0;
1680         wlen = i;
1681
1682         do_separators(1);
1683 }
1684
1685 void BC_TextBox::insert_text(const wchar_t *wcp, int len)
1686 {
1687         if( len < 0 ) len = wcslen(wcp);
1688         int wtext_len = wtext_update();
1689         if( unicode_active < 0 && highlight_letter1 < highlight_letter2 ) {
1690                 delete_selection(highlight_letter1, highlight_letter2, wtext_len);
1691                 highlight_letter2 = ibeam_letter = highlight_letter1;
1692                 wtext_len = wtext_update();
1693         }
1694
1695         int i, j;
1696         for(i=wtext_len-1, j=wtext_len+len-1; i>=ibeam_letter; i--, j--) {
1697                 if( j >= wsize ) continue;
1698                 wtext[j] = wtext[i];
1699         }
1700
1701         for(i = ibeam_letter, j = 0; j < len; j++, i++) {
1702                 if( i >= wsize ) break;
1703                 wtext[i] = wcp[j];
1704         }
1705         if( (wlen+=len) > wsize ) wlen = wsize;
1706         if( (ibeam_letter+=len) > wsize ) ibeam_letter = wsize;
1707         wtext[wlen] = 0;  // wtext allocated wsize+1
1708         do_separators(0);
1709 }
1710
1711 int BC_TextBox::is_separator(const char *txt, int i)
1712 {
1713         if( i != 0 || separators[0] != '+' ) return !isalnum(txt[i]);
1714         return txt[0] != '+' && txt[0] != '-' && !isalnum(txt[0]);
1715 }
1716
1717 // used for time entry
1718 void BC_TextBox::do_separators(int ibeam_left)
1719 {
1720         if(separators)
1721         {
1722 // Remove separators from text
1723                 int wtext_len = wtext_update();
1724                 for(int i = 0; i < wtext_len; ) {
1725                         if( !iswalnum(wtext[i]) ) {
1726                                 for(int j = i; j < wtext_len - 1; j++)
1727                                         wtext[j] = wtext[j + 1];
1728                                 if(!ibeam_left && i < ibeam_letter) ibeam_letter--;
1729                                 wlen = --wtext_len;
1730                                 continue;
1731                         }
1732                         ++i;
1733                 }
1734                 wtext[wtext_len] = 0;
1735
1736
1737
1738
1739
1740 // Insert separators into text
1741                 int separator_len = strlen(separators);
1742                 for(int i = 0; i < separator_len; i++) {
1743                         if(i < wtext_len) {
1744 // Insert a separator
1745                                 if( is_separator(separators,i) ) {
1746                                         for(int j = wtext_len; j >= i; j--) {
1747                                                 wtext[j + 1] = wtext[j];
1748                                         }
1749                                         if(!ibeam_left && i < ibeam_letter) ibeam_letter++;
1750                                         ++wtext_len;
1751                                         wtext[i] = separators[i];
1752                                 }
1753                         }
1754                         else {
1755                                 wtext[i] = separators[i];
1756                         }
1757                 }
1758
1759 // Truncate text
1760                 wtext[separator_len] = 0;
1761                 wlen = separator_len;
1762         }
1763 }
1764
1765 void BC_TextBox::get_ibeam_position(int &x, int &y)
1766 {
1767         int i, row_begin, row_end;
1768         int wtext_len = wtext_update();
1769         x = y = 0;
1770
1771         for( i=0; i<wtext_len; ) {
1772                 row_begin = i;
1773                 for(; i<wtext_len && wtext[i]!='\n'; i++);
1774                 row_end = i;
1775
1776                 if( ibeam_letter >= row_begin && ibeam_letter <= row_end ) {
1777                         x = get_text_width(font,  &wtext[row_begin], ibeam_letter - row_begin);
1778 //printf("BC_TextBox::get_ibeam_position %d %d %d %d %d\n", ibeam_letter, row_begin, row_end, x, y);
1779                         return;
1780                 }
1781
1782                 if( i < wtext_len && wtext[i] == '\n' ) {
1783                         i++;
1784                         y += text_height;
1785                 }
1786         }
1787 //printf("BC_TextBox::get_ibeam_position 10 %d %d\n", x, y);
1788
1789         x = 0;
1790         return;
1791 }
1792
1793 void BC_TextBox::set_text_row(int row)
1794 {
1795         text_x = left_margin;
1796         text_y = -(row * text_height) + top_margin;
1797         draw(1);
1798 }
1799
1800 int BC_TextBox::get_text_row()
1801 {
1802         return -(text_y - top_margin) / text_height;
1803 }
1804
1805 void BC_TextBox::find_ibeam(int dispatch_event)
1806 {
1807         int x, y;
1808         int old_x = text_x, old_y = text_y;
1809
1810         get_ibeam_position(x, y);
1811
1812         if(left_margin + text_x + x >= get_w() - right_margin - BCCURSORW)
1813         {
1814                 text_x = -(x - (get_w() - get_w() / 4)) + left_margin;
1815                 if(text_x > left_margin) text_x = left_margin;
1816         }
1817         else
1818         if(left_margin + text_x + x < left_margin)
1819         {
1820                 text_x = -(x - (get_w() / 4)) + left_margin;
1821                 if(text_x > left_margin) text_x = left_margin;
1822         }
1823
1824         int text_row = y / text_height;
1825         if( text_row < rows ) text_y = top_margin;
1826
1827         int pix_rows = get_h() - bottom_margin - (y + text_y);
1828         if( pix_rows < text_height )
1829                 text_y -= text_height * ((2*text_height-1-pix_rows) / text_height);
1830
1831         pix_rows = y + text_y - top_margin;
1832         if( pix_rows < 0 ) {
1833                 text_y += text_height * ((text_height-1-pix_rows) / text_height);
1834                 if( text_y > top_margin ) text_y = top_margin;
1835         }
1836
1837         if(dispatch_event && (old_x != text_x || old_y != text_y)) motion_event();
1838 }
1839
1840 // New algorithm
1841 int BC_TextBox::get_cursor_letter(int cursor_x, int cursor_y)
1842 {
1843         int i, j, k, row_begin, row_end, result = 0, done = 0;
1844         int column1, column2;
1845         int got_visible_row = 0;
1846
1847 // Select complete row if cursor above the window
1848 //printf("BC_TextBox::get_cursor_letter %d %d\n", __LINE__, text_y);
1849         if(cursor_y < text_y - text_height)
1850         {
1851                 result = 0;
1852                 done = 1;
1853         }
1854
1855         int wtext_len = wtext_update();
1856
1857         for(i=0, k=text_y; i<wtext_len && k<get_h() && !done; k+=text_height) {
1858 // Simulate drawing of 1 row
1859                 row_begin = i;
1860                 for(j = 0; wtext[i]!='\n' && i<wtext_len; i++);
1861                 row_end = i;
1862
1863 // check visibility
1864                 int first_visible_row = 0;
1865                 int last_visible_row = 0;
1866                 if( k+text_height > top_margin && !got_visible_row) {
1867                         first_visible_row = 1;
1868                         got_visible_row = 1;
1869                 }
1870
1871                 if( (k+text_height >= get_h() - bottom_margin ||
1872                         (row_end >= wtext_len && k < get_h() - bottom_margin &&
1873                                 k + text_height > 0)) )
1874                         last_visible_row = 1;
1875
1876 // Cursor is inside vertical range of row
1877                 if((cursor_y >= top_margin &&
1878                         cursor_y < get_h() - bottom_margin &&
1879                         cursor_y >= k && cursor_y < k + text_height) ||
1880 // Cursor is above 1st row
1881                         (cursor_y < k + text_height && first_visible_row) ||
1882 // Cursor is below last row
1883                         (cursor_y >= k && last_visible_row))
1884                 {
1885                         column1 = column2 = 0;
1886                         for(j = row_begin; j<wsize && j<=row_end && !done; j++) {
1887                                 column2 = get_text_width(font, &wtext[row_begin], j-row_begin) + text_x;
1888                                 if((column2 + column1) / 2 >= cursor_x) {
1889                                         result = j - 1;
1890                                         done = 1;
1891 // printf("BC_TextBox::get_cursor_letter %d %d %d %d\n",
1892 // __LINE__, result, first_visible_row, last_visible_row);
1893                                 }
1894                                 column1 = column2;
1895                         }
1896
1897                         if(!done) {
1898                                 result = row_end;
1899                                 done = 1;
1900                         }
1901                 }
1902
1903                 if(wtext[i] == '\n') i++;
1904
1905 // Select complete row if last visible & cursor is below window
1906                 if(last_visible_row && cursor_y > k + text_height * 2)
1907                         result = row_end;
1908
1909                 if(i >= wtext_len && !done) {
1910                         result = wtext_len;
1911                 }
1912         }
1913
1914
1915 // printf("BC_TextBox::get_cursor_letter %d cursor_y=%d k=%d h=%d %d %d\n",
1916 //  __LINE__, cursor_y, k, get_h(), first_visible_row, last_visible_row);
1917         if(result < 0) result = 0;
1918         if(result > wtext_len) {
1919 //printf("BC_TextBox::get_cursor_letter %d\n", __LINE__);
1920                 result = wtext_len;
1921         }
1922
1923         return result;
1924 }
1925
1926 // Old algorithm
1927 int BC_TextBox::get_cursor_letter2(int cursor_x, int cursor_y)
1928 {
1929         int i, j, k, row_begin, row_end, result = 0, done = 0;
1930         int column1, column2;
1931         int wtext_len = wtext_update();
1932
1933         if(cursor_y < text_y) {
1934                 result = 0;
1935                 done = 1;
1936         }
1937
1938         for(i = 0, k = text_y; i < wtext_len && !done; k += text_height) {
1939                 row_begin = i;
1940                 for(; wtext[i] != '\n' && i < wtext_len; i++);
1941                 row_end = i;
1942
1943                 if(cursor_y >= k && cursor_y < k + text_height) {
1944                         column1 = column2 = 0;
1945                         for(j = 0; j <= row_end - row_begin && !done; j++) {
1946                                 column2 = get_text_width(font, &wtext[row_begin], j) + text_x;
1947                                 if((column2 + column1) / 2 >= cursor_x) {
1948                                         result = row_begin + j - 1;
1949                                         done = 1;
1950                                 }
1951                                 column1 = column2;
1952                         }
1953                         if(!done)
1954                         {
1955                                 result = row_end;
1956                                 done = 1;
1957                         }
1958                 }
1959                 if(wtext[i] == '\n') i++;
1960
1961                 if(i >= wtext_len && !done) {
1962                         result = wtext_len;
1963                 }
1964         }
1965         if(result < 0) result = 0;
1966         if(result > wtext_len) result = wtext_len;
1967         return result;
1968 }
1969
1970
1971 void BC_TextBox::select_word(int &letter1, int &letter2, int ibeam_letter)
1972 {
1973         int wtext_len = wtext_update();
1974         letter1 = letter2 = ibeam_letter;
1975         if( letter1 < 0 ) letter1 = 0;
1976         if( letter2 < 0 ) letter2 = 0;
1977         if( letter1 > wtext_len ) letter1 = wtext_len;
1978         if( letter2 > wtext_len ) letter2 = wtext_len;
1979         if( !wtext_len ) return;
1980         for( int i=letter1; i>=0 && iswalnum(wtext[i]); --i ) letter1 = i;
1981         for( int i=letter2; i<wtext_len && iswalnum(wtext[i]); ) letter2 = ++i;
1982         if( letter2 < wtext_len && wtext[letter2] == ' ' ) ++letter2;
1983 }
1984
1985
1986 void BC_TextBox::select_line(int &letter1, int &letter2, int ibeam_letter)
1987 {
1988         int wtext_len = wtext_update();
1989         letter1 = letter2 = ibeam_letter;
1990         if( letter1 < 0 ) letter1 = 0;
1991         if( letter2 < 0 ) letter2 = 0;
1992         if( letter1 > wtext_len ) letter1 = wtext_len;
1993         if( letter2 > wtext_len ) letter2 = wtext_len;
1994         if( !wtext_len ) return;
1995         for( int i=letter1; i>=0 && wtext[i]!='\n'; --i ) letter1 = i;
1996         for( int i=letter2; i<wtext_len && wtext[i]!='\n'; ) letter2 = ++i;
1997 }
1998
1999 void BC_TextBox::copy_selection(int clipboard_num)
2000 {
2001         int wtext_len = wtext_update();
2002         if(!wtext_len) return;
2003
2004         if(highlight_letter1 >= wtext_len || highlight_letter2 > wtext_len ||
2005                 highlight_letter1 < 0 || highlight_letter2 < 0 ||
2006                 highlight_letter2 - highlight_letter1 <= 0) return;
2007         int clip_len = highlight_letter2 - highlight_letter1;
2008 //printf(" BC_TextBox::copy_selection %d %d %d\n",highlight_letter1, highlight_letter2, clip_len);
2009         char ctext[4*clip_len+4];
2010         clip_len = text_update(&wtext[highlight_letter1],clip_len, ctext,4*clip_len+4);
2011         get_clipboard()->to_clipboard(ctext, clip_len, clipboard_num);
2012 }
2013
2014
2015 void BC_TextBox::paste_selection(int clipboard_num)
2016 {
2017         int len = get_clipboard()->clipboard_len(clipboard_num);
2018         if( len > 0 )
2019         {
2020                 char cstring[len];  wchar_t wstring[len];
2021                 get_clipboard()->from_clipboard(cstring, len, clipboard_num);  --len;
2022 //printf("BC_TextBox::paste_selection %d '%*.*s'\n",len,len,len,cstring);
2023                 len = BC_Resources::encode(BC_Resources::encoding, BC_Resources::wide_encoding,
2024                         cstring,len, (char *)wstring,(len+1)*sizeof(wchar_t)) / sizeof(wchar_t);
2025                 insert_text(wstring, len);
2026         }
2027 }
2028
2029 void BC_TextBox::set_keypress_draw(int value)
2030 {
2031         keypress_draw = value;
2032 }
2033
2034 int BC_TextBox::get_last_keypress()
2035 {
2036         return last_keypress;
2037 }
2038
2039 int BC_TextBox::get_ibeam_letter()
2040 {
2041         return ibeam_letter;
2042 }
2043
2044 void BC_TextBox::set_ibeam_letter(int number, int redraw)
2045 {
2046         this->ibeam_letter = number;
2047         if(redraw)
2048         {
2049                 draw(1);
2050         }
2051 }
2052
2053 void BC_TextBox::set_separators(const char *separators)
2054 {
2055         this->separators = (char*)separators;
2056 }
2057
2058 int BC_TextBox::get_rows()
2059 {
2060         return rows;
2061 }
2062
2063
2064
2065
2066
2067
2068
2069 BC_TextBoxSuggestions::BC_TextBoxSuggestions(BC_TextBox *text_box, int x, int y)
2070  : BC_ListBox(x, y, text_box->get_w(), 200, LISTBOX_TEXT,
2071         text_box->suggestions, 0, 0, 1, 0, 1)
2072 {
2073         this->text_box = text_box;
2074         set_use_button(0);
2075         set_justify(LISTBOX_LEFT);
2076 }
2077
2078 BC_TextBoxSuggestions::~BC_TextBoxSuggestions()
2079 {
2080 }
2081
2082 int BC_TextBoxSuggestions::handle_event()
2083 {
2084         char *current_suggestion = 0;
2085         BC_ListBoxItem *item = get_selection(0, 0);
2086 //printf("BC_TextBoxSuggestions::handle_event %d\n", __LINE__);
2087         if(item && (current_suggestion=item->get_text()) != 0)
2088         {
2089                 int col = text_box->suggestion_column;
2090                 int len = BCTEXTLEN-1 - col;
2091                 char *cp = &text_box->text[col];
2092 //printf("BC_TextBoxSuggestions::handle_event %d\n", __LINE__);
2093                 strncpy(cp, current_suggestion, len);
2094 //printf("BC_TextBoxSuggestions::handle_event %d\n", __LINE__);
2095                 if( (col=strlen(current_suggestion)) >= len )
2096                         cp[len-1] = 0;
2097                 text_box->dirty = 1;
2098         }
2099
2100
2101 //printf("BC_TextBoxSuggestions::handle_event %d\n", __LINE__);
2102         text_box->highlight_letter1 =
2103                 text_box->highlight_letter2 =
2104                 text_box->ibeam_letter = text_box->tstrlen();
2105         text_box->wtext_update();
2106         text_box->draw(1);
2107         text_box->handle_event();
2108 //printf("BC_TextBoxSuggestions::handle_event %d\n", __LINE__);
2109         return 1;
2110 }
2111
2112
2113 BC_ScrollTextBox::BC_ScrollTextBox(BC_WindowBase *parent_window,
2114         int x, int y, int w, int rows,
2115         const char *default_text, int default_size)
2116 {
2117         this->parent_window = parent_window;
2118         this->x = x;
2119         this->y = y;
2120         this->w = w;
2121         this->rows = rows;
2122         this->default_text = default_text;
2123         this->default_wtext = 0;
2124         this->default_size = default_size;
2125 }
2126
2127 BC_ScrollTextBox::BC_ScrollTextBox(BC_WindowBase *parent_window,
2128         int x, int y, int w, int rows,
2129         const wchar_t *default_wtext, int default_size)
2130 {
2131         this->parent_window = parent_window;
2132         this->x = x;
2133         this->y = y;
2134         this->w = w;
2135         this->rows = rows;
2136         this->default_text = 0;
2137         this->default_wtext = default_wtext;
2138         this->default_size = default_size;
2139 }
2140
2141 BC_ScrollTextBox::~BC_ScrollTextBox()
2142 {
2143         delete yscroll;
2144         if(text) {
2145                 text->gui = 0;
2146                 delete text;
2147         }
2148 }
2149
2150 void BC_ScrollTextBox::create_objects()
2151 {
2152 // Must be created first
2153         parent_window->add_subwindow(text = default_wtext ?
2154                 new BC_ScrollTextBoxText(this, default_wtext) :
2155                 new BC_ScrollTextBoxText(this, default_text));
2156         parent_window->add_subwindow(yscroll = new BC_ScrollTextBoxYScroll(this));
2157         text->yscroll = yscroll;
2158         yscroll->bound_to = text;
2159         set_text_row(0);
2160 }
2161
2162 int BC_ScrollTextBox::handle_event()
2163 {
2164         return 1;
2165 }
2166
2167 int BC_ScrollTextBox::get_x()
2168 {
2169         return x;
2170 }
2171
2172 int BC_ScrollTextBox::get_y()
2173 {
2174         return y;
2175 }
2176
2177 int BC_ScrollTextBox::get_w()
2178 {
2179         return w;
2180 }
2181
2182 int BC_ScrollTextBox::get_h()
2183 {
2184         return this->text->get_h();
2185 }
2186
2187 int BC_ScrollTextBox::get_rows()
2188 {
2189         return rows;
2190 }
2191
2192
2193 const char* BC_ScrollTextBox::get_text()
2194 {
2195         return text->get_text();
2196 }
2197
2198 const wchar_t* BC_ScrollTextBox::get_wtext()
2199 {
2200         return text->get_wtext();
2201 }
2202
2203 void BC_ScrollTextBox::set_text(char *text, int isz)
2204 {
2205         this->text->set_text(text, isz);
2206         yscroll->update_length(this->text->get_text_rows(),
2207                 this->text->get_text_row(),
2208                 yscroll->get_handlelength(),
2209                 1);
2210 }
2211
2212 int BC_ScrollTextBox::set_text_row(int n)
2213 {
2214         text->set_text_row(n);
2215         yscroll->update_value(n);
2216         return 1;
2217 }
2218
2219 void BC_ScrollTextBox::update(const char *text)
2220 {
2221         this->text->update(text);
2222         yscroll->update_length(this->text->get_text_rows(),
2223                 this->text->get_text_row(),
2224                 yscroll->get_handlelength(),
2225                 1);
2226 }
2227
2228 void BC_ScrollTextBox::update(const wchar_t *wtext)
2229 {
2230         this->text->update(wtext);
2231         yscroll->update_length(this->text->get_text_rows(),
2232                 this->text->get_text_row(),
2233                 yscroll->get_handlelength(),
2234                 1);
2235 }
2236
2237 void BC_ScrollTextBox::reposition_window(int x, int y, int w, int rows)
2238 {
2239         this->x = x;
2240         this->y = y;
2241         this->w = w;
2242         this->rows = rows;
2243
2244         text->reposition_window(x,
2245                 y,
2246                 w - yscroll->get_span(),
2247                 rows);
2248         yscroll->reposition_window(x + w - yscroll->get_span(),
2249                 y,
2250                 BC_TextBox::calculate_row_h(rows,
2251                         parent_window));
2252         yscroll->update_length(text->get_text_rows(),
2253                 text->get_text_row(),
2254                 rows,
2255                 0);
2256 }
2257
2258 void BC_ScrollTextBox::set_selection(int char1, int char2, int ibeam)
2259 {
2260         this->text->set_selection(char1, char2, ibeam);
2261 }
2262
2263 void BC_ScrollTextBox::wset_selection(int char1, int char2, int ibeam)
2264 {
2265         this->text->wset_selection(char1, char2, ibeam);
2266 }
2267
2268 int BC_ScrollTextBox::get_ibeam_letter()
2269 {
2270         return this->text->get_ibeam_letter();
2271 }
2272
2273
2274
2275
2276
2277
2278
2279 BC_ScrollTextBoxText::BC_ScrollTextBoxText(BC_ScrollTextBox *gui, const char *text)
2280  : BC_TextBox(gui->x, gui->y,
2281         gui->w - get_resources()->vscroll_data[SCROLL_HANDLE_UP]->get_w(),
2282         gui->rows, gui->default_size, (char*)text, 1, MEDIUMFONT)
2283 {
2284         this->gui = gui;
2285 }
2286
2287 BC_ScrollTextBoxText::BC_ScrollTextBoxText(BC_ScrollTextBox *gui, const wchar_t *wtext)
2288  : BC_TextBox(gui->x, gui->y,
2289         gui->w - get_resources()->vscroll_data[SCROLL_HANDLE_UP]->get_w(),
2290         gui->rows, gui->default_size, (wchar_t*)wtext, 1, MEDIUMFONT)
2291 {
2292         this->gui = gui;
2293 }
2294
2295 BC_ScrollTextBoxText::~BC_ScrollTextBoxText()
2296 {
2297         if(gui)
2298         {
2299                 gui->text = 0;
2300                 delete gui;
2301         }
2302 }
2303
2304 int BC_ScrollTextBoxText::handle_event()
2305 {
2306         gui->yscroll->update_length(get_text_rows(),
2307                 get_text_row(),
2308                 gui->yscroll->get_handlelength(),
2309                 1);
2310         return gui->handle_event();
2311 }
2312
2313 int BC_ScrollTextBoxText::motion_event()
2314 {
2315         gui->yscroll->update_length(get_text_rows(),
2316                 get_text_row(),
2317                 gui->yscroll->get_handlelength(),
2318                 1);
2319         return 1;
2320 }
2321
2322
2323 BC_ScrollTextBoxYScroll::BC_ScrollTextBoxYScroll(BC_ScrollTextBox *gui)
2324  : BC_ScrollBar(gui->x +
2325                         gui->w -
2326                         get_resources()->vscroll_data[SCROLL_HANDLE_UP]->get_w(),
2327                 gui->y,
2328                 SCROLL_VERT,
2329                 BC_TextBox::calculate_row_h(gui->rows,
2330                         gui->parent_window),
2331                 gui->text->get_text_rows(),
2332                 0,
2333                 gui->rows)
2334 {
2335         this->gui = gui;
2336 }
2337
2338 BC_ScrollTextBoxYScroll::~BC_ScrollTextBoxYScroll()
2339 {
2340 }
2341
2342 int BC_ScrollTextBoxYScroll::handle_event()
2343 {
2344         gui->text->set_text_row(get_position());
2345         return 1;
2346 }
2347
2348
2349
2350
2351
2352
2353
2354
2355
2356
2357 BC_PopupTextBoxText::BC_PopupTextBoxText(BC_PopupTextBox *popup, int x, int y, const char *text)
2358  : BC_TextBox(x, y, popup->text_w, 1, text, BCTEXTLEN)
2359 {
2360         this->popup = popup;
2361 }
2362
2363 BC_PopupTextBoxText::BC_PopupTextBoxText(BC_PopupTextBox *popup, int x, int y, const wchar_t *wtext)
2364  : BC_TextBox(x, y, popup->text_w, 1, wtext, BCTEXTLEN)
2365 {
2366         this->popup = popup;
2367 }
2368
2369 BC_PopupTextBoxText::~BC_PopupTextBoxText()
2370 {
2371         if(popup) {
2372                 popup->textbox = 0;
2373                 delete popup;
2374                 popup = 0;
2375         }
2376 }
2377
2378
2379 int BC_PopupTextBoxText::handle_event()
2380 {
2381         popup->handle_event();
2382         return 1;
2383 }
2384
2385 BC_PopupTextBoxList::BC_PopupTextBoxList(BC_PopupTextBox *popup, int x, int y)
2386  : BC_ListBox(x, y,
2387         popup->text_w + BC_WindowBase::get_resources()->listbox_button[0]->get_w(),
2388         popup->list_h, popup->list_format, popup->list_items, 0, 0, 1, 0, 1)
2389 {
2390         this->popup = popup;
2391 }
2392 int BC_PopupTextBoxList::handle_event()
2393 {
2394         BC_ListBoxItem *item = get_selection(0, 0);
2395         if(item)
2396         {
2397                 popup->textbox->update(item->get_text());
2398                 popup->handle_event();
2399         }
2400         return 1;
2401 }
2402
2403
2404
2405
2406 BC_PopupTextBox::BC_PopupTextBox(BC_WindowBase *parent_window,
2407                 ArrayList<BC_ListBoxItem*> *list_items,
2408                 const char *default_text, int x, int y,
2409                 int text_w, int list_h, int list_format)
2410 {
2411         this->x = x;
2412         this->y = y;
2413         this->list_h = list_h;
2414         this->list_format = list_format;
2415         this->default_text = (char*)default_text;
2416         this->default_wtext = 0;
2417         this->text_w = text_w;
2418         this->parent_window = parent_window;
2419         this->list_items = list_items;
2420 }
2421
2422 BC_PopupTextBox::~BC_PopupTextBox()
2423 {
2424         delete listbox;
2425         if(textbox)
2426         {
2427                 textbox->popup = 0;
2428                 delete textbox;
2429         }
2430 }
2431
2432 int BC_PopupTextBox::create_objects()
2433 {
2434         int x = this->x, y = this->y;
2435         parent_window->add_subwindow(textbox = default_wtext ?
2436                  new BC_PopupTextBoxText(this, x, y, default_wtext) :
2437                  new BC_PopupTextBoxText(this, x, y, default_text));
2438         x += textbox->get_w();
2439         parent_window->add_subwindow(listbox = new BC_PopupTextBoxList(this, x, y));
2440         return 0;
2441 }
2442
2443 void BC_PopupTextBox::update(const char *text)
2444 {
2445         textbox->update(text);
2446 }
2447
2448 void BC_PopupTextBox::update_list(ArrayList<BC_ListBoxItem*> *data)
2449 {
2450         listbox->update(data,
2451                 0,
2452                 0,
2453                 1);
2454 }
2455
2456
2457 const char* BC_PopupTextBox::get_text()
2458 {
2459         return textbox->get_text();
2460 }
2461
2462 const wchar_t* BC_PopupTextBox::get_wtext()
2463 {
2464         return textbox->get_wtext();
2465 }
2466
2467 int BC_PopupTextBox::get_number()
2468 {
2469         return listbox->get_selection_number(0, 0);
2470 }
2471
2472 int BC_PopupTextBox::get_x()
2473 {
2474         return x;
2475 }
2476
2477 int BC_PopupTextBox::get_y()
2478 {
2479         return y;
2480 }
2481
2482 int BC_PopupTextBox::get_w()
2483 {
2484         return textbox->get_w() + listbox->get_w();
2485 }
2486
2487 int BC_PopupTextBox::get_h()
2488 {
2489         return textbox->get_h();
2490 }
2491
2492 int BC_PopupTextBox::handle_event()
2493 {
2494         return 1;
2495 }
2496
2497 void BC_PopupTextBox::reposition_window(int x, int y)
2498 {
2499         this->x = x;
2500         this->y = y;
2501         int x1 = x, y1 = y;
2502         textbox->reposition_window(x1,
2503                 y1,
2504                 textbox->get_w(),
2505                 textbox->get_rows());
2506         x1 += textbox->get_w();
2507         listbox->reposition_window(x1, y1, -1, -1, 0);
2508 //      if(flush) parent_window->flush();
2509 }
2510
2511
2512
2513
2514
2515
2516
2517
2518
2519
2520
2521
2522
2523
2524 BC_TumbleTextBoxText::BC_TumbleTextBoxText(BC_TumbleTextBox *popup,
2525         int64_t default_value,
2526         int64_t min,
2527         int64_t max,
2528         int x,
2529         int y)
2530  : BC_TextBox(x, y, popup->text_w, 1, default_value)
2531 {
2532         this->popup = popup;
2533 }
2534
2535 BC_TumbleTextBoxText::BC_TumbleTextBoxText(BC_TumbleTextBox *popup,
2536         float default_value,
2537         float min,
2538         float max,
2539         int x,
2540         int y)
2541  : BC_TextBox(x, y, popup->text_w, 1, default_value)
2542 {
2543         this->popup = popup;
2544 }
2545
2546 BC_TumbleTextBoxText::~BC_TumbleTextBoxText()
2547 {
2548         if(popup)
2549         {
2550                 popup->textbox = 0;
2551                 delete popup;
2552                 popup = 0;
2553         }
2554 }
2555
2556
2557
2558 int BC_TumbleTextBoxText::handle_event()
2559 {
2560         popup->handle_event();
2561         return 1;
2562 }
2563
2564 int BC_TumbleTextBoxText::button_press_event()
2565 {
2566         if(is_event_win())
2567         {
2568                 if(get_buttonpress() < 4) return BC_TextBox::button_press_event();
2569
2570                 if(get_buttonpress() == 4)
2571                 {
2572                         popup->tumbler->handle_up_event();
2573                 }
2574                 else
2575                 if(get_buttonpress() == 5)
2576                 {
2577                         popup->tumbler->handle_down_event();
2578                 }
2579                 return 1;
2580         }
2581         return 0;
2582 }
2583
2584
2585
2586
2587 BC_TumbleTextBox::BC_TumbleTextBox(BC_WindowBase *parent_window,
2588                 int64_t default_value,
2589                 int64_t min,
2590                 int64_t max,
2591                 int x,
2592                 int y,
2593                 int text_w)
2594 {
2595         reset();
2596         this->x = x;
2597         this->y = y;
2598         this->min = min;
2599         this->max = max;
2600         this->default_value = default_value;
2601         this->text_w = text_w;
2602         this->parent_window = parent_window;
2603         use_float = 0;
2604         precision = 4;
2605         increment = 1;
2606 }
2607
2608 BC_TumbleTextBox::BC_TumbleTextBox(BC_WindowBase *parent_window,
2609                 int default_value,
2610                 int min,
2611                 int max,
2612                 int x,
2613                 int y,
2614                 int text_w)
2615 {
2616         reset();
2617         this->x = x;
2618         this->y = y;
2619         this->min = min;
2620         this->max = max;
2621         this->default_value = default_value;
2622         this->text_w = text_w;
2623         this->parent_window = parent_window;
2624         use_float = 0;
2625         precision = 4;
2626         increment = 1;
2627 }
2628
2629 BC_TumbleTextBox::BC_TumbleTextBox(BC_WindowBase *parent_window,
2630                 float default_value_f,
2631                 float min_f,
2632                 float max_f,
2633                 int x,
2634                 int y,
2635                 int text_w)
2636 {
2637         reset();
2638         this->x = x;
2639         this->y = y;
2640         this->min_f = min_f;
2641         this->max_f = max_f;
2642         this->default_value_f = default_value_f;
2643         this->text_w = text_w;
2644         this->parent_window = parent_window;
2645         use_float = 1;
2646         precision = 4;
2647         increment = 1;
2648 }
2649
2650 BC_TumbleTextBox::~BC_TumbleTextBox()
2651 {
2652 // Recursive delete.  Normally ~BC_TumbleTextBox is never called but textbox
2653 // is deleted anyway by the windowbase so textbox deletes this.
2654         if(tumbler) delete tumbler;
2655         tumbler = 0;
2656 // Don't delete text here if we were called by ~BC_TumbleTextBoxText
2657         if(textbox)
2658         {
2659                 textbox->popup = 0;
2660                 delete textbox;
2661         }
2662         textbox = 0;
2663 }
2664
2665 void BC_TumbleTextBox::reset()
2666 {
2667         textbox = 0;
2668         tumbler = 0;
2669         increment = 1.0;
2670 }
2671
2672 void BC_TumbleTextBox::set_precision(int precision)
2673 {
2674         this->precision = precision;
2675 }
2676
2677 void BC_TumbleTextBox::set_increment(float value)
2678 {
2679         this->increment = value;
2680         if(tumbler) tumbler->set_increment(value);
2681 }
2682
2683 void BC_TumbleTextBox::set_log_floatincrement(int value)
2684 {
2685         this->log_floatincrement = value;
2686         if(tumbler) tumbler->set_log_floatincrement(value);
2687 }
2688
2689 int BC_TumbleTextBox::create_objects()
2690 {
2691         int x = this->x, y = this->y;
2692
2693         if(use_float)
2694         {
2695                 parent_window->add_subwindow(textbox = new BC_TumbleTextBoxText(this,
2696                         default_value_f,
2697                         min_f,
2698                         max_f,
2699                         x,
2700                         y));
2701                 textbox->set_precision(precision);
2702         }
2703         else
2704                 parent_window->add_subwindow(textbox = new BC_TumbleTextBoxText(this,
2705                         default_value,
2706                         min,
2707                         max,
2708                         x,
2709                         y));
2710
2711         x += textbox->get_w();
2712
2713         if(use_float)
2714                 parent_window->add_subwindow(tumbler = new BC_FTumbler(textbox,
2715                         min_f,
2716                         max_f,
2717                         x,
2718                         y));
2719         else
2720                 parent_window->add_subwindow(tumbler = new BC_ITumbler(textbox,
2721                         min,
2722                         max,
2723                         x,
2724                         y));
2725
2726         tumbler->set_increment(increment);
2727         return 0;
2728 }
2729
2730 const char* BC_TumbleTextBox::get_text()
2731 {
2732         return textbox->get_text();
2733 }
2734
2735 const wchar_t* BC_TumbleTextBox::get_wtext()
2736 {
2737         return textbox->get_wtext();
2738 }
2739
2740 BC_TextBox* BC_TumbleTextBox::get_textbox()
2741 {
2742         return textbox;
2743 }
2744
2745 int BC_TumbleTextBox::update(const char *value)
2746 {
2747         textbox->update(value);
2748         return 0;
2749 }
2750
2751 int BC_TumbleTextBox::update(int64_t value)
2752 {
2753         textbox->update(value);
2754         return 0;
2755 }
2756
2757 int BC_TumbleTextBox::update(float value)
2758 {
2759         textbox->update(value);
2760         return 0;
2761 }
2762
2763
2764 int BC_TumbleTextBox::get_x()
2765 {
2766         return x;
2767 }
2768
2769 int BC_TumbleTextBox::get_y()
2770 {
2771         return y;
2772 }
2773
2774 int BC_TumbleTextBox::get_w()
2775 {
2776         return textbox->get_w() + tumbler->get_w();
2777 }
2778
2779 int BC_TumbleTextBox::get_h()
2780 {
2781         return textbox->get_h();
2782 }
2783
2784 void BC_TumbleTextBox::disable()
2785 {
2786         if( !get_enabled() ) return;
2787         tumbler->hide_window(0);
2788         return textbox->disable();
2789 }
2790
2791 void BC_TumbleTextBox::enable()
2792 {
2793         if( get_enabled() ) return;
2794         tumbler->show_window(0);
2795         return textbox->enable();
2796 }
2797
2798 int BC_TumbleTextBox::get_enabled()
2799 {
2800         return textbox->get_enabled();
2801 }
2802
2803 int BC_TumbleTextBox::handle_event()
2804 {
2805         return 1;
2806 }
2807
2808 void BC_TumbleTextBox::reposition_window(int x, int y)
2809 {
2810         this->x = x;
2811         this->y = y;
2812
2813         textbox->reposition_window(x,
2814                 y,
2815                 text_w,
2816                 1);
2817         tumbler->reposition_window(x + textbox->get_w(),
2818                 y);
2819 //      if(flush) parent_window->flush();
2820 }
2821
2822
2823 void BC_TumbleTextBox::set_boundaries(int64_t min, int64_t max)
2824 {
2825         tumbler->set_boundaries(min, max);
2826 }
2827
2828 void BC_TumbleTextBox::set_boundaries(float min, float max)
2829 {
2830         tumbler->set_boundaries(min, max);
2831 }