Sweden-Number/dlls/mshtml/editor.c

1311 lines
37 KiB
C

/*
* Copyright 2006-2007 Jacek Caban for CodeWeavers
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
* License as published by the Free Software Foundation; either
* version 2.1 of the License, or (at your option) any later version.
*
* This library is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, write to the Free Software
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
*/
#include "config.h"
#include <stdarg.h>
#include <stdio.h>
#define COBJMACROS
#include "windef.h"
#include "winbase.h"
#include "winuser.h"
#include "winnls.h"
#include "ole2.h"
#include "mshtmcid.h"
#include "wine/debug.h"
#include "wine/unicode.h"
#include "mshtml_private.h"
#include "resource.h"
WINE_DEFAULT_DEBUG_CHANNEL(mshtml);
#define NSCMD_ALIGN "cmd_align"
#define NSCMD_BEGINLINE "cmd_beginLine"
#define NSCMD_BOLD "cmd_bold"
#define NSCMD_CHARNEXT "cmd_charNext"
#define NSCMD_CHARPREVIOUS "cmd_charPrevious"
#define NSCMD_COPY "cmd_copy"
#define NSCMD_CUT "cmd_cut"
#define NSCMD_DELETECHARFORWARD "cmd_deleteCharForward"
#define NSCMD_DELETEWORDFORWARD "cmd_deleteWordForward"
#define NSCMD_ENDLINE "cmd_endLine"
#define NSCMD_FONTCOLOR "cmd_fontColor"
#define NSCMD_FONTFACE "cmd_fontFace"
#define NSCMD_INDENT "cmd_indent"
#define NSCMD_INSERTHR "cmd_insertHR"
#define NSCMD_INSERTLINKNOUI "cmd_insertLinkNoUI"
#define NSCMD_ITALIC "cmd_italic"
#define NSCMD_LINENEXT "cmd_lineNext"
#define NSCMD_LINEPREVIOUS "cmd_linePrevious"
#define NSCMD_MOVEBOTTOM "cmd_moveBottom"
#define NSCMD_MOVEPAGEDOWN "cmd_movePageDown"
#define NSCMD_MOVEPAGEUP "cmd_movePageUp"
#define NSCMD_MOVETOP "cmd_moveTop"
#define NSCMD_OL "cmd_ol"
#define NSCMD_OUTDENT "cmd_outdent"
#define NSCMD_PASTE "cmd_paste"
#define NSCMD_SELECTALL "cmd_selectAll"
#define NSCMD_SELECTBEGINLINE "cmd_selectBeginLine"
#define NSCMD_SELECTBOTTOM "cmd_selectBottom"
#define NSCMD_SELECTCHARNEXT "cmd_selectCharNext"
#define NSCMD_SELECTCHARPREVIOUS "cmd_selectCharPrevious"
#define NSCMD_SELECTENDLINE "cmd_selectEndLine"
#define NSCMD_SELECTLINENEXT "cmd_selectLineNext"
#define NSCMD_SELECTLINEPREVIOUS "cmd_selectLinePrevious"
#define NSCMD_SELECTPAGEDOWN "cmd_selectPageDown"
#define NSCMD_SELECTPAGEUP "cmd_selectPageUp"
#define NSCMD_SELECTTOP "cmd_selectTop"
#define NSCMD_SELECTWORDNEXT "cmd_selectWordNext"
#define NSCMD_SELECTWORDPREVIOUS "cmd_selectWordPrevious"
#define NSCMD_UL "cmd_ul"
#define NSCMD_UNDERLINE "cmd_underline"
#define NSCMD_WORDNEXT "cmd_wordNext"
#define NSCMD_WORDPREVIOUS "cmd_wordPrevious"
#define NSSTATE_ATTRIBUTE "state_attribute"
#define NSSTATE_ALL "state_all"
#define NSALIGN_CENTER "center"
#define NSALIGN_LEFT "left"
#define NSALIGN_RIGHT "right"
#define DOM_VK_LEFT VK_LEFT
#define DOM_VK_UP VK_UP
#define DOM_VK_RIGHT VK_RIGHT
#define DOM_VK_DOWN VK_DOWN
#define DOM_VK_DELETE VK_DELETE
#define DOM_VK_HOME VK_HOME
#define DOM_VK_END VK_END
static const WCHAR wszFont[] = {'f','o','n','t',0};
static const WCHAR wszSize[] = {'s','i','z','e',0};
void set_dirty(HTMLDocument *This, VARIANT_BOOL dirty)
{
nsresult nsres;
if(This->usermode != EDITMODE || !This->nscontainer || !This->nscontainer->editor)
return;
if(dirty) {
nsres = nsIEditor_IncrementModificationCount(This->nscontainer->editor, 1);
if(NS_FAILED(nsres))
ERR("IncrementModificationCount failed: %08x\n", nsres);
}else {
nsres = nsIEditor_ResetModificationCount(This->nscontainer->editor);
if(NS_FAILED(nsres))
ERR("ResetModificationCount failed: %08x\n", nsres);
}
}
static void do_ns_editor_command(NSContainer *This, const char *cmd)
{
nsresult nsres;
if(!This->editor_controller)
return;
nsres = nsIController_DoCommand(This->editor_controller, cmd);
if(NS_FAILED(nsres))
ERR("DoCommand(%s) failed: %08x\n", debugstr_a(cmd), nsres);
}
static nsresult get_ns_command_state(NSContainer *This, const char *cmd, nsICommandParams *nsparam)
{
nsICommandManager *cmdmgr;
nsresult nsres;
nsres = get_nsinterface((nsISupports*)This->webbrowser, &IID_nsICommandManager, (void**)&cmdmgr);
if(NS_FAILED(nsres)) {
ERR("Could not get nsICommandManager: %08x\n", nsres);
return nsres;
}
nsres = nsICommandManager_GetCommandState(cmdmgr, cmd, NULL, nsparam);
if(NS_FAILED(nsres))
ERR("GetCommandState(%s) failed: %08x\n", debugstr_a(cmd), nsres);
nsICommandManager_Release(cmdmgr);
return nsres;
}
static DWORD query_ns_edit_status(HTMLDocument *This, const char *nscmd)
{
nsICommandParams *nsparam;
PRBool b = FALSE;
if(This->usermode != EDITMODE || This->readystate < READYSTATE_INTERACTIVE)
return OLECMDF_SUPPORTED;
if(This->nscontainer && nscmd) {
nsparam = create_nscommand_params();
get_ns_command_state(This->nscontainer, nscmd, nsparam);
nsICommandParams_GetBooleanValue(nsparam, NSSTATE_ALL, &b);
nsICommandParams_Release(nsparam);
}
return OLECMDF_SUPPORTED | OLECMDF_ENABLED | (b ? OLECMDF_LATCHED : 0);
}
static void set_ns_align(HTMLDocument *This, const char *align_str)
{
nsICommandParams *nsparam;
if(!This->nscontainer)
return;
nsparam = create_nscommand_params();
nsICommandParams_SetCStringValue(nsparam, NSSTATE_ATTRIBUTE, align_str);
do_ns_command(This->nscontainer, NSCMD_ALIGN, nsparam);
nsICommandParams_Release(nsparam);
}
static DWORD query_align_status(HTMLDocument *This, const char *align_str)
{
nsICommandParams *nsparam;
char *align = NULL;
if(This->usermode != EDITMODE || This->readystate < READYSTATE_INTERACTIVE)
return OLECMDF_SUPPORTED;
if(This->nscontainer) {
nsparam = create_nscommand_params();
get_ns_command_state(This->nscontainer, NSCMD_ALIGN, nsparam);
nsICommandParams_GetCStringValue(nsparam, NSSTATE_ATTRIBUTE, &align);
nsICommandParams_Release(nsparam);
}
return OLECMDF_SUPPORTED | OLECMDF_ENABLED
| (align && !strcmp(align_str, align) ? OLECMDF_LATCHED : 0);
}
static nsISelection *get_ns_selection(HTMLDocument *This)
{
nsIDOMWindow *dom_window;
nsISelection *nsselection = NULL;
nsresult nsres;
if(!This->nscontainer)
return NULL;
nsres = nsIWebBrowser_GetContentDOMWindow(This->nscontainer->webbrowser, &dom_window);
if(NS_FAILED(nsres))
return NULL;
nsIDOMWindow_GetSelection(dom_window, &nsselection);
nsIDOMWindow_Release(dom_window);
return nsselection;
}
static void remove_child_attr(nsIDOMElement *elem, LPCWSTR tag, nsAString *attr_str)
{
PRBool has_children;
PRUint32 child_cnt, i;
nsIDOMNode *child_node;
nsIDOMNodeList *node_list;
PRUint16 node_type;
nsIDOMElement_HasChildNodes(elem, &has_children);
if(!has_children)
return;
nsIDOMElement_GetChildNodes(elem, &node_list);
nsIDOMNodeList_GetLength(node_list, &child_cnt);
for(i=0; i<child_cnt; i++) {
nsIDOMNodeList_Item(node_list, i, &child_node);
nsIDOMNode_GetNodeType(child_node, &node_type);
if(node_type == ELEMENT_NODE) {
nsIDOMElement *child_elem;
nsAString tag_str;
const PRUnichar *ctag;
nsIDOMNode_QueryInterface(child_node, &IID_nsIDOMElement, (void**)&child_elem);
nsAString_Init(&tag_str, NULL);
nsIDOMElement_GetTagName(child_elem, &tag_str);
nsAString_GetData(&tag_str, &ctag);
if(!strcmpiW(ctag, tag))
/* FIXME: remove node if there are no more attributes */
nsIDOMElement_RemoveAttribute(child_elem, attr_str);
nsAString_Finish(&tag_str);
remove_child_attr(child_elem, tag, attr_str);
nsIDOMNode_Release(child_elem);
}
nsIDOMNode_Release(child_node);
}
nsIDOMNodeList_Release(node_list);
}
static void get_font_size(HTMLDocument *This, WCHAR *ret)
{
nsISelection *nsselection = get_ns_selection(This);
nsIDOMElement *elem = NULL;
nsIDOMNode *node = NULL, *tmp_node;
nsAString tag_str;
LPCWSTR tag;
PRUint16 node_type;
nsresult nsres;
*ret = 0;
if(!nsselection)
return;
nsISelection_GetFocusNode(nsselection, &node);
nsISelection_Release(nsselection);
while(node) {
nsres = nsIDOMNode_GetNodeType(node, &node_type);
if(NS_FAILED(nsres) || node_type == DOCUMENT_NODE)
break;
if(node_type == ELEMENT_NODE) {
nsIDOMNode_QueryInterface(node, &IID_nsIDOMElement, (void**)&elem);
nsAString_Init(&tag_str, NULL);
nsIDOMElement_GetTagName(elem, &tag_str);
nsAString_GetData(&tag_str, &tag);
if(!strcmpiW(tag, wszFont)) {
nsAString size_str, val_str;
LPCWSTR val;
TRACE("found font tag %p\n", elem);
nsAString_Init(&size_str, wszSize);
nsAString_Init(&val_str, NULL);
nsIDOMElement_GetAttribute(elem, &size_str, &val_str);
nsAString_GetData(&val_str, &val);
if(*val) {
TRACE("found size %s\n", debugstr_w(val));
strcpyW(ret, val);
}
nsAString_Finish(&size_str);
nsAString_Finish(&val_str);
}
nsAString_Finish(&tag_str);
nsIDOMElement_Release(elem);
}
if(*ret)
break;
tmp_node = node;
nsIDOMNode_GetParentNode(node, &node);
nsIDOMNode_Release(tmp_node);
}
if(node)
nsIDOMNode_Release(node);
}
static void set_font_size(HTMLDocument *This, LPCWSTR size)
{
nsISelection *nsselection;
PRBool collapsed;
nsIDOMDocument *nsdoc;
nsIDOMElement *elem;
nsIDOMRange *range;
PRInt32 range_cnt = 0;
nsAString font_str;
nsAString size_str;
nsAString val_str;
nsresult nsres;
nsselection = get_ns_selection(This);
if(!nsselection)
return;
nsISelection_GetRangeCount(nsselection, &range_cnt);
if(range_cnt != 1) {
FIXME("range_cnt %d not supprted\n", range_cnt);
if(!range_cnt) {
nsISelection_Release(nsselection);
return;
}
}
nsres = nsIWebNavigation_GetDocument(This->nscontainer->navigation, &nsdoc);
if(NS_FAILED(nsres))
return;
nsAString_Init(&font_str, wszFont);
nsAString_Init(&size_str, wszSize);
nsAString_Init(&val_str, size);
nsIDOMDocument_CreateElement(nsdoc, &font_str, &elem);
nsIDOMElement_SetAttribute(elem, &size_str, &val_str);
nsISelection_GetRangeAt(nsselection, 0, &range);
nsISelection_GetIsCollapsed(nsselection, &collapsed);
nsISelection_RemoveAllRanges(nsselection);
nsIDOMRange_SurroundContents(range, (nsIDOMNode*)elem);
if(collapsed) {
nsISelection_Collapse(nsselection, (nsIDOMNode*)elem, 0);
}else {
/* Remove all size attrbutes from the range */
remove_child_attr(elem, wszFont, &size_str);
nsISelection_SelectAllChildren(nsselection, (nsIDOMNode*)elem);
}
nsIDOMRange_Release(range);
nsIDOMElement_Release(elem);
nsAString_Finish(&font_str);
nsAString_Finish(&size_str);
nsAString_Finish(&val_str);
nsISelection_Release(nsselection);
nsIDOMDocument_Release(nsdoc);
set_dirty(This, VARIANT_TRUE);
}
static void handle_arrow_key(HTMLDocument *This, nsIDOMKeyEvent *event, const char * const cmds[4])
{
int i=0;
PRBool b;
nsIDOMKeyEvent_GetCtrlKey(event, &b);
if(b)
i |= 1;
nsIDOMKeyEvent_GetShiftKey(event, &b);
if(b)
i |= 2;
if(cmds[i])
do_ns_editor_command(This->nscontainer, cmds[i]);
nsIDOMKeyEvent_PreventDefault(event);
}
void handle_edit_event(HTMLDocument *This, nsIDOMEvent *event)
{
nsIDOMKeyEvent *key_event;
PRUint32 code;
nsIDOMEvent_QueryInterface(event, &IID_nsIDOMKeyEvent, (void**)&key_event);
nsIDOMKeyEvent_GetKeyCode(key_event, &code);
switch(code) {
case DOM_VK_LEFT: {
static const char * const cmds[] = {
NSCMD_CHARPREVIOUS,
NSCMD_WORDPREVIOUS,
NSCMD_SELECTCHARPREVIOUS,
NSCMD_SELECTWORDPREVIOUS
};
TRACE("left\n");
handle_arrow_key(This, key_event, cmds);
break;
}
case DOM_VK_RIGHT: {
static const char * const cmds[] = {
NSCMD_CHARNEXT,
NSCMD_WORDNEXT,
NSCMD_SELECTCHARNEXT,
NSCMD_SELECTWORDNEXT
};
TRACE("right\n");
handle_arrow_key(This, key_event, cmds);
break;
}
case DOM_VK_UP: {
static const char * const cmds[] = {
NSCMD_LINEPREVIOUS,
NSCMD_MOVEPAGEUP,
NSCMD_SELECTLINEPREVIOUS,
NSCMD_SELECTPAGEUP
};
TRACE("up\n");
handle_arrow_key(This, key_event, cmds);
break;
}
case DOM_VK_DOWN: {
static const char * const cmds[] = {
NSCMD_LINENEXT,
NSCMD_MOVEPAGEDOWN,
NSCMD_SELECTLINENEXT,
NSCMD_SELECTPAGEDOWN
};
TRACE("down\n");
handle_arrow_key(This, key_event, cmds);
break;
}
case DOM_VK_DELETE: {
static const char * const cmds[] = {
NSCMD_DELETECHARFORWARD,
NSCMD_DELETEWORDFORWARD,
NULL, NULL
};
TRACE("delete\n");
handle_arrow_key(This, key_event, cmds);
break;
}
case DOM_VK_HOME: {
static const char * const cmds[] = {
NSCMD_BEGINLINE,
NSCMD_MOVETOP,
NSCMD_SELECTBEGINLINE,
NSCMD_SELECTTOP
};
TRACE("home\n");
handle_arrow_key(This, key_event, cmds);
break;
}
case DOM_VK_END: {
static const char * const cmds[] = {
NSCMD_ENDLINE,
NSCMD_MOVEBOTTOM,
NSCMD_SELECTENDLINE,
NSCMD_SELECTBOTTOM
};
TRACE("end\n");
handle_arrow_key(This, key_event, cmds);
break;
}
}
nsIDOMKeyEvent_Release(key_event);
}
void handle_edit_load(HTMLDocument *This)
{
This->nscontainer->reset_focus = GetFocus();
get_editor_controller(This->nscontainer);
}
static void set_ns_fontname(NSContainer *This, const char *fontname)
{
nsICommandParams *nsparam = create_nscommand_params();
nsICommandParams_SetCStringValue(nsparam, NSSTATE_ATTRIBUTE, fontname);
do_ns_command(This, NSCMD_FONTFACE, nsparam);
nsICommandParams_Release(nsparam);
}
static HRESULT exec_delete(HTMLDocument *This, DWORD cmdexecopt, VARIANT *in, VARIANT *out)
{
TRACE("(%p)->(%p %p)\n", This, in, out);
if(This->nscontainer)
do_ns_editor_command(This->nscontainer, NSCMD_DELETECHARFORWARD);
update_doc(This, UPDATE_UI);
return S_OK;
}
static HRESULT exec_fontname(HTMLDocument *This, DWORD cmdexecopt, VARIANT *in, VARIANT *out)
{
TRACE("(%p)->(%p %p)\n", This, in, out);
if(!This->nscontainer) {
update_doc(This, UPDATE_UI);
return E_FAIL;
}
if(in) {
char *stra;
DWORD len;
if(V_VT(in) != VT_BSTR) {
FIXME("Unsupported vt=%d\n", V_VT(out));
return E_INVALIDARG;
}
TRACE("%s\n", debugstr_w(V_BSTR(in)));
len = WideCharToMultiByte(CP_ACP, 0, V_BSTR(in), -1, NULL, 0, NULL, NULL);
stra = heap_alloc(len);
WideCharToMultiByte(CP_ACP, 0, V_BSTR(in), -1, stra, -1, NULL, NULL);
set_ns_fontname(This->nscontainer, stra);
heap_free(stra);
update_doc(This, UPDATE_UI);
}
if(out) {
nsICommandParams *nsparam;
LPWSTR strw;
char *stra;
DWORD len;
nsresult nsres;
V_VT(out) = VT_BSTR;
V_BSTR(out) = NULL;
nsparam = create_nscommand_params();
nsres = get_ns_command_state(This->nscontainer, NSCMD_FONTFACE, nsparam);
if(NS_FAILED(nsres))
return S_OK;
nsICommandParams_GetCStringValue(nsparam, NSSTATE_ATTRIBUTE, &stra);
nsICommandParams_Release(nsparam);
len = MultiByteToWideChar(CP_ACP, 0, stra, -1, NULL, 0);
strw = heap_alloc(len*sizeof(WCHAR));
MultiByteToWideChar(CP_ACP, 0, stra, -1, strw, -1);
nsfree(stra);
V_BSTR(out) = SysAllocString(strw);
heap_free(strw);
}
return S_OK;
}
static HRESULT exec_forecolor(HTMLDocument *This, DWORD cmdexecopt, VARIANT *in, VARIANT *out)
{
TRACE("(%p)->(%p %p)\n", This, in, out);
if(in) {
if(V_VT(in) == VT_I4) {
nsICommandParams *nsparam = create_nscommand_params();
char color_str[10];
sprintf(color_str, "#%02x%02x%02x",
V_I4(in)&0xff, (V_I4(in)>>8)&0xff, (V_I4(in)>>16)&0xff);
nsICommandParams_SetCStringValue(nsparam, NSSTATE_ATTRIBUTE, color_str);
do_ns_command(This->nscontainer, NSCMD_FONTCOLOR, nsparam);
nsICommandParams_Release(nsparam);
}else {
FIXME("unsupported in vt=%d\n", V_VT(in));
}
update_doc(This, UPDATE_UI);
}
if(out) {
FIXME("unsupported out\n");
return E_NOTIMPL;
}
return S_OK;
}
static HRESULT exec_fontsize(HTMLDocument *This, DWORD cmdexecopt, VARIANT *in, VARIANT *out)
{
TRACE("(%p)->(%p %p)\n", This, in, out);
if(out) {
WCHAR val[10] = {0};
get_font_size(This, val);
V_VT(out) = VT_I4;
V_I4(out) = strtolW(val, NULL, 10);
}
if(in) {
switch(V_VT(in)) {
case VT_I4: {
WCHAR size[10];
static const WCHAR format[] = {'%','d',0};
wsprintfW(size, format, V_I4(in));
set_font_size(This, size);
break;
}
case VT_BSTR:
set_font_size(This, V_BSTR(in));
break;
default:
FIXME("unsupported vt %d\n", V_VT(in));
}
update_doc(This, UPDATE_UI);
}
return S_OK;
}
static HRESULT exec_font(HTMLDocument *This, DWORD cmdexecopt, VARIANT *in, VARIANT *out)
{
FIXME("(%p)->(%p %p)\n", This, in, out);
return E_NOTIMPL;
}
static HRESULT exec_selectall(HTMLDocument *This, DWORD cmdexecopt, VARIANT *in, VARIANT *out)
{
TRACE("(%p)\n", This);
if(in || out)
FIXME("unsupported args\n");
if(This->nscontainer)
do_ns_command(This->nscontainer, NSCMD_SELECTALL, NULL);
update_doc(This, UPDATE_UI);
return S_OK;
}
static HRESULT exec_bold(HTMLDocument *This, DWORD cmdexecopt, VARIANT *in, VARIANT *out)
{
TRACE("(%p)\n", This);
if(in || out)
FIXME("unsupported args\n");
if(This->nscontainer)
do_ns_command(This->nscontainer, NSCMD_BOLD, NULL);
update_doc(This, UPDATE_UI);
return S_OK;
}
static HRESULT exec_italic(HTMLDocument *This, DWORD cmdexecopt, VARIANT *in, VARIANT *out)
{
TRACE("(%p)\n", This);
if(in || out)
FIXME("unsupported args\n");
if(This->nscontainer)
do_ns_command(This->nscontainer, NSCMD_ITALIC, NULL);
update_doc(This, UPDATE_UI);
return S_OK;
}
static HRESULT query_justify(HTMLDocument *This, OLECMD *cmd)
{
switch(cmd->cmdID) {
case IDM_JUSTIFYCENTER:
TRACE("(%p) IDM_JUSTIFYCENTER\n", This);
cmd->cmdf = query_align_status(This, NSALIGN_CENTER);
break;
case IDM_JUSTIFYLEFT:
TRACE("(%p) IDM_JUSTIFYLEFT\n", This);
/* FIXME: We should set OLECMDF_LATCHED only if it's set explicitly. */
if(This->usermode != EDITMODE || This->readystate < READYSTATE_INTERACTIVE)
cmd->cmdf = OLECMDF_SUPPORTED;
else
cmd->cmdf = OLECMDF_SUPPORTED | OLECMDF_ENABLED;
break;
case IDM_JUSTIFYRIGHT:
TRACE("(%p) IDM_JUSTIFYRIGHT\n", This);
cmd->cmdf = query_align_status(This, NSALIGN_RIGHT);
break;
}
return S_OK;
}
static HRESULT exec_justifycenter(HTMLDocument *This, DWORD cmdexecopt, VARIANT *in, VARIANT *out)
{
TRACE("(%p)\n", This);
if(in || out)
FIXME("unsupported args\n");
set_ns_align(This, NSALIGN_CENTER);
update_doc(This, UPDATE_UI);
return S_OK;
}
static HRESULT exec_justifyleft(HTMLDocument *This, DWORD cmdexecopt, VARIANT *in, VARIANT *out)
{
TRACE("(%p)\n", This);
if(in || out)
FIXME("unsupported args\n");
set_ns_align(This, NSALIGN_LEFT);
update_doc(This, UPDATE_UI);
return S_OK;
}
static HRESULT exec_justifyright(HTMLDocument *This, DWORD cmdexecopt, VARIANT *in, VARIANT *out)
{
TRACE("(%p)\n", This);
if(in || out)
FIXME("unsupported args\n");
set_ns_align(This, NSALIGN_RIGHT);
update_doc(This, UPDATE_UI);
return S_OK;
}
static HRESULT exec_underline(HTMLDocument *This, DWORD cmdexecopt, VARIANT *in, VARIANT *out)
{
TRACE("(%p)\n", This);
if(in || out)
FIXME("unsupported args\n");
if(This->nscontainer)
do_ns_command(This->nscontainer, NSCMD_UNDERLINE, NULL);
update_doc(This, UPDATE_UI);
return S_OK;
}
static HRESULT exec_horizontalline(HTMLDocument *This, DWORD cmdexecopt, VARIANT *in, VARIANT *out)
{
TRACE("(%p)\n", This);
if(in || out)
FIXME("unsupported args\n");
if(This->nscontainer)
do_ns_command(This->nscontainer, NSCMD_INSERTHR, NULL);
update_doc(This, UPDATE_UI);
return S_OK;
}
static HRESULT exec_orderlist(HTMLDocument *This, DWORD cmdexecopt, VARIANT *in, VARIANT *out)
{
TRACE("(%p)\n", This);
if(in || out)
FIXME("unsupported args\n");
if(This->nscontainer)
do_ns_command(This->nscontainer, NSCMD_OL, NULL);
update_doc(This, UPDATE_UI);
return S_OK;
}
static HRESULT exec_unorderlist(HTMLDocument *This, DWORD cmdexecopt, VARIANT *in, VARIANT *out)
{
TRACE("(%p)\n", This);
if(in || out)
FIXME("unsupported args\n");
if(This->nscontainer)
do_ns_command(This->nscontainer, NSCMD_UL, NULL);
update_doc(This, UPDATE_UI);
return S_OK;
}
static HRESULT exec_indent(HTMLDocument *This, DWORD cmdexecopt, VARIANT *in, VARIANT *out)
{
TRACE("(%p)\n", This);
if(in || out)
FIXME("unsupported args\n");
if(This->nscontainer)
do_ns_command(This->nscontainer, NSCMD_INDENT, NULL);
update_doc(This, UPDATE_UI);
return S_OK;
}
static HRESULT exec_outdent(HTMLDocument *This, DWORD cmdexecopt, VARIANT *in, VARIANT *out)
{
TRACE("(%p)\n", This);
if(in || out)
FIXME("unsupported args\n");
if(This->nscontainer)
do_ns_command(This->nscontainer, NSCMD_OUTDENT, NULL);
update_doc(This, UPDATE_UI);
return S_OK;
}
static HRESULT exec_composesettings(HTMLDocument *This, DWORD cmdexecopt, VARIANT *in, VARIANT *out)
{
WCHAR *ptr;
if(out || !in || V_VT(in) != VT_BSTR) {
WARN("invalid arg\n");
return E_INVALIDARG;
}
TRACE("(%p)->(%x %s)\n", This, cmdexecopt, debugstr_w(V_BSTR(in)));
update_doc(This, UPDATE_UI);
ptr = V_BSTR(in);
if(*ptr == '1')
exec_bold(This, cmdexecopt, NULL, NULL);
ptr = strchrW(ptr, ',');
if(!ptr)
return S_OK;
if(*++ptr == '1')
exec_italic(This, cmdexecopt, NULL, NULL);
ptr = strchrW(ptr, ',');
if(!ptr)
return S_OK;
if(*++ptr == '1')
exec_underline(This, cmdexecopt, NULL, NULL);
ptr = strchrW(ptr, ',');
if(!ptr)
return S_OK;
if(isdigitW(*++ptr)) {
VARIANT v;
V_VT(&v) = VT_I4;
V_I4(&v) = *ptr-'0';
exec_fontsize(This, cmdexecopt, &v, NULL);
}
ptr = strchrW(ptr, ',');
if(!ptr)
return S_OK;
if(*++ptr != ',')
FIXME("set font color\n");
ptr = strchrW(ptr, ',');
if(!ptr)
return S_OK;
if(*++ptr != ',')
FIXME("set background color\n");
ptr = strchrW(ptr, ',');
if(!ptr)
return S_OK;
ptr++;
if(*ptr) {
VARIANT v;
V_VT(&v) = VT_BSTR;
V_BSTR(&v) = SysAllocString(ptr);
exec_fontname(This, cmdexecopt, &v, NULL);
SysFreeString(V_BSTR(&v));
}
return S_OK;
}
HRESULT editor_exec_copy(HTMLDocument *This, DWORD cmdexecopt, VARIANT *in, VARIANT *out)
{
update_doc(This, UPDATE_UI);
if(!This->nscontainer)
return E_FAIL;
do_ns_editor_command(This->nscontainer, NSCMD_COPY);
return S_OK;
}
HRESULT editor_exec_cut(HTMLDocument *This, DWORD cmdexecopt, VARIANT *in, VARIANT *out)
{
update_doc(This, UPDATE_UI);
if(!This->nscontainer)
return E_FAIL;
do_ns_editor_command(This->nscontainer, NSCMD_CUT);
return S_OK;
}
HRESULT editor_exec_paste(HTMLDocument *This, DWORD cmdexecopt, VARIANT *in, VARIANT *out)
{
update_doc(This, UPDATE_UI);
if(!This->nscontainer)
return E_FAIL;
do_ns_editor_command(This->nscontainer, NSCMD_PASTE);
return S_OK;
}
static HRESULT exec_setdirty(HTMLDocument *This, DWORD cmdexecopt, VARIANT *in, VARIANT *out)
{
TRACE("(%p)->(%08x %p %p)\n", This, cmdexecopt, in, out);
if(!in)
return S_OK;
if(V_VT(in) == VT_BOOL)
set_dirty(This, V_BOOL(in));
else
FIXME("unsupported vt=%d\n", V_VT(in));
return S_OK;
}
static HRESULT query_edit_status(HTMLDocument *This, OLECMD *cmd)
{
switch(cmd->cmdID) {
case IDM_DELETE:
TRACE("CGID_MSHTML: IDM_DELETE\n");
cmd->cmdf = query_ns_edit_status(This, NULL);
break;
case IDM_FONTNAME:
TRACE("CGID_MSHTML: IDM_FONTNAME\n");
cmd->cmdf = query_ns_edit_status(This, NULL);
break;
case IDM_FONTSIZE:
TRACE("CGID_MSHTML: IDM_FONTSIZE\n");
cmd->cmdf = query_ns_edit_status(This, NULL);
break;
case IDM_BOLD:
TRACE("CGID_MSHTML: IDM_BOLD\n");
cmd->cmdf = query_ns_edit_status(This, NSCMD_BOLD);
break;
case IDM_FORECOLOR:
TRACE("CGID_MSHTML: IDM_FORECOLOR\n");
cmd->cmdf = query_ns_edit_status(This, NULL);
break;
case IDM_ITALIC:
TRACE("CGID_MSHTML: IDM_ITALIC\n");
cmd->cmdf = query_ns_edit_status(This, NSCMD_ITALIC);
break;
case IDM_UNDERLINE:
TRACE("CGID_MSHTML: IDM_UNDERLINE\n");
cmd->cmdf = query_ns_edit_status(This, NSCMD_UNDERLINE);
break;
case IDM_HORIZONTALLINE:
TRACE("CGID_MSHTML: IDM_HORIZONTALLINE\n");
cmd->cmdf = query_ns_edit_status(This, NULL);
break;
case IDM_ORDERLIST:
TRACE("CGID_MSHTML: IDM_ORDERLIST\n");
cmd->cmdf = query_ns_edit_status(This, NSCMD_OL);
break;
case IDM_UNORDERLIST:
TRACE("CGID_MSHTML: IDM_HORIZONTALLINE\n");
cmd->cmdf = query_ns_edit_status(This, NSCMD_UL);
break;
case IDM_INDENT:
TRACE("CGID_MSHTML: IDM_INDENT\n");
cmd->cmdf = query_ns_edit_status(This, NULL);
break;
case IDM_OUTDENT:
TRACE("CGID_MSHTML: IDM_OUTDENT\n");
cmd->cmdf = query_ns_edit_status(This, NULL);
break;
case IDM_HYPERLINK:
TRACE("CGID_MSHTML: IDM_HYPERLINK\n");
cmd->cmdf = query_ns_edit_status(This, NULL);
break;
}
return S_OK;
}
static INT_PTR CALLBACK hyperlink_dlgproc(HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam)
{
static const WCHAR wszOther[] = {'(','o','t','h','e','r',')',0};
switch (msg)
{
case WM_INITDIALOG:
{
static const WCHAR wszFile[] = {'f','i','l','e',':',0};
static const WCHAR wszFtp[] = {'f','t','p',':',0};
static const WCHAR wszHttp[] = {'h','t','t','p',':',0};
static const WCHAR wszHttps[] = {'h','t','t','p','s',':',0};
static const WCHAR wszMailto[] = {'m','a','i','l','t','o',':',0};
static const WCHAR wszNews[] = {'n','e','w','s',':',0};
INT def_idx;
HWND hwndCB = GetDlgItem(hwnd, IDC_TYPE);
HWND hwndURL = GetDlgItem(hwnd, IDC_URL);
INT len;
SetWindowLongPtrW(hwnd, DWLP_USER, lparam);
SendMessageW(hwndCB, CB_INSERTSTRING, -1, (LPARAM)wszOther);
SendMessageW(hwndCB, CB_INSERTSTRING, -1, (LPARAM)wszFile);
SendMessageW(hwndCB, CB_INSERTSTRING, -1, (LPARAM)wszFtp);
def_idx = SendMessageW(hwndCB, CB_INSERTSTRING, -1, (LPARAM)wszHttp);
SendMessageW(hwndCB, CB_INSERTSTRING, -1, (LPARAM)wszHttps);
SendMessageW(hwndCB, CB_INSERTSTRING, -1, (LPARAM)wszMailto);
SendMessageW(hwndCB, CB_INSERTSTRING, -1, (LPARAM)wszNews);
SendMessageW(hwndCB, CB_SETCURSEL, def_idx, 0);
/* force the updating of the URL edit box */
SendMessageW(hwnd, WM_COMMAND, MAKEWPARAM(IDC_TYPE, CBN_SELCHANGE), (LPARAM)hwndCB);
SetFocus(hwndURL);
len = SendMessageW(hwndURL, WM_GETTEXTLENGTH, 0, 0);
SendMessageW(hwndURL, EM_SETSEL, 0, len);
return FALSE;
}
case WM_COMMAND:
switch (wparam)
{
case MAKEWPARAM(IDCANCEL, BN_CLICKED):
EndDialog(hwnd, wparam);
return TRUE;
case MAKEWPARAM(IDOK, BN_CLICKED):
{
BSTR *url = (BSTR *)GetWindowLongPtrW(hwnd, DWLP_USER);
HWND hwndURL = GetDlgItem(hwnd, IDC_URL);
INT len = GetWindowTextLengthW(hwndURL);
*url = SysAllocStringLen(NULL, len + 1);
GetWindowTextW(hwndURL, *url, len + 1);
EndDialog(hwnd, wparam);
return TRUE;
}
case MAKEWPARAM(IDC_TYPE, CBN_SELCHANGE):
{
HWND hwndURL = GetDlgItem(hwnd, IDC_URL);
INT item;
INT len;
LPWSTR type;
LPWSTR url;
LPWSTR p;
static const WCHAR wszSlashSlash[] = {'/','/'};
/* get string of currently selected hyperlink type */
item = SendMessageW((HWND)lparam, CB_GETCURSEL, 0, 0);
len = SendMessageW((HWND)lparam, CB_GETLBTEXTLEN, item, 0);
type = HeapAlloc(GetProcessHeap(), 0, (len + 1) * sizeof(WCHAR));
SendMessageW((HWND)lparam, CB_GETLBTEXT, item, (LPARAM)type);
if (!strcmpW(type, wszOther))
*type = '\0';
/* get current URL */
len = GetWindowTextLengthW(hwndURL);
url = HeapAlloc(GetProcessHeap(), 0, (len + strlenW(type) + 3) * sizeof(WCHAR));
GetWindowTextW(hwndURL, url, len + 1);
/* strip off old protocol */
p = strchrW(url, ':');
if (p && p[1] == '/' && p[2] == '/')
p += 3;
if (!p) p = url;
memmove(url + (*type != '\0' ? strlenW(type) + 2 : 0), p, (len + 1 - (p - url)) * sizeof(WCHAR));
/* add new protocol */
if (*type != '\0')
{
memcpy(url, type, strlenW(type) * sizeof(WCHAR));
memcpy(url + strlenW(type), wszSlashSlash, sizeof(wszSlashSlash));
}
SetWindowTextW(hwndURL, url);
HeapFree(GetProcessHeap(), 0, url);
HeapFree(GetProcessHeap(), 0, type);
return TRUE;
}
}
return FALSE;
case WM_CLOSE:
EndDialog(hwnd, IDCANCEL);
return TRUE;
default:
return FALSE;
}
}
static HRESULT exec_hyperlink(HTMLDocument *This, DWORD cmdexecopt, VARIANT *in, VARIANT *out)
{
BSTR url = NULL;
INT ret;
nsISelection *nsselection;
nsIDOMDocument *nsdoc;
nsresult nsres;
TRACE("%p, 0x%x, %p, %p\n", This, cmdexecopt, in, out);
if (cmdexecopt == OLECMDEXECOPT_DONTPROMPTUSER)
{
if (!in || V_VT(in) != VT_BSTR)
{
WARN("invalid arg\n");
return E_INVALIDARG;
}
url = V_BSTR(in);
}
else
{
ret = DialogBoxParamW(hInst, MAKEINTRESOURCEW(IDD_HYPERLINK), NULL /* FIXME */, hyperlink_dlgproc, (LPARAM)&url);
if (ret != IDOK)
return OLECMDERR_E_CANCELED;
}
nsselection = get_ns_selection(This);
if (!nsselection)
return E_FAIL;
nsres = nsIWebNavigation_GetDocument(This->nscontainer->navigation, &nsdoc);
if(NS_SUCCEEDED(nsres))
{
static const WCHAR wszA[] = {'a',0};
static const WCHAR wszHref[] = {'h','r','e','f',0};
nsIHTMLEditor *html_editor;
nsIDOMNode *text_node;
nsIDOMElement *anchor_elem;
nsIDOMNode *unused_node;
nsAString a_str;
nsAString href_str;
nsAString ns_url;
PRBool insert_link_at_caret;
nsAString_Init(&a_str, wszA);
nsAString_Init(&href_str, wszHref);
nsAString_Init(&ns_url, url);
/* create an element for the link */
nsIDOMDocument_CreateElement(nsdoc, &a_str, &anchor_elem);
nsIDOMElement_SetAttribute(anchor_elem, &href_str, &ns_url);
nsAString_Finish(&href_str);
nsAString_Finish(&a_str);
nsISelection_GetIsCollapsed(nsselection, &insert_link_at_caret);
/* create an element with text of URL */
if (insert_link_at_caret)
{
nsIDOMDocument_CreateTextNode(nsdoc, &ns_url, (nsIDOMText **)&text_node);
/* wrap the <a> tags around the text element */
nsIDOMElement_AppendChild(anchor_elem, text_node, &unused_node);
nsIDOMNode_Release(text_node);
nsIDOMNode_Release(unused_node);
}
nsAString_Finish(&ns_url);
nsIEditor_QueryInterface(This->nscontainer->editor, &IID_nsIHTMLEditor, (void **)&html_editor);
if (html_editor)
{
if (insert_link_at_caret)
{
/* add them to the document at the caret position */
nsres = nsIHTMLEditor_InsertElementAtSelection(html_editor, anchor_elem, FALSE);
nsISelection_SelectAllChildren(nsselection, (nsIDOMNode*)anchor_elem);
}
else /* add them around the selection using the magic provided to us by nsIHTMLEditor */
nsres = nsIHTMLEditor_InsertLinkAroundSelection(html_editor, anchor_elem);
nsIHTMLEditor_Release(html_editor);
}
nsIDOMElement_Release(anchor_elem);
nsIDOMDocument_Release(nsdoc);
}
else
nsres = E_FAIL;
nsISelection_Release(nsselection);
if (cmdexecopt != OLECMDEXECOPT_DONTPROMPTUSER)
SysFreeString(url);
TRACE("-- 0x%08x\n", nsres);
return nsres;
}
static HRESULT query_selall_status(HTMLDocument *This, OLECMD *cmd)
{
TRACE("(%p)->(%p)\n", This, cmd);
cmd->cmdf = OLECMDF_SUPPORTED|OLECMDF_ENABLED;
return S_OK;
}
const cmdtable_t editmode_cmds[] = {
{IDM_DELETE, query_edit_status, exec_delete},
{IDM_FONTNAME, query_edit_status, exec_fontname},
{IDM_FONTSIZE, query_edit_status, exec_fontsize},
{IDM_SELECTALL, query_selall_status , exec_selectall},
{IDM_FORECOLOR, query_edit_status, exec_forecolor},
{IDM_BOLD, query_edit_status, exec_bold},
{IDM_ITALIC, query_edit_status, exec_italic},
{IDM_JUSTIFYCENTER, query_justify, exec_justifycenter},
{IDM_JUSTIFYRIGHT, query_justify, exec_justifyright},
{IDM_JUSTIFYLEFT, query_justify, exec_justifyleft},
{IDM_FONT, NULL, exec_font},
{IDM_UNDERLINE, query_edit_status, exec_underline},
{IDM_HORIZONTALLINE, query_edit_status, exec_horizontalline},
{IDM_ORDERLIST, query_edit_status, exec_orderlist},
{IDM_UNORDERLIST, query_edit_status, exec_unorderlist},
{IDM_INDENT, query_edit_status, exec_indent},
{IDM_OUTDENT, query_edit_status, exec_outdent},
{IDM_COMPOSESETTINGS, NULL, exec_composesettings},
{IDM_HYPERLINK, query_edit_status, exec_hyperlink},
{IDM_SETDIRTY, NULL, exec_setdirty},
{0,NULL,NULL}
};
void init_editor(HTMLDocument *This)
{
update_doc(This, UPDATE_UI);
if(!This->nscontainer)
return;
set_ns_fontname(This->nscontainer, "Times New Roman");
}
HRESULT editor_is_dirty(HTMLDocument *This)
{
PRBool modified;
if(!This->nscontainer || !This->nscontainer->editor)
return S_FALSE;
nsIEditor_GetDocumentModified(This->nscontainer->editor, &modified);
return modified ? S_OK : S_FALSE;
}