From 0c53ad0e67b7e643df676d03721ca5d0691f711e Mon Sep 17 00:00:00 2001 From: Vincent Sanders Date: Mon, 6 Jun 2016 09:00:52 +0100 Subject: Clean up RISC OS save source to remove forward declarations and improve documentation --- frontends/riscos/save.c | 1615 ++++++++++++++++++++++++----------------------- 1 file changed, 811 insertions(+), 804 deletions(-) (limited to 'frontends/riscos') diff --git a/frontends/riscos/save.c b/frontends/riscos/save.c index a028fcd09..af74b51b0 100644 --- a/frontends/riscos/save.c +++ b/frontends/riscos/save.c @@ -17,8 +17,9 @@ * along with this program. If not, see . */ -/** \file - * Save dialog and drag and drop saving (implementation). +/** + * \file + * Save dialog and drag and drop saving implementation for RISC OS. */ #include @@ -41,15 +42,15 @@ #include "utils/messages.h" #include "utils/utf8.h" #include "utils/nsurl.h" -#include "netsurf/content.h" #include "netsurf/browser_window.h" +#include "netsurf/window.h" +#include "netsurf/bitmap.h" +#include "netsurf/content.h" #include "desktop/hotlist.h" #include "desktop/global_history.h" #include "desktop/version.h" #include "desktop/save_complete.h" #include "desktop/save_text.h" -#include "netsurf/window.h" -#include "netsurf/bitmap.h" #include "render/form.h" #include "riscos/bitmap.h" @@ -77,8 +78,11 @@ //} query_reason; -/**todo - much of the state information for a save should probably be moved into a structure - now since we could have multiple saves outstanding */ +/** + * \todo much of the state information for a save should probably be + * moved into a structure now since we could have multiple saves + * outstanding. + */ static gui_save_type gui_save_current_type; static struct hlcache_handle *gui_save_content = NULL; @@ -105,34 +109,14 @@ static size_t save_dir_len; typedef enum { LINK_ACORN, LINK_ANT, LINK_TEXT } link_format; -static bool ro_gui_save_complete(struct hlcache_handle *h, char *path); -static bool ro_gui_save_content(struct hlcache_handle *h, char *path, bool force_overwrite); -static void ro_gui_save_done(void); -static void ro_gui_save_bounced(wimp_message *message); -static bool ro_gui_save_object_native(struct hlcache_handle *h, char *path); -static bool ro_gui_save_link(const char *url, const char *title, link_format format, char *path); -static void ro_gui_save_set_state(struct hlcache_handle *h, gui_save_type save_type, - const nsurl *url, char *leaf_buf, size_t leaf_len, - char *icon_buf, size_t icon_len); -static void ro_gui_save_drag_end(wimp_dragged *drag, void *data); -static bool ro_gui_save_create_thumbnail(struct hlcache_handle *h, const char *name); -static void ro_gui_save_overwrite_confirmed(query_id, enum query_response res, void *p); -static void ro_gui_save_overwrite_cancelled(query_id, enum query_response res, void *p); - -static const query_callback overwrite_funcs = -{ - ro_gui_save_overwrite_confirmed, - ro_gui_save_overwrite_cancelled -}; - - /** An entry in gui_save_table. */ struct gui_save_table_entry { int filetype; const char *name; }; -/** Table of filetypes and default filenames. Must be in sync with +/** + * Table of filetypes and default filenames. Must be in sync with * gui_save_type (riscos/gui.h). A filetype of 0 indicates the content should * be used. */ @@ -153,6 +137,9 @@ static const struct gui_save_table_entry gui_save_table[] = { }; +static bool ro_gui_save_content(struct hlcache_handle *h, char *path, bool force_overwrite); + + /** * Create the saveas dialogue from the given template, and the sprite area * necessary for our thumbnail (full page save) @@ -160,7 +147,6 @@ static const struct gui_save_table_entry gui_save_table[] = { * \param template_name name of template to be used * \return window handle of created dialogue */ - wimp_w ro_gui_saveas_create(const char *template_name) { const int sprite_size = (68 * 68 * 4) + ((68 * 68) / 8); /* 32bpp with mask */ @@ -220,7 +206,6 @@ wimp_w ro_gui_saveas_create(const char *template_name) /** * Clean-up function that releases our sprite area and memory. */ - void ro_gui_saveas_quit(void) { if (saveas_area) { @@ -236,6 +221,197 @@ void ro_gui_saveas_quit(void) save_dir = NULL; } + +/** + * Create a thumbnail sprite for the page being saved. + * + * \param h content to be converted + * \param name sprite name to use + * \return true iff successful + */ +static bool +ro_gui_save_create_thumbnail(struct hlcache_handle *h, const char *name) +{ + osspriteop_header *sprite_header; + struct bitmap *bitmap; + osspriteop_area *area; + + bitmap = riscos_bitmap_create(34, 34, BITMAP_NEW | BITMAP_OPAQUE | BITMAP_CLEAR_MEMORY); + if (!bitmap) { + LOG("Thumbnail initialisation failed."); + return false; + } + riscos_bitmap_render(bitmap, h); + area = riscos_bitmap_convert_8bpp(bitmap); + riscos_bitmap_destroy(bitmap); + if (!area) { + LOG("Thumbnail conversion failed."); + return false; + } + + sprite_header = (osspriteop_header *)(area + 1); + strncpy(sprite_header->name, name, 12); + + + /* we can't resize the saveas sprite area because it may move + * and we have no elegant way to update the window definition + * on all OS versions + */ + assert(sprite_header->size <= saveas_area->size - saveas_area->first); + + memcpy((byte*)saveas_area + saveas_area->first, + sprite_header, sprite_header->size); + + saveas_area->sprite_count = 1; + saveas_area->used = saveas_area->first + sprite_header->size; + + free(area); + + return true; +} + + +/** + * Suggest a leafname and sprite name for the given content. + * + * \param h content being saved + * \param save_type type of save operation being performed + * \param url used to determine leafname + * \param leaf_buf buffer to receive suggested leafname. + * \param leaf_len size of buffer to receive suggested leafname. + * \param icon_buf buffer to receive sprite name. + * \param icon_len size of buffer to receive icon name. + */ +static void +ro_gui_save_set_state(struct hlcache_handle *h, gui_save_type save_type, + const nsurl *url, char *leaf_buf, size_t leaf_len, + char *icon_buf, size_t icon_len) +{ + /* filename */ + const char *name = gui_save_table[save_type].name; + bool done = false; + char *nice = NULL; + nserror err; + char *local_name; + + assert(icon_len >= 13); + + /* parameters that we need to remember */ + gui_save_current_type = save_type; + gui_save_content = h; + + /* suggest a filetype based upon the content */ + gui_save_filetype = gui_save_table[save_type].filetype; + if (!gui_save_filetype && h) { + if (save_type == GUI_SAVE_OBJECT_NATIVE) { + switch (ro_content_native_type(h)) { + case osfile_TYPE_SPRITE: + gui_save_filetype = osfile_TYPE_SPRITE; + break; + case osfile_TYPE_DRAW: + gui_save_filetype = osfile_TYPE_DRAW; + break; + default: + break; + } + } + if (!gui_save_filetype) + gui_save_filetype = ro_content_filetype(h); + } + + /* leafname */ + if ((url != NULL) && + (nsurl_nice(url, &nice, nsoption_bool(strip_extensions)) == + NSERROR_OK)) { + size_t i; + for (i = 0; nice[i]; i++) { + if (nice[i] == '.') + nice[i] = '/'; + else if (nice[i] <= ' ' || + strchr(":*#$&@^%\\", nice[i])) + nice[i] = '_'; + } + name = nice; + } else { + name = messages_get(name); + } + + /* filename is utf8 */ + if (save_type == GUI_SAVE_COMPLETE && leaf_len > 0) { + leaf_buf[0] = '!'; + leaf_buf++; + leaf_len--; + } + strncpy(leaf_buf, name, leaf_len); + leaf_buf[leaf_len - 1] = 0; + + err = utf8_to_local_encoding(name, 0, &local_name); + if (err != NSERROR_OK) { + /* badenc should never happen */ + assert(err != NSERROR_BAD_ENCODING); + local_name = NULL; + } + + if (local_name != NULL) + name = local_name; + + /* sprite name used for icon and dragging */ + if (save_type == GUI_SAVE_COMPLETE) { + int index; + + /* Paint gets confused with uppercase characters and we need to + convert spaces to hard spaces */ + icon_buf[0] = '!'; + for (index = 0; index < 11 && name[index]; ) { + char ch = name[index]; + if (ch == ' ') + icon_buf[++index] = 0xa0; + else + icon_buf[++index] = tolower(ch); + } + memset(&icon_buf[index + 1], 0, 11 - index); + icon_buf[12] = '\0'; + + if (ro_gui_save_create_thumbnail(h, icon_buf)) + done = true; + } + + if (!done) { + osspriteop_header *sprite; + os_error *error; + + sprintf(icon_buf, "file_%.3x", gui_save_filetype); + + error = ro_gui_wimp_get_sprite(icon_buf, &sprite); + if (error && error->errnum == error_SPRITE_OP_DOESNT_EXIST) { + /* try the 'unknown' filetype sprite as a fallback */ + memcpy(icon_buf, "file_xxx", 9); + error = ro_gui_wimp_get_sprite(icon_buf, &sprite); + } + + if (error) { + LOG("ro_gui_wimp_get_sprite: 0x%x: %s", error->errnum, error->errmess); + ro_warn_user("MiscError", error->errmess); + } else { + /* the sprite area should always be large enough for + * file_xxx sprites */ + assert(sprite->size <= saveas_area->size - + saveas_area->first); + + memcpy((byte*)saveas_area + saveas_area->first, + sprite, + sprite->size); + + saveas_area->sprite_count = 1; + saveas_area->used = saveas_area->first + sprite->size; + } + } + + free(local_name); + free(nice); +} + + /** * Prepares the save box to reflect gui_save_type and a content, and * opens it. @@ -246,7 +422,6 @@ void ro_gui_saveas_quit(void) * \param url url to be saved (link types) * \param title title (if any), when saving links */ - void ro_gui_save_prepare(gui_save_type save_type, struct hlcache_handle *h, char *s, const nsurl *url, const char *title) { @@ -293,91 +468,35 @@ void ro_gui_save_prepare(gui_save_type save_type, struct hlcache_handle *h, ro_gui_wimp_event_memorise(dialog_saveas); } + /** - * Starts a drag for the save dialog + * Handle lack of Message_DataSaveAck for drags, saveas dialogs and clipboard code * - * \param pointer mouse position info from Wimp + * \param message A wimp message. */ -void ro_gui_save_start_drag(wimp_pointer *pointer) +static void ro_gui_save_bounced(wimp_message *message) { - if (pointer->buttons & (wimp_DRAG_SELECT | wimp_DRAG_ADJUST)) { - const char *sprite = ro_gui_get_icon_string(pointer->w, pointer->i); - int x = pointer->pos.x, y = pointer->pos.y; - wimp_window_state wstate; - wimp_icon_state istate; - /* start the drag from the icon's exact location, rather than the pointer */ - istate.w = wstate.w = pointer->w; - istate.i = pointer->i; - if (!xwimp_get_window_state(&wstate) && !xwimp_get_icon_state(&istate)) { - x = (istate.icon.extent.x1 + istate.icon.extent.x0)/2 + - wstate.visible.x0 - wstate.xscroll; - y = (istate.icon.extent.y1 + istate.icon.extent.y0)/2 + - wstate.visible.y1 - wstate.yscroll; - } - ro_mouse_drag_start(ro_gui_save_drag_end, NULL, NULL, NULL); - gui_save_sourcew = pointer->w; - saving_from_dialog = true; - gui_save_close_after = !(pointer->buttons & wimp_DRAG_ADJUST); - ro_gui_drag_icon(x, y, sprite); - } + gui_current_drag_type = GUI_DRAG_NONE; } /** - * Handle OK click/keypress in the save dialog. + * Handle User_Drag_Box event for a drag from the save dialog or browser window. * - * \param w window handle of save dialog - * \return true on success, false on failure + * \param *drag The Wimp_DragEnd data block. + * \param *data NULL, as function is used as a callback from ro_mouse. */ -bool ro_gui_save_ok(wimp_w w) +static void ro_gui_save_drag_end(wimp_dragged *drag, void *data) { - const char *name = ro_gui_get_icon_string(w, ICON_SAVE_PATH); + const char *name; wimp_pointer pointer; - char path[256]; + wimp_message message; + os_error *error; + char *dp, *ep; + char *local_name = NULL; - if (!strrchr(name, '.')) { - ro_warn_user("NoPathError", NULL); - return false; - } - - ro_gui_convert_save_path(path, sizeof path, name); - gui_save_sourcew = w; - saving_from_dialog = true; - gui_save_send_dataload = false; - gui_save_close_after = xwimp_get_pointer_info(&pointer) - || !(pointer.buttons & wimp_CLICK_ADJUST); - memcpy(&gui_save_message.data.data_xfer.file_name, path, 1 + strlen(path)); - - if (ro_gui_save_content(gui_save_content, path, !nsoption_bool(confirm_overwrite))) { - ro_gui_save_done(); - return true; - } - return false; -} - - -/** - * Initiates drag saving of an object directly from a browser window - * - * \param save_type type of save - * \param c content to save - * \param g gui window - */ - -void gui_drag_save_object(struct gui_window *g, struct hlcache_handle *c, - gui_save_type save_type) -{ - wimp_pointer pointer; - char icon_buf[20]; - os_error *error; - - /* Close the save window because otherwise we need two contexts - */ - xwimp_create_menu(wimp_CLOSE_MENU, 0, 0); - ro_gui_dialog_close(dialog_saveas); - - gui_save_sourcew = g->window; - saving_from_dialog = false; + if (dragbox_active) + ro_gui_drag_box_cancel(); error = xwimp_get_pointer_info(&pointer); if (error) { @@ -386,414 +505,435 @@ void gui_drag_save_object(struct gui_window *g, struct hlcache_handle *c, return; } - ro_gui_save_set_state(c, save_type, hlcache_handle_get_url(c), - save_leafname, LEAFNAME_MAX, - icon_buf, sizeof(icon_buf)); - - ro_mouse_drag_start(ro_gui_save_drag_end, NULL, NULL, NULL); - - ro_gui_drag_icon(pointer.pos.x, pointer.pos.y, icon_buf); -} + /* perform hit-test if the destination is the same as the + * source window; we want to allow drag-saving from a page + * into the input fields within the page, but avoid accidental + * replacements of the current page + */ + if (gui_save_sourcew != (wimp_w)-1 && pointer.w == gui_save_sourcew) { + int dx = (drag->final.x1 + drag->final.x0)/2; + int dy = (drag->final.y1 + drag->final.y0)/2; + struct gui_window *g; + bool dest_ok = false; + os_coord pos; + g = ro_gui_window_lookup(gui_save_sourcew); -/** - * Initiates drag saving of a selection from a browser window - * - * \param g gui window - * \param selection selection object - */ + if (g && ro_gui_window_to_window_pos(g, dx, dy, &pos)) { + dest_ok = browser_window_drop_file_at_point(g->bw, + pos.x, pos.y, NULL); + } + if (!dest_ok) + return; + } -void gui_drag_save_selection(struct gui_window *g, const char *selection) -{ - wimp_pointer pointer; - char icon_buf[20]; - os_error *error; + if (!saving_from_dialog) { + /* saving directly from browser window, choose a + * name based upon the URL */ + nserror err; + err = utf8_to_local_encoding(save_leafname, 0, &local_name); + if (err != NSERROR_OK) { + /* badenc should never happen */ + assert(err != NSERROR_BAD_ENCODING); + local_name = NULL; + } + name = local_name ? local_name : save_leafname; + } + else { + char *dot; - /* Close the save window because otherwise we need two contexts - */ - xwimp_create_menu(wimp_CLOSE_MENU, 0, 0); - ro_gui_dialog_close(dialog_saveas); + /* saving from dialog, grab leafname from icon */ + name = ro_gui_get_icon_string(gui_save_sourcew, ICON_SAVE_PATH); + dot = strrchr(name, '.'); + if (dot) + name = dot + 1; + } - gui_save_sourcew = g->window; - saving_from_dialog = false; + dp = message.data.data_xfer.file_name; + ep = dp + sizeof message.data.data_xfer.file_name; - error = xwimp_get_pointer_info(&pointer); - if (error) { - LOG("xwimp_get_pointer_info: 0x%x: %s", error->errnum, error->errmess); - ro_warn_user("WimpError", error->errmess); - return; - } + if (gui_save_current_type == GUI_SAVE_COMPLETE) { + message.data.data_xfer.file_type = 0x2000; + if (*name != '!') *dp++ = '!'; + } else + message.data.data_xfer.file_type = gui_save_filetype; + ro_gui_convert_save_path(dp, ep - dp, name); - if (gui_save_selection == NULL) - free(gui_save_selection); + /** \todo we're supposed to set this if drag-n-drop used */ + message.your_ref = 0; - if (selection == NULL) - gui_save_selection = strdup(""); - else - gui_save_selection = strdup(selection); + message.action = message_DATA_SAVE; + message.data.data_xfer.w = pointer.w; + message.data.data_xfer.i = pointer.i; + message.data.data_xfer.pos.x = pointer.pos.x; + message.data.data_xfer.pos.y = pointer.pos.y; + message.data.data_xfer.est_size = 1000; + message.size = 44 + ((strlen(message.data.data_xfer.file_name) + 4) & + (~3u)); - ro_gui_save_set_state(NULL, GUI_SAVE_TEXT_SELECTION, NULL, - save_leafname, LEAFNAME_MAX, - icon_buf, sizeof(icon_buf)); + ro_message_send_message_to_window(wimp_USER_MESSAGE_RECORDED, &message, + pointer.w, pointer.i, ro_gui_save_bounced, NULL); - ro_mouse_drag_start(ro_gui_save_drag_end, NULL, NULL, NULL); + gui_current_drag_type = GUI_DRAG_SAVE; - ro_gui_drag_icon(pointer.pos.x, pointer.pos.y, icon_buf); + free(local_name); } /** - * Initiates drag saving of a link/URL file + * Starts a drag for the save dialog * - * \param save_type format in which URL should be saved - * \param url url to be saved - * \param title title to be included in URI format, if any - * \param g gui window to save from - * \ + * \param pointer mouse position info from Wimp */ +void ro_gui_save_start_drag(wimp_pointer *pointer) +{ + if (pointer->buttons & (wimp_DRAG_SELECT | wimp_DRAG_ADJUST)) { + const char *sprite = ro_gui_get_icon_string(pointer->w, pointer->i); + int x = pointer->pos.x, y = pointer->pos.y; + wimp_window_state wstate; + wimp_icon_state istate; + /* start the drag from the icon's exact location, rather than the pointer */ + istate.w = wstate.w = pointer->w; + istate.i = pointer->i; + if (!xwimp_get_window_state(&wstate) && !xwimp_get_icon_state(&istate)) { + x = (istate.icon.extent.x1 + istate.icon.extent.x0)/2 + + wstate.visible.x0 - wstate.xscroll; + y = (istate.icon.extent.y1 + istate.icon.extent.y0)/2 + + wstate.visible.y1 - wstate.yscroll; + } + ro_mouse_drag_start(ro_gui_save_drag_end, NULL, NULL, NULL); + gui_save_sourcew = pointer->w; + saving_from_dialog = true; + gui_save_close_after = !(pointer->buttons & wimp_DRAG_ADJUST); + ro_gui_drag_icon(x, y, sprite); + } +} -void ro_gui_drag_save_link(gui_save_type save_type, const nsurl *url, - const char *title, struct gui_window *g) + +/** + * Save completed, inform recipient and close our 'save as' dialog. + */ +static void ro_gui_save_done(void) { - wimp_pointer pointer; - char icon_buf[20]; os_error *error; - /* Close the save window because otherwise we need two contexts - */ - xwimp_create_menu(wimp_CLOSE_MENU, 0, 0); - ro_gui_dialog_close(dialog_saveas); + if (gui_save_send_dataload) { + /* Ack successful save with message_DATA_LOAD */ + wimp_message *message = &gui_save_message; + message->action = message_DATA_LOAD; + message->your_ref = message->my_ref; + error = xwimp_send_message(wimp_USER_MESSAGE, message, + message->sender); + if (error) { + LOG("xwimp_send_message: 0x%x: %s", error->errnum, error->errmess); + ro_warn_user("SaveError", error->errmess); + } + } - gui_save_url = nsurl_access(url); - gui_save_title = title; - gui_save_sourcew = g->window; - saving_from_dialog = false; + if (saving_from_dialog) { + /* remember the save directory if saving to the Filer */ + if (!gui_save_send_dataload || + gui_save_message.data.data_xfer.est_size != -1) { + char *sp = gui_save_message.data.data_xfer.file_name; + char *ep = sp + sizeof(gui_save_message.data.data_xfer.file_name); + char *lastdot = NULL; + char *p = sp; - error = xwimp_get_pointer_info(&pointer); - if (error) { - LOG("xwimp_get_pointer_info: 0x%x: %s", error->errnum, error->errmess); - ro_warn_user("WimpError", error->errmess); - return; + while (p < ep && *p >= 0x20) { + if (*p == '.') { + /* don't remember the directory if it's a temporary file */ + if (!lastdot && p == sp + 12 && + !memcmp(sp, "", 12)) break; + lastdot = p; + } + p++; + } + if (lastdot) { + /* remember the directory */ + char *new_dir = realloc(save_dir, (lastdot+1)-sp); + if (new_dir) { + save_dir_len = lastdot - sp; + memcpy(new_dir, sp, save_dir_len); + new_dir[save_dir_len] = '\0'; + save_dir = new_dir; + } + } + } + + if (gui_save_close_after) { + /* Close the save window */ + ro_gui_dialog_close(dialog_saveas); + error = xwimp_create_menu(wimp_CLOSE_MENU, 0, 0); + if (error) { + LOG("xwimp_create_menu: 0x%x: %s", error->errnum, error->errmess); + ro_warn_user("MenuError", error->errmess); + } + } } - ro_gui_save_set_state(NULL, save_type, url, save_leafname, - LEAFNAME_MAX, icon_buf, sizeof(icon_buf)); + if (!saving_from_dialog || gui_save_close_after) + gui_save_content = 0; +} - ro_mouse_drag_start(ro_gui_save_drag_end, NULL, NULL, NULL); - ro_gui_drag_icon(pointer.pos.x, pointer.pos.y, icon_buf); +/** + * User has opted not to overwrite the existing file. + */ +static void +ro_gui_save_overwrite_cancelled(query_id id, enum query_response res, void *p) +{ + if (!saving_from_dialog) { +// ro_gui_save_prepare(gui_save_current_type, gui_save_content); +// ro_gui_dialog_open_persistent(g->window, dialog_saveas, true); + } } /** - * Start drag of icon under the pointer. + * Overwrite of existing file confirmed, proceed with the save. */ - -void ro_gui_drag_icon(int x, int y, const char *sprite) +static void +ro_gui_save_overwrite_confirmed(query_id id, enum query_response res, void *p) { - os_error *error; - wimp_drag drag; - int r2; + if (ro_gui_save_content(gui_save_content, gui_save_message.data.data_xfer.file_name, true)) { + ro_gui_save_done(); + } +} - drag.initial.x0 = x - 34; - drag.initial.y0 = y - 34; - drag.initial.x1 = x + 34; - drag.initial.y1 = y + 34; - - if (sprite && (xosbyte2(osbyte_READ_CMOS, 28, 0, &r2) || (r2 & 2))) { - osspriteop_area *area = (osspriteop_area*)1; - - /* first try our local sprite area in case it's a thumbnail sprite */ - if (saveas_area) { - error = xosspriteop_select_sprite(osspriteop_USER_AREA, - saveas_area, (osspriteop_id)sprite, NULL); - if (error) { - if (error->errnum != error_SPRITE_OP_DOESNT_EXIST) { - LOG("xosspriteop_select_sprite: 0x%x: %s", error->errnum, error->errmess); - ro_warn_user("MiscError", error->errmess); - } - } - else - area = saveas_area; - } - - error = xdragasprite_start(dragasprite_HPOS_CENTRE | - dragasprite_VPOS_CENTRE | - dragasprite_BOUND_POINTER | - dragasprite_DROP_SHADOW, - area, sprite, &drag.initial, 0); - if (!error) { - using_dragasprite = true; - dragbox_active = true; - return; - } +/** + * Save a link file. + * + * \param url url to be saved + * \param title corresponding title, if any + * \param format format of link file + * \param path pathname for link file + * \return true on success, false on failure and reports the error + */ +static bool +ro_gui_save_link(const char *url, const char *title, link_format format, + char *path) +{ + FILE *fp = fopen(path, "w"); - LOG("xdragasprite_start: 0x%x: %s", error->errnum, error->errmess); + if (!fp) { + ro_warn_user("SaveError", strerror(errno)); + return false; } - drag.type = wimp_DRAG_USER_FIXED; - drag.bbox.x0 = -0x8000; - drag.bbox.y0 = -0x8000; - drag.bbox.x1 = 0x7fff; - drag.bbox.y1 = 0x7fff; + switch (format) { + case LINK_ACORN: /* URI */ + fprintf(fp, "%s\t%s\n", "URI", "100"); + fprintf(fp, "\t# NetSurf %s\n\n", netsurf_version); + fprintf(fp, "\t%s\n", url); + if (title) + fprintf(fp, "\t%s\n", title); + else + fprintf(fp, "\t*\n"); + break; + case LINK_ANT: /* URL */ + case LINK_TEXT: /* Text */ + fprintf(fp, "%s\n", url); + break; + } - using_dragasprite = false; - error = xwimp_drag_box(&drag); + fclose(fp); - if (error) { - LOG("xwimp_drag_box: 0x%x: %s", error->errnum, error->errmess); - ro_warn_user("DragError", error->errmess); + switch (format) { + case LINK_ACORN: /* URI */ + xosfile_set_type(path, 0xf91); + break; + case LINK_ANT: /* URL */ + xosfile_set_type(path, 0xb28); + break; + case LINK_TEXT: /* Text */ + xosfile_set_type(path, 0xfff); + break; } - else - dragbox_active = true; + + return true; } /** - * Convert a ctrl-char terminated pathname possibly containing spaces - * to a NUL-terminated one containing only hard spaces. + * set RISC OS filetype of file from mimetype * - * \param dp destination buffer to receive pathname - * \param len size of destination buffer - * \param p source pathname, ctrl-char terminated + * \param path The path of the file to set filetype on + * \param mime_type The mime type to set. */ - -void ro_gui_convert_save_path(char *dp, size_t len, const char *p) +static void ro_gui_save_set_file_type(const char *path, lwc_string *mime_type) { - char *ep = dp + len - 1; /* leave room for NUL */ - - assert(p <= dp || p > ep); /* in-situ conversion /is/ allowed */ - - while (dp < ep && *p >= ' ') /* ctrl-char terminated */ - { - *dp++ = (*p == ' ') ? 160 : *p; - p++; - } - *dp = '\0'; -} - + int rotype = ro_content_filetype_from_mime_type(mime_type); + os_error *error; -void ro_gui_drag_box_cancel(void) -{ - if (dragbox_active) { - os_error *error; - if (using_dragasprite) { - error = xdragasprite_stop(); - if (error) { - LOG("xdragasprite_stop: 0x%x: %s", error->errnum, error->errmess); - ro_warn_user("WimpError", error->errmess); - } - } - else { - error = xwimp_drag_box(NULL); - if (error) { - LOG("xwimp_drag_box: 0x%x: %s", error->errnum, error->errmess); - ro_warn_user("WimpError", error->errmess); - } - } - dragbox_active = false; + error = xosfile_set_type(path, rotype); + if (error != NULL) { + LOG("xosfile_set_type: 0x%x: %s", + error->errnum, error->errmess); } } /** - * Handle User_Drag_Box event for a drag from the save dialog or browser window. + * Prepare an application directory and save_complete() to it. * - * \param *drag The Wimp_DragEnd data block. - * \param *data NULL, as function is used as a callback from ro_mouse. + * \param h content of type CONTENT_HTML to save + * \param path path to save as + * \return true on success, false on error and error reported */ - -static void ro_gui_save_drag_end(wimp_dragged *drag, void *data) +static bool ro_gui_save_complete(struct hlcache_handle *h, char *path) { - const char *name; - wimp_pointer pointer; - wimp_message message; + void *spr = ((byte *) saveas_area) + saveas_area->first; + osspriteop_header *sprite = (osspriteop_header *) spr; + char name[12]; + char buf[256]; + FILE *fp; os_error *error; - char *dp, *ep; - char *local_name = NULL; + size_t len; + char *dot; + int i; - if (dragbox_active) - ro_gui_drag_box_cancel(); + /* Create dir */ + error = xosfile_create_dir(path, 0); + if (error) { + LOG("xosfile_create_dir: 0x%x: %s", error->errnum, error->errmess); + ro_warn_user("SaveError", error->errmess); + return false; + } - error = xwimp_get_pointer_info(&pointer); + /* Save !Run file */ + snprintf(buf, sizeof buf, "%s.!Run", path); + fp = fopen(buf, "w"); + if (!fp) { + LOG("fopen(): errno = %i", errno); + ro_warn_user("SaveError", strerror(errno)); + return false; + } + fprintf(fp, "IconSprites .!Sprites\n"); + fprintf(fp, "Filer_Run .index\n"); + fclose(fp); + error = xosfile_set_type(buf, 0xfeb); if (error) { - LOG("xwimp_get_pointer_info: 0x%x: %s", error->errnum, error->errmess); - ro_warn_user("WimpError", error->errmess); - return; + LOG("xosfile_set_type: 0x%x: %s", error->errnum, error->errmess); + ro_warn_user("SaveError", error->errmess); + return false; } - /* perform hit-test if the destination is the same as the source window; - we want to allow drag-saving from a page into the input fields within - the page, but avoid accidental replacements of the current page */ - if (gui_save_sourcew != (wimp_w)-1 && pointer.w == gui_save_sourcew) { - int dx = (drag->final.x1 + drag->final.x0)/2; - int dy = (drag->final.y1 + drag->final.y0)/2; - struct gui_window *g; - bool dest_ok = false; - os_coord pos; + /* create an empty !Runimage so the date gets correctly set */ + snprintf(buf, sizeof buf, "%s.!RunImage", path); + fp = fopen(buf, "w"); + if (!fp) { + LOG("Creating !RunImage failed: errno = %i", errno); + } else { + fclose(fp); + } - g = ro_gui_window_lookup(gui_save_sourcew); + /* Make sure the sprite name matches the directory name, because + the user may have renamed the directory since we created the + thumbnail sprite */ - if (g && ro_gui_window_to_window_pos(g, dx, dy, &pos)) { - dest_ok = browser_window_drop_file_at_point(g->bw, - pos.x, pos.y, NULL); - } - if (!dest_ok) - return; - } + dot = strrchr(path, '.'); + if (dot) dot++; else dot = path; + len = strlen(dot); + if (len >= 12) len = 12; - if (!saving_from_dialog) { - /* saving directly from browser window, choose a - * name based upon the URL */ - nserror err; - err = utf8_to_local_encoding(save_leafname, 0, &local_name); - if (err != NSERROR_OK) { - /* badenc should never happen */ - assert(err != NSERROR_BAD_ENCODING); - local_name = NULL; - } - name = local_name ? local_name : save_leafname; - } - else { - char *dot; + memcpy(name, sprite->name, 12); /* remember original name */ + memcpy(sprite->name, dot, len); + memset(sprite->name + len, 0, 12 - len); + for (i = 0; i < 12; i++) /* convert to lower case */ + if (sprite->name[i] != '\0') + sprite->name[i] = tolower(sprite->name[i]); - /* saving from dialog, grab leafname from icon */ - name = ro_gui_get_icon_string(gui_save_sourcew, ICON_SAVE_PATH); - dot = strrchr(name, '.'); - if (dot) - name = dot + 1; + /* Create !Sprites */ + snprintf(buf, sizeof buf, "%s.!Sprites", path); + + error = xosspriteop_save_sprite_file(osspriteop_NAME, saveas_area, buf); + if (error) { + LOG("xosspriteop_save_sprite_file: 0x%x: %s", error->errnum, error->errmess); + ro_warn_user("SaveError", error->errmess); + return false; } - dp = message.data.data_xfer.file_name; - ep = dp + sizeof message.data.data_xfer.file_name; + /* restore sprite name in case the save fails and we need to try again */ + memcpy(sprite->name, name, 12); - if (gui_save_current_type == GUI_SAVE_COMPLETE) { - message.data.data_xfer.file_type = 0x2000; - if (*name != '!') *dp++ = '!'; - } else - message.data.data_xfer.file_type = gui_save_filetype; - - ro_gui_convert_save_path(dp, ep - dp, name); - -/* \todo - we're supposed to set this if drag-n-drop used */ - message.your_ref = 0; - - message.action = message_DATA_SAVE; - message.data.data_xfer.w = pointer.w; - message.data.data_xfer.i = pointer.i; - message.data.data_xfer.pos.x = pointer.pos.x; - message.data.data_xfer.pos.y = pointer.pos.y; - message.data.data_xfer.est_size = 1000; - message.size = 44 + ((strlen(message.data.data_xfer.file_name) + 4) & - (~3u)); - - ro_message_send_message_to_window(wimp_USER_MESSAGE_RECORDED, &message, - pointer.w, pointer.i, ro_gui_save_bounced, NULL); - - gui_current_drag_type = GUI_DRAG_SAVE; - - free(local_name); -} + /* save URL file with original URL */ + snprintf(buf, sizeof buf, "%s.URL", path); + if (!ro_gui_save_link(nsurl_access(hlcache_handle_get_url(h)), + content_get_title(h), LINK_ANT, buf)) + return false; + return save_complete(h, path, ro_gui_save_set_file_type); +} /** - * Send DataSave message on behalf of clipboard code and remember that it's the - * clipboard contents we're being asked for when the DataSaveAck reply arrives + * Overwrite confirmation callbacks */ - -void ro_gui_send_datasave(gui_save_type save_type, - wimp_full_message_data_xfer *message, wimp_t to) +static const query_callback overwrite_funcs = { - /* Close the save window because otherwise we need two contexts - */ - - ro_gui_dialog_close(dialog_saveas); - - if (ro_message_send_message(wimp_USER_MESSAGE_RECORDED, (wimp_message*)message, - to, ro_gui_save_bounced)) { - gui_save_current_type = save_type; - gui_save_sourcew = (wimp_w)-1; - saving_from_dialog = false; - - gui_current_drag_type = GUI_DRAG_SAVE; - } -} + ro_gui_save_overwrite_confirmed, + ro_gui_save_overwrite_cancelled +}; /** - * Handle lack of Message_DataSaveAck for drags, saveas dialogs and clipboard code + * Save object in native type */ - -void ro_gui_save_bounced(wimp_message *message) +static bool ro_gui_save_object_native(struct hlcache_handle *h, char *path) { - gui_current_drag_type = GUI_DRAG_NONE; -} - - -/** - * Handle Message_DataSaveAck for a drag from the save dialog or browser window, - * or Clipboard protocol. - */ + int file_type = ro_content_filetype(h); -void ro_gui_save_datasave_ack(wimp_message *message) -{ - char *path = message->data.data_xfer.file_name; - struct hlcache_handle *h = gui_save_content; - bool force_overwrite; + if (file_type == osfile_TYPE_SPRITE || file_type == osfile_TYPE_DRAW) { + /* Native sprite or drawfile */ + const char *source_data; + unsigned long source_size; + os_error *error; - switch (gui_save_current_type) { - case GUI_SAVE_LINK_URI: - case GUI_SAVE_LINK_URL: - case GUI_SAVE_LINK_TEXT: - case GUI_SAVE_HOTLIST_EXPORT_HTML: - case GUI_SAVE_HISTORY_EXPORT_HTML: - case GUI_SAVE_TEXT_SELECTION: - case GUI_SAVE_CLIPBOARD_CONTENTS: + source_data = content_get_source_data(h, &source_size); + error = xosfile_save_stamped(path, file_type, + (byte *) source_data, + (byte *) source_data + source_size); + if (error != NULL) { + LOG("xosfile_save_stamped: 0x%x: %s", error->errnum, error->errmess); + ro_warn_user("SaveError", error->errmess); + return false; + } + } else { + /* Non-native type: export */ + switch (ro_content_native_type(h)) { + case osfile_TYPE_SPRITE: + { + unsigned flags = (os_version == 0xA9) ? + BITMAP_SAVE_FULL_ALPHA : 0; + riscos_bitmap_save(content_get_bitmap(h), path, flags); + } break; - + case osfile_TYPE_DRAW: + /* Must be SVG */ + return save_as_draw(h, path); default: - if (!gui_save_content) { - LOG("unexpected DataSaveAck: gui_save_content not set"); - return; - } - break; + return false; + } } - if (saving_from_dialog) - ro_gui_set_icon_string(gui_save_sourcew, ICON_SAVE_PATH, - path, true); - - gui_save_send_dataload = true; - memcpy(&gui_save_message, message, sizeof(gui_save_message)); - - /* if saving/pasting to another application, don't request user - confirmation; a ScrapFile almost certainly exists already */ - if (message->data.data_xfer.est_size == -1) - force_overwrite = true; - else - force_overwrite = !nsoption_bool(confirm_overwrite); - - if (ro_gui_save_content(h, path, force_overwrite)) - ro_gui_save_done(); + return true; } - /** * Does the actual saving * - * \param h handle to content to save (or NULL for other) - * \param path path to save as + * \param h handle to content to save (or NULL for other) + * \param path path to save to * \param force_overwrite true iff required to overwrite without prompting * \return true on success, * false on (i) error and error reported * or (ii) deferred awaiting user confirmation */ - -bool ro_gui_save_content(struct hlcache_handle *h, char *path, bool force_overwrite) +static bool +ro_gui_save_content(struct hlcache_handle *h, char *path, bool force_overwrite) { os_error *error; const char *source_data; @@ -816,8 +956,7 @@ bool ro_gui_save_content(struct hlcache_handle *h, char *path, bool force_overwr break; case osfile_IS_FILE: - gui_save_query = query_user("OverwriteFile", NULL, &overwrite_funcs, NULL, - messages_get("Replace"), messages_get("DontReplace")); + gui_save_query = query_user("OverwriteFile", NULL, &overwrite_funcs, NULL, messages_get("Replace"), messages_get("DontReplace")); // gui_save_query_rsn = QueryRsn_Overwrite; return false; @@ -853,7 +992,7 @@ bool ro_gui_save_content(struct hlcache_handle *h, char *path, bool force_overwr gui_save_current_type = GUI_SAVE_SOURCE; } else - gui_save_current_type = GUI_SAVE_OBJECT_ORIG; /* \todo do this earlier? */ + gui_save_current_type = GUI_SAVE_OBJECT_ORIG; /** \todo do this earlier? */ /* no break */ case GUI_SAVE_SOURCE: case GUI_SAVE_OBJECT_ORIG: @@ -924,478 +1063,346 @@ bool ro_gui_save_content(struct hlcache_handle *h, char *path, bool force_overwr /** - * Save completed, inform recipient and close our 'save as' dialog. + * Handle OK click/keypress in the save dialog. + * + * \param w window handle of save dialog + * \return true on success, false on failure */ - -void ro_gui_save_done(void) +bool ro_gui_save_ok(wimp_w w) { - os_error *error; + const char *name = ro_gui_get_icon_string(w, ICON_SAVE_PATH); + wimp_pointer pointer; + char path[256]; - if (gui_save_send_dataload) { - /* Ack successful save with message_DATA_LOAD */ - wimp_message *message = &gui_save_message; - message->action = message_DATA_LOAD; - message->your_ref = message->my_ref; - error = xwimp_send_message(wimp_USER_MESSAGE, message, - message->sender); - if (error) { - LOG("xwimp_send_message: 0x%x: %s", error->errnum, error->errmess); - ro_warn_user("SaveError", error->errmess); - } + if (!strrchr(name, '.')) { + ro_warn_user("NoPathError", NULL); + return false; } - if (saving_from_dialog) { - /* remember the save directory if saving to the Filer */ - if (!gui_save_send_dataload || - gui_save_message.data.data_xfer.est_size != -1) { - char *sp = gui_save_message.data.data_xfer.file_name; - char *ep = sp + sizeof(gui_save_message.data.data_xfer.file_name); - char *lastdot = NULL; - char *p = sp; - - while (p < ep && *p >= 0x20) { - if (*p == '.') { - /* don't remember the directory if it's a temporary file */ - if (!lastdot && p == sp + 12 && - !memcmp(sp, "", 12)) break; - lastdot = p; - } - p++; - } - if (lastdot) { - /* remember the directory */ - char *new_dir = realloc(save_dir, (lastdot+1)-sp); - if (new_dir) { - save_dir_len = lastdot - sp; - memcpy(new_dir, sp, save_dir_len); - new_dir[save_dir_len] = '\0'; - save_dir = new_dir; - } - } - } + ro_gui_convert_save_path(path, sizeof path, name); + gui_save_sourcew = w; + saving_from_dialog = true; + gui_save_send_dataload = false; + gui_save_close_after = xwimp_get_pointer_info(&pointer) + || !(pointer.buttons & wimp_CLICK_ADJUST); + memcpy(&gui_save_message.data.data_xfer.file_name, path, 1 + strlen(path)); - if (gui_save_close_after) { - /* Close the save window */ - ro_gui_dialog_close(dialog_saveas); - error = xwimp_create_menu(wimp_CLOSE_MENU, 0, 0); - if (error) { - LOG("xwimp_create_menu: 0x%x: %s", error->errnum, error->errmess); - ro_warn_user("MenuError", error->errmess); - } - } + if (ro_gui_save_content(gui_save_content, path, !nsoption_bool(confirm_overwrite))) { + ro_gui_save_done(); + return true; } - - if (!saving_from_dialog || gui_save_close_after) - gui_save_content = 0; + return false; } -static void ro_gui_save_set_file_type(const char *path, lwc_string *mime_type) -{ - int rotype = ro_content_filetype_from_mime_type(mime_type); - os_error *error; - - error = xosfile_set_type(path, rotype); - if (error != NULL) { - LOG("xosfile_set_type: 0x%x: %s", error->errnum, error->errmess); - } -} /** - * Prepare an application directory and save_complete() to it. + * Initiates drag saving of an object directly from a browser window * - * \param h content of type CONTENT_HTML to save - * \param path path to save as - * \return true on success, false on error and error reported + * \param g gui window + * \param c content to save + * \param save_type type of save */ - -bool ro_gui_save_complete(struct hlcache_handle *h, char *path) +void gui_drag_save_object(struct gui_window *g, + struct hlcache_handle *c, + gui_save_type save_type) { - void *spr = ((byte *) saveas_area) + saveas_area->first; - osspriteop_header *sprite = (osspriteop_header *) spr; - char name[12]; - char buf[256]; - FILE *fp; + wimp_pointer pointer; + char icon_buf[20]; os_error *error; - size_t len; - char *dot; - int i; - - /* Create dir */ - error = xosfile_create_dir(path, 0); - if (error) { - LOG("xosfile_create_dir: 0x%x: %s", error->errnum, error->errmess); - ro_warn_user("SaveError", error->errmess); - return false; - } - - /* Save !Run file */ - snprintf(buf, sizeof buf, "%s.!Run", path); - fp = fopen(buf, "w"); - if (!fp) { - LOG("fopen(): errno = %i", errno); - ro_warn_user("SaveError", strerror(errno)); - return false; - } - fprintf(fp, "IconSprites .!Sprites\n"); - fprintf(fp, "Filer_Run .index\n"); - fclose(fp); - error = xosfile_set_type(buf, 0xfeb); - if (error) { - LOG("xosfile_set_type: 0x%x: %s", error->errnum, error->errmess); - ro_warn_user("SaveError", error->errmess); - return false; - } - - /* create an empty !Runimage so the date gets correctly set */ - snprintf(buf, sizeof buf, "%s.!RunImage", path); - fp = fopen(buf, "w"); - if (!fp) { - LOG("Creating !RunImage failed: errno = %i", errno); - } else { - fclose(fp); - } - - /* Make sure the sprite name matches the directory name, because - the user may have renamed the directory since we created the - thumbnail sprite */ - - dot = strrchr(path, '.'); - if (dot) dot++; else dot = path; - len = strlen(dot); - if (len >= 12) len = 12; - memcpy(name, sprite->name, 12); /* remember original name */ - memcpy(sprite->name, dot, len); - memset(sprite->name + len, 0, 12 - len); - for (i = 0; i < 12; i++) /* convert to lower case */ - if (sprite->name[i] != '\0') - sprite->name[i] = tolower(sprite->name[i]); + /* Close the save window because otherwise we need two contexts + */ + xwimp_create_menu(wimp_CLOSE_MENU, 0, 0); + ro_gui_dialog_close(dialog_saveas); - /* Create !Sprites */ - snprintf(buf, sizeof buf, "%s.!Sprites", path); + gui_save_sourcew = g->window; + saving_from_dialog = false; - error = xosspriteop_save_sprite_file(osspriteop_NAME, saveas_area, buf); + error = xwimp_get_pointer_info(&pointer); if (error) { - LOG("xosspriteop_save_sprite_file: 0x%x: %s", error->errnum, error->errmess); - ro_warn_user("SaveError", error->errmess); - return false; + LOG("xwimp_get_pointer_info: 0x%x: %s", error->errnum, error->errmess); + ro_warn_user("WimpError", error->errmess); + return; } - /* restore sprite name in case the save fails and we need to try again */ - memcpy(sprite->name, name, 12); - - /* save URL file with original URL */ - snprintf(buf, sizeof buf, "%s.URL", path); - if (!ro_gui_save_link(nsurl_access(hlcache_handle_get_url(h)), - content_get_title(h), LINK_ANT, buf)) - return false; - - return save_complete(h, path, ro_gui_save_set_file_type); -} - -bool ro_gui_save_object_native(struct hlcache_handle *h, char *path) -{ - int file_type = ro_content_filetype(h); - - if (file_type == osfile_TYPE_SPRITE || file_type == osfile_TYPE_DRAW) { - /* Native sprite or drawfile */ - const char *source_data; - unsigned long source_size; - os_error *error; + ro_gui_save_set_state(c, save_type, hlcache_handle_get_url(c), + save_leafname, LEAFNAME_MAX, + icon_buf, sizeof(icon_buf)); - source_data = content_get_source_data(h, &source_size); - error = xosfile_save_stamped(path, file_type, - (byte *) source_data, - (byte *) source_data + source_size); - if (error != NULL) { - LOG("xosfile_save_stamped: 0x%x: %s", error->errnum, error->errmess); - ro_warn_user("SaveError", error->errmess); - return false; - } - } else { - /* Non-native type: export */ - switch (ro_content_native_type(h)) { - case osfile_TYPE_SPRITE: - { - unsigned flags = (os_version == 0xA9) ? - BITMAP_SAVE_FULL_ALPHA : 0; - riscos_bitmap_save(content_get_bitmap(h), path, flags); - } - break; - case osfile_TYPE_DRAW: - /* Must be SVG */ - return save_as_draw(h, path); - default: - return false; - } - } + ro_mouse_drag_start(ro_gui_save_drag_end, NULL, NULL, NULL); - return true; + ro_gui_drag_icon(pointer.pos.x, pointer.pos.y, icon_buf); } /** - * Save a link file. + * Initiates drag saving of a selection from a browser window * - * \param url url to be saved - * \param title corresponding title, if any - * \param format format of link file - * \param path pathname for link file - * \return true on success, false on failure and reports the error + * \param g gui window + * \param selection selection object */ - -bool ro_gui_save_link(const char *url, const char *title, link_format format, - char *path) +void gui_drag_save_selection(struct gui_window *g, const char *selection) { - FILE *fp = fopen(path, "w"); + wimp_pointer pointer; + char icon_buf[20]; + os_error *error; - if (!fp) { - ro_warn_user("SaveError", strerror(errno)); - return false; - } + /* Close the save window because otherwise we need two contexts + */ + xwimp_create_menu(wimp_CLOSE_MENU, 0, 0); + ro_gui_dialog_close(dialog_saveas); - switch (format) { - case LINK_ACORN: /* URI */ - fprintf(fp, "%s\t%s\n", "URI", "100"); - fprintf(fp, "\t# NetSurf %s\n\n", netsurf_version); - fprintf(fp, "\t%s\n", url); - if (title) - fprintf(fp, "\t%s\n", title); - else - fprintf(fp, "\t*\n"); - break; - case LINK_ANT: /* URL */ - case LINK_TEXT: /* Text */ - fprintf(fp, "%s\n", url); - break; + gui_save_sourcew = g->window; + saving_from_dialog = false; + + error = xwimp_get_pointer_info(&pointer); + if (error) { + LOG("xwimp_get_pointer_info: 0x%x: %s", error->errnum, error->errmess); + ro_warn_user("WimpError", error->errmess); + return; } - fclose(fp); - switch (format) { - case LINK_ACORN: /* URI */ - xosfile_set_type(path, 0xf91); - break; - case LINK_ANT: /* URL */ - xosfile_set_type(path, 0xb28); - break; - case LINK_TEXT: /* Text */ - xosfile_set_type(path, 0xfff); - break; - } + if (gui_save_selection == NULL) + free(gui_save_selection); - return true; + if (selection == NULL) + gui_save_selection = strdup(""); + else + gui_save_selection = strdup(selection); + + ro_gui_save_set_state(NULL, GUI_SAVE_TEXT_SELECTION, NULL, + save_leafname, LEAFNAME_MAX, + icon_buf, sizeof(icon_buf)); + + ro_mouse_drag_start(ro_gui_save_drag_end, NULL, NULL, NULL); + + ro_gui_drag_icon(pointer.pos.x, pointer.pos.y, icon_buf); } /** - * Suggest a leafname and sprite name for the given content. + * Initiates drag saving of a link/URL file * - * \param h content being saved - * \param save_type type of save operation being performed - * \param url used to determine leafname - * \param leaf_buf buffer to receive suggested leafname. - * \param leaf_len size of buffer to receive suggested leafname. - * \param icon_buf buffer to receive sprite name. - * \param icon_len size of buffer to receive icon name. + * \param save_type format in which URL should be saved + * \param url url to be saved + * \param title title to be included in URI format, if any + * \param g gui window to save from + * \ */ - -void ro_gui_save_set_state(struct hlcache_handle *h, gui_save_type save_type, - const nsurl *url, char *leaf_buf, size_t leaf_len, - char *icon_buf, size_t icon_len) +void ro_gui_drag_save_link(gui_save_type save_type, const nsurl *url, + const char *title, struct gui_window *g) { - /* filename */ - const char *name = gui_save_table[save_type].name; - bool done = false; - char *nice = NULL; - nserror err; - char *local_name; - - assert(icon_len >= 13); - - /* parameters that we need to remember */ - gui_save_current_type = save_type; - gui_save_content = h; - - /* suggest a filetype based upon the content */ - gui_save_filetype = gui_save_table[save_type].filetype; - if (!gui_save_filetype && h) { - if (save_type == GUI_SAVE_OBJECT_NATIVE) { - switch (ro_content_native_type(h)) { - case osfile_TYPE_SPRITE: - gui_save_filetype = osfile_TYPE_SPRITE; - break; - case osfile_TYPE_DRAW: - gui_save_filetype = osfile_TYPE_DRAW; - break; - default: - break; - } - } - if (!gui_save_filetype) - gui_save_filetype = ro_content_filetype(h); - } - - /* leafname */ - if ((url != NULL) && - (nsurl_nice(url, &nice, nsoption_bool(strip_extensions)) == - NSERROR_OK)) { - size_t i; - for (i = 0; nice[i]; i++) { - if (nice[i] == '.') - nice[i] = '/'; - else if (nice[i] <= ' ' || - strchr(":*#$&@^%\\", nice[i])) - nice[i] = '_'; - } - name = nice; - } else { - name = messages_get(name); - } + wimp_pointer pointer; + char icon_buf[20]; + os_error *error; - /* filename is utf8 */ - if (save_type == GUI_SAVE_COMPLETE && leaf_len > 0) { - leaf_buf[0] = '!'; - leaf_buf++; - leaf_len--; - } - strncpy(leaf_buf, name, leaf_len); - leaf_buf[leaf_len - 1] = 0; + /* Close the save window because otherwise we need two contexts + */ + xwimp_create_menu(wimp_CLOSE_MENU, 0, 0); + ro_gui_dialog_close(dialog_saveas); - err = utf8_to_local_encoding(name, 0, &local_name); - if (err != NSERROR_OK) { - /* badenc should never happen */ - assert(err != NSERROR_BAD_ENCODING); - local_name = NULL; + gui_save_url = nsurl_access(url); + gui_save_title = title; + gui_save_sourcew = g->window; + saving_from_dialog = false; + + error = xwimp_get_pointer_info(&pointer); + if (error) { + LOG("xwimp_get_pointer_info: 0x%x: %s", + error->errnum, error->errmess); + ro_warn_user("WimpError", error->errmess); + return; } - if (local_name != NULL) - name = local_name; + ro_gui_save_set_state(NULL, save_type, url, save_leafname, + LEAFNAME_MAX, icon_buf, sizeof(icon_buf)); - /* sprite name used for icon and dragging */ - if (save_type == GUI_SAVE_COMPLETE) { - int index; + ro_mouse_drag_start(ro_gui_save_drag_end, NULL, NULL, NULL); - /* Paint gets confused with uppercase characters and we need to - convert spaces to hard spaces */ - icon_buf[0] = '!'; - for (index = 0; index < 11 && name[index]; ) { - char ch = name[index]; - if (ch == ' ') - icon_buf[++index] = 0xa0; - else - icon_buf[++index] = tolower(ch); - } - memset(&icon_buf[index + 1], 0, 11 - index); - icon_buf[12] = '\0'; + ro_gui_drag_icon(pointer.pos.x, pointer.pos.y, icon_buf); +} - if (ro_gui_save_create_thumbnail(h, icon_buf)) - done = true; - } - if (!done) { - osspriteop_header *sprite; - os_error *error; +/** + * Start drag of icon under the pointer. + * + * \param x The x coordinate of the drag start + * \param y The y coordinate of the drag start + * \param sprite The sprite to use for the drag. + */ +void ro_gui_drag_icon(int x, int y, const char *sprite) +{ + os_error *error; + wimp_drag drag; + int r2; - sprintf(icon_buf, "file_%.3x", gui_save_filetype); + drag.initial.x0 = x - 34; + drag.initial.y0 = y - 34; + drag.initial.x1 = x + 34; + drag.initial.y1 = y + 34; - error = ro_gui_wimp_get_sprite(icon_buf, &sprite); - if (error && error->errnum == error_SPRITE_OP_DOESNT_EXIST) { - /* try the 'unknown' filetype sprite as a fallback */ - memcpy(icon_buf, "file_xxx", 9); - error = ro_gui_wimp_get_sprite(icon_buf, &sprite); - } + if (sprite && (xosbyte2(osbyte_READ_CMOS, 28, 0, &r2) || (r2 & 2))) { + osspriteop_area *area = (osspriteop_area*)1; - if (error) { - LOG("ro_gui_wimp_get_sprite: 0x%x: %s", error->errnum, error->errmess); - ro_warn_user("MiscError", error->errmess); - } else { - /* the sprite area should always be large enough for - * file_xxx sprites */ - assert(sprite->size <= saveas_area->size - - saveas_area->first); + /* first try our local sprite area in case it's a thumbnail sprite */ + if (saveas_area) { + error = xosspriteop_select_sprite(osspriteop_USER_AREA, + saveas_area, (osspriteop_id)sprite, NULL); + if (error) { + if (error->errnum != error_SPRITE_OP_DOESNT_EXIST) { + LOG("xosspriteop_select_sprite: 0x%x: %s", error->errnum, error->errmess); + ro_warn_user("MiscError", error->errmess); + } + } + else + area = saveas_area; + } - memcpy((byte*)saveas_area + saveas_area->first, - sprite, - sprite->size); + error = xdragasprite_start(dragasprite_HPOS_CENTRE | + dragasprite_VPOS_CENTRE | + dragasprite_BOUND_POINTER | + dragasprite_DROP_SHADOW, + area, sprite, &drag.initial, 0); - saveas_area->sprite_count = 1; - saveas_area->used = saveas_area->first + sprite->size; + if (!error) { + using_dragasprite = true; + dragbox_active = true; + return; } + + LOG("xdragasprite_start: 0x%x: %s", error->errnum, error->errmess); } - free(local_name); - free(nice); -} + drag.type = wimp_DRAG_USER_FIXED; + drag.bbox.x0 = -0x8000; + drag.bbox.y0 = -0x8000; + drag.bbox.x1 = 0x7fff; + drag.bbox.y1 = 0x7fff; + + using_dragasprite = false; + error = xwimp_drag_box(&drag); + if (error) { + LOG("xwimp_drag_box: 0x%x: %s", error->errnum, error->errmess); + ro_warn_user("DragError", error->errmess); + } else { + dragbox_active = true; + } +} /** - * Create a thumbnail sprite for the page being saved. + * Convert a ctrl-char terminated pathname possibly containing spaces + * to a NUL-terminated one containing only hard spaces. * - * \param h content to be converted - * \param name sprite name to use - * \return true iff successful + * \param dp destination buffer to receive pathname + * \param len size of destination buffer + * \param p source pathname, ctrl-char terminated */ - -bool ro_gui_save_create_thumbnail(struct hlcache_handle *h, const char *name) +void ro_gui_convert_save_path(char *dp, size_t len, const char *p) { - osspriteop_header *sprite_header; - struct bitmap *bitmap; - osspriteop_area *area; + char *ep = dp + len - 1; /* leave room for NUL */ - bitmap = riscos_bitmap_create(34, 34, BITMAP_NEW | BITMAP_OPAQUE | BITMAP_CLEAR_MEMORY); - if (!bitmap) { - LOG("Thumbnail initialisation failed."); - return false; - } - riscos_bitmap_render(bitmap, h); - area = riscos_bitmap_convert_8bpp(bitmap); - riscos_bitmap_destroy(bitmap); - if (!area) { - LOG("Thumbnail conversion failed."); - return false; + assert(p <= dp || p > ep); /* in-situ conversion /is/ allowed */ + + while (dp < ep && *p >= ' ') /* ctrl-char terminated */ + { + *dp++ = (*p == ' ') ? 160 : *p; + p++; } + *dp = '\0'; +} - sprite_header = (osspriteop_header *)(area + 1); - strncpy(sprite_header->name, name, 12); +void ro_gui_drag_box_cancel(void) +{ + if (dragbox_active) { + os_error *error; + if (using_dragasprite) { + error = xdragasprite_stop(); + if (error) { + LOG("xdragasprite_stop: 0x%x: %s", error->errnum, error->errmess); + ro_warn_user("WimpError", error->errmess); + } + } + else { + error = xwimp_drag_box(NULL); + if (error) { + LOG("xwimp_drag_box: 0x%x: %s", error->errnum, error->errmess); + ro_warn_user("WimpError", error->errmess); + } + } + dragbox_active = false; + } +} - /* we can't resize the saveas sprite area because it may move and we have - no elegant way to update the window definition on all OS versions */ - assert(sprite_header->size <= saveas_area->size - saveas_area->first); - memcpy((byte*)saveas_area + saveas_area->first, - sprite_header, sprite_header->size); +/** + * Send DataSave message on behalf of clipboard code and remember that it's the + * clipboard contents we're being asked for when the DataSaveAck reply arrives + */ +void ro_gui_send_datasave(gui_save_type save_type, + wimp_full_message_data_xfer *message, wimp_t to) +{ + /* Close the save window because otherwise we need two contexts + */ - saveas_area->sprite_count = 1; - saveas_area->used = saveas_area->first + sprite_header->size; + ro_gui_dialog_close(dialog_saveas); - free(area); + if (ro_message_send_message(wimp_USER_MESSAGE_RECORDED, (wimp_message*)message, + to, ro_gui_save_bounced)) { + gui_save_current_type = save_type; + gui_save_sourcew = (wimp_w)-1; + saving_from_dialog = false; - return true; + gui_current_drag_type = GUI_DRAG_SAVE; + } } /** - * User has opted not to overwrite the existing file. + * Handle Message_DataSaveAck for a drag from the save dialog or browser window, + * or Clipboard protocol. */ - -void ro_gui_save_overwrite_cancelled(query_id id, enum query_response res, void *p) +void ro_gui_save_datasave_ack(wimp_message *message) { - if (!saving_from_dialog) { -// ro_gui_save_prepare(gui_save_current_type, gui_save_content); -// ro_gui_dialog_open_persistent(g->window, dialog_saveas, true); + char *path = message->data.data_xfer.file_name; + struct hlcache_handle *h = gui_save_content; + bool force_overwrite; + + switch (gui_save_current_type) { + case GUI_SAVE_LINK_URI: + case GUI_SAVE_LINK_URL: + case GUI_SAVE_LINK_TEXT: + case GUI_SAVE_HOTLIST_EXPORT_HTML: + case GUI_SAVE_HISTORY_EXPORT_HTML: + case GUI_SAVE_TEXT_SELECTION: + case GUI_SAVE_CLIPBOARD_CONTENTS: + break; + + default: + if (!gui_save_content) { + LOG("unexpected DataSaveAck: gui_save_content not set"); + return; + } + break; } -} + if (saving_from_dialog) + ro_gui_set_icon_string(gui_save_sourcew, ICON_SAVE_PATH, + path, true); + + gui_save_send_dataload = true; + memcpy(&gui_save_message, message, sizeof(gui_save_message)); -/** - * Overwrite of existing file confirmed, proceed with the save. - */ + /* if saving/pasting to another application, don't request user + confirmation; a ScrapFile almost certainly exists already */ + if (message->data.data_xfer.est_size == -1) + force_overwrite = true; + else + force_overwrite = !nsoption_bool(confirm_overwrite); -void ro_gui_save_overwrite_confirmed(query_id id, enum query_response res, void *p) -{ - if (ro_gui_save_content(gui_save_content, gui_save_message.data.data_xfer.file_name, true)) + if (ro_gui_save_content(h, path, force_overwrite)) ro_gui_save_done(); } -- cgit v1.2.3