- added imgui
[laserbrain_demo] / src / imgui / stb_textedit.h
1 // [ImGui] this is a slightly modified version of stb_truetype.h 1.9. Those changes would need to be pushed into nothings/sb
2 // [ImGui] - fixed linestart handler when over last character of multi-line buffer + simplified existing code (#588, #815)
3 // [ImGui] - fixed a state corruption/crash bug in stb_text_redo and stb_textedit_discard_redo (#715)
4 // [ImGui] - fixed a crash bug in stb_textedit_discard_redo (#681)
5 // [ImGui] - fixed some minor warnings
6
7 // stb_textedit.h - v1.9  - public domain - Sean Barrett
8 // Development of this library was sponsored by RAD Game Tools
9 //
10 // This C header file implements the guts of a multi-line text-editing
11 // widget; you implement display, word-wrapping, and low-level string
12 // insertion/deletion, and stb_textedit will map user inputs into
13 // insertions & deletions, plus updates to the cursor position,
14 // selection state, and undo state.
15 //
16 // It is intended for use in games and other systems that need to build
17 // their own custom widgets and which do not have heavy text-editing
18 // requirements (this library is not recommended for use for editing large
19 // texts, as its performance does not scale and it has limited undo).
20 //
21 // Non-trivial behaviors are modelled after Windows text controls.
22 // 
23 //
24 // LICENSE
25 //
26 //   This software is dual-licensed to the public domain and under the following
27 //   license: you are granted a perpetual, irrevocable license to copy, modify,
28 //   publish, and distribute this file as you see fit.
29 //
30 //
31 // DEPENDENCIES
32 //
33 // Uses the C runtime function 'memmove', which you can override
34 // by defining STB_TEXTEDIT_memmove before the implementation.
35 // Uses no other functions. Performs no runtime allocations.
36 //
37 //
38 // VERSION HISTORY
39 //
40 //   1.9  (2016-08-27) customizable move-by-word
41 //   1.8  (2016-04-02) better keyboard handling when mouse button is down
42 //   1.7  (2015-09-13) change y range handling in case baseline is non-0
43 //   1.6  (2015-04-15) allow STB_TEXTEDIT_memmove
44 //   1.5  (2014-09-10) add support for secondary keys for OS X
45 //   1.4  (2014-08-17) fix signed/unsigned warnings
46 //   1.3  (2014-06-19) fix mouse clicking to round to nearest char boundary
47 //   1.2  (2014-05-27) fix some RAD types that had crept into the new code
48 //   1.1  (2013-12-15) move-by-word (requires STB_TEXTEDIT_IS_SPACE )
49 //   1.0  (2012-07-26) improve documentation, initial public release
50 //   0.3  (2012-02-24) bugfixes, single-line mode; insert mode
51 //   0.2  (2011-11-28) fixes to undo/redo
52 //   0.1  (2010-07-08) initial version
53 //
54 // ADDITIONAL CONTRIBUTORS
55 //
56 //   Ulf Winklemann: move-by-word in 1.1
57 //   Fabian Giesen: secondary key inputs in 1.5
58 //   Martins Mozeiko: STB_TEXTEDIT_memmove
59 //
60 //   Bugfixes:
61 //      Scott Graham
62 //      Daniel Keller
63 //      Omar Cornut
64 //
65 // USAGE
66 //
67 // This file behaves differently depending on what symbols you define
68 // before including it.
69 //
70 //
71 // Header-file mode:
72 //
73 //   If you do not define STB_TEXTEDIT_IMPLEMENTATION before including this,
74 //   it will operate in "header file" mode. In this mode, it declares a
75 //   single public symbol, STB_TexteditState, which encapsulates the current
76 //   state of a text widget (except for the string, which you will store
77 //   separately).
78 //
79 //   To compile in this mode, you must define STB_TEXTEDIT_CHARTYPE to a
80 //   primitive type that defines a single character (e.g. char, wchar_t, etc).
81 //
82 //   To save space or increase undo-ability, you can optionally define the
83 //   following things that are used by the undo system:
84 //
85 //      STB_TEXTEDIT_POSITIONTYPE         small int type encoding a valid cursor position
86 //      STB_TEXTEDIT_UNDOSTATECOUNT       the number of undo states to allow
87 //      STB_TEXTEDIT_UNDOCHARCOUNT        the number of characters to store in the undo buffer
88 //
89 //   If you don't define these, they are set to permissive types and
90 //   moderate sizes. The undo system does no memory allocations, so
91 //   it grows STB_TexteditState by the worst-case storage which is (in bytes):
92 //
93 //        [4 + sizeof(STB_TEXTEDIT_POSITIONTYPE)] * STB_TEXTEDIT_UNDOSTATE_COUNT
94 //      +      sizeof(STB_TEXTEDIT_CHARTYPE)      * STB_TEXTEDIT_UNDOCHAR_COUNT
95 //
96 //
97 // Implementation mode:
98 //
99 //   If you define STB_TEXTEDIT_IMPLEMENTATION before including this, it
100 //   will compile the implementation of the text edit widget, depending
101 //   on a large number of symbols which must be defined before the include.
102 //
103 //   The implementation is defined only as static functions. You will then
104 //   need to provide your own APIs in the same file which will access the
105 //   static functions.
106 //
107 //   The basic concept is that you provide a "string" object which
108 //   behaves like an array of characters. stb_textedit uses indices to
109 //   refer to positions in the string, implicitly representing positions
110 //   in the displayed textedit. This is true for both plain text and
111 //   rich text; even with rich text stb_truetype interacts with your
112 //   code as if there was an array of all the displayed characters.
113 //
114 // Symbols that must be the same in header-file and implementation mode:
115 //
116 //     STB_TEXTEDIT_CHARTYPE             the character type
117 //     STB_TEXTEDIT_POSITIONTYPE         small type that a valid cursor position
118 //     STB_TEXTEDIT_UNDOSTATECOUNT       the number of undo states to allow
119 //     STB_TEXTEDIT_UNDOCHARCOUNT        the number of characters to store in the undo buffer
120 //
121 // Symbols you must define for implementation mode:
122 //
123 //    STB_TEXTEDIT_STRING               the type of object representing a string being edited,
124 //                                      typically this is a wrapper object with other data you need
125 //
126 //    STB_TEXTEDIT_STRINGLEN(obj)       the length of the string (ideally O(1))
127 //    STB_TEXTEDIT_LAYOUTROW(&r,obj,n)  returns the results of laying out a line of characters
128 //                                        starting from character #n (see discussion below)
129 //    STB_TEXTEDIT_GETWIDTH(obj,n,i)    returns the pixel delta from the xpos of the i'th character
130 //                                        to the xpos of the i+1'th char for a line of characters
131 //                                        starting at character #n (i.e. accounts for kerning
132 //                                        with previous char)
133 //    STB_TEXTEDIT_KEYTOTEXT(k)         maps a keyboard input to an insertable character
134 //                                        (return type is int, -1 means not valid to insert)
135 //    STB_TEXTEDIT_GETCHAR(obj,i)       returns the i'th character of obj, 0-based
136 //    STB_TEXTEDIT_NEWLINE              the character returned by _GETCHAR() we recognize
137 //                                        as manually wordwrapping for end-of-line positioning
138 //
139 //    STB_TEXTEDIT_DELETECHARS(obj,i,n)      delete n characters starting at i
140 //    STB_TEXTEDIT_INSERTCHARS(obj,i,c*,n)   insert n characters at i (pointed to by STB_TEXTEDIT_CHARTYPE*)
141 //
142 //    STB_TEXTEDIT_K_SHIFT       a power of two that is or'd in to a keyboard input to represent the shift key
143 //
144 //    STB_TEXTEDIT_K_LEFT        keyboard input to move cursor left
145 //    STB_TEXTEDIT_K_RIGHT       keyboard input to move cursor right
146 //    STB_TEXTEDIT_K_UP          keyboard input to move cursor up
147 //    STB_TEXTEDIT_K_DOWN        keyboard input to move cursor down
148 //    STB_TEXTEDIT_K_LINESTART   keyboard input to move cursor to start of line  // e.g. HOME
149 //    STB_TEXTEDIT_K_LINEEND     keyboard input to move cursor to end of line    // e.g. END
150 //    STB_TEXTEDIT_K_TEXTSTART   keyboard input to move cursor to start of text  // e.g. ctrl-HOME
151 //    STB_TEXTEDIT_K_TEXTEND     keyboard input to move cursor to end of text    // e.g. ctrl-END
152 //    STB_TEXTEDIT_K_DELETE      keyboard input to delete selection or character under cursor
153 //    STB_TEXTEDIT_K_BACKSPACE   keyboard input to delete selection or character left of cursor
154 //    STB_TEXTEDIT_K_UNDO        keyboard input to perform undo
155 //    STB_TEXTEDIT_K_REDO        keyboard input to perform redo
156 //
157 // Optional:
158 //    STB_TEXTEDIT_K_INSERT              keyboard input to toggle insert mode
159 //    STB_TEXTEDIT_IS_SPACE(ch)          true if character is whitespace (e.g. 'isspace'),
160 //                                          required for default WORDLEFT/WORDRIGHT handlers
161 //    STB_TEXTEDIT_MOVEWORDLEFT(obj,i)   custom handler for WORDLEFT, returns index to move cursor to
162 //    STB_TEXTEDIT_MOVEWORDRIGHT(obj,i)  custom handler for WORDRIGHT, returns index to move cursor to
163 //    STB_TEXTEDIT_K_WORDLEFT            keyboard input to move cursor left one word // e.g. ctrl-LEFT
164 //    STB_TEXTEDIT_K_WORDRIGHT           keyboard input to move cursor right one word // e.g. ctrl-RIGHT
165 //    STB_TEXTEDIT_K_LINESTART2          secondary keyboard input to move cursor to start of line
166 //    STB_TEXTEDIT_K_LINEEND2            secondary keyboard input to move cursor to end of line
167 //    STB_TEXTEDIT_K_TEXTSTART2          secondary keyboard input to move cursor to start of text
168 //    STB_TEXTEDIT_K_TEXTEND2            secondary keyboard input to move cursor to end of text
169 //
170 // Todo:
171 //    STB_TEXTEDIT_K_PGUP        keyboard input to move cursor up a page
172 //    STB_TEXTEDIT_K_PGDOWN      keyboard input to move cursor down a page
173 //
174 // Keyboard input must be encoded as a single integer value; e.g. a character code
175 // and some bitflags that represent shift states. to simplify the interface, SHIFT must
176 // be a bitflag, so we can test the shifted state of cursor movements to allow selection,
177 // i.e. (STB_TEXTED_K_RIGHT|STB_TEXTEDIT_K_SHIFT) should be shifted right-arrow.
178 //
179 // You can encode other things, such as CONTROL or ALT, in additional bits, and
180 // then test for their presence in e.g. STB_TEXTEDIT_K_WORDLEFT. For example,
181 // my Windows implementations add an additional CONTROL bit, and an additional KEYDOWN
182 // bit. Then all of the STB_TEXTEDIT_K_ values bitwise-or in the KEYDOWN bit,
183 // and I pass both WM_KEYDOWN and WM_CHAR events to the "key" function in the
184 // API below. The control keys will only match WM_KEYDOWN events because of the
185 // keydown bit I add, and STB_TEXTEDIT_KEYTOTEXT only tests for the KEYDOWN
186 // bit so it only decodes WM_CHAR events.
187 //
188 // STB_TEXTEDIT_LAYOUTROW returns information about the shape of one displayed
189 // row of characters assuming they start on the i'th character--the width and
190 // the height and the number of characters consumed. This allows this library
191 // to traverse the entire layout incrementally. You need to compute word-wrapping
192 // here.
193 //
194 // Each textfield keeps its own insert mode state, which is not how normal
195 // applications work. To keep an app-wide insert mode, update/copy the
196 // "insert_mode" field of STB_TexteditState before/after calling API functions.
197 //
198 // API
199 //
200 //    void stb_textedit_initialize_state(STB_TexteditState *state, int is_single_line)
201 //
202 //    void stb_textedit_click(STB_TEXTEDIT_STRING *str, STB_TexteditState *state, float x, float y)
203 //    void stb_textedit_drag(STB_TEXTEDIT_STRING *str, STB_TexteditState *state, float x, float y)
204 //    int  stb_textedit_cut(STB_TEXTEDIT_STRING *str, STB_TexteditState *state)
205 //    int  stb_textedit_paste(STB_TEXTEDIT_STRING *str, STB_TexteditState *state, STB_TEXTEDIT_CHARTYPE *text, int len)
206 //    void stb_textedit_key(STB_TEXTEDIT_STRING *str, STB_TexteditState *state, int key)
207 //
208 //    Each of these functions potentially updates the string and updates the
209 //    state.
210 //
211 //      initialize_state:
212 //          set the textedit state to a known good default state when initially
213 //          constructing the textedit.
214 //
215 //      click:
216 //          call this with the mouse x,y on a mouse down; it will update the cursor
217 //          and reset the selection start/end to the cursor point. the x,y must
218 //          be relative to the text widget, with (0,0) being the top left.
219 //     
220 //      drag:
221 //          call this with the mouse x,y on a mouse drag/up; it will update the
222 //          cursor and the selection end point
223 //     
224 //      cut:
225 //          call this to delete the current selection; returns true if there was
226 //          one. you should FIRST copy the current selection to the system paste buffer.
227 //          (To copy, just copy the current selection out of the string yourself.)
228 //     
229 //      paste:
230 //          call this to paste text at the current cursor point or over the current
231 //          selection if there is one.
232 //     
233 //      key:
234 //          call this for keyboard inputs sent to the textfield. you can use it
235 //          for "key down" events or for "translated" key events. if you need to
236 //          do both (as in Win32), or distinguish Unicode characters from control
237 //          inputs, set a high bit to distinguish the two; then you can define the
238 //          various definitions like STB_TEXTEDIT_K_LEFT have the is-key-event bit
239 //          set, and make STB_TEXTEDIT_KEYTOCHAR check that the is-key-event bit is
240 //          clear.
241 //     
242 //   When rendering, you can read the cursor position and selection state from
243 //   the STB_TexteditState.
244 //
245 //
246 // Notes:
247 //
248 // This is designed to be usable in IMGUI, so it allows for the possibility of
249 // running in an IMGUI that has NOT cached the multi-line layout. For this
250 // reason, it provides an interface that is compatible with computing the
251 // layout incrementally--we try to make sure we make as few passes through
252 // as possible. (For example, to locate the mouse pointer in the text, we
253 // could define functions that return the X and Y positions of characters
254 // and binary search Y and then X, but if we're doing dynamic layout this
255 // will run the layout algorithm many times, so instead we manually search
256 // forward in one pass. Similar logic applies to e.g. up-arrow and
257 // down-arrow movement.)
258 //
259 // If it's run in a widget that *has* cached the layout, then this is less
260 // efficient, but it's not horrible on modern computers. But you wouldn't
261 // want to edit million-line files with it.
262
263
264 ////////////////////////////////////////////////////////////////////////////
265 ////////////////////////////////////////////////////////////////////////////
266 ////
267 ////   Header-file mode
268 ////
269 ////
270
271 #ifndef INCLUDE_STB_TEXTEDIT_H
272 #define INCLUDE_STB_TEXTEDIT_H
273
274 ////////////////////////////////////////////////////////////////////////
275 //
276 //     STB_TexteditState
277 //
278 // Definition of STB_TexteditState which you should store
279 // per-textfield; it includes cursor position, selection state,
280 // and undo state.
281 //
282
283 #ifndef STB_TEXTEDIT_UNDOSTATECOUNT
284 #define STB_TEXTEDIT_UNDOSTATECOUNT   99
285 #endif
286 #ifndef STB_TEXTEDIT_UNDOCHARCOUNT
287 #define STB_TEXTEDIT_UNDOCHARCOUNT   999
288 #endif
289 #ifndef STB_TEXTEDIT_CHARTYPE
290 #define STB_TEXTEDIT_CHARTYPE        int
291 #endif
292 #ifndef STB_TEXTEDIT_POSITIONTYPE
293 #define STB_TEXTEDIT_POSITIONTYPE    int
294 #endif
295
296 typedef struct
297 {
298    // private data
299    STB_TEXTEDIT_POSITIONTYPE  where;
300    short           insert_length;
301    short           delete_length;
302    short           char_storage;
303 } StbUndoRecord;
304
305 typedef struct
306 {
307    // private data
308    StbUndoRecord          undo_rec [STB_TEXTEDIT_UNDOSTATECOUNT];
309    STB_TEXTEDIT_CHARTYPE  undo_char[STB_TEXTEDIT_UNDOCHARCOUNT];
310    short undo_point, redo_point;
311    short undo_char_point, redo_char_point;
312 } StbUndoState;
313
314 typedef struct
315 {
316    /////////////////////
317    //
318    // public data
319    //
320
321    int cursor;
322    // position of the text cursor within the string
323
324    int select_start;          // selection start point
325    int select_end;
326    // selection start and end point in characters; if equal, no selection.
327    // note that start may be less than or greater than end (e.g. when
328    // dragging the mouse, start is where the initial click was, and you
329    // can drag in either direction)
330
331    unsigned char insert_mode;
332    // each textfield keeps its own insert mode state. to keep an app-wide
333    // insert mode, copy this value in/out of the app state
334
335    /////////////////////
336    //
337    // private data
338    //
339    unsigned char cursor_at_end_of_line; // not implemented yet
340    unsigned char initialized;
341    unsigned char has_preferred_x;
342    unsigned char single_line;
343    unsigned char padding1, padding2, padding3;
344    float preferred_x; // this determines where the cursor up/down tries to seek to along x
345    StbUndoState undostate;
346 } STB_TexteditState;
347
348
349 ////////////////////////////////////////////////////////////////////////
350 //
351 //     StbTexteditRow
352 //
353 // Result of layout query, used by stb_textedit to determine where
354 // the text in each row is.
355
356 // result of layout query
357 typedef struct
358 {
359    float x0,x1;             // starting x location, end x location (allows for align=right, etc)
360    float baseline_y_delta;  // position of baseline relative to previous row's baseline
361    float ymin,ymax;         // height of row above and below baseline
362    int num_chars;
363 } StbTexteditRow;
364 #endif //INCLUDE_STB_TEXTEDIT_H
365
366
367 ////////////////////////////////////////////////////////////////////////////
368 ////////////////////////////////////////////////////////////////////////////
369 ////
370 ////   Implementation mode
371 ////
372 ////
373
374
375 // implementation isn't include-guarded, since it might have indirectly
376 // included just the "header" portion
377 #ifdef STB_TEXTEDIT_IMPLEMENTATION
378
379 #ifndef STB_TEXTEDIT_memmove
380 #include <string.h>
381 #define STB_TEXTEDIT_memmove memmove
382 #endif
383
384
385 /////////////////////////////////////////////////////////////////////////////
386 //
387 //      Mouse input handling
388 //
389
390 // traverse the layout to locate the nearest character to a display position
391 static int stb_text_locate_coord(STB_TEXTEDIT_STRING *str, float x, float y)
392 {
393    StbTexteditRow r;
394    int n = STB_TEXTEDIT_STRINGLEN(str);
395    float base_y = 0, prev_x;
396    int i=0, k;
397
398    r.x0 = r.x1 = 0;
399    r.ymin = r.ymax = 0;
400    r.num_chars = 0;
401
402    // search rows to find one that straddles 'y'
403    while (i < n) {
404       STB_TEXTEDIT_LAYOUTROW(&r, str, i);
405       if (r.num_chars <= 0)
406          return n;
407
408       if (i==0 && y < base_y + r.ymin)
409          return 0;
410
411       if (y < base_y + r.ymax)
412          break;
413
414       i += r.num_chars;
415       base_y += r.baseline_y_delta;
416    }
417
418    // below all text, return 'after' last character
419    if (i >= n)
420       return n;
421
422    // check if it's before the beginning of the line
423    if (x < r.x0)
424       return i;
425
426    // check if it's before the end of the line
427    if (x < r.x1) {
428       // search characters in row for one that straddles 'x'
429       prev_x = r.x0;
430       for (k=0; k < r.num_chars; ++k) {
431          float w = STB_TEXTEDIT_GETWIDTH(str, i, k);
432          if (x < prev_x+w) {
433             if (x < prev_x+w/2)
434                return k+i;
435             else
436                return k+i+1;
437          }
438          prev_x += w;
439       }
440       // shouldn't happen, but if it does, fall through to end-of-line case
441    }
442
443    // if the last character is a newline, return that. otherwise return 'after' the last character
444    if (STB_TEXTEDIT_GETCHAR(str, i+r.num_chars-1) == STB_TEXTEDIT_NEWLINE)
445       return i+r.num_chars-1;
446    else
447       return i+r.num_chars;
448 }
449
450 // API click: on mouse down, move the cursor to the clicked location, and reset the selection
451 static void stb_textedit_click(STB_TEXTEDIT_STRING *str, STB_TexteditState *state, float x, float y)
452 {
453    state->cursor = stb_text_locate_coord(str, x, y);
454    state->select_start = state->cursor;
455    state->select_end = state->cursor;
456    state->has_preferred_x = 0;
457 }
458
459 // API drag: on mouse drag, move the cursor and selection endpoint to the clicked location
460 static void stb_textedit_drag(STB_TEXTEDIT_STRING *str, STB_TexteditState *state, float x, float y)
461 {
462    int p = stb_text_locate_coord(str, x, y);
463    if (state->select_start == state->select_end)
464       state->select_start = state->cursor;
465    state->cursor = state->select_end = p;
466 }
467
468 /////////////////////////////////////////////////////////////////////////////
469 //
470 //      Keyboard input handling
471 //
472
473 // forward declarations
474 static void stb_text_undo(STB_TEXTEDIT_STRING *str, STB_TexteditState *state);
475 static void stb_text_redo(STB_TEXTEDIT_STRING *str, STB_TexteditState *state);
476 static void stb_text_makeundo_delete(STB_TEXTEDIT_STRING *str, STB_TexteditState *state, int where, int length);
477 static void stb_text_makeundo_insert(STB_TexteditState *state, int where, int length);
478 static void stb_text_makeundo_replace(STB_TEXTEDIT_STRING *str, STB_TexteditState *state, int where, int old_length, int new_length);
479
480 typedef struct
481 {
482    float x,y;    // position of n'th character
483    float height; // height of line
484    int first_char, length; // first char of row, and length
485    int prev_first;  // first char of previous row
486 } StbFindState;
487
488 // find the x/y location of a character, and remember info about the previous row in
489 // case we get a move-up event (for page up, we'll have to rescan)
490 static void stb_textedit_find_charpos(StbFindState *find, STB_TEXTEDIT_STRING *str, int n, int single_line)
491 {
492    StbTexteditRow r;
493    int prev_start = 0;
494    int z = STB_TEXTEDIT_STRINGLEN(str);
495    int i=0, first;
496
497    if (n == z) {
498       // if it's at the end, then find the last line -- simpler than trying to
499       // explicitly handle this case in the regular code
500       if (single_line) {
501          STB_TEXTEDIT_LAYOUTROW(&r, str, 0);
502          find->y = 0;
503          find->first_char = 0;
504          find->length = z;
505          find->height = r.ymax - r.ymin;
506          find->x = r.x1;
507       } else {
508          find->y = 0;
509          find->x = 0;
510          find->height = 1;
511          while (i < z) {
512             STB_TEXTEDIT_LAYOUTROW(&r, str, i);
513             prev_start = i;
514             i += r.num_chars;
515          }
516          find->first_char = i;
517          find->length = 0;
518          find->prev_first = prev_start;
519       }
520       return;
521    }
522
523    // search rows to find the one that straddles character n
524    find->y = 0;
525
526    for(;;) {
527       STB_TEXTEDIT_LAYOUTROW(&r, str, i);
528       if (n < i + r.num_chars)
529          break;
530       prev_start = i;
531       i += r.num_chars;
532       find->y += r.baseline_y_delta;
533    }
534
535    find->first_char = first = i;
536    find->length = r.num_chars;
537    find->height = r.ymax - r.ymin;
538    find->prev_first = prev_start;
539
540    // now scan to find xpos
541    find->x = r.x0;
542    i = 0;
543    for (i=0; first+i < n; ++i)
544       find->x += STB_TEXTEDIT_GETWIDTH(str, first, i);
545 }
546
547 #define STB_TEXT_HAS_SELECTION(s)   ((s)->select_start != (s)->select_end)
548
549 // make the selection/cursor state valid if client altered the string
550 static void stb_textedit_clamp(STB_TEXTEDIT_STRING *str, STB_TexteditState *state)
551 {
552    int n = STB_TEXTEDIT_STRINGLEN(str);
553    if (STB_TEXT_HAS_SELECTION(state)) {
554       if (state->select_start > n) state->select_start = n;
555       if (state->select_end   > n) state->select_end = n;
556       // if clamping forced them to be equal, move the cursor to match
557       if (state->select_start == state->select_end)
558          state->cursor = state->select_start;
559    }
560    if (state->cursor > n) state->cursor = n;
561 }
562
563 // delete characters while updating undo
564 static void stb_textedit_delete(STB_TEXTEDIT_STRING *str, STB_TexteditState *state, int where, int len)
565 {
566    stb_text_makeundo_delete(str, state, where, len);
567    STB_TEXTEDIT_DELETECHARS(str, where, len);
568    state->has_preferred_x = 0;
569 }
570
571 // delete the section
572 static void stb_textedit_delete_selection(STB_TEXTEDIT_STRING *str, STB_TexteditState *state)
573 {
574    stb_textedit_clamp(str, state);
575    if (STB_TEXT_HAS_SELECTION(state)) {
576       if (state->select_start < state->select_end) {
577          stb_textedit_delete(str, state, state->select_start, state->select_end - state->select_start);
578          state->select_end = state->cursor = state->select_start;
579       } else {
580          stb_textedit_delete(str, state, state->select_end, state->select_start - state->select_end);
581          state->select_start = state->cursor = state->select_end;
582       }
583       state->has_preferred_x = 0;
584    }
585 }
586
587 // canoncialize the selection so start <= end
588 static void stb_textedit_sortselection(STB_TexteditState *state)
589 {
590    if (state->select_end < state->select_start) {
591       int temp = state->select_end;
592       state->select_end = state->select_start;
593       state->select_start = temp;
594    }
595 }
596
597 // move cursor to first character of selection
598 static void stb_textedit_move_to_first(STB_TexteditState *state)
599 {
600    if (STB_TEXT_HAS_SELECTION(state)) {
601       stb_textedit_sortselection(state);
602       state->cursor = state->select_start;
603       state->select_end = state->select_start;
604       state->has_preferred_x = 0;
605    }
606 }
607
608 // move cursor to last character of selection
609 static void stb_textedit_move_to_last(STB_TEXTEDIT_STRING *str, STB_TexteditState *state)
610 {
611    if (STB_TEXT_HAS_SELECTION(state)) {
612       stb_textedit_sortselection(state);
613       stb_textedit_clamp(str, state);
614       state->cursor = state->select_end;
615       state->select_start = state->select_end;
616       state->has_preferred_x = 0;
617    }
618 }
619
620 #ifdef STB_TEXTEDIT_IS_SPACE
621 static int is_word_boundary( STB_TEXTEDIT_STRING *str, int idx )
622 {
623    return idx > 0 ? (STB_TEXTEDIT_IS_SPACE( STB_TEXTEDIT_GETCHAR(str,idx-1) ) && !STB_TEXTEDIT_IS_SPACE( STB_TEXTEDIT_GETCHAR(str, idx) ) ) : 1;
624 }
625
626 #ifndef STB_TEXTEDIT_MOVEWORDLEFT
627 static int stb_textedit_move_to_word_previous( STB_TEXTEDIT_STRING *str, int c )
628 {
629    --c; // always move at least one character
630    while( c >= 0 && !is_word_boundary( str, c ) )
631       --c;
632
633    if( c < 0 )
634       c = 0;
635
636    return c;
637 }
638 #define STB_TEXTEDIT_MOVEWORDLEFT stb_textedit_move_to_word_previous
639 #endif
640
641 #ifndef STB_TEXTEDIT_MOVEWORDRIGHT
642 static int stb_textedit_move_to_word_next( STB_TEXTEDIT_STRING *str, int c )
643 {
644    const int len = STB_TEXTEDIT_STRINGLEN(str);
645    ++c; // always move at least one character
646    while( c < len && !is_word_boundary( str, c ) )
647       ++c;
648
649    if( c > len )
650       c = len;
651
652    return c;
653 }
654 #define STB_TEXTEDIT_MOVEWORDRIGHT stb_textedit_move_to_word_next
655 #endif
656
657 #endif
658
659 // update selection and cursor to match each other
660 static void stb_textedit_prep_selection_at_cursor(STB_TexteditState *state)
661 {
662    if (!STB_TEXT_HAS_SELECTION(state))
663       state->select_start = state->select_end = state->cursor;
664    else
665       state->cursor = state->select_end;
666 }
667
668 // API cut: delete selection
669 static int stb_textedit_cut(STB_TEXTEDIT_STRING *str, STB_TexteditState *state)
670 {
671    if (STB_TEXT_HAS_SELECTION(state)) {
672       stb_textedit_delete_selection(str,state); // implicity clamps
673       state->has_preferred_x = 0;
674       return 1;
675    }
676    return 0;
677 }
678
679 // API paste: replace existing selection with passed-in text
680 static int stb_textedit_paste(STB_TEXTEDIT_STRING *str, STB_TexteditState *state, STB_TEXTEDIT_CHARTYPE const *ctext, int len)
681 {
682    STB_TEXTEDIT_CHARTYPE *text = (STB_TEXTEDIT_CHARTYPE *) ctext;
683    // if there's a selection, the paste should delete it
684    stb_textedit_clamp(str, state);
685    stb_textedit_delete_selection(str,state);
686    // try to insert the characters
687    if (STB_TEXTEDIT_INSERTCHARS(str, state->cursor, text, len)) {
688       stb_text_makeundo_insert(state, state->cursor, len);
689       state->cursor += len;
690       state->has_preferred_x = 0;
691       return 1;
692    }
693    // remove the undo since we didn't actually insert the characters
694    if (state->undostate.undo_point)
695       --state->undostate.undo_point;
696    return 0;
697 }
698
699 // API key: process a keyboard input
700 static void stb_textedit_key(STB_TEXTEDIT_STRING *str, STB_TexteditState *state, int key)
701 {
702 retry:
703    switch (key) {
704       default: {
705          int c = STB_TEXTEDIT_KEYTOTEXT(key);
706          if (c > 0) {
707             STB_TEXTEDIT_CHARTYPE ch = (STB_TEXTEDIT_CHARTYPE) c;
708
709             // can't add newline in single-line mode
710             if (c == '\n' && state->single_line)
711                break;
712
713             if (state->insert_mode && !STB_TEXT_HAS_SELECTION(state) && state->cursor < STB_TEXTEDIT_STRINGLEN(str)) {
714                stb_text_makeundo_replace(str, state, state->cursor, 1, 1);
715                STB_TEXTEDIT_DELETECHARS(str, state->cursor, 1);
716                if (STB_TEXTEDIT_INSERTCHARS(str, state->cursor, &ch, 1)) {
717                   ++state->cursor;
718                   state->has_preferred_x = 0;
719                }
720             } else {
721                stb_textedit_delete_selection(str,state); // implicity clamps
722                if (STB_TEXTEDIT_INSERTCHARS(str, state->cursor, &ch, 1)) {
723                   stb_text_makeundo_insert(state, state->cursor, 1);
724                   ++state->cursor;
725                   state->has_preferred_x = 0;
726                }
727             }
728          }
729          break;
730       }
731
732 #ifdef STB_TEXTEDIT_K_INSERT
733       case STB_TEXTEDIT_K_INSERT:
734          state->insert_mode = !state->insert_mode;
735          break;
736 #endif
737          
738       case STB_TEXTEDIT_K_UNDO:
739          stb_text_undo(str, state);
740          state->has_preferred_x = 0;
741          break;
742
743       case STB_TEXTEDIT_K_REDO:
744          stb_text_redo(str, state);
745          state->has_preferred_x = 0;
746          break;
747
748       case STB_TEXTEDIT_K_LEFT:
749          // if currently there's a selection, move cursor to start of selection
750          if (STB_TEXT_HAS_SELECTION(state))
751             stb_textedit_move_to_first(state);
752          else 
753             if (state->cursor > 0)
754                --state->cursor;
755          state->has_preferred_x = 0;
756          break;
757
758       case STB_TEXTEDIT_K_RIGHT:
759          // if currently there's a selection, move cursor to end of selection
760          if (STB_TEXT_HAS_SELECTION(state))
761             stb_textedit_move_to_last(str, state);
762          else
763             ++state->cursor;
764          stb_textedit_clamp(str, state);
765          state->has_preferred_x = 0;
766          break;
767
768       case STB_TEXTEDIT_K_LEFT | STB_TEXTEDIT_K_SHIFT:
769          stb_textedit_clamp(str, state);
770          stb_textedit_prep_selection_at_cursor(state);
771          // move selection left
772          if (state->select_end > 0)
773             --state->select_end;
774          state->cursor = state->select_end;
775          state->has_preferred_x = 0;
776          break;
777
778 #ifdef STB_TEXTEDIT_MOVEWORDLEFT
779       case STB_TEXTEDIT_K_WORDLEFT:
780          if (STB_TEXT_HAS_SELECTION(state))
781             stb_textedit_move_to_first(state);
782          else {
783             state->cursor = STB_TEXTEDIT_MOVEWORDLEFT(str, state->cursor);
784             stb_textedit_clamp( str, state );
785          }
786          break;
787
788       case STB_TEXTEDIT_K_WORDLEFT | STB_TEXTEDIT_K_SHIFT:
789          if( !STB_TEXT_HAS_SELECTION( state ) )
790             stb_textedit_prep_selection_at_cursor(state);
791
792          state->cursor = STB_TEXTEDIT_MOVEWORDLEFT(str, state->cursor);
793          state->select_end = state->cursor;
794
795          stb_textedit_clamp( str, state );
796          break;
797 #endif
798
799 #ifdef STB_TEXTEDIT_MOVEWORDRIGHT
800       case STB_TEXTEDIT_K_WORDRIGHT:
801          if (STB_TEXT_HAS_SELECTION(state)) 
802             stb_textedit_move_to_last(str, state);
803          else {
804             state->cursor = STB_TEXTEDIT_MOVEWORDRIGHT(str, state->cursor);
805             stb_textedit_clamp( str, state );
806          }
807          break;
808
809       case STB_TEXTEDIT_K_WORDRIGHT | STB_TEXTEDIT_K_SHIFT:
810          if( !STB_TEXT_HAS_SELECTION( state ) )
811             stb_textedit_prep_selection_at_cursor(state);
812
813          state->cursor = STB_TEXTEDIT_MOVEWORDRIGHT(str, state->cursor);
814          state->select_end = state->cursor;
815
816          stb_textedit_clamp( str, state );
817          break;
818 #endif
819
820       case STB_TEXTEDIT_K_RIGHT | STB_TEXTEDIT_K_SHIFT:
821          stb_textedit_prep_selection_at_cursor(state);
822          // move selection right
823          ++state->select_end;
824          stb_textedit_clamp(str, state);
825          state->cursor = state->select_end;
826          state->has_preferred_x = 0;
827          break;
828
829       case STB_TEXTEDIT_K_DOWN:
830       case STB_TEXTEDIT_K_DOWN | STB_TEXTEDIT_K_SHIFT: {
831          StbFindState find;
832          StbTexteditRow row;
833          int i, sel = (key & STB_TEXTEDIT_K_SHIFT) != 0;
834
835          if (state->single_line) {
836             // on windows, up&down in single-line behave like left&right
837             key = STB_TEXTEDIT_K_RIGHT | (key & STB_TEXTEDIT_K_SHIFT);
838             goto retry;
839          }
840
841          if (sel)
842             stb_textedit_prep_selection_at_cursor(state);
843          else if (STB_TEXT_HAS_SELECTION(state))
844             stb_textedit_move_to_last(str,state);
845
846          // compute current position of cursor point
847          stb_textedit_clamp(str, state);
848          stb_textedit_find_charpos(&find, str, state->cursor, state->single_line);
849
850          // now find character position down a row
851          if (find.length) {
852             float goal_x = state->has_preferred_x ? state->preferred_x : find.x;
853             float x;
854             int start = find.first_char + find.length;
855             state->cursor = start;
856             STB_TEXTEDIT_LAYOUTROW(&row, str, state->cursor);
857             x = row.x0;
858             for (i=0; i < row.num_chars; ++i) {
859                float dx = STB_TEXTEDIT_GETWIDTH(str, start, i);
860                #ifdef STB_TEXTEDIT_GETWIDTH_NEWLINE
861                if (dx == STB_TEXTEDIT_GETWIDTH_NEWLINE)
862                   break;
863                #endif
864                x += dx;
865                if (x > goal_x)
866                   break;
867                ++state->cursor;
868             }
869             stb_textedit_clamp(str, state);
870
871             state->has_preferred_x = 1;
872             state->preferred_x = goal_x;
873
874             if (sel)
875                state->select_end = state->cursor;
876          }
877          break;
878       }
879          
880       case STB_TEXTEDIT_K_UP:
881       case STB_TEXTEDIT_K_UP | STB_TEXTEDIT_K_SHIFT: {
882          StbFindState find;
883          StbTexteditRow row;
884          int i, sel = (key & STB_TEXTEDIT_K_SHIFT) != 0;
885
886          if (state->single_line) {
887             // on windows, up&down become left&right
888             key = STB_TEXTEDIT_K_LEFT | (key & STB_TEXTEDIT_K_SHIFT);
889             goto retry;
890          }
891
892          if (sel)
893             stb_textedit_prep_selection_at_cursor(state);
894          else if (STB_TEXT_HAS_SELECTION(state))
895             stb_textedit_move_to_first(state);
896
897          // compute current position of cursor point
898          stb_textedit_clamp(str, state);
899          stb_textedit_find_charpos(&find, str, state->cursor, state->single_line);
900
901          // can only go up if there's a previous row
902          if (find.prev_first != find.first_char) {
903             // now find character position up a row
904             float goal_x = state->has_preferred_x ? state->preferred_x : find.x;
905             float x;
906             state->cursor = find.prev_first;
907             STB_TEXTEDIT_LAYOUTROW(&row, str, state->cursor);
908             x = row.x0;
909             for (i=0; i < row.num_chars; ++i) {
910                float dx = STB_TEXTEDIT_GETWIDTH(str, find.prev_first, i);
911                #ifdef STB_TEXTEDIT_GETWIDTH_NEWLINE
912                if (dx == STB_TEXTEDIT_GETWIDTH_NEWLINE)
913                   break;
914                #endif
915                x += dx;
916                if (x > goal_x)
917                   break;
918                ++state->cursor;
919             }
920             stb_textedit_clamp(str, state);
921
922             state->has_preferred_x = 1;
923             state->preferred_x = goal_x;
924
925             if (sel)
926                state->select_end = state->cursor;
927          }
928          break;
929       }
930
931       case STB_TEXTEDIT_K_DELETE:
932       case STB_TEXTEDIT_K_DELETE | STB_TEXTEDIT_K_SHIFT:
933          if (STB_TEXT_HAS_SELECTION(state))
934             stb_textedit_delete_selection(str, state);
935          else {
936             int n = STB_TEXTEDIT_STRINGLEN(str);
937             if (state->cursor < n)
938                stb_textedit_delete(str, state, state->cursor, 1);
939          }
940          state->has_preferred_x = 0;
941          break;
942
943       case STB_TEXTEDIT_K_BACKSPACE:
944       case STB_TEXTEDIT_K_BACKSPACE | STB_TEXTEDIT_K_SHIFT:
945          if (STB_TEXT_HAS_SELECTION(state))
946             stb_textedit_delete_selection(str, state);
947          else {
948             stb_textedit_clamp(str, state);
949             if (state->cursor > 0) {
950                stb_textedit_delete(str, state, state->cursor-1, 1);
951                --state->cursor;
952             }
953          }
954          state->has_preferred_x = 0;
955          break;
956          
957 #ifdef STB_TEXTEDIT_K_TEXTSTART2
958       case STB_TEXTEDIT_K_TEXTSTART2:
959 #endif
960       case STB_TEXTEDIT_K_TEXTSTART:
961          state->cursor = state->select_start = state->select_end = 0;
962          state->has_preferred_x = 0;
963          break;
964
965 #ifdef STB_TEXTEDIT_K_TEXTEND2
966       case STB_TEXTEDIT_K_TEXTEND2:
967 #endif
968       case STB_TEXTEDIT_K_TEXTEND:
969          state->cursor = STB_TEXTEDIT_STRINGLEN(str);
970          state->select_start = state->select_end = 0;
971          state->has_preferred_x = 0;
972          break;
973         
974 #ifdef STB_TEXTEDIT_K_TEXTSTART2
975       case STB_TEXTEDIT_K_TEXTSTART2 | STB_TEXTEDIT_K_SHIFT:
976 #endif
977       case STB_TEXTEDIT_K_TEXTSTART | STB_TEXTEDIT_K_SHIFT:
978          stb_textedit_prep_selection_at_cursor(state);
979          state->cursor = state->select_end = 0;
980          state->has_preferred_x = 0;
981          break;
982
983 #ifdef STB_TEXTEDIT_K_TEXTEND2
984       case STB_TEXTEDIT_K_TEXTEND2 | STB_TEXTEDIT_K_SHIFT:
985 #endif
986       case STB_TEXTEDIT_K_TEXTEND | STB_TEXTEDIT_K_SHIFT:
987          stb_textedit_prep_selection_at_cursor(state);
988          state->cursor = state->select_end = STB_TEXTEDIT_STRINGLEN(str);
989          state->has_preferred_x = 0;
990          break;
991
992
993 #ifdef STB_TEXTEDIT_K_LINESTART2
994       case STB_TEXTEDIT_K_LINESTART2:
995 #endif
996       case STB_TEXTEDIT_K_LINESTART:
997          stb_textedit_clamp(str, state);
998          stb_textedit_move_to_first(state);
999          if (state->single_line)
1000             state->cursor = 0;
1001          else while (state->cursor > 0 && STB_TEXTEDIT_GETCHAR(str, state->cursor-1) != STB_TEXTEDIT_NEWLINE)
1002             --state->cursor;
1003          state->has_preferred_x = 0;
1004          break;
1005
1006 #ifdef STB_TEXTEDIT_K_LINEEND2
1007       case STB_TEXTEDIT_K_LINEEND2:
1008 #endif
1009       case STB_TEXTEDIT_K_LINEEND: {
1010          int n = STB_TEXTEDIT_STRINGLEN(str);
1011          stb_textedit_clamp(str, state);
1012          stb_textedit_move_to_first(state);
1013          if (state->single_line)
1014              state->cursor = n;
1015          else while (state->cursor < n && STB_TEXTEDIT_GETCHAR(str, state->cursor) != STB_TEXTEDIT_NEWLINE)
1016              ++state->cursor;
1017          state->has_preferred_x = 0;
1018          break;
1019       }
1020
1021 #ifdef STB_TEXTEDIT_K_LINESTART2
1022       case STB_TEXTEDIT_K_LINESTART2 | STB_TEXTEDIT_K_SHIFT:
1023 #endif
1024       case STB_TEXTEDIT_K_LINESTART | STB_TEXTEDIT_K_SHIFT:
1025          stb_textedit_clamp(str, state);
1026          stb_textedit_prep_selection_at_cursor(state);
1027          if (state->single_line)
1028             state->cursor = 0;
1029          else while (state->cursor > 0 && STB_TEXTEDIT_GETCHAR(str, state->cursor-1) != STB_TEXTEDIT_NEWLINE)
1030             --state->cursor;
1031          state->select_end = state->cursor;
1032          state->has_preferred_x = 0;
1033          break;
1034
1035 #ifdef STB_TEXTEDIT_K_LINEEND2
1036       case STB_TEXTEDIT_K_LINEEND2 | STB_TEXTEDIT_K_SHIFT:
1037 #endif
1038       case STB_TEXTEDIT_K_LINEEND | STB_TEXTEDIT_K_SHIFT: {
1039          int n = STB_TEXTEDIT_STRINGLEN(str);
1040          stb_textedit_clamp(str, state);
1041          stb_textedit_prep_selection_at_cursor(state);
1042          if (state->single_line)
1043              state->cursor = n;
1044          else while (state->cursor < n && STB_TEXTEDIT_GETCHAR(str, state->cursor) != STB_TEXTEDIT_NEWLINE)
1045             ++state->cursor;
1046          state->select_end = state->cursor;
1047          state->has_preferred_x = 0;
1048          break;
1049       }
1050
1051 // @TODO:
1052 //    STB_TEXTEDIT_K_PGUP      - move cursor up a page
1053 //    STB_TEXTEDIT_K_PGDOWN    - move cursor down a page
1054    }
1055 }
1056
1057 /////////////////////////////////////////////////////////////////////////////
1058 //
1059 //      Undo processing
1060 //
1061 // @OPTIMIZE: the undo/redo buffer should be circular
1062
1063 static void stb_textedit_flush_redo(StbUndoState *state)
1064 {
1065    state->redo_point = STB_TEXTEDIT_UNDOSTATECOUNT;
1066    state->redo_char_point = STB_TEXTEDIT_UNDOCHARCOUNT;
1067 }
1068
1069 // discard the oldest entry in the undo list
1070 static void stb_textedit_discard_undo(StbUndoState *state)
1071 {
1072    if (state->undo_point > 0) {
1073       // if the 0th undo state has characters, clean those up
1074       if (state->undo_rec[0].char_storage >= 0) {
1075          int n = state->undo_rec[0].insert_length, i;
1076          // delete n characters from all other records
1077          state->undo_char_point = state->undo_char_point - (short) n;  // vsnet05
1078          STB_TEXTEDIT_memmove(state->undo_char, state->undo_char + n, (size_t) ((size_t)state->undo_char_point*sizeof(STB_TEXTEDIT_CHARTYPE)));
1079          for (i=0; i < state->undo_point; ++i)
1080             if (state->undo_rec[i].char_storage >= 0)
1081                state->undo_rec[i].char_storage = state->undo_rec[i].char_storage - (short) n; // vsnet05 // @OPTIMIZE: get rid of char_storage and infer it
1082       }
1083       --state->undo_point;
1084       STB_TEXTEDIT_memmove(state->undo_rec, state->undo_rec+1, (size_t) ((size_t)state->undo_point*sizeof(state->undo_rec[0])));
1085    }
1086 }
1087
1088 // discard the oldest entry in the redo list--it's bad if this
1089 // ever happens, but because undo & redo have to store the actual
1090 // characters in different cases, the redo character buffer can
1091 // fill up even though the undo buffer didn't
1092 static void stb_textedit_discard_redo(StbUndoState *state)
1093 {
1094    int k = STB_TEXTEDIT_UNDOSTATECOUNT-1;
1095
1096    if (state->redo_point <= k) {
1097       // if the k'th undo state has characters, clean those up
1098       if (state->undo_rec[k].char_storage >= 0) {
1099          int n = state->undo_rec[k].insert_length, i;
1100          // delete n characters from all other records
1101          state->redo_char_point = state->redo_char_point + (short) n; // vsnet05
1102          STB_TEXTEDIT_memmove(state->undo_char + state->redo_char_point, state->undo_char + state->redo_char_point-n, (size_t) ((size_t)(STB_TEXTEDIT_UNDOCHARCOUNT - state->redo_char_point)*sizeof(STB_TEXTEDIT_CHARTYPE)));
1103          for (i=state->redo_point; i < k; ++i)
1104             if (state->undo_rec[i].char_storage >= 0)
1105                state->undo_rec[i].char_storage = state->undo_rec[i].char_storage + (short) n; // vsnet05
1106       }
1107       STB_TEXTEDIT_memmove(state->undo_rec + state->redo_point, state->undo_rec + state->redo_point-1, (size_t) ((size_t)(STB_TEXTEDIT_UNDOSTATECOUNT - state->redo_point)*sizeof(state->undo_rec[0])));
1108       ++state->redo_point;
1109    }
1110 }
1111
1112 static StbUndoRecord *stb_text_create_undo_record(StbUndoState *state, int numchars)
1113 {
1114    // any time we create a new undo record, we discard redo
1115    stb_textedit_flush_redo(state);
1116
1117    // if we have no free records, we have to make room, by sliding the
1118    // existing records down
1119    if (state->undo_point == STB_TEXTEDIT_UNDOSTATECOUNT)
1120       stb_textedit_discard_undo(state);
1121
1122    // if the characters to store won't possibly fit in the buffer, we can't undo
1123    if (numchars > STB_TEXTEDIT_UNDOCHARCOUNT) {
1124       state->undo_point = 0;
1125       state->undo_char_point = 0;
1126       return NULL;
1127    }
1128
1129    // if we don't have enough free characters in the buffer, we have to make room
1130    while (state->undo_char_point + numchars > STB_TEXTEDIT_UNDOCHARCOUNT)
1131       stb_textedit_discard_undo(state);
1132
1133    return &state->undo_rec[state->undo_point++];
1134 }
1135
1136 static STB_TEXTEDIT_CHARTYPE *stb_text_createundo(StbUndoState *state, int pos, int insert_len, int delete_len)
1137 {
1138    StbUndoRecord *r = stb_text_create_undo_record(state, insert_len);
1139    if (r == NULL)
1140       return NULL;
1141
1142    r->where = pos;
1143    r->insert_length = (short) insert_len;
1144    r->delete_length = (short) delete_len;
1145
1146    if (insert_len == 0) {
1147       r->char_storage = -1;
1148       return NULL;
1149    } else {
1150       r->char_storage = state->undo_char_point;
1151       state->undo_char_point = state->undo_char_point + (short) insert_len;
1152       return &state->undo_char[r->char_storage];
1153    }
1154 }
1155
1156 static void stb_text_undo(STB_TEXTEDIT_STRING *str, STB_TexteditState *state)
1157 {
1158    StbUndoState *s = &state->undostate;
1159    StbUndoRecord u, *r;
1160    if (s->undo_point == 0)
1161       return;
1162
1163    // we need to do two things: apply the undo record, and create a redo record
1164    u = s->undo_rec[s->undo_point-1];
1165    r = &s->undo_rec[s->redo_point-1];
1166    r->char_storage = -1;
1167
1168    r->insert_length = u.delete_length;
1169    r->delete_length = u.insert_length;
1170    r->where = u.where;
1171
1172    if (u.delete_length) {
1173       // if the undo record says to delete characters, then the redo record will
1174       // need to re-insert the characters that get deleted, so we need to store
1175       // them.
1176
1177       // there are three cases:
1178       //    there's enough room to store the characters
1179       //    characters stored for *redoing* don't leave room for redo
1180       //    characters stored for *undoing* don't leave room for redo
1181       // if the last is true, we have to bail
1182
1183       if (s->undo_char_point + u.delete_length >= STB_TEXTEDIT_UNDOCHARCOUNT) {
1184          // the undo records take up too much character space; there's no space to store the redo characters
1185          r->insert_length = 0;
1186       } else {
1187          int i;
1188
1189          // there's definitely room to store the characters eventually
1190          while (s->undo_char_point + u.delete_length > s->redo_char_point) {
1191             // there's currently not enough room, so discard a redo record
1192             stb_textedit_discard_redo(s);
1193             // should never happen:
1194             if (s->redo_point == STB_TEXTEDIT_UNDOSTATECOUNT)
1195                return;
1196          }
1197          r = &s->undo_rec[s->redo_point-1];
1198
1199          r->char_storage = s->redo_char_point - u.delete_length;
1200          s->redo_char_point = s->redo_char_point - (short) u.delete_length;
1201
1202          // now save the characters
1203          for (i=0; i < u.delete_length; ++i)
1204             s->undo_char[r->char_storage + i] = STB_TEXTEDIT_GETCHAR(str, u.where + i);
1205       }
1206
1207       // now we can carry out the deletion
1208       STB_TEXTEDIT_DELETECHARS(str, u.where, u.delete_length);
1209    }
1210
1211    // check type of recorded action:
1212    if (u.insert_length) {
1213       // easy case: was a deletion, so we need to insert n characters
1214       STB_TEXTEDIT_INSERTCHARS(str, u.where, &s->undo_char[u.char_storage], u.insert_length);
1215       s->undo_char_point -= u.insert_length;
1216    }
1217
1218    state->cursor = u.where + u.insert_length;
1219
1220    s->undo_point--;
1221    s->redo_point--;
1222 }
1223
1224 static void stb_text_redo(STB_TEXTEDIT_STRING *str, STB_TexteditState *state)
1225 {
1226    StbUndoState *s = &state->undostate;
1227    StbUndoRecord *u, r;
1228    if (s->redo_point == STB_TEXTEDIT_UNDOSTATECOUNT)
1229       return;
1230
1231    // we need to do two things: apply the redo record, and create an undo record
1232    u = &s->undo_rec[s->undo_point];
1233    r = s->undo_rec[s->redo_point];
1234
1235    // we KNOW there must be room for the undo record, because the redo record
1236    // was derived from an undo record
1237
1238    u->delete_length = r.insert_length;
1239    u->insert_length = r.delete_length;
1240    u->where = r.where;
1241    u->char_storage = -1;
1242
1243    if (r.delete_length) {
1244       // the redo record requires us to delete characters, so the undo record
1245       // needs to store the characters
1246
1247       if (s->undo_char_point + u->insert_length > s->redo_char_point) {
1248          u->insert_length = 0;
1249          u->delete_length = 0;
1250       } else {
1251          int i;
1252          u->char_storage = s->undo_char_point;
1253          s->undo_char_point = s->undo_char_point + u->insert_length;
1254
1255          // now save the characters
1256          for (i=0; i < u->insert_length; ++i)
1257             s->undo_char[u->char_storage + i] = STB_TEXTEDIT_GETCHAR(str, u->where + i);
1258       }
1259
1260       STB_TEXTEDIT_DELETECHARS(str, r.where, r.delete_length);
1261    }
1262
1263    if (r.insert_length) {
1264       // easy case: need to insert n characters
1265       STB_TEXTEDIT_INSERTCHARS(str, r.where, &s->undo_char[r.char_storage], r.insert_length);
1266       s->redo_char_point += r.insert_length;
1267    }
1268
1269    state->cursor = r.where + r.insert_length;
1270
1271    s->undo_point++;
1272    s->redo_point++;
1273 }
1274
1275 static void stb_text_makeundo_insert(STB_TexteditState *state, int where, int length)
1276 {
1277    stb_text_createundo(&state->undostate, where, 0, length);
1278 }
1279
1280 static void stb_text_makeundo_delete(STB_TEXTEDIT_STRING *str, STB_TexteditState *state, int where, int length)
1281 {
1282    int i;
1283    STB_TEXTEDIT_CHARTYPE *p = stb_text_createundo(&state->undostate, where, length, 0);
1284    if (p) {
1285       for (i=0; i < length; ++i)
1286          p[i] = STB_TEXTEDIT_GETCHAR(str, where+i);
1287    }
1288 }
1289
1290 static void stb_text_makeundo_replace(STB_TEXTEDIT_STRING *str, STB_TexteditState *state, int where, int old_length, int new_length)
1291 {
1292    int i;
1293    STB_TEXTEDIT_CHARTYPE *p = stb_text_createundo(&state->undostate, where, old_length, new_length);
1294    if (p) {
1295       for (i=0; i < old_length; ++i)
1296          p[i] = STB_TEXTEDIT_GETCHAR(str, where+i);
1297    }
1298 }
1299
1300 // reset the state to default
1301 static void stb_textedit_clear_state(STB_TexteditState *state, int is_single_line)
1302 {
1303    state->undostate.undo_point = 0;
1304    state->undostate.undo_char_point = 0;
1305    state->undostate.redo_point = STB_TEXTEDIT_UNDOSTATECOUNT;
1306    state->undostate.redo_char_point = STB_TEXTEDIT_UNDOCHARCOUNT;
1307    state->select_end = state->select_start = 0;
1308    state->cursor = 0;
1309    state->has_preferred_x = 0;
1310    state->preferred_x = 0;
1311    state->cursor_at_end_of_line = 0;
1312    state->initialized = 1;
1313    state->single_line = (unsigned char) is_single_line;
1314    state->insert_mode = 0;
1315 }
1316
1317 // API initialize
1318 static void stb_textedit_initialize_state(STB_TexteditState *state, int is_single_line)
1319 {
1320    stb_textedit_clear_state(state, is_single_line);
1321 }
1322 #endif//STB_TEXTEDIT_IMPLEMENTATION