From e2681caf9cdf056942792a06b74c729a05d7b5b0 Mon Sep 17 00:00:00 2001 From: Michael Drake Date: Thu, 7 Jul 2011 11:50:45 +0000 Subject: Reduce forward declaration of functions. svn path=/trunk/netsurf/; revision=12586 --- desktop/textinput.c | 3327 +++++++++++++++++++++++++-------------------------- 1 file changed, 1651 insertions(+), 1676 deletions(-) diff --git a/desktop/textinput.c b/desktop/textinput.c index 7a3983ab7..ceb90007e 100644 --- a/desktop/textinput.c +++ b/desktop/textinput.c @@ -52,50 +52,23 @@ struct caret ghost_caret; +static bool textbox_delete(struct browser_window *bw, struct box *text_box, + unsigned char_offset, unsigned utf8_len); + +/* Textarea callbacks */ static bool browser_window_textarea_callback(struct browser_window *bw, uint32_t key, void *p); -static bool browser_window_input_callback(struct browser_window *bw, - uint32_t key, void *p); -static void browser_window_place_caret(struct browser_window *bw, - int x, int y, int height, - browser_caret_callback caret_cb, - browser_paste_callback paste_cb, - browser_move_callback move_cb, +static void browser_window_textarea_move_caret(struct browser_window *bw, void *p); static bool browser_window_textarea_paste_text(struct browser_window *bw, const char *utf8, unsigned utf8_len, bool last, void *handle); + +/* Text input callbacks */ static bool browser_window_input_paste_text(struct browser_window *bw, const char *utf8, unsigned utf8_len, bool last, void *handle); -static void browser_window_textarea_move_caret(struct browser_window *bw, - void *p); static void browser_window_input_move_caret(struct browser_window *bw, void *p); -static void input_update_display(struct browser_window *bw, struct box *input, - unsigned box_offset, bool to_textarea, bool redraw); -static size_t get_form_offset(struct box* input, struct box* text_box, - size_t char_offset); -static bool textbox_insert(struct browser_window *bw, struct box *text_box, - unsigned char_offset, const char *utf8, unsigned utf8_len); -static bool textbox_delete(struct browser_window *bw, struct box *text_box, - unsigned char_offset, unsigned utf8_len); -static struct box *textarea_insert_break(struct browser_window *bw, - struct box *text_box, size_t char_offset); -static bool delete_handler(struct browser_window *bw, struct box *b, - int offset, size_t length); -static void delete_selection(struct selection *s); -static struct box *line_start(struct box *text_box); -static struct box *line_end(struct box *text_box); -static struct box *line_above(struct box *text_box); -static struct box *line_below(struct box *text_box); -static bool textarea_cut(struct browser_window *bw, - struct box *start_box, unsigned start_idx, - struct box *end_box, unsigned end_idx, bool clipboard); -static void textarea_reflow(struct browser_window *bw, struct box *textarea, - struct box *inline_container); -static bool word_left(const char *text, size_t *poffset, size_t *pchars); -static bool word_right(const char *text, size_t len, size_t *poffset, - size_t *pchars); -static bool ensure_caret_visible(struct browser_window *bw, - struct box *textarea); +static bool browser_window_input_callback(struct browser_window *bw, + uint32_t key, void *p); #define SPACE_LEN(b) ((b->space == 0) ? 0 : 1) @@ -252,2061 +225,2063 @@ struct box *textarea_get_position(struct box *textarea, int x, int y, /** - * Handle clicks in a text area by placing the caret. + * Position the caret and assign a callback for key presses. * - * \param bw browser window where click occurred - * \param mouse state of mouse buttons and modifier keys - * \param textarea textarea box - * \param box_x position of textarea in global document coordinates - * \param box_y position of textarea in global document coordinates - * \param x coordinate of click relative to textarea - * \param y coordinate of click relative to textarea + * \param bw The browser window in which to place the caret + * \param x X coordinate of the caret + * \param y Y coordinate + * \param height Height of caret + * \param caret_cb Callback function for keypresses + * \param paste_cb Callback function for pasting text + * \param move_cb Callback function for caret movement + * \param p Callback private data pointer, passed to callback function */ -void browser_window_textarea_click(struct browser_window *bw, - browser_mouse_state mouse, - struct box *textarea, - int box_x, int box_y, - int x, int y) +static void browser_window_place_caret(struct browser_window *bw, + int x, int y, int height, + browser_caret_callback caret_cb, + browser_paste_callback paste_cb, + browser_move_callback move_cb, + void *p) { - /* A textarea is an INLINE_BLOCK containing a single - * INLINE_CONTAINER, which contains the text as runs of TEXT - * separated by BR. There is at least one TEXT. The first and - * last boxes are TEXT. Consecutive BR may not be present. These - * constraints are satisfied by using a 0-length TEXT for blank - * lines. */ - - int char_offset = 0, pixel_offset = 0; - struct box *inline_container = textarea->children; - struct box *text_box; - bool scrolled; - - text_box = textarea_get_position(textarea, x, y, - &char_offset, &pixel_offset); + struct browser_window *root_bw; + int pos_x = 0; + int pos_y = 0; - textarea->gadget->caret_inline_container = inline_container; - textarea->gadget->caret_text_box = text_box; - textarea->gadget->caret_box_offset = char_offset; - textarea->gadget->caret_pixel_offset = pixel_offset; + /* Find top level browser window */ + root_bw = browser_window_get_root(bw); + browser_window_get_position(bw, true, &pos_x, &pos_y); - box_x += scrollbar_get_offset(textarea->scroll_x); - box_y += scrollbar_get_offset(textarea->scroll_y); - scrolled = ensure_caret_visible(bw, textarea); - box_x -= scrollbar_get_offset(textarea->scroll_x); - box_y -= scrollbar_get_offset(textarea->scroll_y); + x = x * bw->scale + pos_x; + y = y * bw->scale + pos_y; - browser_window_place_caret(bw, - box_x + inline_container->x + text_box->x + - pixel_offset, - box_y + inline_container->y + text_box->y, - text_box->height, - browser_window_textarea_callback, - browser_window_textarea_paste_text, - browser_window_textarea_move_caret, - textarea); + gui_window_place_caret(root_bw->window, x, y, height); + bw->caret_callback = caret_cb; + bw->paste_callback = paste_cb; + bw->move_callback = move_cb; + bw->caret_p = p; - if (scrolled) - html_redraw_a_box(bw->current_content, textarea); + /* Set focus browser window */ + root_bw->focus = bw; } /** - * Key press callback for text areas. + * Removes the caret and callback for key process. * - * \param bw The browser window containing the text area - * \param key The ucs4 character codepoint - * \param p The text area box - * \return true if the keypress is dealt with, false otherwise. It can - * return true even if it ran out of memory; this just means that - * it would have claimed it if it could. + * \param bw The browser window from which to remove caret */ -bool browser_window_textarea_callback(struct browser_window *bw, - uint32_t key, void *p) +void browser_window_remove_caret(struct browser_window *bw) { - struct box *textarea = p; - struct box *inline_container = - textarea->gadget->caret_inline_container; - struct box *text_box = textarea->gadget->caret_text_box; - struct box *new_text; - size_t char_offset = textarea->gadget->caret_box_offset; - int pixel_offset = textarea->gadget->caret_pixel_offset; - int box_x, box_y; - char utf8[6]; - unsigned int utf8_len; - bool scrolled, reflow = false; - bool selection_exists = bw->sel->defined; - plot_font_style_t fstyle; - - /* box_dump(textarea, 0); */ -#ifdef TEXTINPUT_DEBUG - LOG(("key %i at %i in '%.*s'", key, char_offset, - (int) text_box->length, text_box->text)); -#endif + struct browser_window *root_bw; - box_coords(textarea, &box_x, &box_y); - box_x -= scrollbar_get_offset(textarea->scroll_x); - box_y -= scrollbar_get_offset(textarea->scroll_y); + /* Find top level browser window */ + root_bw = bw; + while (root_bw && !root_bw->window && root_bw->parent) { + root_bw = root_bw->parent; + } - if (!(key <= 0x001F || (0x007F <= key && key <= 0x009F))) { - /* normal character insertion */ - utf8_len = utf8_from_ucs4(key, utf8); + gui_window_remove_caret(root_bw->window); - if (!textbox_insert(bw, text_box, char_offset, utf8, utf8_len)) - return true; + bw->caret_callback = NULL; + bw->paste_callback = NULL; + bw->move_callback = NULL; + bw->caret_p = NULL; - char_offset += utf8_len; - reflow = true; + selection_clear(bw->sel, true); +} - } else switch (key) { - case KEY_DELETE_LEFT: - if (selection_exists) { - /* Have a selection; delete it */ - textbox_delete(bw, text_box, 0, 0); - } else if (char_offset == 0) { - /* at the start of a text box */ - struct box *prev; - if (text_box->prev && text_box->prev->type == BOX_BR) { - /* previous box is BR: remove it */ - box_unlink_and_free(text_box->prev); - } +/** + * Delete some text from a box, or delete the box in its entirety + * + * \param bw browser window + * \param b box + * \param offset start offset of text to be deleted (in bytes) + * \param length length of text to be deleted + * \return true iff successful + */ - /* This needs to be after the BR removal, as that may - * result in no previous box existing */ - if (!text_box->prev) - /* at very beginning of text area: ignore */ - return true; +static bool delete_handler(struct browser_window *bw, struct box *b, + int offset, size_t length) +{ + size_t text_length = b->length + SPACE_LEN(b); - /* delete space by merging with previous text box */ - prev = text_box->prev; - assert(prev->type == BOX_TEXT); - assert(prev->text); + /* only remove if its not the first box */ + if (offset <= 0 && length >= text_length && b->prev != NULL) { + /* remove the entire box */ + box_unlink_and_free(b); - char_offset = prev->length; /* caret at join */ + return true; + } else + return textbox_delete(bw, b, offset, + min(length, text_length - offset)); +} - if (!textbox_insert(bw, prev, prev->length, - text_box->text, text_box->length)) - return true; - box_unlink_and_free(text_box); +/** + * Remove the selected text from a text box and gadget (if applicable) + * + * \param s The selection to be removed + */ - /* place caret at join (see above) */ - text_box = prev; +static void delete_selection(struct selection *s) +{ + size_t start_offset, end_offset; + struct box *text_box; + struct box *end_box; + struct box *next; + size_t sel_len; + int beginning = 0; - } else { - /* delete a character */ - size_t prev_offset = char_offset; - size_t new_offset = - utf8_prev(text_box->text, char_offset); + assert(s->defined); - if (textbox_delete(bw, text_box, new_offset, - prev_offset - new_offset)) - char_offset = new_offset; - } - reflow = true; - break; + text_box = selection_get_start(s, &start_offset); + end_box = selection_get_end(s, &end_offset); + sel_len = s->end_idx - s->start_idx; - case KEY_DELETE_LINE_START: - { - struct box *start_box = line_start(text_box); + /* Clear selection so that deletion from textboxes proceeds */ + selection_clear(s, true); - /* Clear the selection, if one exists */ - if (selection_exists) - selection_clear(bw->sel, false); + /* handle first box */ + delete_handler(s->bw, text_box, start_offset, sel_len); + if (text_box == end_box) + return; - textarea_cut(bw, start_box, 0, text_box, char_offset, false); - text_box = start_box; - char_offset = 0; - reflow = true; + for (text_box = text_box->next; text_box != end_box; text_box = next) { + next = text_box->next; + box_unlink_and_free(text_box); } - break; - case KEY_DELETE_LINE_END: - { - struct box *end_box = line_end(text_box); - - /* Clear the selection, if one exists */ - if (selection_exists) - selection_clear(bw->sel, false); + delete_handler(s->bw, end_box, beginning, end_offset); +} - if (end_box != text_box || - char_offset < text_box->length + SPACE_LEN(text_box)) { - /* there's something at the end of the line to delete */ - textarea_cut(bw, text_box, char_offset, end_box, - end_box->length + SPACE_LEN(end_box), - false); - reflow = true; - break; - } - } - /* no break */ - case KEY_DELETE_RIGHT: /* delete to right */ - if (selection_exists) { - /* Delete selection */ - textbox_delete(bw, text_box, 0, 0); - } else if (char_offset >= text_box->length) { - /* at the end of a text box */ - struct box *next; - if (text_box->next && text_box->next->type == BOX_BR) { - /* next box is a BR: remove it */ - box_unlink_and_free(text_box->next); - } +/** + * Insert a number of chars into a text box + * + * \param bw browser window + * \param text_box text box + * \param char_offset offset (bytes) at which to insert text + * \param utf8 UTF-8 text to insert + * \param utf8_len length (bytes) of UTF-8 text to insert + * \return true iff successful + */ - /* This test is after the BR removal, as that may - * result in no subsequent box being present */ - if (!text_box->next) - /* at very end of text area: ignore */ - return true; +static bool textbox_insert(struct browser_window *bw, struct box *text_box, + unsigned char_offset, const char *utf8, unsigned utf8_len) +{ + char *text; + struct box *input = text_box->parent->parent; + struct content *current_content; + bool hide; - /* delete space by merging with next text box */ + assert(bw != NULL); + assert(bw->current_content != NULL); - next = text_box->next; - assert(next->type == BOX_TEXT); - assert(next->text); + /** \todo Stop poking around inside contents. + * Why is this code in desktop/, anyway? (It's HTML-specific) */ + current_content = hlcache_handle_get_content(bw->current_content); - if (!textbox_insert(bw, text_box, text_box->length, - next->text, next->length)) - return true; + if (bw->sel->defined) + delete_selection(bw->sel); - box_unlink_and_free(next); + /* insert into form gadget (text and password inputs only) */ + if (input->gadget && (input->gadget->type == GADGET_TEXTBOX || + input->gadget->type == GADGET_PASSWORD) && + input->gadget->value) { + size_t form_offset = input->gadget->caret_form_offset; + char *value = realloc(input->gadget->value, + input->gadget->length + utf8_len + 1); + if (!value) { + warn_user("NoMemory", 0); + return true; + } + input->gadget->value = value; - /* leave caret at join */ - } else { - /* delete a character */ - size_t next_offset = utf8_next(text_box->text, - text_box->length, char_offset); + memmove(input->gadget->value + form_offset + utf8_len, + input->gadget->value + form_offset, + input->gadget->length - form_offset); + memcpy(input->gadget->value + form_offset, utf8, utf8_len); + input->gadget->length += utf8_len; + input->gadget->value[input->gadget->length] = 0; + } - textbox_delete(bw, text_box, char_offset, - next_offset - char_offset); + hide = (input->gadget && input->gadget->type == GADGET_PASSWORD); + if (hide) { + /* determine the number of '*'s to be inserted */ + const char *eutf8 = utf8 + utf8_len; + utf8_len = 0; + while (utf8 < eutf8) { + utf8 += utf8_next(utf8, eutf8 - utf8, 0); + utf8_len++; } - reflow = true; - break; + } - case KEY_NL: - case KEY_CR: /* paragraph break */ - if (selection_exists) { - /* If we have a selection, then delete it, - * so it's replaced by the break */ - textbox_delete(bw, text_box, 0, 0); + /* insert in text box */ + text = talloc_realloc(current_content, text_box->text, + char, + text_box->length + SPACE_LEN(text_box) + utf8_len + 1); + if (!text) { + warn_user("NoMemory", 0); + return false; + } + text_box->text = text; + + if (text_box->space != 0 && + char_offset == text_box->length + SPACE_LEN(text_box)) { + if (hide) + text_box->space = 0; + else { + unsigned int last_off = utf8_prev(utf8, utf8_len); + if (utf8[last_off] != ' ') + text_box->space = 0; + else + utf8_len = last_off; } + text_box->text[text_box->length++] = ' '; + } else { + memmove(text_box->text + char_offset + utf8_len, + text_box->text + char_offset, + text_box->length - char_offset); + } - new_text = textarea_insert_break(bw, text_box, char_offset); - if (!new_text) - return true; + if (hide) + memset(text_box->text + char_offset, '*', utf8_len); + else + memcpy(text_box->text + char_offset, utf8, utf8_len); + text_box->length += utf8_len; - /* place caret at start of new text box */ - text_box = new_text; - char_offset = 0; + /* nothing should assume that the text is terminated, + * but just in case */ + text_box->text[text_box->length] = 0; - reflow = true; - break; + text_box->width = UNKNOWN_WIDTH; - case KEY_CUT_LINE: - { - struct box *start_box = line_start(text_box); - struct box *end_box = line_end(text_box); + return true; +} - /* Clear the selection, if one exists */ - if (selection_exists) - selection_clear(bw->sel, false); +/** + * Calculates the form_offset from the box_offset + * + * \param input The root box containing both the textbox and gadget + * \param text_box The textbox containing the caret + * \param char_offset The caret offset within text_box + * \return the translated form_offset + */ - textarea_cut(bw, start_box, 0, end_box, end_box->length, false); +static size_t get_form_offset(struct box* input, struct box* text_box, + size_t char_offset) +{ + int uchars; + unsigned int offset; - text_box = start_box; - char_offset = 0; - reflow = true; + for (uchars = 0, offset = 0; offset < char_offset; uchars++) { + if ((text_box->text[offset] & 0x80) == 0x00) { + offset++; + continue; + } + assert((text_box->text[offset] & 0xC0) == 0xC0); + for (++offset; offset < char_offset && + (text_box->text[offset] & 0xC0) == 0x80; + offset++) + /* do nothing */; } - break; + /* uchars is the number of real Unicode characters at the left + * side of the caret. + */ + for (offset = 0; uchars > 0 && offset < input->gadget->length; + uchars--) { + if ((input->gadget->value[offset] & 0x80) == 0x00) { + offset++; + continue; + } + assert((input->gadget->value[offset] & 0xC0) == 0xC0); + for (++offset; offset < input->gadget->length && + (input->gadget->value[offset] & 0xC0) == 0x80; + offset++) + /* do nothing */; + } + assert(uchars == 0); + return offset; +} - case KEY_PASTE: - gui_paste_from_clipboard(bw->window, - box_x + inline_container->x + - text_box->x + pixel_offset, - box_y + inline_container->y + text_box->y); - /* screen updated and caret repositioned already */ +/** + * Delete a number of chars from a text box + * + * \param bw browser window + * \param text_box text box + * \param char_offset offset within text box (bytes) of first char to delete + * \param utf8_len length (bytes) of chars to be deleted + * \return true on success, false otherwise + * + * ::char_offset and ::utf8_len are only considered when there is no selection. + * If there is a selection, the entire selected area is deleted. + */ + +bool textbox_delete(struct browser_window *bw, struct box *text_box, + unsigned char_offset, unsigned utf8_len) +{ + unsigned next_offset = char_offset + utf8_len; + struct box *form = text_box->parent->parent; + + if (bw->sel->defined) { + delete_selection(bw->sel); return true; + } - case KEY_CUT_SELECTION: - { - size_t start_idx, end_idx; - struct box *start_box = - selection_get_start(bw->sel, &start_idx); - struct box *end_box = selection_get_end(bw->sel, &end_idx); + /* delete from form gadget (text and password inputs only) */ + if (form->gadget && (form->gadget->type == GADGET_TEXTBOX || + form->gadget->type == GADGET_PASSWORD) && + form->gadget->value) { + size_t form_offset = get_form_offset(form, text_box, + char_offset); + size_t next_offset = get_form_offset(form, text_box, + char_offset + utf8_len); - if (start_box && end_box) { - selection_clear(bw->sel, false); - textarea_cut(bw, start_box, start_idx, - end_box, end_idx, true); - text_box = start_box; - char_offset = start_idx; - reflow = true; - } + memmove(form->gadget->value + form_offset, + form->gadget->value + next_offset, + form->gadget->length - next_offset); + form->gadget->length -= (next_offset - form_offset); + form->gadget->value[form->gadget->length] = 0; } - break; - case KEY_RIGHT: - if (selection_exists) { - /* In selection, move caret to end */ - text_box = selection_get_end(bw->sel, &char_offset); - } else if (char_offset < text_box->length) { - /* Within-box movement */ - char_offset = utf8_next(text_box->text, - text_box->length, char_offset); - } else { - /* Between-box movement */ - if (!text_box->next) - /* at end of text area: ignore */ - return true; + /* delete from visible textbox */ + if (next_offset <= text_box->length + SPACE_LEN(text_box)) { + /* handle removal of trailing space */ + if (text_box->space != 0 && next_offset > text_box->length) { + if (char_offset > 0) { + /* is the trailing character still a space? */ + int tmp = utf8_prev(text_box->text, char_offset); + if (isspace(text_box->text[tmp])) + char_offset = tmp; + else + text_box->space = 0; + } else { + text_box->space = 0; + } - text_box = text_box->next; - if (text_box->type == BOX_BR) - text_box = text_box->next; - char_offset = 0; + text_box->length = char_offset; + } else { + memmove(text_box->text + char_offset, + text_box->text + next_offset, + text_box->length - next_offset); + text_box->length -= utf8_len; } - break; - case KEY_LEFT: - if (selection_exists) { - /* In selection, move caret to start */ - text_box = selection_get_start(bw->sel, &char_offset); - } else if (char_offset > 0) { - /* Within-box movement */ - char_offset = utf8_prev(text_box->text, char_offset); - } else { - /* Between-box movement */ - if (!text_box->prev) - /* at start of text area: ignore */ - return true; + /* nothing should assume that the text is terminated, + * but just in case */ + text_box->text[text_box->length] = 0; - text_box = text_box->prev; - if (text_box->type == BOX_BR) - text_box = text_box->prev; - char_offset = text_box->length; - } - break; + text_box->width = UNKNOWN_WIDTH; - case KEY_UP: - selection_clear(bw->sel, true); - browser_window_textarea_click(bw, BROWSER_MOUSE_CLICK_1, - textarea, - box_x, box_y, - text_box->x + pixel_offset, - inline_container->y + text_box->y - 1); return true; + } - case KEY_DOWN: - selection_clear(bw->sel, true); - browser_window_textarea_click(bw, BROWSER_MOUSE_CLICK_1, - textarea, - box_x, box_y, - text_box->x + pixel_offset, - inline_container->y + text_box->y + - text_box->height + 1); - return true; + return false; +} - case KEY_LINE_START: - text_box = line_start(text_box); - char_offset = 0; - break; +/** + * Locate the first inline box at the start of this line + * + * \param text_box text box from which to start searching + */ - case KEY_LINE_END: - text_box = line_end(text_box); - char_offset = text_box->length; - break; +static struct box *line_start(struct box *text_box) +{ + while (text_box->prev && text_box->prev->type == BOX_TEXT) + text_box = text_box->prev; + return text_box; +} - case KEY_TEXT_START: - assert(text_box->parent); - /* place caret at start of first box */ - text_box = text_box->parent->children; - char_offset = 0; - break; +/** + * Locate the last inline box in this line + * + * \param text_box text box from which to start searching + */ - case KEY_TEXT_END: - assert(text_box->parent); +static struct box *line_end(struct box *text_box) +{ + while (text_box->next && text_box->next->type == BOX_TEXT) + text_box = text_box->next; + return text_box; +} - /* place caret at end of last box */ - text_box = text_box->parent->last; - char_offset = text_box->length; - break; - case KEY_WORD_LEFT: - { - bool start_of_word; - /* if there is a selection, caret should stay at beginning */ - if (selection_exists) - break; +/** + * Backtrack to the start of the previous line, if there is one. + */ - start_of_word = (char_offset <= 0 || - isspace(text_box->text[char_offset - 1])); +static struct box *line_above(struct box *text_box) +{ + struct box *prev; - while (!word_left(text_box->text, &char_offset, NULL)) { - struct box *prev = NULL; + text_box = line_start(text_box); - assert(char_offset == 0); + prev = text_box->prev; + while (prev && prev->type == BOX_BR) + prev = prev->prev; - if (start_of_word) { - /* find the preceding non-BR box */ - prev = text_box->prev; - if (prev && prev->type == BOX_BR) - prev = prev->prev; - } + return prev ? line_start(prev) : text_box; +} - if (!prev) { - /* just stay at the start of this box */ - break; - } - assert(prev->type == BOX_TEXT); +/** + * Advance to the start of the next line, if there is one. + */ - text_box = prev; - char_offset = prev->length; - } - } - break; +static struct box *line_below(struct box *text_box) +{ + struct box *next; - case KEY_WORD_RIGHT: - { - bool in_word; - /* if there is a selection, caret should move to the end */ - if (selection_exists) { - text_box = selection_get_end(bw->sel, &char_offset); - break; - } + text_box = line_end(text_box); - in_word = (char_offset < text_box->length && - !isspace(text_box->text[char_offset])); + next = text_box->next; + while (next && next->type == BOX_BR) + next = next->next; - while (!word_right(text_box->text, text_box->length, - &char_offset, NULL)) { - struct box *next = text_box->next; + return next ? next : text_box; +} + + +/** + * Cut a range of text from a text box, + * possibly placing it on the global clipboard. + * + * \param bw browser window + * \param start_box text box at start of range + * \param start_idx index (bytes) within start box + * \param end_box text box at end of range + * \param end_idx index (bytes) within end box + * \param clipboard whether to place text on the clipboard + * \return true iff successful + */ + +static bool textarea_cut(struct browser_window *bw, + struct box *start_box, unsigned start_idx, + struct box *end_box, unsigned end_idx, + bool clipboard) +{ + struct box *box = start_box; + bool success = true; + bool del = false; /* caller expects start_box to persist */ - /* find the next non-BR box */ - if (next && next->type == BOX_BR) - next = next->next; + if (clipboard && !gui_empty_clipboard()) + return false; - if (!next) { - /* just stay at the end of this box */ - char_offset = text_box->length; - break; + while (box && box != end_box) { + /* read before deletion, in case the whole box goes */ + struct box *next = box->next; + + if (box->type == BOX_BR) { + if (clipboard && + !gui_add_to_clipboard("\n", 1, false)) { + gui_commit_clipboard(); + return false; + } + box_unlink_and_free(box); + } else { + /* append box text to clipboard and then delete it */ + if (clipboard && + !gui_add_to_clipboard(box->text + start_idx, + box->length - start_idx, + SPACE_LEN(box))) { + gui_commit_clipboard(); + return false; } - assert(next->type == BOX_TEXT); + if (del) { + if (!delete_handler(bw, box, start_idx, + (box->length + SPACE_LEN(box)) - + start_idx) && clipboard) { + gui_commit_clipboard(); + return false; + } + } else { + textbox_delete(bw, box, start_idx, + (box->length + SPACE_LEN(box)) - + start_idx); + } + } - text_box = next; - char_offset = 0; + del = true; + start_idx = 0; + box = next; + } - if (in_word && text_box->length > 0 && - !isspace(text_box->text[0])) { - /* just stay at the start of this box */ - break; + /* and the last box */ + if (box) { + if (clipboard && !gui_add_to_clipboard(box->text + start_idx, + end_idx - start_idx, end_idx > box->length)) { + success = false; + } else { + if (del) { + if (!delete_handler(bw, box, start_idx, + end_idx - start_idx)) + success = false; + } else { + textbox_delete(bw, box, start_idx, + end_idx - start_idx); } } } - break; - - case KEY_PAGE_UP: - { - int nlines = (textarea->height / text_box->height) - 1; - - while (nlines-- > 0) - text_box = line_above(text_box); - if (char_offset > text_box->length) - char_offset = text_box->length; - } - break; + if (clipboard && !gui_commit_clipboard()) + success = false; - case KEY_PAGE_DOWN: - { - int nlines = (textarea->height / text_box->height) - 1; + return success; +} - while (nlines-- > 0) - text_box = line_below(text_box); - /* vague attempt to keep the caret at the same horizontal - * position, given that the code currently cannot support it - * being beyond the end of a line */ - if (char_offset > text_box->length) - char_offset = text_box->length; - } - break; +/** + * Break a text box into two + * + * \param bw browser window + * \param text_box text box to be split + * \param char_offset offset (in bytes) at which text box is to be split + */ - default: - return false; - } +static struct box *textarea_insert_break(struct browser_window *bw, + struct box *text_box, size_t char_offset) +{ + struct box *new_br, *new_text; + struct content *current_content; + char *text; - /* - box_dump(textarea, 0); - for (struct box *t = inline_container->children; t; t = t->next) { - assert(t->type == BOX_TEXT); - assert(t->text); - assert(t->parent == inline_container); - if (t->next) assert(t->next->prev == t); - if (t->prev) assert(t->prev->next == t); - if (!t->next) { - assert(inline_container->last == t); - break; - } - if (t->next->type == BOX_BR) { - assert(t->next->next); - t = t->next; - } - } */ + assert(bw != NULL); + assert(bw->current_content != NULL); - if (reflow) - textarea_reflow(bw, textarea, inline_container); + /** \todo Stop poking around inside content objects */ + current_content = hlcache_handle_get_content(bw->current_content); - if (text_box->length + SPACE_LEN(text_box) <= char_offset) { - if (text_box->next && text_box->next->type == BOX_TEXT) { - /* the text box has been split when reflowing and - the caret is in the second part */ - char_offset -= (text_box->length + SPACE_LEN(text_box)); - text_box = text_box->next; - assert(text_box); - assert(char_offset <= text_box->length); - /* Scroll back to the left */ - if (textarea->scroll_x != NULL) { - box_x += scrollbar_get_offset( - textarea->scroll_x); - scrollbar_set(textarea->scroll_x, 0, false); - } - } else { - assert(!text_box->next || - (text_box->next && - text_box->next->type == BOX_BR)); + text = talloc_array(current_content, char, text_box->length + 1); + if (!text) { + warn_user("NoMemory", 0); + return NULL; + } - char_offset = text_box->length + SPACE_LEN(text_box); - } + new_br = box_create(NULL, text_box->style, false, 0, 0, text_box->title, + 0, current_content); + new_text = talloc(current_content, struct box); + if (!new_text) { + warn_user("NoMemory", 0); + return NULL; } - font_plot_style_from_css(text_box->style, &fstyle); + new_br->type = BOX_BR; + box_insert_sibling(text_box, new_br); - nsfont.font_width(&fstyle, text_box->text, char_offset, &pixel_offset); + memcpy(new_text, text_box, sizeof (struct box)); + new_text->flags |= CLONE; + new_text->text = text; + memcpy(new_text->text, text_box->text + char_offset, + text_box->length - char_offset); + new_text->length = text_box->length - char_offset; + text_box->length = char_offset; + text_box->width = new_text->width = UNKNOWN_WIDTH; + box_insert_sibling(new_br, new_text); - selection_clear(bw->sel, true); + return new_text; +} - textarea->gadget->caret_inline_container = inline_container; - textarea->gadget->caret_text_box = text_box; - textarea->gadget->caret_box_offset = char_offset; - textarea->gadget->caret_pixel_offset = pixel_offset; - box_x += scrollbar_get_offset(textarea->scroll_x); - box_y += scrollbar_get_offset(textarea->scroll_y); - scrolled = ensure_caret_visible(bw, textarea); - box_x -= scrollbar_get_offset(textarea->scroll_x); - box_y -= scrollbar_get_offset(textarea->scroll_y); +/** + * Reflow textarea preserving width and height + * + * \param bw browser window + * \param textarea text area box + * \param inline_container container holding text box + */ - browser_window_place_caret(bw, - box_x + inline_container->x + text_box->x + - pixel_offset, - box_y + inline_container->y + text_box->y, - text_box->height, - browser_window_textarea_callback, - browser_window_textarea_paste_text, - browser_window_textarea_move_caret, - textarea); +static void textarea_reflow(struct browser_window *bw, struct box *textarea, + struct box *inline_container) +{ + struct content *c = hlcache_handle_get_content(bw->current_content); + int width = textarea->width; + int height = textarea->height; - if (scrolled || reflow) - html_redraw_a_box(bw->current_content, textarea); + assert(c != NULL); - return true; + if (!layout_inline_container(inline_container, width, + textarea, 0, 0, (struct html_content *) c)) + warn_user("NoMemory", 0); + textarea->width = width; + textarea->height = height; + layout_calculate_descendant_bboxes(textarea); + box_handle_scrollbars(c, textarea, + box_hscrollbar_present(textarea), + box_vscrollbar_present(textarea)); } /** - * Handle clicks in a text or password input box by placing the caret. + * Move to the start of the word containing the given character position, + * or the start of the preceding word if already at the start of this one. * - * \param bw browser window where click occurred - * \param input input box - * \param box_x position of input in global document coordinates - * \param box_y position of input in global document coordinates - * \param x coordinate of click relative to input - * \param y coordinate of click relative to input + * \param text UTF-8 text string + * \param poffset offset of caret within string (updated on exit) + * \param pchars receives the number of characters skipped + * \return true iff the start of a word was found before/at the string start */ -void browser_window_input_click(struct browser_window* bw, - struct box *input, - int box_x, int box_y, - int x, int y) -{ - size_t char_offset = 0; - int pixel_offset = 0, dx = 0; - struct box *text_box = input->children->children; - plot_font_style_t fstyle; - font_plot_style_from_css(text_box->style, &fstyle); +static bool word_left(const char *text, size_t *poffset, size_t *pchars) +{ + size_t offset = *poffset; + bool success = false; + size_t nchars = 0; - nsfont.font_position_in_string(&fstyle, text_box->text, - text_box->length, x - text_box->x, - &char_offset, &pixel_offset); - assert(char_offset <= text_box->length); + /* Skip any spaces immediately prior to the offset */ + while (offset > 0) { + offset = utf8_prev(text, offset); + nchars++; + if (!isspace(text[offset])) break; + } - /* Shift the text box horizontally to ensure that the - * caret position is visible, and ideally centred */ - text_box->x = 0; - if ((input->width < text_box->width) && - (input->width / 2 < pixel_offset)) { - dx = text_box->x; - /* Move left so caret is centred */ - text_box->x = input->width / 2 - pixel_offset; - /* Clamp, so text box's right hand edge coincides - * with the input's right hand edge */ - if (text_box->x < input->width - text_box->width) - text_box->x = input->width - text_box->width; - dx -= text_box->x; + /* Now skip all non-space characters */ + while (offset > 0) { + size_t prev = utf8_prev(text, offset); + success = true; + if (isspace(text[prev])) + break; + offset = prev; + nchars++; } - input->gadget->caret_box_offset = char_offset; - input->gadget->caret_form_offset = - get_form_offset(input, text_box, char_offset); - input->gadget->caret_pixel_offset = pixel_offset; - browser_window_place_caret(bw, - box_x + input->children->x + - text_box->x + pixel_offset, - box_y + input->children->y + text_box->y, - text_box->height, - browser_window_input_callback, - browser_window_input_paste_text, - browser_window_input_move_caret, - input); + *poffset = offset; + if (pchars) *pchars = nchars; - if (dx) - html_redraw_a_box(bw->current_content, input); + return success; } + /** - * Key press callback for text or password input boxes. + * Move to the start of the first word following the given character position. * - * \param bw The browser window containing the input box - * \param key The UCS4 character codepoint - * \param p The input box - * \return true if the keypress is dealt with, false otherwise. It can - * return true even if it ran out of memory; this just means that - * it would have claimed it if it could. + * \param text UTF-8 text string + * \param len length of string in bytes + * \param poffset offset of caret within string (updated on exit) + * \param pchars receives the number of characters skipped + * \return true iff the start of a word was found before the string end */ -bool browser_window_input_callback(struct browser_window *bw, - uint32_t key, void *p) -{ - struct box *input = (struct box *)p; - struct box *text_box = input->children->children; - size_t box_offset = input->gadget->caret_box_offset; - size_t end_offset; - int pixel_offset = input->gadget->caret_pixel_offset; - int box_x, box_y; - struct form* form = input->gadget->form; - bool changed = false; - char utf8[6]; - unsigned int utf8_len; - bool to_textarea = false; - bool selection_exists = bw->sel->defined; - input->gadget->caret_form_offset = - get_form_offset(input, text_box, box_offset); +static bool word_right(const char *text, size_t len, + size_t *poffset, size_t *pchars) +{ + size_t offset = *poffset; + bool success = false; + size_t nchars = 0; - /* update the form offset */ - input->gadget->caret_form_offset = - get_form_offset(input, text_box, box_offset); + /* Skip all non-space characters after the offset */ + while (offset < len) { + if (isspace(text[offset])) break; + offset = utf8_next(text, len, offset); + nchars++; + } - selection_get_end(bw->sel, &end_offset); + /* Now skip all space characters */ + while (offset < len) { + offset = utf8_next(text, len, offset); + nchars++; + if (offset < len && !isspace(text[offset])) { + success = true; + break; + } + } - box_coords(input, &box_x, &box_y); + *poffset = offset; + if (pchars) *pchars = nchars; - /* normal character insertion */ - if (!(key <= 0x001F || (0x007F <= key && key <= 0x009F))) { - /* have we exceeded max length of input? */ - utf8_len = utf8_length(input->gadget->value); - if (utf8_len >= input->gadget->maxlength) - return true; + return success; +} - utf8_len = utf8_from_ucs4(key, utf8); +/** + * Adjust scroll offsets so that the caret is visible + * + * \param bw browser window where click ocurred + * \param textarea textarea box + * \return true if a change in scroll offsets has occurred +*/ - if (!textbox_insert(bw, text_box, box_offset, utf8, utf8_len)) - return true; +static bool ensure_caret_visible(struct browser_window *bw, + struct box *textarea) +{ + html_content *html = (html_content *) + hlcache_handle_get_content(bw->current_content); + int cx, cy; + int scrollx, scrolly; - box_offset += utf8_len; + assert(textarea->gadget); - changed = true; + scrollx = scrollbar_get_offset(textarea->scroll_x); + scrolly = scrollbar_get_offset(textarea->scroll_y); - } else switch (key) { - case KEY_DELETE_LEFT: - { - int prev_offset, new_offset; + /* Calculate the caret coordinates */ + cx = textarea->gadget->caret_pixel_offset + + textarea->gadget->caret_text_box->x; + cy = textarea->gadget->caret_text_box->y; - if (selection_exists) { - textbox_delete(bw, text_box, 0, 0); - } else { - /* Can't delete left from text box start */ - if (box_offset == 0) - return true; + /* Ensure they are visible */ + if (textarea->scroll_x == NULL) { + scrollx = 0; + } else if (cx - scrollbar_get_offset(textarea->scroll_x) < 0) { + scrollx = cx; + } else if (cx > scrollbar_get_offset(textarea->scroll_x) + + textarea->width) { + scrollx = cx - textarea->width; + } - prev_offset = box_offset; - new_offset = utf8_prev(text_box->text, box_offset); + if (textarea->scroll_y == NULL) { + scrolly = 0; + } else if (cy - scrollbar_get_offset(textarea->scroll_y) < 0) { + scrolly = cy; + } else if (cy + textarea->gadget->caret_text_box->height > + scrollbar_get_offset(textarea->scroll_y) + + textarea->height) { + scrolly = (cy + textarea->gadget->caret_text_box->height) - + textarea->height; + } - if (textbox_delete(bw, text_box, new_offset, - prev_offset - new_offset)) - box_offset = new_offset; - } + if ((scrollx == scrollbar_get_offset(textarea->scroll_x)) && + (scrolly == scrollbar_get_offset(textarea->scroll_y))) + return false; - changed = true; + if (textarea->scroll_x != NULL) { + html->scrollbar = textarea->scroll_x; + scrollbar_set(textarea->scroll_x, scrollx, false); + html->scrollbar = NULL; + } + if (textarea->scroll_y != NULL) { + html->scrollbar = textarea->scroll_x; + scrollbar_set(textarea->scroll_y, scrolly, false); + html->scrollbar = NULL; } - break; - case KEY_DELETE_RIGHT: - { - unsigned next_offset; + return true; +} - if (selection_exists) { - textbox_delete(bw, text_box, 0, 0); - } else { - /* Can't delete right from text box end */ - if (box_offset >= text_box->length) - return true; - /* Go to the next valid UTF-8 character */ - next_offset = utf8_next(text_box->text, - text_box->length, box_offset); +/** + * Paste a block of text into a textarea at the + * current caret position. + * + * \param bw browser window + * \param utf8 pointer to block of text + * \param utf8_len length (bytes) of text block + * \param last true iff this is the last chunk (update screen too) + * \param handle pointer to textarea + * \return true iff successful + */ - textbox_delete(bw, text_box, box_offset, - next_offset - box_offset); - } +bool browser_window_textarea_paste_text(struct browser_window *bw, + const char *utf8, unsigned utf8_len, bool last, void *handle) +{ + struct box *textarea = handle; + struct box *inline_container = + textarea->gadget->caret_inline_container; + struct box *text_box = textarea->gadget->caret_text_box; + size_t char_offset = textarea->gadget->caret_box_offset; + int pixel_offset = textarea->gadget->caret_pixel_offset; + const char *ep = utf8 + utf8_len; + const char *p = utf8; + bool success = true; + bool update = last; - changed = true; - } - break; + while (p < ep) { + struct box *new_text; + unsigned utf8_len; - case KEY_TAB: - { - struct form_control *next_input; - /* Find next text entry field that is actually - * displayed (i.e. has an associated box) */ - for (next_input = input->gadget->next; - next_input && - ((next_input->type != GADGET_TEXTBOX && - next_input->type != GADGET_TEXTAREA && - next_input->type != GADGET_PASSWORD) || - !next_input->box); - next_input = next_input->next) - ; - if (!next_input) - return true; + while (p < ep) { + if (*p == '\n' || *p == '\r') break; + p++; + } - input = next_input->box; - box_offset = 0; - to_textarea = next_input->type == GADGET_TEXTAREA; - } - break; + utf8_len = p - utf8; + if (!textbox_insert(bw, text_box, char_offset, utf8, utf8_len)) + return false; - case KEY_NL: - case KEY_CR: /* Return/Enter hit */ - selection_clear(bw->sel, true); + char_offset += utf8_len; + if (p == ep) + break; - if (form) - form_submit(bw->current_content, bw, form, 0); - return true; + new_text = textarea_insert_break(bw, text_box, char_offset); + if (!new_text) { + /* we still need to update the screen */ + update = true; + success = false; + break; + } - case KEY_SHIFT_TAB: - { - struct form_control *prev_input; - /* Find previous text entry field that is actually - * displayed (i.e. has an associated box) */ - for (prev_input = input->gadget->prev; - prev_input && - ((prev_input->type != GADGET_TEXTBOX && - prev_input->type != GADGET_TEXTAREA && - prev_input->type != GADGET_PASSWORD) || - !prev_input->box); - prev_input = prev_input->prev) - ; - if (!prev_input) - return true; + /* place caret at start of new text box */ + text_box = new_text; + char_offset = 0; - input = prev_input->box; - box_offset = 0; - to_textarea = prev_input->type == GADGET_TEXTAREA; + /* handle CR/LF and LF/CR terminations */ + if ((*p == '\n' && p[1] == '\r') || + (*p == '\r' && p[1] == '\n')) + p++; + utf8 = ++p; } - break; - - case KEY_CUT_LINE: - /* Clear the selection, if one exists */ - if (selection_exists) - selection_clear(bw->sel, false); - textarea_cut(bw, text_box, 0, text_box, text_box->length, - false); - box_offset = 0; +// textarea->gadget->caret_inline_container = inline_container; + textarea->gadget->caret_text_box = text_box; + textarea->gadget->caret_box_offset = char_offset; - changed = true; - break; + if (update) { + int box_x, box_y; + plot_font_style_t fstyle; - case KEY_PASTE: - gui_paste_from_clipboard(bw->window, - box_x + input->children->x + text_box->x + pixel_offset, - box_y + input->children->y + text_box->y); + /* reflow textarea preserving width and height */ + textarea_reflow(bw, textarea, inline_container); + /* reflowing may have broken our caret offset + * this bit should hopefully continue to work if + * textarea_reflow is fixed to update the caret itself */ + char_offset = textarea->gadget->caret_box_offset; + text_box = textarea->gadget->caret_text_box; - /* screen updated and caret repositioned already */ - return true; + while ((char_offset > text_box->length + SPACE_LEN(text_box)) && + (text_box->next) && + (text_box->next->type == BOX_TEXT)) { +#ifdef TEXTINPUT_DEBUG + LOG(("Caret out of range: Was %d in boxlen %d " + "space %d", char_offset, + text_box->length, SPACE_LEN(text_box))); +#endif + char_offset -= text_box->length + SPACE_LEN(text_box); + text_box = text_box->next; + } - case KEY_CUT_SELECTION: - { - size_t start_idx, end_idx; - struct box *start_box = - selection_get_start(bw->sel, &start_idx); - struct box *end_box = selection_get_end(bw->sel, &end_idx); + /* not sure if this will happen or not... + * but won't stick an assert here as we can recover from it */ + if (char_offset > text_box->length) { +#ifdef TEXTINPUT_DEBUG + LOG(("Caret moved beyond end of line: " + "Was %d in boxlen %d", char_offset, + text_box->length)); +#endif + char_offset = text_box->length; + } - if (start_box && end_box) { - selection_clear(bw->sel, false); - textarea_cut(bw, start_box, start_idx, - end_box, end_idx, true); + textarea->gadget->caret_text_box = text_box; + textarea->gadget->caret_box_offset = char_offset; - box_offset = start_idx; - changed = true; - } - } - break; + font_plot_style_from_css(text_box->style, &fstyle); - case KEY_RIGHT: - if (selection_exists) { - box_offset = end_offset; - break; - } + nsfont.font_width(&fstyle, text_box->text, + char_offset, &pixel_offset); - if (box_offset < text_box->length) { - /* Go to the next valid UTF-8 character */ - box_offset = utf8_next(text_box->text, - text_box->length, box_offset); - } + textarea->gadget->caret_pixel_offset = pixel_offset; - break; + box_coords(textarea, &box_x, &box_y); + box_x += scrollbar_get_offset(textarea->scroll_x); + box_y += scrollbar_get_offset(textarea->scroll_y); + ensure_caret_visible(bw, textarea); + box_x -= scrollbar_get_offset(textarea->scroll_x); + box_y -= scrollbar_get_offset(textarea->scroll_y); - case KEY_LEFT: - /* If there is a selection, caret should remain at start */ - if (selection_exists) - break; + browser_window_place_caret(bw, + box_x + inline_container->x + text_box->x + + pixel_offset, + box_y + inline_container->y + text_box->y, + text_box->height, + browser_window_textarea_callback, + browser_window_textarea_paste_text, + browser_window_textarea_move_caret, + textarea); - /* Go to the previous valid UTF-8 character */ - box_offset = utf8_prev(text_box->text, box_offset); - break; + html_redraw_a_box(bw->current_content, textarea); + } - case KEY_LINE_START: - box_offset = 0; - break; + return success; +} - case KEY_LINE_END: - box_offset = text_box->length; - break; - case KEY_WORD_LEFT: - /* If there is a selection, caret should remain at start */ - if (selection_exists) - break; +/** + * Move caret to new position after reformatting + * + * \param bw browser window + * \param p pointer textarea box + * \return none + */ - if (!word_left(text_box->text, &box_offset, NULL)) - box_offset = 0; +void browser_window_textarea_move_caret(struct browser_window *bw, void *p) +{ + struct box *textarea = p; + struct box *inline_container = textarea->gadget->caret_inline_container; + struct box *text_box = textarea->gadget->caret_text_box; + size_t char_offset = textarea->gadget->caret_box_offset; + int pixel_offset; + int box_x, box_y; + plot_font_style_t fstyle; - break; + font_plot_style_from_css(text_box->style, &fstyle); - case KEY_WORD_RIGHT: - if (selection_exists) { - box_offset = end_offset; - break; - } + box_coords(textarea, &box_x, &box_y); + box_x -= scrollbar_get_offset(textarea->scroll_x); + box_y -= scrollbar_get_offset(textarea->scroll_y); - if (!word_right(text_box->text, text_box->length, - &box_offset, NULL)) - box_offset = text_box->length; + nsfont.font_width(&fstyle, text_box->text, + char_offset, &pixel_offset); - break; + browser_window_place_caret(bw, + box_x + inline_container->x + text_box->x + + pixel_offset, + box_y + inline_container->y + text_box->y, + text_box->height, + browser_window_textarea_callback, + browser_window_textarea_paste_text, + browser_window_textarea_move_caret, + textarea); +} - case KEY_DELETE_LINE_START: - if (selection_exists) - selection_clear(bw->sel, true); - if (box_offset == 0) - return true; +/** + * Update display to reflect modified input field + * + * \param bw browser window + * \param input input field + * \param form_offset + * \param box_offset offset of caret within text box + * \param to_textarea caret is to be moved to a textarea + * \param redraw force redraw even if field hasn't scrolled + */ - textarea_cut(bw, text_box, 0, text_box, box_offset, false); - box_offset = 0; +static void input_update_display(struct browser_window *bw, struct box *input, + unsigned box_offset, bool to_textarea, bool redraw) +{ + struct box *text_box = input->children->children; + unsigned pixel_offset; + int box_x, box_y; + int dx; + plot_font_style_t fstyle; - changed = true; - break; + font_plot_style_from_css(text_box->style, &fstyle); - case KEY_DELETE_LINE_END: - if (selection_exists) - selection_clear(bw->sel, true); + if (redraw) + nsfont.font_width(&fstyle, text_box->text, text_box->length, + &text_box->width); - if (box_offset >= text_box->length) - return true; + box_coords(input, &box_x, &box_y); - textarea_cut(bw, text_box, box_offset, - text_box, text_box->length, false); + nsfont.font_width(&fstyle, text_box->text, box_offset, + (int *) &pixel_offset); - changed = true; - break; + /* Shift text box horizontally, so caret is visible */ + dx = text_box->x; + text_box->x = 0; + if (input->width < text_box->width && + input->width / 2 < (int) pixel_offset) { + /* Make caret appear in centre of text input */ + text_box->x = input->width / 2 - pixel_offset; + /* Clamp if we've shifted too far left */ + if (text_box->x < input->width - text_box->width) + text_box->x = input->width - text_box->width; + } + dx -= text_box->x; + input->gadget->caret_pixel_offset = pixel_offset; - default: - return false; + if (to_textarea) { + /* moving to textarea so need to set these up */ + input->gadget->caret_inline_container = input->children; + input->gadget->caret_text_box = text_box; } - selection_clear(bw->sel, true); - input_update_display(bw, input, box_offset, to_textarea, changed); + input->gadget->caret_box_offset = box_offset; - return true; + browser_window_place_caret(bw, + box_x + input->children->x + + text_box->x + pixel_offset, + box_y + input->children->y + text_box->y, + text_box->height, + /* use the appropriate callback */ + to_textarea ? browser_window_textarea_callback + : browser_window_input_callback, + to_textarea ? browser_window_textarea_paste_text + : browser_window_input_paste_text, + to_textarea ? browser_window_textarea_move_caret + : browser_window_input_move_caret, + input); + + if (dx || redraw) + html_redraw_a_box(bw->current_content, input); } /** - * Position the caret and assign a callback for key presses. + * Key press callback for text areas. * - * \param bw The browser window in which to place the caret - * \param x X coordinate of the caret - * \param y Y coordinate - * \param height Height of caret - * \param caret_cb Callback function for keypresses - * \param paste_cb Callback function for pasting text - * \param move_cb Callback function for caret movement - * \param p Callback private data pointer, passed to callback function + * \param bw The browser window containing the text area + * \param key The ucs4 character codepoint + * \param p The text area box + * \return true if the keypress is dealt with, false otherwise. It can + * return true even if it ran out of memory; this just means that + * it would have claimed it if it could. */ -void browser_window_place_caret(struct browser_window *bw, - int x, int y, int height, - browser_caret_callback caret_cb, - browser_paste_callback paste_cb, - browser_move_callback move_cb, - void *p) +bool browser_window_textarea_callback(struct browser_window *bw, + uint32_t key, void *p) { - struct browser_window *root_bw; - int pos_x = 0; - int pos_y = 0; + struct box *textarea = p; + struct box *inline_container = + textarea->gadget->caret_inline_container; + struct box *text_box = textarea->gadget->caret_text_box; + struct box *new_text; + size_t char_offset = textarea->gadget->caret_box_offset; + int pixel_offset = textarea->gadget->caret_pixel_offset; + int box_x, box_y; + char utf8[6]; + unsigned int utf8_len; + bool scrolled, reflow = false; + bool selection_exists = bw->sel->defined; + plot_font_style_t fstyle; - /* Find top level browser window */ - root_bw = browser_window_get_root(bw); - browser_window_get_position(bw, true, &pos_x, &pos_y); + /* box_dump(textarea, 0); */ +#ifdef TEXTINPUT_DEBUG + LOG(("key %i at %i in '%.*s'", key, char_offset, + (int) text_box->length, text_box->text)); +#endif - x = x * bw->scale + pos_x; - y = y * bw->scale + pos_y; + box_coords(textarea, &box_x, &box_y); + box_x -= scrollbar_get_offset(textarea->scroll_x); + box_y -= scrollbar_get_offset(textarea->scroll_y); - gui_window_place_caret(root_bw->window, x, y, height); - bw->caret_callback = caret_cb; - bw->paste_callback = paste_cb; - bw->move_callback = move_cb; - bw->caret_p = p; + if (!(key <= 0x001F || (0x007F <= key && key <= 0x009F))) { + /* normal character insertion */ + utf8_len = utf8_from_ucs4(key, utf8); - /* Set focus browser window */ - root_bw->focus = bw; -} + if (!textbox_insert(bw, text_box, char_offset, utf8, utf8_len)) + return true; + char_offset += utf8_len; + reflow = true; -/** - * Removes the caret and callback for key process. - * - * \param bw The browser window from which to remove caret - */ -void browser_window_remove_caret(struct browser_window *bw) -{ - struct browser_window *root_bw; + } else switch (key) { + case KEY_DELETE_LEFT: + if (selection_exists) { + /* Have a selection; delete it */ + textbox_delete(bw, text_box, 0, 0); + } else if (char_offset == 0) { + /* at the start of a text box */ + struct box *prev; - /* Find top level browser window */ - root_bw = bw; - while (root_bw && !root_bw->window && root_bw->parent) { - root_bw = root_bw->parent; - } + if (text_box->prev && text_box->prev->type == BOX_BR) { + /* previous box is BR: remove it */ + box_unlink_and_free(text_box->prev); + } - gui_window_remove_caret(root_bw->window); + /* This needs to be after the BR removal, as that may + * result in no previous box existing */ + if (!text_box->prev) + /* at very beginning of text area: ignore */ + return true; - bw->caret_callback = NULL; - bw->paste_callback = NULL; - bw->move_callback = NULL; - bw->caret_p = NULL; + /* delete space by merging with previous text box */ + prev = text_box->prev; + assert(prev->type == BOX_TEXT); + assert(prev->text); - selection_clear(bw->sel, true); -} + char_offset = prev->length; /* caret at join */ -/** - * Calculates the form_offset from the box_offset - * - * \param input The root box containing both the textbox and gadget - * \param text_box The textbox containing the caret - * \param char_offset The caret offset within text_box - * \return the translated form_offset - */ + if (!textbox_insert(bw, prev, prev->length, + text_box->text, text_box->length)) + return true; -size_t get_form_offset(struct box* input, struct box* text_box, - size_t char_offset) -{ - int uchars; - unsigned int offset; + box_unlink_and_free(text_box); - for (uchars = 0, offset = 0; offset < char_offset; uchars++) { - if ((text_box->text[offset] & 0x80) == 0x00) { - offset++; - continue; - } - assert((text_box->text[offset] & 0xC0) == 0xC0); - for (++offset; offset < char_offset && - (text_box->text[offset] & 0xC0) == 0x80; - offset++) - /* do nothing */; - } - /* uchars is the number of real Unicode characters at the left - * side of the caret. - */ - for (offset = 0; uchars > 0 && offset < input->gadget->length; - uchars--) { - if ((input->gadget->value[offset] & 0x80) == 0x00) { - offset++; - continue; - } - assert((input->gadget->value[offset] & 0xC0) == 0xC0); - for (++offset; offset < input->gadget->length && - (input->gadget->value[offset] & 0xC0) == 0x80; - offset++) - /* do nothing */; - } - assert(uchars == 0); - return offset; -} + /* place caret at join (see above) */ + text_box = prev; -/** - * Handle key presses in a browser window. - * - * \param bw The root browser window - * \param key The UCS4 character codepoint - * \return true if key handled, false otherwise - */ -bool browser_window_key_press(struct browser_window *bw, uint32_t key) -{ - struct browser_window *focus = bw->focus; + } else { + /* delete a character */ + size_t prev_offset = char_offset; + size_t new_offset = + utf8_prev(text_box->text, char_offset); - /* keys that take effect wherever the caret is positioned */ - switch (key) { - case KEY_SELECT_ALL: - selection_select_all(focus->sel); - return true; + if (textbox_delete(bw, text_box, new_offset, + prev_offset - new_offset)) + char_offset = new_offset; + } + reflow = true; + break; - case KEY_COPY_SELECTION: - gui_copy_to_clipboard(focus->sel); - return true; + case KEY_DELETE_LINE_START: + { + struct box *start_box = line_start(text_box); - case KEY_CLEAR_SELECTION: - selection_clear(focus->sel, true); - return true; + /* Clear the selection, if one exists */ + if (selection_exists) + selection_clear(bw->sel, false); - case KEY_ESCAPE: - if (selection_defined(focus->sel)) { - selection_clear(focus->sel, true); - return true; - } - /* if there's no selection, - * leave Escape for the caller */ - return false; + textarea_cut(bw, start_box, 0, text_box, char_offset, false); + text_box = start_box; + char_offset = 0; + reflow = true; } + break; - /* pass on to the appropriate field */ - if (!focus->caret_callback) - return false; + case KEY_DELETE_LINE_END: + { + struct box *end_box = line_end(text_box); - return focus->caret_callback(focus, key, focus->caret_p); -} + /* Clear the selection, if one exists */ + if (selection_exists) + selection_clear(bw->sel, false); + if (end_box != text_box || + char_offset < text_box->length + SPACE_LEN(text_box)) { + /* there's something at the end of the line to delete */ + textarea_cut(bw, text_box, char_offset, end_box, + end_box->length + SPACE_LEN(end_box), + false); + reflow = true; + break; + } + } + /* no break */ + case KEY_DELETE_RIGHT: /* delete to right */ + if (selection_exists) { + /* Delete selection */ + textbox_delete(bw, text_box, 0, 0); + } else if (char_offset >= text_box->length) { + /* at the end of a text box */ + struct box *next; -/** - * Paste a block of text into a browser window at the caret position. - * - * \param bw browser window - * \param utf8 pointer to block of text - * \param utf8_len length (bytes) of text block - * \param last true iff this is the last chunk (update screen too) - * \return true iff successful - */ + if (text_box->next && text_box->next->type == BOX_BR) { + /* next box is a BR: remove it */ + box_unlink_and_free(text_box->next); + } -bool browser_window_paste_text(struct browser_window *bw, const char *utf8, - unsigned utf8_len, bool last) -{ - if (!bw->focus || !bw->focus->paste_callback) - return false; + /* This test is after the BR removal, as that may + * result in no subsequent box being present */ + if (!text_box->next) + /* at very end of text area: ignore */ + return true; - return bw->focus->paste_callback(bw->focus, utf8, utf8_len, last, - bw->focus->caret_p); -} + /* delete space by merging with next text box */ + next = text_box->next; + assert(next->type == BOX_TEXT); + assert(next->text); -/** - * Paste a block of text into a textarea at the - * current caret position. - * - * \param bw browser window - * \param utf8 pointer to block of text - * \param utf8_len length (bytes) of text block - * \param last true iff this is the last chunk (update screen too) - * \param handle pointer to textarea - * \return true iff successful - */ + if (!textbox_insert(bw, text_box, text_box->length, + next->text, next->length)) + return true; -bool browser_window_textarea_paste_text(struct browser_window *bw, - const char *utf8, unsigned utf8_len, bool last, void *handle) -{ - struct box *textarea = handle; - struct box *inline_container = - textarea->gadget->caret_inline_container; - struct box *text_box = textarea->gadget->caret_text_box; - size_t char_offset = textarea->gadget->caret_box_offset; - int pixel_offset = textarea->gadget->caret_pixel_offset; - const char *ep = utf8 + utf8_len; - const char *p = utf8; - bool success = true; - bool update = last; + box_unlink_and_free(next); - while (p < ep) { - struct box *new_text; - unsigned utf8_len; + /* leave caret at join */ + } else { + /* delete a character */ + size_t next_offset = utf8_next(text_box->text, + text_box->length, char_offset); - while (p < ep) { - if (*p == '\n' || *p == '\r') break; - p++; + textbox_delete(bw, text_box, char_offset, + next_offset - char_offset); } + reflow = true; + break; - utf8_len = p - utf8; - if (!textbox_insert(bw, text_box, char_offset, utf8, utf8_len)) - return false; - - char_offset += utf8_len; - if (p == ep) - break; + case KEY_NL: + case KEY_CR: /* paragraph break */ + if (selection_exists) { + /* If we have a selection, then delete it, + * so it's replaced by the break */ + textbox_delete(bw, text_box, 0, 0); + } new_text = textarea_insert_break(bw, text_box, char_offset); - if (!new_text) { - /* we still need to update the screen */ - update = true; - success = false; - break; - } + if (!new_text) + return true; /* place caret at start of new text box */ text_box = new_text; char_offset = 0; - /* handle CR/LF and LF/CR terminations */ - if ((*p == '\n' && p[1] == '\r') || - (*p == '\r' && p[1] == '\n')) - p++; - utf8 = ++p; + reflow = true; + break; + + case KEY_CUT_LINE: + { + struct box *start_box = line_start(text_box); + struct box *end_box = line_end(text_box); + + /* Clear the selection, if one exists */ + if (selection_exists) + selection_clear(bw->sel, false); + + textarea_cut(bw, start_box, 0, end_box, end_box->length, false); + + text_box = start_box; + char_offset = 0; + reflow = true; } + break; -// textarea->gadget->caret_inline_container = inline_container; - textarea->gadget->caret_text_box = text_box; - textarea->gadget->caret_box_offset = char_offset; + case KEY_PASTE: + gui_paste_from_clipboard(bw->window, + box_x + inline_container->x + + text_box->x + pixel_offset, + box_y + inline_container->y + text_box->y); - if (update) { - int box_x, box_y; - plot_font_style_t fstyle; + /* screen updated and caret repositioned already */ + return true; - /* reflow textarea preserving width and height */ - textarea_reflow(bw, textarea, inline_container); - /* reflowing may have broken our caret offset - * this bit should hopefully continue to work if - * textarea_reflow is fixed to update the caret itself */ - char_offset = textarea->gadget->caret_box_offset; - text_box = textarea->gadget->caret_text_box; + case KEY_CUT_SELECTION: + { + size_t start_idx, end_idx; + struct box *start_box = + selection_get_start(bw->sel, &start_idx); + struct box *end_box = selection_get_end(bw->sel, &end_idx); + + if (start_box && end_box) { + selection_clear(bw->sel, false); + textarea_cut(bw, start_box, start_idx, + end_box, end_idx, true); + text_box = start_box; + char_offset = start_idx; + reflow = true; + } + } + break; + + case KEY_RIGHT: + if (selection_exists) { + /* In selection, move caret to end */ + text_box = selection_get_end(bw->sel, &char_offset); + } else if (char_offset < text_box->length) { + /* Within-box movement */ + char_offset = utf8_next(text_box->text, + text_box->length, char_offset); + } else { + /* Between-box movement */ + if (!text_box->next) + /* at end of text area: ignore */ + return true; - while ((char_offset > text_box->length + SPACE_LEN(text_box)) && - (text_box->next) && - (text_box->next->type == BOX_TEXT)) { -#ifdef TEXTINPUT_DEBUG - LOG(("Caret out of range: Was %d in boxlen %d " - "space %d", char_offset, - text_box->length, SPACE_LEN(text_box))); -#endif - char_offset -= text_box->length + SPACE_LEN(text_box); text_box = text_box->next; + if (text_box->type == BOX_BR) + text_box = text_box->next; + char_offset = 0; } + break; - /* not sure if this will happen or not... - * but won't stick an assert here as we can recover from it */ - if (char_offset > text_box->length) { -#ifdef TEXTINPUT_DEBUG - LOG(("Caret moved beyond end of line: " - "Was %d in boxlen %d", char_offset, - text_box->length)); -#endif + case KEY_LEFT: + if (selection_exists) { + /* In selection, move caret to start */ + text_box = selection_get_start(bw->sel, &char_offset); + } else if (char_offset > 0) { + /* Within-box movement */ + char_offset = utf8_prev(text_box->text, char_offset); + } else { + /* Between-box movement */ + if (!text_box->prev) + /* at start of text area: ignore */ + return true; + + text_box = text_box->prev; + if (text_box->type == BOX_BR) + text_box = text_box->prev; char_offset = text_box->length; } + break; - textarea->gadget->caret_text_box = text_box; - textarea->gadget->caret_box_offset = char_offset; - - font_plot_style_from_css(text_box->style, &fstyle); + case KEY_UP: + selection_clear(bw->sel, true); + browser_window_textarea_click(bw, BROWSER_MOUSE_CLICK_1, + textarea, + box_x, box_y, + text_box->x + pixel_offset, + inline_container->y + text_box->y - 1); + return true; - nsfont.font_width(&fstyle, text_box->text, - char_offset, &pixel_offset); + case KEY_DOWN: + selection_clear(bw->sel, true); + browser_window_textarea_click(bw, BROWSER_MOUSE_CLICK_1, + textarea, + box_x, box_y, + text_box->x + pixel_offset, + inline_container->y + text_box->y + + text_box->height + 1); + return true; - textarea->gadget->caret_pixel_offset = pixel_offset; + case KEY_LINE_START: + text_box = line_start(text_box); + char_offset = 0; + break; - box_coords(textarea, &box_x, &box_y); - box_x += scrollbar_get_offset(textarea->scroll_x); - box_y += scrollbar_get_offset(textarea->scroll_y); - ensure_caret_visible(bw, textarea); - box_x -= scrollbar_get_offset(textarea->scroll_x); - box_y -= scrollbar_get_offset(textarea->scroll_y); + case KEY_LINE_END: + text_box = line_end(text_box); + char_offset = text_box->length; + break; - browser_window_place_caret(bw, - box_x + inline_container->x + text_box->x + - pixel_offset, - box_y + inline_container->y + text_box->y, - text_box->height, - browser_window_textarea_callback, - browser_window_textarea_paste_text, - browser_window_textarea_move_caret, - textarea); + case KEY_TEXT_START: + assert(text_box->parent); - html_redraw_a_box(bw->current_content, textarea); - } + /* place caret at start of first box */ + text_box = text_box->parent->children; + char_offset = 0; + break; - return success; -} + case KEY_TEXT_END: + assert(text_box->parent); + /* place caret at end of last box */ + text_box = text_box->parent->last; + char_offset = text_box->length; + break; -/** - * Paste a block of text into an input field at the caret position. - * - * \param bw browser window - * \param utf8 pointer to block of text - * \param utf8_len length (bytes) of text block - * \param last true iff this is the last chunk (update screen too) - * \param p pointer to input box - * \return true iff successful - */ + case KEY_WORD_LEFT: + { + bool start_of_word; + /* if there is a selection, caret should stay at beginning */ + if (selection_exists) + break; -bool browser_window_input_paste_text(struct browser_window *bw, - const char *utf8, unsigned utf8_len, bool last, void *handle) -{ - struct box *input = handle; - struct box *text_box = input->children->children; - size_t box_offset = input->gadget->caret_box_offset; - unsigned int nchars = utf8_length(input->gadget->value); - const char *ep = utf8 + utf8_len; - const char *p = utf8; - bool success = true; - bool update = last; + start_of_word = (char_offset <= 0 || + isspace(text_box->text[char_offset - 1])); - /* keep adding chars until we've run out or would exceed - the maximum length of the field (in which we silently - ignore all others) - */ - while (p < ep && nchars < input->gadget->maxlength) { - char buf[80 + 6]; - int nbytes = 0; + while (!word_left(text_box->text, &char_offset, NULL)) { + struct box *prev = NULL; - /* how many more chars can we insert in one go? */ - while (p < ep && nbytes < 80 && - nchars < input->gadget->maxlength && - *p != '\n' && *p != '\r') { - unsigned len = utf8_next(p, ep - p, 0); - if (*p == ' ') - nbytes += utf8_from_ucs4(160, &buf[nbytes]); - else { - memcpy(&buf[nbytes], p, len); - nbytes += len; + assert(char_offset == 0); + + if (start_of_word) { + /* find the preceding non-BR box */ + prev = text_box->prev; + if (prev && prev->type == BOX_BR) + prev = prev->prev; } - p += len; - nchars++; - } + if (!prev) { + /* just stay at the start of this box */ + break; + } - if (!textbox_insert(bw, text_box, box_offset, buf, nbytes)) { - /* we still need to update the screen */ - update = true; - success = false; - break; - } - box_offset += nbytes; - /* Keep caret_form_offset in sync -- textbox_insert uses this - * to determine where to insert into the gadget's value */ - input->gadget->caret_form_offset += nbytes; + assert(prev->type == BOX_TEXT); - /* handle CR/LF and LF/CR terminations */ - if (*p == '\n') { - p++; - if (*p == '\r') p++; - } - else if (*p == '\r') { - p++; - if (*p == '\n') p++; + text_box = prev; + char_offset = prev->length; } } + break; - if (update) - input_update_display(bw, input, box_offset, false, true); - - return success; -} - + case KEY_WORD_RIGHT: + { + bool in_word; + /* if there is a selection, caret should move to the end */ + if (selection_exists) { + text_box = selection_get_end(bw->sel, &char_offset); + break; + } -/** - * Move caret to new position after reformatting - * - * \param bw browser window - * \param p pointer textarea box - * \return none - */ + in_word = (char_offset < text_box->length && + !isspace(text_box->text[char_offset])); -void browser_window_textarea_move_caret(struct browser_window *bw, void *p) -{ - struct box *textarea = p; - struct box *inline_container = textarea->gadget->caret_inline_container; - struct box *text_box = textarea->gadget->caret_text_box; - size_t char_offset = textarea->gadget->caret_box_offset; - int pixel_offset; - int box_x, box_y; - plot_font_style_t fstyle; + while (!word_right(text_box->text, text_box->length, + &char_offset, NULL)) { + struct box *next = text_box->next; - font_plot_style_from_css(text_box->style, &fstyle); + /* find the next non-BR box */ + if (next && next->type == BOX_BR) + next = next->next; - box_coords(textarea, &box_x, &box_y); - box_x -= scrollbar_get_offset(textarea->scroll_x); - box_y -= scrollbar_get_offset(textarea->scroll_y); + if (!next) { + /* just stay at the end of this box */ + char_offset = text_box->length; + break; + } - nsfont.font_width(&fstyle, text_box->text, - char_offset, &pixel_offset); + assert(next->type == BOX_TEXT); - browser_window_place_caret(bw, - box_x + inline_container->x + text_box->x + - pixel_offset, - box_y + inline_container->y + text_box->y, - text_box->height, - browser_window_textarea_callback, - browser_window_textarea_paste_text, - browser_window_textarea_move_caret, - textarea); -} + text_box = next; + char_offset = 0; + if (in_word && text_box->length > 0 && + !isspace(text_box->text[0])) { + /* just stay at the start of this box */ + break; + } + } + } + break; -/** - * Move caret to new position after reformatting - * - * \param bw browser window - * \param p pointer to text input box - * \return none - */ + case KEY_PAGE_UP: + { + int nlines = (textarea->height / text_box->height) - 1; -void browser_window_input_move_caret(struct browser_window *bw, void *p) -{ - struct box *input = (struct box *)p; - struct box *text_box = input->children->children; - unsigned int box_offset = input->gadget->caret_box_offset; - int pixel_offset; - int box_x, box_y; - plot_font_style_t fstyle; + while (nlines-- > 0) + text_box = line_above(text_box); - font_plot_style_from_css(text_box->style, &fstyle); + if (char_offset > text_box->length) + char_offset = text_box->length; + } + break; - box_coords(input, &box_x, &box_y); + case KEY_PAGE_DOWN: + { + int nlines = (textarea->height / text_box->height) - 1; - nsfont.font_width(&fstyle, text_box->text, box_offset, - &pixel_offset); + while (nlines-- > 0) + text_box = line_below(text_box); - browser_window_place_caret(bw, - box_x + input->children->x + - text_box->x + pixel_offset, - box_y + input->children->y + text_box->y, - text_box->height, - browser_window_input_callback, - browser_window_input_paste_text, - browser_window_input_move_caret, - input); -} + /* vague attempt to keep the caret at the same horizontal + * position, given that the code currently cannot support it + * being beyond the end of a line */ + if (char_offset > text_box->length) + char_offset = text_box->length; + } + break; + default: + return false; + } -/** - * Update display to reflect modified input field - * - * \param bw browser window - * \param input input field - * \param form_offset - * \param box_offset offset of caret within text box - * \param to_textarea caret is to be moved to a textarea - * \param redraw force redraw even if field hasn't scrolled - */ + /* + box_dump(textarea, 0); + for (struct box *t = inline_container->children; t; t = t->next) { + assert(t->type == BOX_TEXT); + assert(t->text); + assert(t->parent == inline_container); + if (t->next) assert(t->next->prev == t); + if (t->prev) assert(t->prev->next == t); + if (!t->next) { + assert(inline_container->last == t); + break; + } + if (t->next->type == BOX_BR) { + assert(t->next->next); + t = t->next; + } + } */ -void input_update_display(struct browser_window *bw, struct box *input, - unsigned box_offset, bool to_textarea, bool redraw) -{ - struct box *text_box = input->children->children; - unsigned pixel_offset; - int box_x, box_y; - int dx; - plot_font_style_t fstyle; + if (reflow) + textarea_reflow(bw, textarea, inline_container); - font_plot_style_from_css(text_box->style, &fstyle); + if (text_box->length + SPACE_LEN(text_box) <= char_offset) { + if (text_box->next && text_box->next->type == BOX_TEXT) { + /* the text box has been split when reflowing and + the caret is in the second part */ + char_offset -= (text_box->length + SPACE_LEN(text_box)); + text_box = text_box->next; + assert(text_box); + assert(char_offset <= text_box->length); + /* Scroll back to the left */ + if (textarea->scroll_x != NULL) { + box_x += scrollbar_get_offset( + textarea->scroll_x); + scrollbar_set(textarea->scroll_x, 0, false); + } + } else { + assert(!text_box->next || + (text_box->next && + text_box->next->type == BOX_BR)); - if (redraw) - nsfont.font_width(&fstyle, text_box->text, text_box->length, - &text_box->width); + char_offset = text_box->length + SPACE_LEN(text_box); + } + } - box_coords(input, &box_x, &box_y); + font_plot_style_from_css(text_box->style, &fstyle); - nsfont.font_width(&fstyle, text_box->text, box_offset, - (int *) &pixel_offset); + nsfont.font_width(&fstyle, text_box->text, char_offset, &pixel_offset); - /* Shift text box horizontally, so caret is visible */ - dx = text_box->x; - text_box->x = 0; - if (input->width < text_box->width && - input->width / 2 < (int) pixel_offset) { - /* Make caret appear in centre of text input */ - text_box->x = input->width / 2 - pixel_offset; - /* Clamp if we've shifted too far left */ - if (text_box->x < input->width - text_box->width) - text_box->x = input->width - text_box->width; - } - dx -= text_box->x; - input->gadget->caret_pixel_offset = pixel_offset; + selection_clear(bw->sel, true); - if (to_textarea) { - /* moving to textarea so need to set these up */ - input->gadget->caret_inline_container = input->children; - input->gadget->caret_text_box = text_box; - } + textarea->gadget->caret_inline_container = inline_container; + textarea->gadget->caret_text_box = text_box; + textarea->gadget->caret_box_offset = char_offset; + textarea->gadget->caret_pixel_offset = pixel_offset; - input->gadget->caret_box_offset = box_offset; + box_x += scrollbar_get_offset(textarea->scroll_x); + box_y += scrollbar_get_offset(textarea->scroll_y); + scrolled = ensure_caret_visible(bw, textarea); + box_x -= scrollbar_get_offset(textarea->scroll_x); + box_y -= scrollbar_get_offset(textarea->scroll_y); browser_window_place_caret(bw, - box_x + input->children->x + - text_box->x + pixel_offset, - box_y + input->children->y + text_box->y, + box_x + inline_container->x + text_box->x + + pixel_offset, + box_y + inline_container->y + text_box->y, text_box->height, - /* use the appropriate callback */ - to_textarea ? browser_window_textarea_callback - : browser_window_input_callback, - to_textarea ? browser_window_textarea_paste_text - : browser_window_input_paste_text, - to_textarea ? browser_window_textarea_move_caret - : browser_window_input_move_caret, - input); + browser_window_textarea_callback, + browser_window_textarea_paste_text, + browser_window_textarea_move_caret, + textarea); - if (dx || redraw) - html_redraw_a_box(bw->current_content, input); + if (scrolled || reflow) + html_redraw_a_box(bw->current_content, textarea); + + return true; } /** - * Insert a number of chars into a text box + * Handle clicks in a text area by placing the caret. * - * \param bw browser window - * \param text_box text box - * \param char_offset offset (bytes) at which to insert text - * \param utf8 UTF-8 text to insert - * \param utf8_len length (bytes) of UTF-8 text to insert - * \return true iff successful + * \param bw browser window where click occurred + * \param mouse state of mouse buttons and modifier keys + * \param textarea textarea box + * \param box_x position of textarea in global document coordinates + * \param box_y position of textarea in global document coordinates + * \param x coordinate of click relative to textarea + * \param y coordinate of click relative to textarea */ - -bool textbox_insert(struct browser_window *bw, struct box *text_box, - unsigned char_offset, const char *utf8, unsigned utf8_len) +void browser_window_textarea_click(struct browser_window *bw, + browser_mouse_state mouse, + struct box *textarea, + int box_x, int box_y, + int x, int y) { - char *text; - struct box *input = text_box->parent->parent; - struct content *current_content; - bool hide; - - assert(bw != NULL); - assert(bw->current_content != NULL); - - /** \todo Stop poking around inside contents. - * Why is this code in desktop/, anyway? (It's HTML-specific) */ - current_content = hlcache_handle_get_content(bw->current_content); - - if (bw->sel->defined) - delete_selection(bw->sel); - - /* insert into form gadget (text and password inputs only) */ - if (input->gadget && (input->gadget->type == GADGET_TEXTBOX || - input->gadget->type == GADGET_PASSWORD) && - input->gadget->value) { - size_t form_offset = input->gadget->caret_form_offset; - char *value = realloc(input->gadget->value, - input->gadget->length + utf8_len + 1); - if (!value) { - warn_user("NoMemory", 0); - return true; - } - input->gadget->value = value; - - memmove(input->gadget->value + form_offset + utf8_len, - input->gadget->value + form_offset, - input->gadget->length - form_offset); - memcpy(input->gadget->value + form_offset, utf8, utf8_len); - input->gadget->length += utf8_len; - input->gadget->value[input->gadget->length] = 0; - } - - hide = (input->gadget && input->gadget->type == GADGET_PASSWORD); - if (hide) { - /* determine the number of '*'s to be inserted */ - const char *eutf8 = utf8 + utf8_len; - utf8_len = 0; - while (utf8 < eutf8) { - utf8 += utf8_next(utf8, eutf8 - utf8, 0); - utf8_len++; - } - } + /* A textarea is an INLINE_BLOCK containing a single + * INLINE_CONTAINER, which contains the text as runs of TEXT + * separated by BR. There is at least one TEXT. The first and + * last boxes are TEXT. Consecutive BR may not be present. These + * constraints are satisfied by using a 0-length TEXT for blank + * lines. */ - /* insert in text box */ - text = talloc_realloc(current_content, text_box->text, - char, - text_box->length + SPACE_LEN(text_box) + utf8_len + 1); - if (!text) { - warn_user("NoMemory", 0); - return false; - } - text_box->text = text; + int char_offset = 0, pixel_offset = 0; + struct box *inline_container = textarea->children; + struct box *text_box; + bool scrolled; - if (text_box->space != 0 && - char_offset == text_box->length + SPACE_LEN(text_box)) { - if (hide) - text_box->space = 0; - else { - unsigned int last_off = utf8_prev(utf8, utf8_len); - if (utf8[last_off] != ' ') - text_box->space = 0; - else - utf8_len = last_off; - } - text_box->text[text_box->length++] = ' '; - } else { - memmove(text_box->text + char_offset + utf8_len, - text_box->text + char_offset, - text_box->length - char_offset); - } + text_box = textarea_get_position(textarea, x, y, + &char_offset, &pixel_offset); - if (hide) - memset(text_box->text + char_offset, '*', utf8_len); - else - memcpy(text_box->text + char_offset, utf8, utf8_len); - text_box->length += utf8_len; + textarea->gadget->caret_inline_container = inline_container; + textarea->gadget->caret_text_box = text_box; + textarea->gadget->caret_box_offset = char_offset; + textarea->gadget->caret_pixel_offset = pixel_offset; - /* nothing should assume that the text is terminated, - * but just in case */ - text_box->text[text_box->length] = 0; + box_x += scrollbar_get_offset(textarea->scroll_x); + box_y += scrollbar_get_offset(textarea->scroll_y); + scrolled = ensure_caret_visible(bw, textarea); + box_x -= scrollbar_get_offset(textarea->scroll_x); + box_y -= scrollbar_get_offset(textarea->scroll_y); - text_box->width = UNKNOWN_WIDTH; + browser_window_place_caret(bw, + box_x + inline_container->x + text_box->x + + pixel_offset, + box_y + inline_container->y + text_box->y, + text_box->height, + browser_window_textarea_callback, + browser_window_textarea_paste_text, + browser_window_textarea_move_caret, + textarea); - return true; + if (scrolled) + html_redraw_a_box(bw->current_content, textarea); } /** - * Delete a number of chars from a text box - * - * \param bw browser window - * \param text_box text box - * \param char_offset offset within text box (bytes) of first char to delete - * \param utf8_len length (bytes) of chars to be deleted - * \return true on success, false otherwise + * Paste a block of text into an input field at the caret position. * - * ::char_offset and ::utf8_len are only considered when there is no selection. - * If there is a selection, the entire selected area is deleted. - */ - -bool textbox_delete(struct browser_window *bw, struct box *text_box, - unsigned char_offset, unsigned utf8_len) -{ - unsigned next_offset = char_offset + utf8_len; - struct box *form = text_box->parent->parent; - - if (bw->sel->defined) { - delete_selection(bw->sel); - return true; - } + * \param bw browser window + * \param utf8 pointer to block of text + * \param utf8_len length (bytes) of text block + * \param last true iff this is the last chunk (update screen too) + * \param p pointer to input box + * \return true iff successful + */ - /* delete from form gadget (text and password inputs only) */ - if (form->gadget && (form->gadget->type == GADGET_TEXTBOX || - form->gadget->type == GADGET_PASSWORD) && - form->gadget->value) { - size_t form_offset = get_form_offset(form, text_box, - char_offset); - size_t next_offset = get_form_offset(form, text_box, - char_offset + utf8_len); +bool browser_window_input_paste_text(struct browser_window *bw, + const char *utf8, unsigned utf8_len, bool last, void *handle) +{ + struct box *input = handle; + struct box *text_box = input->children->children; + size_t box_offset = input->gadget->caret_box_offset; + unsigned int nchars = utf8_length(input->gadget->value); + const char *ep = utf8 + utf8_len; + const char *p = utf8; + bool success = true; + bool update = last; - memmove(form->gadget->value + form_offset, - form->gadget->value + next_offset, - form->gadget->length - next_offset); - form->gadget->length -= (next_offset - form_offset); - form->gadget->value[form->gadget->length] = 0; - } + /* keep adding chars until we've run out or would exceed + the maximum length of the field (in which we silently + ignore all others) + */ + while (p < ep && nchars < input->gadget->maxlength) { + char buf[80 + 6]; + int nbytes = 0; - /* delete from visible textbox */ - if (next_offset <= text_box->length + SPACE_LEN(text_box)) { - /* handle removal of trailing space */ - if (text_box->space != 0 && next_offset > text_box->length) { - if (char_offset > 0) { - /* is the trailing character still a space? */ - int tmp = utf8_prev(text_box->text, char_offset); - if (isspace(text_box->text[tmp])) - char_offset = tmp; - else - text_box->space = 0; - } else { - text_box->space = 0; + /* how many more chars can we insert in one go? */ + while (p < ep && nbytes < 80 && + nchars < input->gadget->maxlength && + *p != '\n' && *p != '\r') { + unsigned len = utf8_next(p, ep - p, 0); + if (*p == ' ') + nbytes += utf8_from_ucs4(160, &buf[nbytes]); + else { + memcpy(&buf[nbytes], p, len); + nbytes += len; } - text_box->length = char_offset; - } else { - memmove(text_box->text + char_offset, - text_box->text + next_offset, - text_box->length - next_offset); - text_box->length -= utf8_len; + p += len; + nchars++; } - /* nothing should assume that the text is terminated, - * but just in case */ - text_box->text[text_box->length] = 0; - - text_box->width = UNKNOWN_WIDTH; + if (!textbox_insert(bw, text_box, box_offset, buf, nbytes)) { + /* we still need to update the screen */ + update = true; + success = false; + break; + } + box_offset += nbytes; + /* Keep caret_form_offset in sync -- textbox_insert uses this + * to determine where to insert into the gadget's value */ + input->gadget->caret_form_offset += nbytes; - return true; + /* handle CR/LF and LF/CR terminations */ + if (*p == '\n') { + p++; + if (*p == '\r') p++; + } + else if (*p == '\r') { + p++; + if (*p == '\n') p++; + } } - return false; + if (update) + input_update_display(bw, input, box_offset, false, true); + + return success; } /** - * Delete some text from a box, or delete the box in its entirety + * Move caret to new position after reformatting * - * \param bw browser window - * \param b box - * \param offset start offset of text to be deleted (in bytes) - * \param length length of text to be deleted - * \return true iff successful + * \param bw browser window + * \param p pointer to text input box + * \return none */ -bool delete_handler(struct browser_window *bw, struct box *b, - int offset, size_t length) +void browser_window_input_move_caret(struct browser_window *bw, void *p) { - size_t text_length = b->length + SPACE_LEN(b); + struct box *input = (struct box *)p; + struct box *text_box = input->children->children; + unsigned int box_offset = input->gadget->caret_box_offset; + int pixel_offset; + int box_x, box_y; + plot_font_style_t fstyle; - /* only remove if its not the first box */ - if (offset <= 0 && length >= text_length && b->prev != NULL) { - /* remove the entire box */ - box_unlink_and_free(b); + font_plot_style_from_css(text_box->style, &fstyle); - return true; - } else - return textbox_delete(bw, b, offset, - min(length, text_length - offset)); -} + box_coords(input, &box_x, &box_y); + + nsfont.font_width(&fstyle, text_box->text, box_offset, + &pixel_offset); + browser_window_place_caret(bw, + box_x + input->children->x + + text_box->x + pixel_offset, + box_y + input->children->y + text_box->y, + text_box->height, + browser_window_input_callback, + browser_window_input_paste_text, + browser_window_input_move_caret, + input); +} /** - * Remove the selected text from a text box and gadget (if applicable) + * Key press callback for text or password input boxes. * - * \param s The selection to be removed + * \param bw The browser window containing the input box + * \param key The UCS4 character codepoint + * \param p The input box + * \return true if the keypress is dealt with, false otherwise. It can + * return true even if it ran out of memory; this just means that + * it would have claimed it if it could. */ - -void delete_selection(struct selection *s) +bool browser_window_input_callback(struct browser_window *bw, + uint32_t key, void *p) { - size_t start_offset, end_offset; - struct box *text_box; - struct box *end_box; - struct box *next; - size_t sel_len; - int beginning = 0; + struct box *input = (struct box *)p; + struct box *text_box = input->children->children; + size_t box_offset = input->gadget->caret_box_offset; + size_t end_offset; + int pixel_offset = input->gadget->caret_pixel_offset; + int box_x, box_y; + struct form* form = input->gadget->form; + bool changed = false; + char utf8[6]; + unsigned int utf8_len; + bool to_textarea = false; + bool selection_exists = bw->sel->defined; - assert(s->defined); + input->gadget->caret_form_offset = + get_form_offset(input, text_box, box_offset); - text_box = selection_get_start(s, &start_offset); - end_box = selection_get_end(s, &end_offset); - sel_len = s->end_idx - s->start_idx; + /* update the form offset */ + input->gadget->caret_form_offset = + get_form_offset(input, text_box, box_offset); - /* Clear selection so that deletion from textboxes proceeds */ - selection_clear(s, true); + selection_get_end(bw->sel, &end_offset); - /* handle first box */ - delete_handler(s->bw, text_box, start_offset, sel_len); - if (text_box == end_box) - return; + box_coords(input, &box_x, &box_y); - for (text_box = text_box->next; text_box != end_box; text_box = next) { - next = text_box->next; - box_unlink_and_free(text_box); - } + /* normal character insertion */ + if (!(key <= 0x001F || (0x007F <= key && key <= 0x009F))) { + /* have we exceeded max length of input? */ + utf8_len = utf8_length(input->gadget->value); + if (utf8_len >= input->gadget->maxlength) + return true; - delete_handler(s->bw, end_box, beginning, end_offset); -} + utf8_len = utf8_from_ucs4(key, utf8); -/** - * Locate the first inline box at the start of this line - * - * \param text_box text box from which to start searching - */ + if (!textbox_insert(bw, text_box, box_offset, utf8, utf8_len)) + return true; -struct box *line_start(struct box *text_box) -{ - while (text_box->prev && text_box->prev->type == BOX_TEXT) - text_box = text_box->prev; - return text_box; -} + box_offset += utf8_len; + changed = true; -/** - * Locate the last inline box in this line - * - * \param text_box text box from which to start searching - */ + } else switch (key) { + case KEY_DELETE_LEFT: + { + int prev_offset, new_offset; -struct box *line_end(struct box *text_box) -{ - while (text_box->next && text_box->next->type == BOX_TEXT) - text_box = text_box->next; - return text_box; -} + if (selection_exists) { + textbox_delete(bw, text_box, 0, 0); + } else { + /* Can't delete left from text box start */ + if (box_offset == 0) + return true; + prev_offset = box_offset; + new_offset = utf8_prev(text_box->text, box_offset); -/** - * Backtrack to the start of the previous line, if there is one. - */ + if (textbox_delete(bw, text_box, new_offset, + prev_offset - new_offset)) + box_offset = new_offset; + } + + changed = true; + } + break; + + case KEY_DELETE_RIGHT: + { + unsigned next_offset; + + if (selection_exists) { + textbox_delete(bw, text_box, 0, 0); + } else { + /* Can't delete right from text box end */ + if (box_offset >= text_box->length) + return true; -struct box *line_above(struct box *text_box) -{ - struct box *prev; + /* Go to the next valid UTF-8 character */ + next_offset = utf8_next(text_box->text, + text_box->length, box_offset); - text_box = line_start(text_box); + textbox_delete(bw, text_box, box_offset, + next_offset - box_offset); + } - prev = text_box->prev; - while (prev && prev->type == BOX_BR) - prev = prev->prev; + changed = true; + } + break; - return prev ? line_start(prev) : text_box; -} + case KEY_TAB: + { + struct form_control *next_input; + /* Find next text entry field that is actually + * displayed (i.e. has an associated box) */ + for (next_input = input->gadget->next; + next_input && + ((next_input->type != GADGET_TEXTBOX && + next_input->type != GADGET_TEXTAREA && + next_input->type != GADGET_PASSWORD) || + !next_input->box); + next_input = next_input->next) + ; + if (!next_input) + return true; + input = next_input->box; + box_offset = 0; + to_textarea = next_input->type == GADGET_TEXTAREA; + } + break; -/** - * Advance to the start of the next line, if there is one. - */ + case KEY_NL: + case KEY_CR: /* Return/Enter hit */ + selection_clear(bw->sel, true); -struct box *line_below(struct box *text_box) -{ - struct box *next; + if (form) + form_submit(bw->current_content, bw, form, 0); + return true; - text_box = line_end(text_box); + case KEY_SHIFT_TAB: + { + struct form_control *prev_input; + /* Find previous text entry field that is actually + * displayed (i.e. has an associated box) */ + for (prev_input = input->gadget->prev; + prev_input && + ((prev_input->type != GADGET_TEXTBOX && + prev_input->type != GADGET_TEXTAREA && + prev_input->type != GADGET_PASSWORD) || + !prev_input->box); + prev_input = prev_input->prev) + ; + if (!prev_input) + return true; - next = text_box->next; - while (next && next->type == BOX_BR) - next = next->next; + input = prev_input->box; + box_offset = 0; + to_textarea = prev_input->type == GADGET_TEXTAREA; + } + break; - return next ? next : text_box; -} + case KEY_CUT_LINE: + /* Clear the selection, if one exists */ + if (selection_exists) + selection_clear(bw->sel, false); + textarea_cut(bw, text_box, 0, text_box, text_box->length, + false); + box_offset = 0; -/** - * Break a text box into two - * - * \param bw browser window - * \param text_box text box to be split - * \param char_offset offset (in bytes) at which text box is to be split - */ + changed = true; + break; -struct box *textarea_insert_break(struct browser_window *bw, - struct box *text_box, size_t char_offset) -{ - struct box *new_br, *new_text; - struct content *current_content; - char *text; + case KEY_PASTE: + gui_paste_from_clipboard(bw->window, + box_x + input->children->x + text_box->x + pixel_offset, + box_y + input->children->y + text_box->y); - assert(bw != NULL); - assert(bw->current_content != NULL); + /* screen updated and caret repositioned already */ + return true; - /** \todo Stop poking around inside content objects */ - current_content = hlcache_handle_get_content(bw->current_content); + case KEY_CUT_SELECTION: + { + size_t start_idx, end_idx; + struct box *start_box = + selection_get_start(bw->sel, &start_idx); + struct box *end_box = selection_get_end(bw->sel, &end_idx); - text = talloc_array(current_content, char, text_box->length + 1); - if (!text) { - warn_user("NoMemory", 0); - return NULL; - } + if (start_box && end_box) { + selection_clear(bw->sel, false); + textarea_cut(bw, start_box, start_idx, + end_box, end_idx, true); - new_br = box_create(NULL, text_box->style, false, 0, 0, text_box->title, - 0, current_content); - new_text = talloc(current_content, struct box); - if (!new_text) { - warn_user("NoMemory", 0); - return NULL; + box_offset = start_idx; + changed = true; + } } + break; - new_br->type = BOX_BR; - box_insert_sibling(text_box, new_br); - - memcpy(new_text, text_box, sizeof (struct box)); - new_text->flags |= CLONE; - new_text->text = text; - memcpy(new_text->text, text_box->text + char_offset, - text_box->length - char_offset); - new_text->length = text_box->length - char_offset; - text_box->length = char_offset; - text_box->width = new_text->width = UNKNOWN_WIDTH; - box_insert_sibling(new_br, new_text); + case KEY_RIGHT: + if (selection_exists) { + box_offset = end_offset; + break; + } - return new_text; -} + if (box_offset < text_box->length) { + /* Go to the next valid UTF-8 character */ + box_offset = utf8_next(text_box->text, + text_box->length, box_offset); + } + break; -/** - * Cut a range of text from a text box, - * possibly placing it on the global clipboard. - * - * \param bw browser window - * \param start_box text box at start of range - * \param start_idx index (bytes) within start box - * \param end_box text box at end of range - * \param end_idx index (bytes) within end box - * \param clipboard whether to place text on the clipboard - * \return true iff successful - */ + case KEY_LEFT: + /* If there is a selection, caret should remain at start */ + if (selection_exists) + break; -bool textarea_cut(struct browser_window *bw, - struct box *start_box, unsigned start_idx, - struct box *end_box, unsigned end_idx, - bool clipboard) -{ - struct box *box = start_box; - bool success = true; - bool del = false; /* caller expects start_box to persist */ + /* Go to the previous valid UTF-8 character */ + box_offset = utf8_prev(text_box->text, box_offset); + break; - if (clipboard && !gui_empty_clipboard()) - return false; + case KEY_LINE_START: + box_offset = 0; + break; - while (box && box != end_box) { - /* read before deletion, in case the whole box goes */ - struct box *next = box->next; + case KEY_LINE_END: + box_offset = text_box->length; + break; - if (box->type == BOX_BR) { - if (clipboard && - !gui_add_to_clipboard("\n", 1, false)) { - gui_commit_clipboard(); - return false; - } - box_unlink_and_free(box); - } else { - /* append box text to clipboard and then delete it */ - if (clipboard && - !gui_add_to_clipboard(box->text + start_idx, - box->length - start_idx, - SPACE_LEN(box))) { - gui_commit_clipboard(); - return false; - } + case KEY_WORD_LEFT: + /* If there is a selection, caret should remain at start */ + if (selection_exists) + break; - if (del) { - if (!delete_handler(bw, box, start_idx, - (box->length + SPACE_LEN(box)) - - start_idx) && clipboard) { - gui_commit_clipboard(); - return false; - } - } else { - textbox_delete(bw, box, start_idx, - (box->length + SPACE_LEN(box)) - - start_idx); - } - } + if (!word_left(text_box->text, &box_offset, NULL)) + box_offset = 0; - del = true; - start_idx = 0; - box = next; - } + break; - /* and the last box */ - if (box) { - if (clipboard && !gui_add_to_clipboard(box->text + start_idx, - end_idx - start_idx, end_idx > box->length)) { - success = false; - } else { - if (del) { - if (!delete_handler(bw, box, start_idx, - end_idx - start_idx)) - success = false; - } else { - textbox_delete(bw, box, start_idx, - end_idx - start_idx); - } + case KEY_WORD_RIGHT: + if (selection_exists) { + box_offset = end_offset; + break; } - } - - if (clipboard && !gui_commit_clipboard()) - success = false; - return success; -} + if (!word_right(text_box->text, text_box->length, + &box_offset, NULL)) + box_offset = text_box->length; + break; -/** - * Reflow textarea preserving width and height - * - * \param bw browser window - * \param textarea text area box - * \param inline_container container holding text box - */ + case KEY_DELETE_LINE_START: + if (selection_exists) + selection_clear(bw->sel, true); -void textarea_reflow(struct browser_window *bw, struct box *textarea, - struct box *inline_container) -{ - struct content *c = hlcache_handle_get_content(bw->current_content); - int width = textarea->width; - int height = textarea->height; + if (box_offset == 0) + return true; - assert(c != NULL); + textarea_cut(bw, text_box, 0, text_box, box_offset, false); + box_offset = 0; - if (!layout_inline_container(inline_container, width, - textarea, 0, 0, (struct html_content *) c)) - warn_user("NoMemory", 0); - textarea->width = width; - textarea->height = height; - layout_calculate_descendant_bboxes(textarea); - box_handle_scrollbars(c, textarea, - box_hscrollbar_present(textarea), - box_vscrollbar_present(textarea)); -} + changed = true; + break; + case KEY_DELETE_LINE_END: + if (selection_exists) + selection_clear(bw->sel, true); -/** - * Move to the start of the word containing the given character position, - * or the start of the preceding word if already at the start of this one. - * - * \param text UTF-8 text string - * \param poffset offset of caret within string (updated on exit) - * \param pchars receives the number of characters skipped - * \return true iff the start of a word was found before/at the string start - */ + if (box_offset >= text_box->length) + return true; -bool word_left(const char *text, size_t *poffset, size_t *pchars) -{ - size_t offset = *poffset; - bool success = false; - size_t nchars = 0; + textarea_cut(bw, text_box, box_offset, + text_box, text_box->length, false); - /* Skip any spaces immediately prior to the offset */ - while (offset > 0) { - offset = utf8_prev(text, offset); - nchars++; - if (!isspace(text[offset])) break; - } + changed = true; + break; - /* Now skip all non-space characters */ - while (offset > 0) { - size_t prev = utf8_prev(text, offset); - success = true; - if (isspace(text[prev])) - break; - offset = prev; - nchars++; + default: + return false; } - *poffset = offset; - if (pchars) *pchars = nchars; + selection_clear(bw->sel, true); + input_update_display(bw, input, box_offset, to_textarea, changed); - return success; + return true; } /** - * Move to the start of the first word following the given character position. + * Handle clicks in a text or password input box by placing the caret. * - * \param text UTF-8 text string - * \param len length of string in bytes - * \param poffset offset of caret within string (updated on exit) - * \param pchars receives the number of characters skipped - * \return true iff the start of a word was found before the string end + * \param bw browser window where click occurred + * \param input input box + * \param box_x position of input in global document coordinates + * \param box_y position of input in global document coordinates + * \param x coordinate of click relative to input + * \param y coordinate of click relative to input */ - -bool word_right(const char *text, size_t len, size_t *poffset, size_t *pchars) +void browser_window_input_click(struct browser_window* bw, + struct box *input, + int box_x, int box_y, + int x, int y) { - size_t offset = *poffset; - bool success = false; - size_t nchars = 0; + size_t char_offset = 0; + int pixel_offset = 0, dx = 0; + struct box *text_box = input->children->children; + plot_font_style_t fstyle; - /* Skip all non-space characters after the offset */ - while (offset < len) { - if (isspace(text[offset])) break; - offset = utf8_next(text, len, offset); - nchars++; - } + font_plot_style_from_css(text_box->style, &fstyle); - /* Now skip all space characters */ - while (offset < len) { - offset = utf8_next(text, len, offset); - nchars++; - if (offset < len && !isspace(text[offset])) { - success = true; - break; - } + nsfont.font_position_in_string(&fstyle, text_box->text, + text_box->length, x - text_box->x, + &char_offset, &pixel_offset); + assert(char_offset <= text_box->length); + + /* Shift the text box horizontally to ensure that the + * caret position is visible, and ideally centred */ + text_box->x = 0; + if ((input->width < text_box->width) && + (input->width / 2 < pixel_offset)) { + dx = text_box->x; + /* Move left so caret is centred */ + text_box->x = input->width / 2 - pixel_offset; + /* Clamp, so text box's right hand edge coincides + * with the input's right hand edge */ + if (text_box->x < input->width - text_box->width) + text_box->x = input->width - text_box->width; + dx -= text_box->x; } + input->gadget->caret_box_offset = char_offset; + input->gadget->caret_form_offset = + get_form_offset(input, text_box, char_offset); + input->gadget->caret_pixel_offset = pixel_offset; - *poffset = offset; - if (pchars) *pchars = nchars; + browser_window_place_caret(bw, + box_x + input->children->x + + text_box->x + pixel_offset, + box_y + input->children->y + text_box->y, + text_box->height, + browser_window_input_callback, + browser_window_input_paste_text, + browser_window_input_move_caret, + input); - return success; + if (dx) + html_redraw_a_box(bw->current_content, input); } /** - * Adjust scroll offsets so that the caret is visible + * Handle key presses in a browser window. * - * \param bw browser window where click ocurred - * \param textarea textarea box - * \return true if a change in scroll offsets has occurred -*/ - -bool ensure_caret_visible(struct browser_window *bw, struct box *textarea) + * \param bw The root browser window + * \param key The UCS4 character codepoint + * \return true if key handled, false otherwise + */ +bool browser_window_key_press(struct browser_window *bw, uint32_t key) { - html_content *html = (html_content *) - hlcache_handle_get_content(bw->current_content); - int cx, cy; - int scrollx, scrolly; - - assert(textarea->gadget); + struct browser_window *focus = bw->focus; - scrollx = scrollbar_get_offset(textarea->scroll_x); - scrolly = scrollbar_get_offset(textarea->scroll_y); + /* keys that take effect wherever the caret is positioned */ + switch (key) { + case KEY_SELECT_ALL: + selection_select_all(focus->sel); + return true; - /* Calculate the caret coordinates */ - cx = textarea->gadget->caret_pixel_offset + - textarea->gadget->caret_text_box->x; - cy = textarea->gadget->caret_text_box->y; + case KEY_COPY_SELECTION: + gui_copy_to_clipboard(focus->sel); + return true; - /* Ensure they are visible */ - if (textarea->scroll_x == NULL) { - scrollx = 0; - } else if (cx - scrollbar_get_offset(textarea->scroll_x) < 0) { - scrollx = cx; - } else if (cx > scrollbar_get_offset(textarea->scroll_x) + - textarea->width) { - scrollx = cx - textarea->width; - } + case KEY_CLEAR_SELECTION: + selection_clear(focus->sel, true); + return true; - if (textarea->scroll_y == NULL) { - scrolly = 0; - } else if (cy - scrollbar_get_offset(textarea->scroll_y) < 0) { - scrolly = cy; - } else if (cy + textarea->gadget->caret_text_box->height > - scrollbar_get_offset(textarea->scroll_y) + - textarea->height) { - scrolly = (cy + textarea->gadget->caret_text_box->height) - - textarea->height; + case KEY_ESCAPE: + if (selection_defined(focus->sel)) { + selection_clear(focus->sel, true); + return true; + } + /* if there's no selection, + * leave Escape for the caller */ + return false; } - if ((scrollx == scrollbar_get_offset(textarea->scroll_x)) && - (scrolly == scrollbar_get_offset(textarea->scroll_y))) + /* pass on to the appropriate field */ + if (!focus->caret_callback) return false; - if (textarea->scroll_x != NULL) { - html->scrollbar = textarea->scroll_x; - scrollbar_set(textarea->scroll_x, scrollx, false); - html->scrollbar = NULL; - } - if (textarea->scroll_y != NULL) { - html->scrollbar = textarea->scroll_x; - scrollbar_set(textarea->scroll_y, scrolly, false); - html->scrollbar = NULL; - } + return focus->caret_callback(focus, key, focus->caret_p); +} - return true; + +/** + * Paste a block of text into a browser window at the caret position. + * + * \param bw browser window + * \param utf8 pointer to block of text + * \param utf8_len length (bytes) of text block + * \param last true iff this is the last chunk (update screen too) + * \return true iff successful + */ + +bool browser_window_paste_text(struct browser_window *bw, const char *utf8, + unsigned utf8_len, bool last) +{ + if (!bw->focus || !bw->focus->paste_callback) + return false; + + return bw->focus->paste_callback(bw->focus, utf8, utf8_len, last, + bw->focus->caret_p); } -- cgit v1.2.3