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,953 +221,51 @@ void ro_gui_saveas_quit(void)
save_dir = NULL;
}
-/**
- * Prepares the save box to reflect gui_save_type and a content, and
- * opens it.
- *
- * \param save_type type of save
- * \param h content to save
- * \param s selection to save
- * \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)
-{
- char name_buf[FILENAME_MAX];
- size_t leaf_offset = 0;
- char icon_buf[20];
-
- assert( (save_type == GUI_SAVE_LINK_URI) ||
- (save_type == GUI_SAVE_LINK_URL) ||
- (save_type == GUI_SAVE_LINK_TEXT) ||
- (save_type == GUI_SAVE_HOTLIST_EXPORT_HTML) ||
- (save_type == GUI_SAVE_HISTORY_EXPORT_HTML) ||
- (save_type == GUI_SAVE_TEXT_SELECTION) || h);
-
- if (gui_save_selection == NULL)
- free(gui_save_selection);
-
- gui_save_selection = s;
- if (url != NULL) {
- gui_save_url = nsurl_access(url);
- } else {
- gui_save_url = NULL;
- }
- gui_save_title = title;
-
- if (save_dir) {
- leaf_offset = save_dir_len;
- memcpy(name_buf, save_dir, leaf_offset);
- name_buf[leaf_offset++] = '.';
- }
-
- if (h != NULL) {
- url = hlcache_handle_get_url(h);
- }
-
- ro_gui_save_set_state(h, save_type, url,
- name_buf + leaf_offset, FILENAME_MAX - leaf_offset,
- icon_buf, sizeof(icon_buf));
-
- ro_gui_set_icon_sprite(dialog_saveas, ICON_SAVE_ICON, saveas_area,
- icon_buf);
-
- ro_gui_set_icon_string(dialog_saveas, ICON_SAVE_PATH, name_buf, true);
- ro_gui_wimp_event_memorise(dialog_saveas);
-}
/**
- * Starts a drag for the save dialog
+ * Create a thumbnail sprite for the page being saved.
*
- * \param pointer mouse position info from Wimp
+ * \param h content to be converted
+ * \param name sprite name to use
+ * \return true iff successful
*/
-void ro_gui_save_start_drag(wimp_pointer *pointer)
+static bool
+ro_gui_save_create_thumbnail(struct hlcache_handle *h, const char *name)
{
- 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);
+ 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;
}
-}
-
-
-/**
- * Handle OK click/keypress in the save dialog.
- *
- * \param w window handle of save dialog
- * \return true on success, false on failure
- */
-bool ro_gui_save_ok(wimp_w w)
-{
- const char *name = ro_gui_get_icon_string(w, ICON_SAVE_PATH);
- wimp_pointer pointer;
- char path[256];
-
- if (!strrchr(name, '.')) {
- ro_warn_user("NoPathError", NULL);
+ riscos_bitmap_render(bitmap, h);
+ area = riscos_bitmap_convert_8bpp(bitmap);
+ riscos_bitmap_destroy(bitmap);
+ if (!area) {
+ LOG("Thumbnail conversion failed.");
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));
+ sprite_header = (osspriteop_header *)(area + 1);
+ strncpy(sprite_header->name, name, 12);
- if (ro_gui_save_content(gui_save_content, path, !nsoption_bool(confirm_overwrite))) {
- ro_gui_save_done();
- return true;
- }
- return 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);
-/**
- * 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
- */
+ memcpy((byte*)saveas_area + saveas_area->first,
+ sprite_header, sprite_header->size);
-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;
+ saveas_area->sprite_count = 1;
+ saveas_area->used = saveas_area->first + sprite_header->size;
- /* 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;
-
- 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;
- }
-
- 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);
-}
-
-
-/**
- * Initiates drag saving of a selection from a browser window
- *
- * \param g gui window
- * \param selection selection object
- */
-
-void gui_drag_save_selection(struct gui_window *g, const char *selection)
-{
- 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;
-
- 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_selection == NULL)
- free(gui_save_selection);
-
- 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);
-}
-
-
-/**
- * Initiates drag saving of a link/URL file
- *
- * \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_drag_save_link(gui_save_type save_type, const nsurl *url,
- const char *title, struct gui_window *g)
-{
- 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_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;
- }
-
- ro_gui_save_set_state(NULL, save_type, url, 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);
-}
-
-
-/**
- * Start drag of icon under the pointer.
- */
-
-void ro_gui_drag_icon(int x, int y, const char *sprite)
-{
- os_error *error;
- wimp_drag drag;
- int r2;
-
- 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;
- }
-
- LOG("xdragasprite_start: 0x%x: %s", error->errnum, error->errmess);
- }
-
- 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;
-}
-
-
-/**
- * Convert a ctrl-char terminated pathname possibly containing spaces
- * to a NUL-terminated one containing only hard spaces.
- *
- * \param dp destination buffer to receive pathname
- * \param len size of destination buffer
- * \param p source pathname, ctrl-char terminated
- */
-
-void ro_gui_convert_save_path(char *dp, size_t len, const char *p)
-{
- 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';
-}
-
-
-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;
- }
-}
-
-
-/**
- * Handle User_Drag_Box event for a drag from the save dialog or browser window.
- *
- * \param *drag The Wimp_DragEnd data block.
- * \param *data NULL, as function is used as a callback from ro_mouse.
- */
-
-static void ro_gui_save_drag_end(wimp_dragged *drag, void *data)
-{
- const char *name;
- wimp_pointer pointer;
- wimp_message message;
- os_error *error;
- char *dp, *ep;
- char *local_name = NULL;
-
- if (dragbox_active)
- ro_gui_drag_box_cancel();
-
- 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;
- }
-
- /* 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);
-
- 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;
- }
-
- 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;
-
- /* 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;
- }
-
- dp = message.data.data_xfer.file_name;
- ep = dp + sizeof message.data.data_xfer.file_name;
-
- 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);
-}
-
-
-
-/**
- * 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
- */
-
- 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;
- }
-}
-
-
-/**
- * Handle lack of Message_DataSaveAck for drags, saveas dialogs and clipboard code
- */
-
-void ro_gui_save_bounced(wimp_message *message)
-{
- gui_current_drag_type = GUI_DRAG_NONE;
-}
-
-
-/**
- * Handle Message_DataSaveAck for a drag from the save dialog or browser window,
- * or Clipboard protocol.
- */
-
-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;
-
- 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));
-
- /* 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();
-}
-
-
-
-/**
- * Does the actual saving
- *
- * \param h handle to content to save (or NULL for other)
- * \param path path to save as
- * \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)
-{
- os_error *error;
- const char *source_data;
- unsigned long source_size;
-
- /* does the user want to check for collisions when saving? */
- if (!force_overwrite) {
- fileswitch_object_type obj_type;
- /* check whether the destination file/dir already exists */
- error = xosfile_read_stamped(path, &obj_type,
- NULL, NULL, NULL, NULL, NULL);
- if (error) {
- LOG("xosfile_read_stamped: 0x%x:%s", error->errnum, error->errmess);
- ro_warn_user("SaveError", error->errmess);
- return false;
- }
-
- switch (obj_type) {
- case osfile_NOT_FOUND:
- break;
-
- case osfile_IS_FILE:
- gui_save_query = query_user("OverwriteFile", NULL, &overwrite_funcs, NULL,
- messages_get("Replace"), messages_get("DontReplace"));
-// gui_save_query_rsn = QueryRsn_Overwrite;
- return false;
-
- default:
- error = xosfile_make_error(path, obj_type);
- assert(error);
- ro_warn_user("SaveError", error->errmess);
- return false;
- }
- }
-
- switch (gui_save_current_type) {
-#ifdef WITH_DRAW_EXPORT
- case GUI_SAVE_DRAW:
- return save_as_draw(h, path);
-#endif
-#ifdef WITH_PDF_EXPORT
- case GUI_SAVE_PDF:
- return save_as_pdf(h, path);
-#endif
- case GUI_SAVE_TEXT:
- save_as_text(h, path);
- xosfile_set_type(path, 0xfff);
- break;
- case GUI_SAVE_COMPLETE:
- assert(h);
- if (content_get_type(h) == CONTENT_HTML) {
- if (strcmp(path, ""))
- return ro_gui_save_complete(h, path);
-
- /* we can't send a whole directory to another
- * application, so just send the HTML source */
- gui_save_current_type = GUI_SAVE_SOURCE;
- }
- else
- gui_save_current_type = GUI_SAVE_OBJECT_ORIG; /* \todo do this earlier? */
- /* no break */
- case GUI_SAVE_SOURCE:
- case GUI_SAVE_OBJECT_ORIG:
- source_data = content_get_source_data(h, &source_size);
- error = xosfile_save_stamped(path,
- ro_content_filetype(h),
- (byte *) source_data,
- (byte *) source_data + source_size);
- if (error) {
- LOG("xosfile_save_stamped: 0x%x: %s", error->errnum, error->errmess);
- ro_warn_user("SaveError", error->errmess);
- return false;
- }
- break;
-
- case GUI_SAVE_OBJECT_NATIVE:
- return ro_gui_save_object_native(h, path);
-
- case GUI_SAVE_LINK_URI:
- return ro_gui_save_link(gui_save_url, gui_save_title,
- LINK_ACORN, path);
-
- case GUI_SAVE_LINK_URL:
- return ro_gui_save_link(gui_save_url, gui_save_title,
- LINK_ANT, path);
-
- case GUI_SAVE_LINK_TEXT:
- return ro_gui_save_link(gui_save_url, gui_save_title,
- LINK_TEXT, path);
-
- case GUI_SAVE_HOTLIST_EXPORT_HTML:
- if (hotlist_export(path, NULL) != NSERROR_OK)
- return false;
- error = xosfile_set_type(path, 0xfaf);
- if (error)
- LOG("xosfile_set_type: 0x%x: %s", error->errnum, error->errmess);
- break;
- case GUI_SAVE_HISTORY_EXPORT_HTML:
- if (global_history_export(path, NULL) != NSERROR_OK)
- return false;
- error = xosfile_set_type(path, 0xfaf);
- if (error)
- LOG("xosfile_set_type: 0x%x: %s", error->errnum, error->errmess);
- break;
-
- case GUI_SAVE_TEXT_SELECTION:
- if (gui_save_selection == NULL)
- return false;
- if (!utf8_save_text(gui_save_selection, path)) {
- free(gui_save_selection);
- gui_save_selection = NULL;
- return false;
- }
- free(gui_save_selection);
- gui_save_selection = NULL;
- xosfile_set_type(path, 0xfff);
- break;
-
- case GUI_SAVE_CLIPBOARD_CONTENTS:
- return ro_gui_save_clipboard(path);
-
- default:
- LOG("Unexpected content type: %d, path %s", gui_save_current_type, path);
- return false;
- }
- return true;
-}
-
-
-/**
- * Save completed, inform recipient and close our 'save as' dialog.
- */
-
-void ro_gui_save_done(void)
-{
- os_error *error;
-
- 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 (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;
- }
- }
- }
-
- 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 (!saving_from_dialog || gui_save_close_after)
- gui_save_content = 0;
-}
-
-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.
- *
- * \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
- */
-
-bool ro_gui_save_complete(struct hlcache_handle *h, char *path)
-{
- 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;
- 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]);
-
- /* 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;
- }
-
- /* 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;
-
- 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;
- }
- }
-
- return true;
-}
-
-
-/**
- * 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
- */
-
-bool ro_gui_save_link(const char *url, const char *title, link_format format,
- char *path)
-{
- FILE *fp = fopen(path, "w");
-
- if (!fp) {
- ro_warn_user("SaveError", strerror(errno));
- return false;
- }
-
- 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;
- }
-
- 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;
- }
+ free(area);
return true;
}
@@ -1199,8 +282,8 @@ bool ro_gui_save_link(const char *url, const char *title, link_format format,
* \param icon_buf buffer to receive sprite name.
* \param icon_len size of buffer to receive icon name.
*/
-
-void ro_gui_save_set_state(struct hlcache_handle *h, gui_save_type save_type,
+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)
{
@@ -1329,59 +412,276 @@ void ro_gui_save_set_state(struct hlcache_handle *h, gui_save_type save_type,
}
+/**
+ * Prepares the save box to reflect gui_save_type and a content, and
+ * opens it.
+ *
+ * \param save_type type of save
+ * \param h content to save
+ * \param s selection to save
+ * \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)
+{
+ char name_buf[FILENAME_MAX];
+ size_t leaf_offset = 0;
+ char icon_buf[20];
+
+ assert( (save_type == GUI_SAVE_LINK_URI) ||
+ (save_type == GUI_SAVE_LINK_URL) ||
+ (save_type == GUI_SAVE_LINK_TEXT) ||
+ (save_type == GUI_SAVE_HOTLIST_EXPORT_HTML) ||
+ (save_type == GUI_SAVE_HISTORY_EXPORT_HTML) ||
+ (save_type == GUI_SAVE_TEXT_SELECTION) || h);
+
+ if (gui_save_selection == NULL)
+ free(gui_save_selection);
+
+ gui_save_selection = s;
+ if (url != NULL) {
+ gui_save_url = nsurl_access(url);
+ } else {
+ gui_save_url = NULL;
+ }
+ gui_save_title = title;
+
+ if (save_dir) {
+ leaf_offset = save_dir_len;
+ memcpy(name_buf, save_dir, leaf_offset);
+ name_buf[leaf_offset++] = '.';
+ }
+
+ if (h != NULL) {
+ url = hlcache_handle_get_url(h);
+ }
+
+ ro_gui_save_set_state(h, save_type, url,
+ name_buf + leaf_offset, FILENAME_MAX - leaf_offset,
+ icon_buf, sizeof(icon_buf));
+
+ ro_gui_set_icon_sprite(dialog_saveas, ICON_SAVE_ICON, saveas_area,
+ icon_buf);
+
+ ro_gui_set_icon_string(dialog_saveas, ICON_SAVE_PATH, name_buf, true);
+ ro_gui_wimp_event_memorise(dialog_saveas);
+}
+
/**
- * Create a thumbnail sprite for the page being saved.
+ * Handle lack of Message_DataSaveAck for drags, saveas dialogs and clipboard code
*
- * \param h content to be converted
- * \param name sprite name to use
- * \return true iff successful
+ * \param message A wimp message.
*/
-
-bool ro_gui_save_create_thumbnail(struct hlcache_handle *h, const char *name)
+static void ro_gui_save_bounced(wimp_message *message)
{
- osspriteop_header *sprite_header;
- struct bitmap *bitmap;
- osspriteop_area *area;
+ gui_current_drag_type = GUI_DRAG_NONE;
+}
- 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;
+
+/**
+ * Handle User_Drag_Box event for a drag from the save dialog or browser window.
+ *
+ * \param *drag The Wimp_DragEnd data block.
+ * \param *data NULL, as function is used as a callback from ro_mouse.
+ */
+static void ro_gui_save_drag_end(wimp_dragged *drag, void *data)
+{
+ const char *name;
+ wimp_pointer pointer;
+ wimp_message message;
+ os_error *error;
+ char *dp, *ep;
+ char *local_name = NULL;
+
+ if (dragbox_active)
+ ro_gui_drag_box_cancel();
+
+ 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;
}
- sprite_header = (osspriteop_header *)(area + 1);
- strncpy(sprite_header->name, name, 12);
+ /* 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);
+
+ 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;
+ }
+
+ 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;
+
+ /* 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;
+ }
+
+ dp = message.data.data_xfer.file_name;
+ ep = dp + sizeof message.data.data_xfer.file_name;
+
+ 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);
+}
- /* 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);
+/**
+ * Starts a drag for the save dialog
+ *
+ * \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);
+ }
+}
- 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;
+/**
+ * Save completed, inform recipient and close our 'save as' dialog.
+ */
+static void ro_gui_save_done(void)
+{
+ os_error *error;
- free(area);
+ 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);
+ }
+ }
- return true;
+ 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;
+ }
+ }
+ }
+
+ 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 (!saving_from_dialog || gui_save_close_after)
+ gui_save_content = 0;
}
/**
* User has opted not to overwrite the existing file.
*/
-
-void ro_gui_save_overwrite_cancelled(query_id id, enum query_response res, void *p)
+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);
@@ -1393,9 +693,716 @@ void ro_gui_save_overwrite_cancelled(query_id id, enum query_response res, void
/**
* Overwrite of existing file confirmed, proceed with the save.
*/
-
-void ro_gui_save_overwrite_confirmed(query_id id, enum query_response res, void *p)
+static 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(gui_save_content, gui_save_message.data.data_xfer.file_name, true)) {
+ ro_gui_save_done();
+ }
+}
+
+
+/**
+ * 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");
+
+ if (!fp) {
+ ro_warn_user("SaveError", strerror(errno));
+ return false;
+ }
+
+ 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;
+ }
+
+ 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;
+ }
+
+ return true;
+}
+
+
+/**
+ * set RISC OS filetype of file from mimetype
+ *
+ * \param path The path of the file to set filetype on
+ * \param mime_type The mime type to set.
+ */
+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.
+ *
+ * \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 bool ro_gui_save_complete(struct hlcache_handle *h, char *path)
+{
+ 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;
+ 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]);
+
+ /* 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;
+ }
+
+ /* 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);
+}
+
+
+/**
+ * Overwrite confirmation callbacks
+ */
+static const query_callback overwrite_funcs =
+{
+ ro_gui_save_overwrite_confirmed,
+ ro_gui_save_overwrite_cancelled
+};
+
+
+/**
+ * Save object in native type
+ */
+static 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;
+
+ 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;
+ }
+ }
+
+ return true;
+}
+
+
+/**
+ * Does the actual saving
+ *
+ * \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
+ */
+static bool
+ro_gui_save_content(struct hlcache_handle *h, char *path, bool force_overwrite)
+{
+ os_error *error;
+ const char *source_data;
+ unsigned long source_size;
+
+ /* does the user want to check for collisions when saving? */
+ if (!force_overwrite) {
+ fileswitch_object_type obj_type;
+ /* check whether the destination file/dir already exists */
+ error = xosfile_read_stamped(path, &obj_type,
+ NULL, NULL, NULL, NULL, NULL);
+ if (error) {
+ LOG("xosfile_read_stamped: 0x%x:%s", error->errnum, error->errmess);
+ ro_warn_user("SaveError", error->errmess);
+ return false;
+ }
+
+ switch (obj_type) {
+ case osfile_NOT_FOUND:
+ break;
+
+ case osfile_IS_FILE:
+ gui_save_query = query_user("OverwriteFile", NULL, &overwrite_funcs, NULL, messages_get("Replace"), messages_get("DontReplace"));
+// gui_save_query_rsn = QueryRsn_Overwrite;
+ return false;
+
+ default:
+ error = xosfile_make_error(path, obj_type);
+ assert(error);
+ ro_warn_user("SaveError", error->errmess);
+ return false;
+ }
+ }
+
+ switch (gui_save_current_type) {
+#ifdef WITH_DRAW_EXPORT
+ case GUI_SAVE_DRAW:
+ return save_as_draw(h, path);
+#endif
+#ifdef WITH_PDF_EXPORT
+ case GUI_SAVE_PDF:
+ return save_as_pdf(h, path);
+#endif
+ case GUI_SAVE_TEXT:
+ save_as_text(h, path);
+ xosfile_set_type(path, 0xfff);
+ break;
+ case GUI_SAVE_COMPLETE:
+ assert(h);
+ if (content_get_type(h) == CONTENT_HTML) {
+ if (strcmp(path, ""))
+ return ro_gui_save_complete(h, path);
+
+ /* we can't send a whole directory to another
+ * application, so just send the HTML source */
+ gui_save_current_type = GUI_SAVE_SOURCE;
+ }
+ else
+ gui_save_current_type = GUI_SAVE_OBJECT_ORIG; /** \todo do this earlier? */
+ /* no break */
+ case GUI_SAVE_SOURCE:
+ case GUI_SAVE_OBJECT_ORIG:
+ source_data = content_get_source_data(h, &source_size);
+ error = xosfile_save_stamped(path,
+ ro_content_filetype(h),
+ (byte *) source_data,
+ (byte *) source_data + source_size);
+ if (error) {
+ LOG("xosfile_save_stamped: 0x%x: %s", error->errnum, error->errmess);
+ ro_warn_user("SaveError", error->errmess);
+ return false;
+ }
+ break;
+
+ case GUI_SAVE_OBJECT_NATIVE:
+ return ro_gui_save_object_native(h, path);
+
+ case GUI_SAVE_LINK_URI:
+ return ro_gui_save_link(gui_save_url, gui_save_title,
+ LINK_ACORN, path);
+
+ case GUI_SAVE_LINK_URL:
+ return ro_gui_save_link(gui_save_url, gui_save_title,
+ LINK_ANT, path);
+
+ case GUI_SAVE_LINK_TEXT:
+ return ro_gui_save_link(gui_save_url, gui_save_title,
+ LINK_TEXT, path);
+
+ case GUI_SAVE_HOTLIST_EXPORT_HTML:
+ if (hotlist_export(path, NULL) != NSERROR_OK)
+ return false;
+ error = xosfile_set_type(path, 0xfaf);
+ if (error)
+ LOG("xosfile_set_type: 0x%x: %s", error->errnum, error->errmess);
+ break;
+ case GUI_SAVE_HISTORY_EXPORT_HTML:
+ if (global_history_export(path, NULL) != NSERROR_OK)
+ return false;
+ error = xosfile_set_type(path, 0xfaf);
+ if (error)
+ LOG("xosfile_set_type: 0x%x: %s", error->errnum, error->errmess);
+ break;
+
+ case GUI_SAVE_TEXT_SELECTION:
+ if (gui_save_selection == NULL)
+ return false;
+ if (!utf8_save_text(gui_save_selection, path)) {
+ free(gui_save_selection);
+ gui_save_selection = NULL;
+ return false;
+ }
+ free(gui_save_selection);
+ gui_save_selection = NULL;
+ xosfile_set_type(path, 0xfff);
+ break;
+
+ case GUI_SAVE_CLIPBOARD_CONTENTS:
+ return ro_gui_save_clipboard(path);
+
+ default:
+ LOG("Unexpected content type: %d, path %s", gui_save_current_type, path);
+ return false;
+ }
+ return true;
+}
+
+
+/**
+ * Handle OK click/keypress in the save dialog.
+ *
+ * \param w window handle of save dialog
+ * \return true on success, false on failure
+ */
+bool ro_gui_save_ok(wimp_w w)
+{
+ const char *name = ro_gui_get_icon_string(w, ICON_SAVE_PATH);
+ wimp_pointer pointer;
+ char path[256];
+
+ 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 g gui window
+ * \param c content to save
+ * \param save_type type of save
+ */
+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;
+
+ 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;
+ }
+
+ 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);
+}
+
+
+/**
+ * Initiates drag saving of a selection from a browser window
+ *
+ * \param g gui window
+ * \param selection selection object
+ */
+void gui_drag_save_selection(struct gui_window *g, const char *selection)
+{
+ 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;
+
+ 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_selection == NULL)
+ free(gui_save_selection);
+
+ 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);
+}
+
+
+/**
+ * Initiates drag saving of a link/URL file
+ *
+ * \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_drag_save_link(gui_save_type save_type, const nsurl *url,
+ const char *title, struct gui_window *g)
+{
+ 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_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;
+ }
+
+ ro_gui_save_set_state(NULL, save_type, url, 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);
+}
+
+
+/**
+ * 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;
+
+ 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;
+ }
+
+ LOG("xdragasprite_start: 0x%x: %s", error->errnum, error->errmess);
+ }
+
+ 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;
+ }
+}
+
+
+/**
+ * Convert a ctrl-char terminated pathname possibly containing spaces
+ * to a NUL-terminated one containing only hard spaces.
+ *
+ * \param dp destination buffer to receive pathname
+ * \param len size of destination buffer
+ * \param p source pathname, ctrl-char terminated
+ */
+void ro_gui_convert_save_path(char *dp, size_t len, const char *p)
+{
+ 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';
+}
+
+
+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;
+ }
+}
+
+
+/**
+ * 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
+ */
+
+ 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;
+ }
+}
+
+
+/**
+ * Handle Message_DataSaveAck for a drag from the save dialog or browser window,
+ * or Clipboard protocol.
+ */
+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;
+
+ 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));
+
+ /* 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();
}