dlls/mshtml/olecmd.c

   1 /*
   2  * Copyright 2005-2007 Jacek Caban for CodeWeavers
   3  *
   4  * This library is free software; you can redistribute it and/or
   5  * modify it under the terms of the GNU Lesser General Public
   6  * License as published by the Free Software Foundation; either
   7  * version 2.1 of the License, or (at your option) any later version.
   8  *
   9  * This library is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  * Lesser General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU Lesser General Public
  15  * License along with this library; if not, write to the Free Software
  16  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  17  */
  18
  19 #include "config.h"
  20
  21 #include <stdarg.h>
  22 #include <stdio.h>
  23
  24 #define COBJMACROS
  25
  26 #include "windef.h"
  27 #include "winbase.h"
  28 #include "winuser.h"
  29 #include "winnls.h"
  30 #include "ole2.h"
  31 #include "shlguid.h"
  32 #include "mshtmdid.h"
  33 #include "idispids.h"
  34 #include "mshtmcid.h"
  35
  36 #include "wine/debug.h"
  37 #include "wine/unicode.h"
  38
  39 #include "mshtml_private.h"
  40 #include "resource.h"
  41
  42 WINE_DEFAULT_DEBUG_CHANNEL(mshtml);
  43
  44 #define NSCMD_COPY "cmd_copy"
  45
  46 void do_ns_command(NSContainer *This, const char *cmd, nsICommandParams *nsparam)
  47 {
  48     nsICommandManager *cmdmgr;
  49     nsresult nsres;
  50
  51     TRACE("(%p)\n", This);
  52
  53     nsres = get_nsinterface((nsISupports*)This->webbrowser, &IID_nsICommandManager, (void**)&cmdmgr);
  54     if(NS_FAILED(nsres)) {
  55         ERR("Could not get nsICommandManager: %08x\n", nsres);
  56         return;
  57     }
  58
  59     nsres = nsICommandManager_DoCommand(cmdmgr, cmd, nsparam, NULL);
  60     if(NS_FAILED(nsres))
  61         ERR("DoCommand(%s) failed: %08x\n", debugstr_a(cmd), nsres);
  62
  63     nsICommandManager_Release(cmdmgr);
  64 }
  65
  66 /**********************************************************
  67  * IOleCommandTarget implementation
  68  */
  69
  70 #define CMDTARGET_THIS(iface) DEFINE_THIS(HTMLDocument, OleCommandTarget, iface)
  71
  72 static HRESULT exec_open(HTMLDocument *This, DWORD nCmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
  73 {
  74     FIXME("(%p)->(%d %p %p)\n", This, nCmdexecopt, pvaIn, pvaOut);
  75     return E_NOTIMPL;
  76 }
  77
  78 static HRESULT exec_new(HTMLDocument *This, DWORD nCmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
  79 {
  80     FIXME("(%p)->(%d %p %p)\n", This, nCmdexecopt, pvaIn, pvaOut);
  81     return E_NOTIMPL;
  82 }
  83
  84 static HRESULT exec_save(HTMLDocument *This, DWORD nCmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
  85 {
  86     FIXME("(%p)->(%d %p %p)\n", This, nCmdexecopt, pvaIn, pvaOut);
  87     return E_NOTIMPL;
  88 }
  89
  90 static HRESULT exec_save_as(HTMLDocument *This, DWORD nCmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
  91 {
  92     FIXME("(%p)->(%d %p %p)\n", This, nCmdexecopt, pvaIn, pvaOut);
  93     return E_NOTIMPL;
  94 }
  95
  96 static HRESULT exec_save_copy_as(HTMLDocument *This, DWORD nCmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
  97 {
  98     FIXME("(%p)->(%d %p %p)\n", This, nCmdexecopt, pvaIn, pvaOut);
  99     return E_NOTIMPL;
 100 }
 101
 102 static nsresult set_head_text(nsIPrintSettings *settings, LPCWSTR template, BOOL head, int pos)
 103 {
 104     if(head) {
 105         switch(pos) {
 106         case 0:
 107             return nsIPrintSettings_SetHeaderStrLeft(settings, template);
 108         case 1:
 109             return nsIPrintSettings_SetHeaderStrRight(settings, template);
 110         case 2:
 111             return nsIPrintSettings_SetHeaderStrCenter(settings, template);
 112         }
 113     }else {
 114         switch(pos) {
 115         case 0:
 116             return nsIPrintSettings_SetFooterStrLeft(settings, template);
 117         case 1:
 118             return nsIPrintSettings_SetFooterStrRight(settings, template);
 119         case 2:
 120             return nsIPrintSettings_SetFooterStrCenter(settings, template);
 121         }
 122     }
 123
 124     return NS_OK;
 125 }
 126
 127 static void set_print_template(nsIPrintSettings *settings, LPCWSTR template, BOOL head)
 128 {
 129     PRUnichar nstemplate[200]; /* FIXME: Use dynamic allocation */
 130     PRUnichar *p = nstemplate;
 131     LPCWSTR ptr=template;
 132     int pos=0;
 133
 134     while(*ptr) {
 135         if(*ptr != '&') {
 136             *p++ = *ptr++;
 137             continue;
 138         }
 139
 140         switch(*++ptr) {
 141         case '&':
 142             *p++ = '&';
 143             *p++ = '&';
 144             ptr++;
 145             break;
 146         case 'b': /* change align */
 147             ptr++;
 148             *p = 0;
 149             set_head_text(settings, nstemplate, head, pos);
 150             p = nstemplate;
 151             pos++;
 152             break;
 153         case 'd': { /* short date */
 154             SYSTEMTIME systime;
 155             GetLocalTime(&systime);
 156             GetDateFormatW(LOCALE_SYSTEM_DEFAULT, 0, &systime, NULL, p,
 157                     sizeof(nstemplate)-(p-nstemplate)*sizeof(WCHAR));
 158             p += strlenW(p);
 159             ptr++;
 160             break;
 161         }
 162         case 'p': /* page number */
 163             *p++ = '&';
 164             *p++ = 'P';
 165             ptr++;
 166             break;
 167         case 'P': /* page count */
 168             *p++ = '?'; /* FIXME */
 169             ptr++;
 170             break;
 171         case 'u':
 172             *p++ = '&';
 173             *p++ = 'U';
 174             ptr++;
 175             break;
 176         case 'w':
 177             /* FIXME: set window title */
 178             ptr++;
 179             break;
 180         default:
 181             *p++ = '&';
 182             *p++ = *ptr++;
 183         }
 184     }
 185
 186     *p = 0;
 187     set_head_text(settings, nstemplate, head, pos);
 188
 189     while(++pos < 3)
 190         set_head_text(settings, p, head, pos);
 191 }
 192
 193 static void set_default_templates(nsIPrintSettings *settings)
 194 {
 195     WCHAR buf[64];
 196
 197     static const PRUnichar empty[] = {0};
 198
 199     nsIPrintSettings_SetHeaderStrLeft(settings, empty);
 200     nsIPrintSettings_SetHeaderStrRight(settings, empty);
 201     nsIPrintSettings_SetHeaderStrCenter(settings, empty);
 202     nsIPrintSettings_SetFooterStrLeft(settings, empty);
 203     nsIPrintSettings_SetFooterStrRight(settings, empty);
 204     nsIPrintSettings_SetFooterStrCenter(settings, empty);
 205
 206     if(LoadStringW(get_shdoclc(), IDS_PRINT_HEADER_TEMPLATE, buf,
 207                    sizeof(buf)/sizeof(WCHAR)))
 208         set_print_template(settings, buf, TRUE);
 209
 210
 211     if(LoadStringW(get_shdoclc(), IDS_PRINT_FOOTER_TEMPLATE, buf,
 212                    sizeof(buf)/sizeof(WCHAR)))
 213         set_print_template(settings, buf, FALSE);
 214
 215 }
 216
 217 static HRESULT exec_print(HTMLDocument *This, DWORD nCmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
 218 {
 219     nsIWebBrowserPrint *nsprint;
 220     nsIPrintSettings *settings;
 221     nsresult nsres;
 222
 223     TRACE("(%p)->(%d %p %p)\n", This, nCmdexecopt, pvaIn, pvaOut);
 224
 225     if(pvaOut)
 226         FIXME("unsupported pvaOut\n");
 227
 228     if(!This->nscontainer)
 229         return S_OK;
 230
 231     nsres = get_nsinterface((nsISupports*)This->nscontainer->webbrowser, &IID_nsIWebBrowserPrint,
 232             (void**)&nsprint);
 233     if(NS_FAILED(nsres)) {
 234         ERR("Could not get nsIWebBrowserPrint: %08x\n", nsres);
 235         return S_OK;
 236     }
 237
 238     nsres = nsIWebBrowserPrint_GetGlobalPrintSettings(nsprint, &settings);
 239     if(NS_FAILED(nsres))
 240         ERR("GetCurrentPrintSettings failed: %08x\n", nsres);
 241
 242     set_default_templates(settings);
 243
 244     if(pvaIn) {
 245         switch(V_VT(pvaIn)) {
 246         case VT_BYREF|VT_ARRAY: {
 247             VARIANT *opts;
 248             DWORD opts_cnt;
 249
 250             if(V_ARRAY(pvaIn)->cDims != 1)
 251                 WARN("cDims = %d\n", V_ARRAY(pvaIn)->cDims);
 252
 253             SafeArrayAccessData(V_ARRAY(pvaIn), (void**)&opts);
 254             opts_cnt = V_ARRAY(pvaIn)->rgsabound[0].cElements;
 255
 256             if(opts_cnt >= 1) {
 257                 switch(V_VT(opts)) {
 258                 case VT_BSTR:
 259                     TRACE("setting footer %s\n", debugstr_w(V_BSTR(opts)));
 260                     set_print_template(settings, V_BSTR(opts), TRUE);
 261                     break;
 262                 case VT_NULL:
 263                     break;
 264                 default:
 265                     WARN("V_VT(opts) = %d\n", V_VT(opts));
 266                 }
 267             }
 268
 269             if(opts_cnt >= 2) {
 270                 switch(V_VT(opts+1)) {
 271                 case VT_BSTR:
 272                     TRACE("setting footer %s\n", debugstr_w(V_BSTR(opts+1)));
 273                     set_print_template(settings, V_BSTR(opts+1), FALSE);
 274                     break;
 275                 case VT_NULL:
 276                     break;
 277                 default:
 278                     WARN("V_VT(opts) = %d\n", V_VT(opts+1));
 279                 }
 280             }
 281
 282             if(opts_cnt >= 3)
 283                 FIXME("Unsupported opts_cnt %d\n", opts_cnt);
 284
 285             SafeArrayUnaccessData(V_ARRAY(pvaIn));
 286             break;
 287         }
 288         default:
 289             FIXME("unsupported vt %x\n", V_VT(pvaIn));
 290         }
 291     }
 292
 293     nsres = nsIWebBrowserPrint_Print(nsprint, settings, NULL);
 294     if(NS_FAILED(nsres))
 295         ERR("Print failed: %08x\n", nsres);
 296
 297     nsIWebBrowserPrint_Release(nsprint);
 298
 299     return S_OK;
 300 }
 301
 302 static HRESULT exec_print_preview(HTMLDocument *This, DWORD nCmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
 303 {
 304     FIXME("(%p)->(%d %p %p)\n", This, nCmdexecopt, pvaIn, pvaOut);
 305     return E_NOTIMPL;
 306 }
 307
 308 static HRESULT exec_page_setup(HTMLDocument *This, DWORD nCmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
 309 {
 310     FIXME("(%p)->(%d %p %p)\n", This, nCmdexecopt, pvaIn, pvaOut);
 311     return E_NOTIMPL;
 312 }
 313
 314 static HRESULT exec_spell(HTMLDocument *This, DWORD nCmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
 315 {
 316     FIXME("(%p)->(%d %p %p)\n", This, nCmdexecopt, pvaIn, pvaOut);
 317     return E_NOTIMPL;
 318 }
 319
 320 static HRESULT exec_properties(HTMLDocument *This, DWORD nCmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
 321 {
 322     FIXME("(%p)->(%d %p %p)\n", This, nCmdexecopt, pvaIn, pvaOut);
 323     return E_NOTIMPL;
 324 }
 325
 326 static HRESULT exec_cut(HTMLDocument *This, DWORD nCmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
 327 {
 328     FIXME("(%p)->(%d %p %p)\n", This, nCmdexecopt, pvaIn, pvaOut);
 329     return E_NOTIMPL;
 330 }
 331
 332 static HRESULT exec_copy(HTMLDocument *This, DWORD nCmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
 333 {
 334     FIXME("(%p)->(%d %p %p)\n", This, nCmdexecopt, pvaIn, pvaOut);
 335     return E_NOTIMPL;
 336 }
 337
 338 static HRESULT exec_paste(HTMLDocument *This, DWORD nCmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
 339 {
 340     FIXME("(%p)->(%d %p %p)\n", This, nCmdexecopt, pvaIn, pvaOut);
 341     return E_NOTIMPL;
 342 }
 343
 344 static HRESULT exec_paste_special(HTMLDocument *This, DWORD nCmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
 345 {
 346     FIXME("(%p)->(%d %p %p)\n", This, nCmdexecopt, pvaIn, pvaOut);
 347     return E_NOTIMPL;
 348 }
 349
 350 static HRESULT exec_undo(HTMLDocument *This, DWORD nCmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
 351 {
 352     FIXME("(%p)->(%d %p %p)\n", This, nCmdexecopt, pvaIn, pvaOut);
 353     return E_NOTIMPL;
 354 }
 355
 356 static HRESULT exec_rendo(HTMLDocument *This, DWORD nCmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
 357 {
 358     FIXME("(%p)->(%d %p %p)\n", This, nCmdexecopt, pvaIn, pvaOut);
 359     return E_NOTIMPL;
 360 }
 361
 362 static HRESULT exec_select_all(HTMLDocument *This, DWORD nCmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
 363 {
 364     FIXME("(%p)->(%d %p %p)\n", This, nCmdexecopt, pvaIn, pvaOut);
 365     return E_NOTIMPL;
 366 }
 367
 368 static HRESULT exec_clear_selection(HTMLDocument *This, DWORD nCmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
 369 {
 370     FIXME("(%p)->(%d %p %p)\n", This, nCmdexecopt, pvaIn, pvaOut);
 371     return E_NOTIMPL;
 372 }
 373
 374 static HRESULT exec_zoom(HTMLDocument *This, DWORD nCmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
 375 {
 376     FIXME("(%p)->(%d %p %p)\n", This, nCmdexecopt, pvaIn, pvaOut);
 377     return E_NOTIMPL;
 378 }
 379
 380 static HRESULT exec_get_zoom_range(HTMLDocument *This, DWORD nCmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
 381 {
 382     FIXME("(%p)->(%d %p %p)\n", This, nCmdexecopt, pvaIn, pvaOut);
 383     return E_NOTIMPL;
 384 }
 385
 386 static HRESULT exec_refresh(HTMLDocument *This, DWORD nCmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
 387 {
 388     FIXME("(%p)->(%d %p %p)\n", This, nCmdexecopt, pvaIn, pvaOut);
 389     return E_NOTIMPL;
 390 }
 391
 392 static HRESULT exec_stop(HTMLDocument *This, DWORD nCmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
 393 {
 394     FIXME("(%p)->(%d %p %p)\n", This, nCmdexecopt, pvaIn, pvaOut);
 395     return E_NOTIMPL;
 396 }
 397
 398 static HRESULT exec_stop_download(HTMLDocument *This, DWORD nCmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
 399 {
 400     FIXME("(%p)->(%d %p %p)\n", This, nCmdexecopt, pvaIn, pvaOut);
 401     return E_NOTIMPL;
 402 }
 403
 404 static HRESULT exec_delete(HTMLDocument *This, DWORD nCmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
 405 {
 406     FIXME("(%p)->(%d %p %p)\n", This, nCmdexecopt, pvaIn, pvaOut);
 407     return E_NOTIMPL;
 408 }
 409
 410 static HRESULT exec_enable_interaction(HTMLDocument *This, DWORD nCmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
 411 {
 412     FIXME("(%p)->(%d %p %p)\n", This, nCmdexecopt, pvaIn, pvaOut);
 413     return E_NOTIMPL;
 414 }
 415
 416 static HRESULT exec_on_unload(HTMLDocument *This, DWORD nCmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
 417 {
 418     TRACE("(%p)->(%d %p %p)\n", This, nCmdexecopt, pvaIn, pvaOut);
 419
 420     /* Tests show that we have nothing more to do here */
 421
 422     if(pvaOut) {
 423         V_VT(pvaOut) = VT_BOOL;
 424         V_BOOL(pvaOut) = VARIANT_TRUE;
 425     }
 426
 427     return S_OK;
 428 }
 429
 430 static HRESULT exec_show_page_setup(HTMLDocument *This, DWORD nCmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
 431 {
 432     FIXME("(%p)->(%d %p %p)\n", This, nCmdexecopt, pvaIn, pvaOut);
 433     return E_NOTIMPL;
 434 }
 435
 436 static HRESULT exec_show_print(HTMLDocument *This, DWORD nCmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
 437 {
 438     FIXME("(%p)->(%d %p %p)\n", This, nCmdexecopt, pvaIn, pvaOut);
 439     return E_NOTIMPL;
 440 }
 441
 442 static HRESULT exec_close(HTMLDocument *This, DWORD nCmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
 443 {
 444     FIXME("(%p)->(%d %p %p)\n", This, nCmdexecopt, pvaIn, pvaOut);
 445     return E_NOTIMPL;
 446 }
 447
 448 static HRESULT exec_set_print_template(HTMLDocument *This, DWORD nCmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
 449 {
 450     FIXME("(%p)->(%d %p %p)\n", This, nCmdexecopt, pvaIn, pvaOut);
 451     return E_NOTIMPL;
 452 }
 453
 454 static HRESULT exec_get_print_template(HTMLDocument *This, DWORD nCmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
 455 {
 456     FIXME("(%p)->(%d %p %p)\n", This, nCmdexecopt, pvaIn, pvaOut);
 457     return E_NOTIMPL;
 458 }
 459
 460 static HRESULT query_mshtml_copy(HTMLDocument *This, OLECMD *cmd)
 461 {
 462     FIXME("(%p)\n", This);
 463     cmd->cmdf = OLECMDF_SUPPORTED|OLECMDF_ENABLED;
 464     return S_OK;
 465 }
 466
 467 static HRESULT exec_mshtml_copy(HTMLDocument *This, DWORD cmdexecopt, VARIANT *in, VARIANT *out)
 468 {
 469     TRACE("(%p)->(%08x %p %p)\n", This, cmdexecopt, in, out);
 470
 471     if(This->usermode == EDITMODE)
 472         return editor_exec_copy(This, cmdexecopt, in, out);
 473
 474     do_ns_command(This->nscontainer, NSCMD_COPY, NULL);
 475     return S_OK;
 476 }
 477
 478 static HRESULT query_mshtml_cut(HTMLDocument *This, OLECMD *cmd)
 479 {
 480     FIXME("(%p)\n", This);
 481     cmd->cmdf = OLECMDF_SUPPORTED|OLECMDF_ENABLED;
 482     return S_OK;
 483 }
 484
 485 static HRESULT exec_mshtml_cut(HTMLDocument *This, DWORD cmdexecopt, VARIANT *in, VARIANT *out)
 486 {
 487     TRACE("(%p)->(%08x %p %p)\n", This, cmdexecopt, in, out);
 488
 489     if(This->usermode == EDITMODE)
 490         return editor_exec_cut(This, cmdexecopt, in, out);
 491
 492     FIXME("Unimplemented in browse mode\n");
 493     return E_NOTIMPL;
 494 }
 495
 496 static HRESULT query_mshtml_paste(HTMLDocument *This, OLECMD *cmd)
 497 {
 498     FIXME("(%p)\n", This);
 499     cmd->cmdf = OLECMDF_SUPPORTED|OLECMDF_ENABLED;
 500     return S_OK;
 501 }
 502
 503 static HRESULT exec_mshtml_paste(HTMLDocument *This, DWORD cmdexecopt, VARIANT *in, VARIANT *out)
 504 {
 505     TRACE("(%p)->(%08x %p %p)\n", This, cmdexecopt, in, out);
 506
 507     if(This->usermode == EDITMODE)
 508         return editor_exec_paste(This, cmdexecopt, in, out);
 509
 510     FIXME("Unimplemented in browse mode\n");
 511     return E_NOTIMPL;
 512 }
 513
 514 static HRESULT exec_browsemode(HTMLDocument *This, DWORD cmdexecopt, VARIANT *in, VARIANT *out)
 515 {
 516     WARN("(%p)->(%08x %p %p)\n", This, cmdexecopt, in, out);
 517
 518     if(in || out)
 519         FIXME("unsupported args\n");
 520
 521     This->usermode = BROWSEMODE;
 522
 523     return S_OK;
 524 }
 525
 526 static HRESULT exec_editmode(HTMLDocument *This, DWORD cmdexecopt, VARIANT *in, VARIANT *out)
 527 {
 528     IMoniker *mon;
 529     HRESULT hres;
 530
 531     static const WCHAR wszAboutBlank[] = {'a','b','o','u','t',':','b','l','a','n','k',0};
 532
 533     TRACE("(%p)->(%08x %p %p)\n", This, cmdexecopt, in, out);
 534
 535     if(in || out)
 536         FIXME("unsupported args\n");
 537
 538     if(This->usermode == EDITMODE)
 539         return S_OK;
 540
 541     This->usermode = EDITMODE;
 542
 543     if(This->frame)
 544         IOleInPlaceFrame_SetStatusText(This->frame, NULL);
 545
 546     if(This->client) {
 547         IOleCommandTarget *cmdtrg;
 548
 549         hres = IOleClientSite_QueryInterface(This->client, &IID_IOleCommandTarget,
 550                 (void**)&cmdtrg);
 551         if(SUCCEEDED(hres)) {
 552             VARIANT var;
 553
 554             V_VT(&var) = VT_I4;
 555             V_I4(&var) = 0;
 556             IOleCommandTarget_Exec(cmdtrg, &CGID_ShellDocView, 37, 0, &var, NULL);
 557
 558             IOleCommandTarget_Release(cmdtrg);
 559         }
 560     }
 561
 562     if(This->hostui) {
 563         DOCHOSTUIINFO hostinfo;
 564
 565         memset(&hostinfo, 0, sizeof(DOCHOSTUIINFO));
 566         hostinfo.cbSize = sizeof(DOCHOSTUIINFO);
 567         hres = IDocHostUIHandler_GetHostInfo(This->hostui, &hostinfo);
 568         if(SUCCEEDED(hres))
 569             /* FIXME: use hostinfo */
 570             TRACE("hostinfo = {%u %08x %08x %s %s}\n",
 571                     hostinfo.cbSize, hostinfo.dwFlags, hostinfo.dwDoubleClick,
 572                     debugstr_w(hostinfo.pchHostCss), debugstr_w(hostinfo.pchHostNS));
 573     }
 574
 575     if(This->nscontainer)
 576         set_ns_editmode(This->nscontainer);
 577
 578     hres = CreateURLMoniker(NULL, wszAboutBlank, &mon);
 579     if(FAILED(hres)) {
 580         FIXME("CreateURLMoniker failed: %08x\n", hres);
 581         return hres;
 582     }
 583
 584     update_doc(This, UPDATE_UI);
 585
 586     hres = IPersistMoniker_Load(PERSISTMON(This), TRUE, mon, NULL, 0);
 587     IMoniker_Release(mon);
 588     if(FAILED(hres))
 589         return hres;
 590
 591     if(This->ui_active) {
 592         OLECHAR wszHTMLDocument[30];
 593         RECT rcBorderWidths;
 594
 595         if(This->ip_window)
 596             IOleInPlaceUIWindow_SetActiveObject(This->ip_window, NULL, NULL);
 597         if(This->hostui)
 598             IDocHostUIHandler_HideUI(This->hostui);
 599
 600         if(This->hostui)
 601             IDocHostUIHandler_ShowUI(This->hostui, DOCHOSTUITYPE_AUTHOR, ACTOBJ(This), CMDTARGET(This),
 602                 This->frame, This->ip_window);
 603
 604         LoadStringW(hInst, IDS_HTMLDOCUMENT, wszHTMLDocument,
 605                     sizeof(wszHTMLDocument)/sizeof(WCHAR));
 606
 607         if(This->ip_window)
 608             IOleInPlaceUIWindow_SetActiveObject(This->ip_window, ACTOBJ(This), wszHTMLDocument);
 609
 610         memset(&rcBorderWidths, 0, sizeof(rcBorderWidths));
 611         IOleInPlaceFrame_SetBorderSpace(This->frame, &rcBorderWidths);
 612     }
 613
 614     return S_OK;
 615 }
 616
 617 static HRESULT exec_htmleditmode(HTMLDocument *This, DWORD cmdexecopt, VARIANT *in, VARIANT *out)
 618 {
 619     FIXME("(%p)->(%08x %p %p)\n", This, cmdexecopt, in, out);
 620     return S_OK;
 621 }
 622
 623 static HRESULT exec_setdirty(HTMLDocument *This, DWORD cmdexecopt, VARIANT *in, VARIANT *out)
 624 {
 625     FIXME("(%p)->(%08x %p %p)\n", This, cmdexecopt, in, out);
 626     return E_NOTIMPL;
 627 }
 628
 629 static HRESULT exec_baselinefont3(HTMLDocument *This, DWORD cmdexecopt, VARIANT *in, VARIANT *out)
 630 {
 631     FIXME("(%p)->(%08x %p %p)\n", This, cmdexecopt, in, out);
 632     return S_OK;
 633 }
 634
 635 static HRESULT exec_respectvisibility_indesign(HTMLDocument *This, DWORD cmdexecopt,
 636         VARIANT *in, VARIANT *out)
 637 {
 638     FIXME("(%p)->(%08x %p %p)\n", This, cmdexecopt, in, out);
 639     return E_NOTIMPL;
 640 }
 641
 642 static HRESULT query_enabled_stub(HTMLDocument *This, OLECMD *cmd)
 643 {
 644     switch(cmd->cmdID) {
 645     case IDM_PRINT:
 646         FIXME("CGID_MSHTML: IDM_PRINT\n");
 647         cmd->cmdf = OLECMDF_SUPPORTED|OLECMDF_ENABLED;
 648         break;
 649     case IDM_BLOCKDIRLTR:
 650         FIXME("CGID_MSHTML: IDM_BLOCKDIRLTR\n");
 651         cmd->cmdf = OLECMDF_SUPPORTED|OLECMDF_ENABLED;
 652         break;
 653     case IDM_BLOCKDIRRTL:
 654         FIXME("CGID_MSHTML: IDM_BLOCKDIRRTL\n");
 655         cmd->cmdf = OLECMDF_SUPPORTED|OLECMDF_ENABLED;
 656         break;
 657     }
 658
 659     return S_OK;
 660 }
 661
 662 static const struct {
 663     OLECMDF cmdf;
 664     HRESULT (*func)(HTMLDocument*,DWORD,VARIANT*,VARIANT*);
 665 } exec_table[OLECMDID_GETPRINTTEMPLATE+1] = {
 666     {0},
 667     { OLECMDF_SUPPORTED,                  exec_open                 }, /* OLECMDID_OPEN */
 668     { OLECMDF_SUPPORTED,                  exec_new                  }, /* OLECMDID_NEW */
 669     { OLECMDF_SUPPORTED,                  exec_save                 }, /* OLECMDID_SAVE */
 670     { OLECMDF_SUPPORTED|OLECMDF_ENABLED,  exec_save_as              }, /* OLECMDID_SAVEAS */
 671     { OLECMDF_SUPPORTED,                  exec_save_copy_as         }, /* OLECMDID_SAVECOPYAS */
 672     { OLECMDF_SUPPORTED|OLECMDF_ENABLED,  exec_print                }, /* OLECMDID_PRINT */
 673     { OLECMDF_SUPPORTED|OLECMDF_ENABLED,  exec_print_preview        }, /* OLECMDID_PRINTPREVIEW */
 674     { OLECMDF_SUPPORTED|OLECMDF_ENABLED,  exec_page_setup           }, /* OLECMDID_PAGESETUP */
 675     { OLECMDF_SUPPORTED,                  exec_spell                }, /* OLECMDID_SPELL */
 676     { OLECMDF_SUPPORTED|OLECMDF_ENABLED,  exec_properties           }, /* OLECMDID_PROPERTIES */
 677     { OLECMDF_SUPPORTED,                  exec_cut                  }, /* OLECMDID_CUT */
 678     { OLECMDF_SUPPORTED,                  exec_copy                 }, /* OLECMDID_COPY */
 679     { OLECMDF_SUPPORTED,                  exec_paste                }, /* OLECMDID_PASTE */
 680     { OLECMDF_SUPPORTED,                  exec_paste_special        }, /* OLECMDID_PASTESPECIAL */
 681     { OLECMDF_SUPPORTED,                  exec_undo                 }, /* OLECMDID_UNDO */
 682     { OLECMDF_SUPPORTED,                  exec_rendo                }, /* OLECMDID_REDO */
 683     { OLECMDF_SUPPORTED|OLECMDF_ENABLED,  exec_select_all           }, /* OLECMDID_SELECTALL */
 684     { OLECMDF_SUPPORTED,                  exec_clear_selection      }, /* OLECMDID_CLEARSELECTION */
 685     { OLECMDF_SUPPORTED,                  exec_zoom                 }, /* OLECMDID_ZOOM */
 686     { OLECMDF_SUPPORTED,                  exec_get_zoom_range       }, /* OLECMDID_GETZOOMRANGE */
 687     {0},
 688     { OLECMDF_SUPPORTED|OLECMDF_ENABLED,  exec_refresh              }, /* OLECMDID_REFRESH */
 689     { OLECMDF_SUPPORTED|OLECMDF_ENABLED,  exec_stop                 }, /* OLECMDID_STOP */
 690     {0},{0},{0},{0},{0},{0},
 691     { OLECMDF_SUPPORTED,                  exec_stop_download        }, /* OLECMDID_STOPDOWNLOAD */
 692     {0},{0},
 693     { OLECMDF_SUPPORTED,                  exec_delete               }, /* OLECMDID_DELETE */
 694     {0},{0},
 695     { OLECMDF_SUPPORTED,                  exec_enable_interaction   }, /* OLECMDID_ENABLE_INTERACTION */
 696     { OLECMDF_SUPPORTED,                  exec_on_unload            }, /* OLECMDID_ONUNLOAD */
 697     {0},{0},{0},{0},{0},
 698     { OLECMDF_SUPPORTED,                  exec_show_page_setup      }, /* OLECMDID_SHOWPAGESETUP */
 699     { OLECMDF_SUPPORTED,                  exec_show_print           }, /* OLECMDID_SHOWPRINT */
 700     {0},{0},
 701     { OLECMDF_SUPPORTED,                  exec_close                }, /* OLECMDID_CLOSE */
 702     {0},{0},{0},
 703     { OLECMDF_SUPPORTED,                  exec_set_print_template   }, /* OLECMDID_SETPRINTTEMPLATE */
 704     { OLECMDF_SUPPORTED,                  exec_get_print_template   }  /* OLECMDID_GETPRINTTEMPLATE */
 705 };
 706
 707 static const cmdtable_t base_cmds[] = {
 708     {IDM_COPY,             query_mshtml_copy,     exec_mshtml_copy},
 709     {IDM_PASTE,            query_mshtml_paste,    exec_mshtml_paste},
 710     {IDM_CUT,              query_mshtml_cut,      exec_mshtml_cut},
 711     {IDM_BROWSEMODE,       NULL,                  exec_browsemode},
 712     {IDM_EDITMODE,         NULL,                  exec_editmode},
 713     {IDM_PRINT,            query_enabled_stub,    exec_print},
 714     {IDM_SETDIRTY,         NULL,                  exec_setdirty},
 715     {IDM_HTMLEDITMODE,     NULL,                  exec_htmleditmode},
 716     {IDM_BASELINEFONT3,    NULL,                  exec_baselinefont3},
 717     {IDM_BLOCKDIRLTR,      query_enabled_stub,    NULL},
 718     {IDM_BLOCKDIRRTL,      query_enabled_stub,    NULL},
 719     {IDM_RESPECTVISIBILITY_INDESIGN, NULL,        exec_respectvisibility_indesign},
 720     {0,NULL,NULL}
 721 };
 722
 723 static HRESULT WINAPI OleCommandTarget_QueryInterface(IOleCommandTarget *iface, REFIID riid, void **ppv)
 724 {
 725     HTMLDocument *This = CMDTARGET_THIS(iface);
 726     return IHTMLDocument2_QueryInterface(HTMLDOC(This), riid, ppv);
 727 }
 728
 729 static ULONG WINAPI OleCommandTarget_AddRef(IOleCommandTarget *iface)
 730 {
 731     HTMLDocument *This = CMDTARGET_THIS(iface);
 732     return IHTMLDocument2_AddRef(HTMLDOC(This));
 733 }
 734
 735 static ULONG WINAPI OleCommandTarget_Release(IOleCommandTarget *iface)
 736 {
 737     HTMLDocument *This = CMDTARGET_THIS(iface);
 738     return IHTMLDocument_Release(HTMLDOC(This));
 739 }
 740
 741 static HRESULT query_from_table(HTMLDocument *This, const cmdtable_t *cmdtable, OLECMD *cmd)
 742 {
 743     const cmdtable_t *iter = cmdtable;
 744
 745     cmd->cmdf = 0;
 746
 747     while(iter->id && iter->id != cmd->cmdID)
 748         iter++;
 749
 750     if(!iter->id || !iter->query)
 751         return OLECMDERR_E_NOTSUPPORTED;
 752
 753     return iter->query(This, cmd);
 754 }
 755
 756 static HRESULT WINAPI OleCommandTarget_QueryStatus(IOleCommandTarget *iface, const GUID *pguidCmdGroup,
 757         ULONG cCmds, OLECMD prgCmds[], OLECMDTEXT *pCmdText)
 758 {
 759     HTMLDocument *This = CMDTARGET_THIS(iface);
 760     HRESULT hres = S_OK, hr;
 761
 762     TRACE("(%p)->(%s %d %p %p)\n", This, debugstr_guid(pguidCmdGroup), cCmds, prgCmds, pCmdText);
 763
 764     if(!pguidCmdGroup) {
 765         ULONG i;
 766
 767         for(i=0; i<cCmds; i++) {
 768             if(prgCmds[i].cmdID<OLECMDID_OPEN || prgCmds[i].cmdID>OLECMDID_GETPRINTTEMPLATE) {
 769                 WARN("Unsupported cmdID = %d\n", prgCmds[i].cmdID);
 770                 prgCmds[i].cmdf = 0;
 771                 hres = OLECMDERR_E_NOTSUPPORTED;
 772             }else {
 773                 if(prgCmds[i].cmdID == OLECMDID_OPEN || prgCmds[i].cmdID == OLECMDID_NEW) {
 774                     IOleCommandTarget *cmdtrg = NULL;
 775                     OLECMD olecmd;
 776
 777                     prgCmds[i].cmdf = OLECMDF_SUPPORTED;
 778                     if(This->client) {
 779                         hr = IOleClientSite_QueryInterface(This->client, &IID_IOleCommandTarget,
 780                                 (void**)&cmdtrg);
 781                         if(SUCCEEDED(hr)) {
 782                             olecmd.cmdID = prgCmds[i].cmdID;
 783                             olecmd.cmdf = 0;
 784
 785                             hr = IOleCommandTarget_QueryStatus(cmdtrg, NULL, 1, &olecmd, NULL);
 786                             if(SUCCEEDED(hr) && olecmd.cmdf)
 787                                 prgCmds[i].cmdf = olecmd.cmdf;
 788                         }
 789                     }else {
 790                         ERR("This->client == NULL, native would crash\n");
 791                     }
 792                 }else {
 793                     prgCmds[i].cmdf = exec_table[prgCmds[i].cmdID].cmdf;
 794                     TRACE("cmdID = %d  returning %x\n", prgCmds[i].cmdID, prgCmds[i].cmdf);
 795                 }
 796                 hres = S_OK;
 797             }
 798         }
 799
 800         if(pCmdText)
 801             FIXME("Set pCmdText\n");
 802     }else if(IsEqualGUID(&CGID_MSHTML, pguidCmdGroup)) {
 803         ULONG i;
 804
 805         for(i=0; i<cCmds; i++) {
 806             HRESULT hres = query_from_table(This, base_cmds, prgCmds+i);
 807             if(hres == OLECMDERR_E_NOTSUPPORTED)
 808                 hres = query_from_table(This, editmode_cmds, prgCmds+i);
 809             if(hres == OLECMDERR_E_NOTSUPPORTED)
 810                 FIXME("CGID_MSHTML: unsupported cmdID %d\n", prgCmds[i].cmdID);
 811         }
 812
 813         hres = prgCmds[i-1].cmdf ? S_OK : OLECMDERR_E_NOTSUPPORTED;
 814
 815         if(pCmdText)
 816             FIXME("Set pCmdText\n");
 817     }else {
 818         FIXME("Unsupported pguidCmdGroup %s\n", debugstr_guid(pguidCmdGroup));
 819         hres = OLECMDERR_E_UNKNOWNGROUP;
 820     }
 821
 822     return hres;
 823 }
 824
 825 static HRESULT exec_from_table(HTMLDocument *This, const cmdtable_t *cmdtable, DWORD cmdid,
 826                                DWORD cmdexecopt, VARIANT *in, VARIANT *out)
 827 {
 828     const cmdtable_t *iter = cmdtable;
 829
 830     while(iter->id && iter->id != cmdid)
 831         iter++;
 832
 833     if(!iter->id || !iter->exec)
 834         return OLECMDERR_E_NOTSUPPORTED;
 835
 836     return iter->exec(This, cmdexecopt, in, out);
 837 }
 838
 839 static HRESULT WINAPI OleCommandTarget_Exec(IOleCommandTarget *iface, const GUID *pguidCmdGroup,
 840         DWORD nCmdID, DWORD nCmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
 841 {
 842     HTMLDocument *This = CMDTARGET_THIS(iface);
 843
 844     if(!pguidCmdGroup) {
 845         if(nCmdID<OLECMDID_OPEN || nCmdID>OLECMDID_GETPRINTTEMPLATE || !exec_table[nCmdID].func) {
 846             WARN("Unsupported cmdID = %d\n", nCmdID);
 847             return OLECMDERR_E_NOTSUPPORTED;
 848         }
 849
 850         return exec_table[nCmdID].func(This, nCmdexecopt, pvaIn, pvaOut);
 851     }else if(IsEqualGUID(&CGID_Explorer, pguidCmdGroup)) {
 852         FIXME("unsupported nCmdID %d of CGID_Explorer group\n", nCmdID);
 853         TRACE("%p %p\n", pvaIn, pvaOut);
 854         return OLECMDERR_E_NOTSUPPORTED;
 855     }else if(IsEqualGUID(&CGID_ShellDocView, pguidCmdGroup)) {
 856         FIXME("unsupported nCmdID %d of CGID_ShellDocView group\n", nCmdID);
 857         return OLECMDERR_E_NOTSUPPORTED;
 858     }else if(IsEqualGUID(&CGID_MSHTML, pguidCmdGroup)) {
 859         HRESULT hres = exec_from_table(This, base_cmds, nCmdID, nCmdexecopt, pvaIn, pvaOut);
 860         if(hres == OLECMDERR_E_NOTSUPPORTED)
 861             hres = exec_from_table(This, editmode_cmds, nCmdID,
 862                                    nCmdexecopt, pvaIn, pvaOut);
 863         if(hres == OLECMDERR_E_NOTSUPPORTED)
 864             FIXME("unsupported nCmdID %d of CGID_MSHTML group\n", nCmdID);
 865
 866         return hres;
 867     }
 868
 869     FIXME("Unsupported pguidCmdGroup %s\n", debugstr_guid(pguidCmdGroup));
 870     return OLECMDERR_E_UNKNOWNGROUP;
 871 }
 872
 873 #undef CMDTARGET_THIS
 874
 875 static const IOleCommandTargetVtbl OleCommandTargetVtbl = {
 876     OleCommandTarget_QueryInterface,
 877     OleCommandTarget_AddRef,
 878     OleCommandTarget_Release,
 879     OleCommandTarget_QueryStatus,
 880     OleCommandTarget_Exec
 881 };
 882
 883 void show_context_menu(HTMLDocument *This, DWORD dwID, POINT *ppt, IDispatch *elem)
 884 {
 885     HMENU menu_res, menu;
 886     DWORD cmdid;
 887     HRESULT hres;
 888
 889     hres = IDocHostUIHandler_ShowContextMenu(This->hostui, dwID, ppt,
 890             (IUnknown*)CMDTARGET(This), elem);
 891     if(hres == S_OK)
 892         return;
 893
 894     menu_res = LoadMenuW(get_shdoclc(), MAKEINTRESOURCEW(IDR_BROWSE_CONTEXT_MENU));
 895     menu = GetSubMenu(menu_res, dwID);
 896
 897     cmdid = TrackPopupMenu(menu, TPM_LEFTALIGN | TPM_RIGHTBUTTON | TPM_RETURNCMD,
 898             ppt->x, ppt->y, 0, This->hwnd, NULL);
 899     DestroyMenu(menu_res);
 900
 901     if(cmdid)
 902         IOleCommandTarget_Exec(CMDTARGET(This), &CGID_MSHTML, cmdid, 0, NULL, NULL);
 903 }
 904
 905 void HTMLDocument_OleCmd_Init(HTMLDocument *This)
 906 {
 907     This->lpOleCommandTargetVtbl = &OleCommandTargetVtbl;
 908 }