summaryrefslogtreecommitdiff
path: root/src/Fl_Input.cxx
diff options
context:
space:
mode:
Diffstat (limited to 'src/Fl_Input.cxx')
-rw-r--r--src/Fl_Input.cxx208
1 files changed, 101 insertions, 107 deletions
diff --git a/src/Fl_Input.cxx b/src/Fl_Input.cxx
index 96dfc0105..9a3342eb2 100644
--- a/src/Fl_Input.cxx
+++ b/src/Fl_Input.cxx
@@ -1,6 +1,4 @@
//
-// "$Id$"
-//
// Input widget for the Fast Light Tool Kit (FLTK).
//
// Copyright 1998-2020 by Bill Spitzak and others.
@@ -11,9 +9,9 @@
//
// https://www.fltk.org/COPYING.php
//
-// Please report all bugs and problems on the following page:
+// Please see the following page on how to report bugs and issues:
//
-// https://www.fltk.org/str.php
+// https://www.fltk.org/bugs.php
//
// This is the "user interface", it decodes user actions into what to
@@ -32,7 +30,7 @@
#include <FL/Fl_Input.H>
#include <FL/fl_draw.H>
#include <FL/fl_ask.H>
-#include "flstring.h" // this #includes "<config.h>" !
+#include "flstring.h" // this #includes "<config.h>" !
#include <FL/Fl_Float_Input.H>
#include <FL/Fl_Int_Input.H>
@@ -51,7 +49,7 @@ void Fl_Input::draw() {
Fl_Boxtype b = box();
if (damage() & FL_DAMAGE_ALL) draw_box(b, color());
Fl_Input_::drawtext(x()+Fl::box_dx(b), y()+Fl::box_dy(b),
- w()-Fl::box_dw(b), h()-Fl::box_dh(b));
+ w()-Fl::box_dw(b), h()-Fl::box_dh(b));
}
// kludge so shift causes selection to extend:
@@ -82,13 +80,13 @@ int Fl_Input::shift_up_down_position(int p) {
// List of characters that are legal in a floating point input field.
// This text string is created at run-time to take the current locale
// into account (for example, continental Europe uses a comma instead
-// of a decimal point). For back compatibility reasons, we always
+// of a decimal point). For back compatibility reasons, we always
// allow the decimal point.
#ifdef HAVE_LOCALECONV
-static const char *standard_fp_chars = ".eE+-";
+static const char *standard_fp_chars = ".eE+-";
static const char *legal_fp_chars = 0L;
#else
-static const char *legal_fp_chars = ".eE+-";
+static const char *legal_fp_chars = ".eE+-";
#endif
// Move cursor up specified #lines
@@ -118,7 +116,7 @@ int Fl_Input::kf_lines_down(int repeat_num) {
//UNNEEDED if (input_type()==FL_MULTILINE_INPUT && !Fl::option(Fl::OPTION_ARROW_FOCUS)) return 1;
return NORMAL_INPUT_MOVE;
}
- while (repeat_num--) {
+ while (repeat_num--) {
i = line_end(i);
if (i >= size()) break;
i++;
@@ -140,7 +138,7 @@ int Fl_Input::kf_page_down() {
// Toggle insert mode
int Fl_Input::kf_insert_toggle() {
if (readonly()) { fl_beep(); return 1; }
- return 1; // \todo: needs insert mode
+ return 1; // \todo: needs insert mode
}
// Delete word right
@@ -228,7 +226,7 @@ int Fl_Input::kf_move_char_right() {
// Move cursor word-left
int Fl_Input::kf_move_word_left() {
shift_position(word_start(position()));
- return 1;
+ return 1;
}
// Move cursor word-right
@@ -262,7 +260,7 @@ int Fl_Input::kf_top() {
// Move to bottom of document
int Fl_Input::kf_bottom() {
shift_position(size());
- return 1;
+ return 1;
}
// Select all text in the widget
@@ -280,7 +278,7 @@ int Fl_Input::kf_undo() {
// Redo. (currently unimplemented.. toggles undo() instead)
int Fl_Input::kf_redo() {
if (readonly()) { fl_beep(); return 1; }
- return kf_undo(); // currently we don't support multilevel undo
+ return kf_undo(); // currently we don't support multilevel undo
}
// Do a copy operation
@@ -306,16 +304,16 @@ int Fl_Input::kf_copy_cut() {
// Returns 1 if handled by us, 0 if not.
//
int Fl_Input::handle_key() {
-
+
char ascii = Fl::event_text()[0];
-
+
int del;
if (Fl::compose(del)) {
-
+
// Insert characters into numeric fields after checking for legality:
if (input_type() == FL_FLOAT_INPUT || input_type() == FL_INT_INPUT) {
Fl::compose_reset(); // ignore any composed characters...
-
+
// initialize the list of legal characters inside a floating point number
#if defined(HAVE_LOCALECONV)
if (!legal_fp_chars) {
@@ -330,7 +328,7 @@ int Fl_Input::handle_key() {
// the following line is not a true memory leak because the array is only
// allocated once if required, and automatically freed when the program quits
char *chars = (char*)malloc(len+1);
- legal_fp_chars = chars;
+ legal_fp_chars = chars;
strcpy(chars, standard_fp_chars);
if (lc) {
if (lc->decimal_point) strcat(chars, lc->decimal_point);
@@ -340,34 +338,34 @@ int Fl_Input::handle_key() {
}
}
#endif // HAVE_LOCALECONV
-
+
// find the insert position
int ip = position()<mark() ? position() : mark();
// This is complex to allow "0xff12" hex to be typed:
- if ( (!ip && (ascii == '+' || ascii == '-'))
- || (ascii >= '0' && ascii <= '9')
- || (ip==1 && index(0)=='0' && (ascii=='x' || ascii == 'X'))
- || (ip>1 && index(0)=='0' && (index(1)=='x'||index(1)=='X')
- && ((ascii>='A'&& ascii<='F') || (ascii>='a'&& ascii<='f')))
- || (input_type()==FL_FLOAT_INPUT && ascii && strchr(legal_fp_chars, ascii)))
+ if ( (!ip && (ascii == '+' || ascii == '-'))
+ || (ascii >= '0' && ascii <= '9')
+ || (ip==1 && index(0)=='0' && (ascii=='x' || ascii == 'X'))
+ || (ip>1 && index(0)=='0' && (index(1)=='x'||index(1)=='X')
+ && ((ascii>='A'&& ascii<='F') || (ascii>='a'&& ascii<='f')))
+ || (input_type()==FL_FLOAT_INPUT && ascii && strchr(legal_fp_chars, ascii)))
{
- if (readonly()) fl_beep();
- else replace(position(), mark(), &ascii, 1);
+ if (readonly()) fl_beep();
+ else replace(position(), mark(), &ascii, 1);
}
return 1;
}
-
+
if (del || Fl::event_length()) {
if (readonly()) fl_beep();
else replace(position(), del ? position()-del : mark(),
- Fl::event_text(), Fl::event_length());
+ Fl::event_text(), Fl::event_length());
}
if (Fl::screen_driver()->has_marked_text() && Fl::compose_state) {
this->mark( this->position() - Fl::compose_state );
}
return 1;
}
-
+
unsigned int mods = Fl::event_state() & (FL_META|FL_CTRL|FL_ALT);
unsigned int shift = Fl::event_state() & FL_SHIFT;
unsigned int multiline = (input_type() == FL_MULTILINE_INPUT) ? 1 : 0;
@@ -375,7 +373,7 @@ int Fl_Input::handle_key() {
// The following lists apps that support these keypresses.
// Prefixes: '!' indicates NOT supported, '?' indicates un-verified.
//
- // HIG=Human Interface Guide,
+ // HIG=Human Interface Guide,
// TE=TextEdit.app, SA=Safari.app, WOX=MS Word/OSX -- OSX 10.4.x
// NP=Notepad, WP=WordPad, WOW=MS Word/Windows -- WinXP
// GE=gedit, KE=kedit -- Ubuntu8.04
@@ -387,17 +385,17 @@ int Fl_Input::handle_key() {
// handle keypresses that can have a platform-dependent processing
int retval = Fl::screen_driver()->input_widget_handle_key(Fl::event_key(), mods, shift, this);
if (retval >= 0) return retval;
-
+
switch (Fl::event_key()) {
case FL_Insert:
// Note: Mac has no "Insert" key; it's the "Help" key.
// This keypress is apparently not possible on macs.
//
- if (mods==0 && shift) return kf_paste(); // Shift-Insert (WP,NP,WOW,GE,KE,OF)
- if (mods==0) return kf_insert_toggle(); // Insert (Standard)
- if (mods==FL_CTRL) return kf_copy(); // Ctrl-Insert (WP,NP,WOW,GE,KE,OF)
- return 0; // ignore other combos, pass to parent
+ if (mods==0 && shift) return kf_paste(); // Shift-Insert (WP,NP,WOW,GE,KE,OF)
+ if (mods==0) return kf_insert_toggle(); // Insert (Standard)
+ if (mods==FL_CTRL) return kf_copy(); // Ctrl-Insert (WP,NP,WOW,GE,KE,OF)
+ return 0; // ignore other combos, pass to parent
case FL_Enter:
case FL_KP_Enter:
@@ -407,53 +405,53 @@ int Fl_Input::handle_key() {
return 1;
} else if (multiline && !readonly()) {
return replace(position(), mark(), "\n", 1);
- } return 0; // reserved for shortcuts
+ } return 0; // reserved for shortcuts
case FL_Tab:
// Handle special case for multiline input with 'old tab behavior';
// tab handled as a normal insertable character.
//
- if (mods==0 && !shift // Tab?
- && !tab_nav() // old tab behavior enabled?
- && multiline) { // multiline input?
- break; // insert tab character
+ if (mods==0 && !shift // Tab?
+ && !tab_nav() // old tab behavior enabled?
+ && multiline) { // multiline input?
+ break; // insert tab character
}
- if (mods==0) return 0; // Tab, Shift-Tab? nav focus (Standard/OSX-HIG)
- return 0; // ignore other combos, pass to parent
+ if (mods==0) return 0; // Tab, Shift-Tab? nav focus (Standard/OSX-HIG)
+ return 0; // ignore other combos, pass to parent
case 'a':
- if (mods==FL_COMMAND) return kf_select_all(); // Ctrl-A, Mac:Meta-A (Standard/OSX-HIG)
- break; // handle other combos elsewhere
+ if (mods==FL_COMMAND) return kf_select_all(); // Ctrl-A, Mac:Meta-A (Standard/OSX-HIG)
+ break; // handle other combos elsewhere
case 'c':
- if (mods==FL_COMMAND) return kf_copy(); // Ctrl-C, Mac:Meta-C (Standard/OSX-HIG)
- break; // handle other combos elsewhere
+ if (mods==FL_COMMAND) return kf_copy(); // Ctrl-C, Mac:Meta-C (Standard/OSX-HIG)
+ break; // handle other combos elsewhere
case 'v':
- if (mods==FL_COMMAND) return kf_paste(); // Ctrl-V, Mac:Meta-V (Standard/OSX-HIG)
- break; // handle other combos elsewhere
+ if (mods==FL_COMMAND) return kf_paste(); // Ctrl-V, Mac:Meta-V (Standard/OSX-HIG)
+ break; // handle other combos elsewhere
case 'x':
- if (mods==FL_COMMAND) return kf_copy_cut(); // Ctrl-X, Mac:Meta-X (Standard/OSX-HIG)
+ if (mods==FL_COMMAND) return kf_copy_cut(); // Ctrl-X, Mac:Meta-X (Standard/OSX-HIG)
break;
case 'z':
- if (mods==FL_COMMAND && !shift) return kf_undo(); // Ctrl-Z, Mac:Meta-Z (Standard/OSX-HIG)
- if (mods==FL_COMMAND && shift) return kf_redo(); // Shift-Ctrl-Z, Mac:Shift-Meta-Z (Standard/OSX-HIG)
- break; // handle other combos elsewhere
+ if (mods==FL_COMMAND && !shift) return kf_undo(); // Ctrl-Z, Mac:Meta-Z (Standard/OSX-HIG)
+ if (mods==FL_COMMAND && shift) return kf_redo(); // Shift-Ctrl-Z, Mac:Shift-Meta-Z (Standard/OSX-HIG)
+ break; // handle other combos elsewhere
}
-
+
switch (ascii) {
case ctrl('H'):
- return kf_delete_char_left(); // Ctrl-H (!WP,!NP,!WOW,!WOX,TE,SA,GE,KE,OF)
- case ctrl('I'): // Ctrl-I (literal Tab) (!WP,NP,!WOW,!GE,KE,OF)
- case ctrl('J'): // Ctrl-J (literal Line Feed/Enter) (Standard)
- case ctrl('L'): // Ctrl-L (literal Form Feed) (Standard)
- case ctrl('M'): // Ctrl-M (literal Cr) (Standard)
+ return kf_delete_char_left(); // Ctrl-H (!WP,!NP,!WOW,!WOX,TE,SA,GE,KE,OF)
+ case ctrl('I'): // Ctrl-I (literal Tab) (!WP,NP,!WOW,!GE,KE,OF)
+ case ctrl('J'): // Ctrl-J (literal Line Feed/Enter) (Standard)
+ case ctrl('L'): // Ctrl-L (literal Form Feed) (Standard)
+ case ctrl('M'): // Ctrl-M (literal Cr) (Standard)
if (readonly()) { fl_beep(); return 1; }
// insert a few selected control characters literally:
if (input_type() != FL_FLOAT_INPUT && input_type() != FL_INT_INPUT)
return replace(position(), mark(), &ascii, 1);
break;
}
-
- return 0; // ignored
+
+ return 0; // ignored
}
int Fl_Input::handle(int event) {
@@ -462,8 +460,8 @@ int Fl_Input::handle(int event) {
switch (event) {
case FL_UNFOCUS:
if (Fl::screen_driver()->has_marked_text() && Fl::compose_state) {
- this->mark( this->position() );
- Fl::reset_marked_text();
+ this->mark( this->position() );
+ Fl::reset_marked_text();
}
break;
case FL_FOCUS:
@@ -488,17 +486,17 @@ int Fl_Input::handle(int event) {
break;
}
break;
-
+
case FL_KEYBOARD:
// Handle special case for multiline input with 'old tab behavior'
// where tab is entered as a character: make sure user attempt to 'tab over'
// widget doesn't destroy the field, replacing it with a tab character.
//
- if (Fl::event_key() == FL_Tab // Tab key?
- && !Fl::event_state(FL_SHIFT) // no shift?
- && !tab_nav() // with tab navigation disabled?
- && input_type() == FL_MULTILINE_INPUT // with a multiline input?
- && size() > 0 // non-empty field?
+ if (Fl::event_key() == FL_Tab // Tab key?
+ && !Fl::event_state(FL_SHIFT) // no shift?
+ && !tab_nav() // with tab navigation disabled?
+ && input_type() == FL_MULTILINE_INPUT // with a multiline input?
+ && size() > 0 // non-empty field?
&& ((mark()==0 && position()==size()) || (position()==0 && mark()==size()))) {// while entire field selected?
// Set cursor to the end of the selection...
if (mark() > position())
@@ -507,22 +505,22 @@ int Fl_Input::handle(int event) {
position(position());
return (1);
} else {
- if (active_r() && window() && this == Fl::belowmouse())
+ if (active_r() && window() && this == Fl::belowmouse())
window()->cursor(FL_CURSOR_NONE);
return handle_key();
}
//NOTREACHED
-
+
case FL_PUSH:
if (Fl::dnd_text_ops()) {
int oldpos = position(), oldmark = mark();
Fl_Boxtype b = box();
Fl_Input_::handle_mouse(x()+Fl::box_dx(b), y()+Fl::box_dy(b),
w()-Fl::box_dw(b), h()-Fl::box_dh(b), 0);
- newpos = position();
+ newpos = position();
position( oldpos, oldmark );
if (Fl::focus()==this && !Fl::event_state(FL_SHIFT) && input_type()!=FL_SECRET_INPUT &&
- ( (newpos >= mark() && newpos < position()) ||
+ ( (newpos >= mark() && newpos < position()) ||
(newpos >= position() && newpos < mark()) ) ) {
// user clicked in the selection, may be trying to drag
drag_start = newpos;
@@ -530,13 +528,13 @@ int Fl_Input::handle(int event) {
}
drag_start = -1;
}
-
+
if (Fl::focus() != this) {
Fl::focus(this);
handle(FL_FOCUS);
}
break;
-
+
case FL_DRAG:
if (Fl::dnd_text_ops()) {
if (drag_start >= 0) {
@@ -544,7 +542,7 @@ int Fl_Input::handle(int event) {
// save the position because sometimes we don't get DND_ENTER:
dnd_save_position = position();
dnd_save_mark = mark();
- dnd_save_focus = this;
+ dnd_save_focus = this;
// drag the data:
copy(0);
Fl::screen_driver()->dnd(1);
@@ -552,7 +550,7 @@ int Fl_Input::handle(int event) {
}
}
break;
-
+
case FL_RELEASE:
if (Fl::event_button() == 2) {
Fl::event_is_click(0); // stop double click from picking a word
@@ -568,24 +566,24 @@ int Fl_Input::handle(int event) {
// user double or triple clicked to select word or whole text
copy(0);
}
-
+
// For output widgets, do the callback so the app knows the user
// did something with the mouse...
if (readonly()) do_callback();
-
+
return 1;
-
+
case FL_DND_ENTER:
Fl::belowmouse(this); // send the leave events first
if (dnd_save_focus != this) {
- dnd_save_position = position();
- dnd_save_mark = mark();
- dnd_save_focus = Fl::focus();
+ dnd_save_position = position();
+ dnd_save_mark = mark();
+ dnd_save_focus = Fl::focus();
Fl::focus(this);
handle(FL_FOCUS);
}
// fall through:
- case FL_DND_DRAG:
+ case FL_DND_DRAG:
//int p = mouse_position(X, Y, W, H);
#ifdef DND_OUT_XXXX
if (Fl::focus()==this && (p>=dnd_save_position && p<=dnd_save_mark ||
@@ -600,7 +598,7 @@ int Fl_Input::handle(int event) {
w()-Fl::box_dw(b), h()-Fl::box_dh(b), 0);
}
return 1;
-
+
case FL_DND_LEAVE:
position(dnd_save_position, dnd_save_mark);
#ifdef DND_OUT_XXXX
@@ -616,30 +614,30 @@ int Fl_Input::handle(int event) {
case FL_DND_RELEASE:
if (dnd_save_focus == this) { // if the dragged text comes from the same widget
- if (!readonly()) {
- // remove the selected text
- int old_position = position();
- if (dnd_save_mark > dnd_save_position) {
- int tmp = dnd_save_mark;
- dnd_save_mark = dnd_save_position;
- dnd_save_position = tmp;
- }
- replace(dnd_save_mark, dnd_save_position, NULL, 0);
- if (old_position > dnd_save_position)
- position(old_position - (dnd_save_position - dnd_save_mark));
- else
- position(old_position);
- } // !readonly()
+ if (!readonly()) {
+ // remove the selected text
+ int old_position = position();
+ if (dnd_save_mark > dnd_save_position) {
+ int tmp = dnd_save_mark;
+ dnd_save_mark = dnd_save_position;
+ dnd_save_position = tmp;
+ }
+ replace(dnd_save_mark, dnd_save_position, NULL, 0);
+ if (old_position > dnd_save_position)
+ position(old_position - (dnd_save_position - dnd_save_mark));
+ else
+ position(old_position);
+ } // !readonly()
} // from the same widget
else if (dnd_save_focus) {
- dnd_save_focus->handle(FL_UNFOCUS);
+ dnd_save_focus->handle(FL_UNFOCUS);
}
dnd_save_focus = NULL;
take_focus();
return 1;
/* TODO: this will scroll the area, but stop if the cursor would become invisible.
- That clipping happens in drawtext(). Do we change the clipping or should
+ That clipping happens in drawtext(). Do we change the clipping or should
we move the cursor (ouch)?
case FL_MOUSEWHEEL:
if (Fl::e_dy > 0) {
@@ -666,7 +664,7 @@ Fl_Input::Fl_Input(int X, int Y, int W, int H, const char *l)
Fl_Float_Input::Fl_Float_Input(int X,int Y,int W,int H,const char *l)
-: Fl_Input(X,Y,W,H,l)
+: Fl_Input(X,Y,W,H,l)
{
type(FL_FLOAT_INPUT);
clear_flag(MAC_USE_ACCENTS_MENU);
@@ -713,7 +711,3 @@ int Fl_Secret_Input::handle(int event) {
}
return retval;
}
-
-//
-// End of "$Id$".
-//
generated by cgit v1.2.3 (git 2.25.1) at 2026-02-08 08:10:22 +0000