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_find(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_delete(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_enable_interaction(HTMLDocument *This, DWORD nCmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
 417 {
 418     FIXME("(%p)->(%d %p %p)\n", This, nCmdexecopt, pvaIn, pvaOut);
 419     return E_NOTIMPL;
 420 }
 421
 422 static HRESULT exec_on_unload(HTMLDocument *This, DWORD nCmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
 423 {
 424     TRACE("(%p)->(%d %p %p)\n", This, nCmdexecopt, pvaIn, pvaOut);
 425
 426     /* Tests show that we have nothing more to do here */
 427
 428     if(pvaOut) {
 429         V_VT(pvaOut) = VT_BOOL;
 430         V_BOOL(pvaOut) = VARIANT_TRUE;
 431     }
 432
 433     return S_OK;
 434 }
 435
 436 static HRESULT exec_show_page_setup(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_show_print(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_close(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_set_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 exec_get_print_template(HTMLDocument *This, DWORD nCmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
 461 {
 462     FIXME("(%p)->(%d %p %p)\n", This, nCmdexecopt, pvaIn, pvaOut);
 463     return E_NOTIMPL;
 464 }
 465
 466 static HRESULT query_mshtml_copy(HTMLDocument *This, OLECMD *cmd)
 467 {
 468     FIXME("(%p)\n", This);
 469     cmd->cmdf = OLECMDF_SUPPORTED|OLECMDF_ENABLED;
 470     return S_OK;
 471 }
 472
 473 static HRESULT exec_mshtml_copy(HTMLDocument *This, DWORD cmdexecopt, VARIANT *in, VARIANT *out)
 474 {
 475     TRACE("(%p)->(%08x %p %p)\n", This, cmdexecopt, in, out);
 476
 477     if(This->usermode == EDITMODE)
 478         return editor_exec_copy(This, cmdexecopt, in, out);
 479
 480     do_ns_command(This->nscontainer, NSCMD_COPY, NULL);
 481     return S_OK;
 482 }
 483
 484 static HRESULT query_mshtml_cut(HTMLDocument *This, OLECMD *cmd)
 485 {
 486     FIXME("(%p)\n", This);
 487     cmd->cmdf = OLECMDF_SUPPORTED|OLECMDF_ENABLED;
 488     return S_OK;
 489 }
 490
 491 static HRESULT exec_mshtml_cut(HTMLDocument *This, DWORD cmdexecopt, VARIANT *in, VARIANT *out)
 492 {
 493     TRACE("(%p)->(%08x %p %p)\n", This, cmdexecopt, in, out);
 494
 495     if(This->usermode == EDITMODE)
 496         return editor_exec_cut(This, cmdexecopt, in, out);
 497
 498     FIXME("Unimplemented in browse mode\n");
 499     return E_NOTIMPL;
 500 }
 501
 502 static HRESULT query_mshtml_paste(HTMLDocument *This, OLECMD *cmd)
 503 {
 504     FIXME("(%p)\n", This);
 505     cmd->cmdf = OLECMDF_SUPPORTED|OLECMDF_ENABLED;
 506     return S_OK;
 507 }
 508
 509 static HRESULT exec_mshtml_paste(HTMLDocument *This, DWORD cmdexecopt, VARIANT *in, VARIANT *out)
 510 {
 511     TRACE("(%p)->(%08x %p %p)\n", This, cmdexecopt, in, out);
 512
 513     if(This->usermode == EDITMODE)
 514         return editor_exec_paste(This, cmdexecopt, in, out);
 515
 516     FIXME("Unimplemented in browse mode\n");
 517     return E_NOTIMPL;
 518 }
 519
 520 static HRESULT exec_browsemode(HTMLDocument *This, DWORD cmdexecopt, VARIANT *in, VARIANT *out)
 521 {
 522     WARN("(%p)->(%08x %p %p)\n", This, cmdexecopt, in, out);
 523
 524     if(in || out)
 525         FIXME("unsupported args\n");
 526
 527     This->usermode = BROWSEMODE;
 528
 529     return S_OK;
 530 }
 531
 532 static HRESULT exec_editmode(HTMLDocument *This, DWORD cmdexecopt, VARIANT *in, VARIANT *out)
 533 {
 534     IMoniker *mon;
 535     HRESULT hres;
 536
 537     static const WCHAR wszAboutBlank[] = {'a','b','o','u','t',':','b','l','a','n','k',0};
 538
 539     TRACE("(%p)->(%08x %p %p)\n", This, cmdexecopt, in, out);
 540
 541     if(in || out)
 542         FIXME("unsupported args\n");
 543
 544     if(This->usermode == EDITMODE)
 545         return S_OK;
 546
 547     This->usermode = EDITMODE;
 548
 549     if(This->frame)
 550         IOleInPlaceFrame_SetStatusText(This->frame, NULL);
 551
 552     if(This->client) {
 553         IOleCommandTarget *cmdtrg;
 554
 555         hres = IOleClientSite_QueryInterface(This->client, &IID_IOleCommandTarget,
 556                 (void**)&cmdtrg);
 557         if(SUCCEEDED(hres)) {
 558             VARIANT var;
 559
 560             V_VT(&var) = VT_I4;
 561             V_I4(&var) = 0;
 562             IOleCommandTarget_Exec(cmdtrg, &CGID_ShellDocView, 37, 0, &var, NULL);
 563
 564             IOleCommandTarget_Release(cmdtrg);
 565         }
 566     }
 567
 568     if(This->hostui) {
 569         DOCHOSTUIINFO hostinfo;
 570
 571         memset(&hostinfo, 0, sizeof(DOCHOSTUIINFO));
 572         hostinfo.cbSize = sizeof(DOCHOSTUIINFO);
 573         hres = IDocHostUIHandler_GetHostInfo(This->hostui, &hostinfo);
 574         if(SUCCEEDED(hres))
 575             /* FIXME: use hostinfo */
 576             TRACE("hostinfo = {%u %08x %08x %s %s}\n",
 577                     hostinfo.cbSize, hostinfo.dwFlags, hostinfo.dwDoubleClick,
 578                     debugstr_w(hostinfo.pchHostCss), debugstr_w(hostinfo.pchHostNS));
 579     }
 580
 581     if(This->nscontainer)
 582         set_ns_editmode(This->nscontainer);
 583
 584     hres = CreateURLMoniker(NULL, wszAboutBlank, &mon);
 585     if(FAILED(hres)) {
 586         FIXME("CreateURLMoniker failed: %08x\n", hres);
 587         return hres;
 588     }
 589
 590     update_doc(This, UPDATE_UI);
 591
 592     hres = IPersistMoniker_Load(PERSISTMON(This), TRUE, mon, NULL, 0);
 593     IMoniker_Release(mon);
 594     if(FAILED(hres))
 595         return hres;
 596
 597     if(This->ui_active) {
 598         OLECHAR wszHTMLDocument[30];
 599         RECT rcBorderWidths;
 600
 601         if(This->ip_window)
 602             IOleInPlaceUIWindow_SetActiveObject(This->ip_window, NULL, NULL);
 603         if(This->hostui)
 604             IDocHostUIHandler_HideUI(This->hostui);
 605
 606         if(This->hostui)
 607             IDocHostUIHandler_ShowUI(This->hostui, DOCHOSTUITYPE_AUTHOR, ACTOBJ(This), CMDTARGET(This),
 608                 This->frame, This->ip_window);
 609
 610         LoadStringW(hInst, IDS_HTMLDOCUMENT, wszHTMLDocument,
 611                     sizeof(wszHTMLDocument)/sizeof(WCHAR));
 612
 613         if(This->ip_window)
 614             IOleInPlaceUIWindow_SetActiveObject(This->ip_window, ACTOBJ(This), wszHTMLDocument);
 615
 616         memset(&rcBorderWidths, 0, sizeof(rcBorderWidths));
 617         IOleInPlaceFrame_SetBorderSpace(This->frame, &rcBorderWidths);
 618     }
 619
 620     return S_OK;
 621 }
 622
 623 static HRESULT exec_htmleditmode(HTMLDocument *This, DWORD cmdexecopt, VARIANT *in, VARIANT *out)
 624 {
 625     FIXME("(%p)->(%08x %p %p)\n", This, cmdexecopt, in, out);
 626     return S_OK;
 627 }
 628
 629 static HRESULT exec_setdirty(HTMLDocument *This, DWORD cmdexecopt, VARIANT *in, VARIANT *out)
 630 {
 631     FIXME("(%p)->(%08x %p %p)\n", This, cmdexecopt, in, out);
 632     return E_NOTIMPL;
 633 }
 634
 635 static HRESULT exec_baselinefont3(HTMLDocument *This, DWORD cmdexecopt, VARIANT *in, VARIANT *out)
 636 {
 637     FIXME("(%p)->(%08x %p %p)\n", This, cmdexecopt, in, out);
 638     return S_OK;
 639 }
 640
 641 static HRESULT exec_respectvisibility_indesign(HTMLDocument *This, DWORD cmdexecopt,
 642         VARIANT *in, VARIANT *out)
 643 {
 644     FIXME("(%p)->(%08x %p %p)\n", This, cmdexecopt, in, out);
 645     return E_NOTIMPL;
 646 }
 647
 648 static HRESULT query_enabled_stub(HTMLDocument *This, OLECMD *cmd)
 649 {
 650     switch(cmd->cmdID) {
 651     case IDM_PRINT:
 652         FIXME("CGID_MSHTML: IDM_PRINT\n");
 653         cmd->cmdf = OLECMDF_SUPPORTED|OLECMDF_ENABLED;
 654         break;
 655     case IDM_BLOCKDIRLTR:
 656         FIXME("CGID_MSHTML: IDM_BLOCKDIRLTR\n");
 657         cmd->cmdf = OLECMDF_SUPPORTED|OLECMDF_ENABLED;
 658         break;
 659     case IDM_BLOCKDIRRTL:
 660         FIXME("CGID_MSHTML: IDM_BLOCKDIRRTL\n");
 661         cmd->cmdf = OLECMDF_SUPPORTED|OLECMDF_ENABLED;
 662         break;
 663     }
 664
 665     return S_OK;
 666 }
 667
 668 static const struct {
 669     OLECMDF cmdf;
 670     HRESULT (*func)(HTMLDocument*,DWORD,VARIANT*,VARIANT*);
 671 } exec_table[OLECMDID_GETPRINTTEMPLATE+1] = {
 672     {0},
 673     { OLECMDF_SUPPORTED,                  exec_open                 }, /* OLECMDID_OPEN */
 674     { OLECMDF_SUPPORTED,                  exec_new                  }, /* OLECMDID_NEW */
 675     { OLECMDF_SUPPORTED,                  exec_save                 }, /* OLECMDID_SAVE */
 676     { OLECMDF_SUPPORTED|OLECMDF_ENABLED,  exec_save_as              }, /* OLECMDID_SAVEAS */
 677     { OLECMDF_SUPPORTED,                  exec_save_copy_as         }, /* OLECMDID_SAVECOPYAS */
 678     { OLECMDF_SUPPORTED|OLECMDF_ENABLED,  exec_print                }, /* OLECMDID_PRINT */
 679     { OLECMDF_SUPPORTED|OLECMDF_ENABLED,  exec_print_preview        }, /* OLECMDID_PRINTPREVIEW */
 680     { OLECMDF_SUPPORTED|OLECMDF_ENABLED,  exec_page_setup           }, /* OLECMDID_PAGESETUP */
 681     { OLECMDF_SUPPORTED,                  exec_spell                }, /* OLECMDID_SPELL */
 682     { OLECMDF_SUPPORTED|OLECMDF_ENABLED,  exec_properties           }, /* OLECMDID_PROPERTIES */
 683     { OLECMDF_SUPPORTED,                  exec_cut                  }, /* OLECMDID_CUT */
 684     { OLECMDF_SUPPORTED,                  exec_copy                 }, /* OLECMDID_COPY */
 685     { OLECMDF_SUPPORTED,                  exec_paste                }, /* OLECMDID_PASTE */
 686     { OLECMDF_SUPPORTED,                  exec_paste_special        }, /* OLECMDID_PASTESPECIAL */
 687     { OLECMDF_SUPPORTED,                  exec_undo                 }, /* OLECMDID_UNDO */
 688     { OLECMDF_SUPPORTED,                  exec_rendo                }, /* OLECMDID_REDO */
 689     { OLECMDF_SUPPORTED|OLECMDF_ENABLED,  exec_select_all           }, /* OLECMDID_SELECTALL */
 690     { OLECMDF_SUPPORTED,                  exec_clear_selection      }, /* OLECMDID_CLEARSELECTION */
 691     { OLECMDF_SUPPORTED,                  exec_zoom                 }, /* OLECMDID_ZOOM */
 692     { OLECMDF_SUPPORTED,                  exec_get_zoom_range       }, /* OLECMDID_GETZOOMRANGE */
 693     {0},
 694     { OLECMDF_SUPPORTED|OLECMDF_ENABLED,  exec_refresh              }, /* OLECMDID_REFRESH */
 695     { OLECMDF_SUPPORTED|OLECMDF_ENABLED,  exec_stop                 }, /* OLECMDID_STOP */
 696     {0},{0},{0},{0},{0},{0},
 697     { OLECMDF_SUPPORTED,                  exec_stop_download        }, /* OLECMDID_STOPDOWNLOAD */
 698     {0},
 699     { OLECMDF_SUPPORTED|OLECMDF_ENABLED,  exec_find                 }, /* OLECMDID_FIND */
 700     { OLECMDF_SUPPORTED,                  exec_delete               }, /* OLECMDID_DELETE */
 701     {0},{0},
 702     { OLECMDF_SUPPORTED,                  exec_enable_interaction   }, /* OLECMDID_ENABLE_INTERACTION */
 703     { OLECMDF_SUPPORTED,                  exec_on_unload            }, /* OLECMDID_ONUNLOAD */
 704     {0},{0},{0},{0},{0},
 705     { OLECMDF_SUPPORTED,                  exec_show_page_setup      }, /* OLECMDID_SHOWPAGESETUP */
 706     { OLECMDF_SUPPORTED,                  exec_show_print           }, /* OLECMDID_SHOWPRINT */
 707     {0},{0},
 708     { OLECMDF_SUPPORTED,                  exec_close                }, /* OLECMDID_CLOSE */
 709     {0},{0},{0},
 710     { OLECMDF_SUPPORTED,                  exec_set_print_template   }, /* OLECMDID_SETPRINTTEMPLATE */
 711     { OLECMDF_SUPPORTED,                  exec_get_print_template   }  /* OLECMDID_GETPRINTTEMPLATE */
 712 };
 713
 714 static const cmdtable_t base_cmds[] = {
 715     {IDM_COPY,             query_mshtml_copy,     exec_mshtml_copy},
 716     {IDM_PASTE,            query_mshtml_paste,    exec_mshtml_paste},
 717     {IDM_CUT,              query_mshtml_cut,      exec_mshtml_cut},
 718     {IDM_BROWSEMODE,       NULL,                  exec_browsemode},
 719     {IDM_EDITMODE,         NULL,                  exec_editmode},
 720     {IDM_PRINT,            query_enabled_stub,    exec_print},
 721     {IDM_SETDIRTY,         NULL,                  exec_setdirty},
 722     {IDM_HTMLEDITMODE,     NULL,                  exec_htmleditmode},
 723     {IDM_BASELINEFONT3,    NULL,                  exec_baselinefont3},
 724     {IDM_BLOCKDIRLTR,      query_enabled_stub,    NULL},
 725     {IDM_BLOCKDIRRTL,      query_enabled_stub,    NULL},
 726     {IDM_RESPECTVISIBILITY_INDESIGN, NULL,        exec_respectvisibility_indesign},
 727     {0,NULL,NULL}
 728 };
 729
 730 static HRESULT WINAPI OleCommandTarget_QueryInterface(IOleCommandTarget *iface, REFIID riid, void **ppv)
 731 {
 732     HTMLDocument *This = CMDTARGET_THIS(iface);
 733     return IHTMLDocument2_QueryInterface(HTMLDOC(This), riid, ppv);
 734 }
 735
 736 static ULONG WINAPI OleCommandTarget_AddRef(IOleCommandTarget *iface)
 737 {
 738     HTMLDocument *This = CMDTARGET_THIS(iface);
 739     return IHTMLDocument2_AddRef(HTMLDOC(This));
 740 }
 741
 742 static ULONG WINAPI OleCommandTarget_Release(IOleCommandTarget *iface)
 743 {
 744     HTMLDocument *This = CMDTARGET_THIS(iface);
 745     return IHTMLDocument_Release(HTMLDOC(This));
 746 }
 747
 748 static HRESULT query_from_table(HTMLDocument *This, const cmdtable_t *cmdtable, OLECMD *cmd)
 749 {
 750     const cmdtable_t *iter = cmdtable;
 751
 752     cmd->cmdf = 0;
 753
 754     while(iter->id && iter->id != cmd->cmdID)
 755         iter++;
 756
 757     if(!iter->id || !iter->query)
 758         return OLECMDERR_E_NOTSUPPORTED;
 759
 760     return iter->query(This, cmd);
 761 }
 762
 763 static HRESULT WINAPI OleCommandTarget_QueryStatus(IOleCommandTarget *iface, const GUID *pguidCmdGroup,
 764         ULONG cCmds, OLECMD prgCmds[], OLECMDTEXT *pCmdText)
 765 {
 766     HTMLDocument *This = CMDTARGET_THIS(iface);
 767     HRESULT hres = S_OK, hr;
 768
 769     TRACE("(%p)->(%s %d %p %p)\n", This, debugstr_guid(pguidCmdGroup), cCmds, prgCmds, pCmdText);
 770
 771     if(!pguidCmdGroup) {
 772         ULONG i;
 773
 774         for(i=0; i<cCmds; i++) {
 775             if(prgCmds[i].cmdID<OLECMDID_OPEN || prgCmds[i].cmdID>OLECMDID_GETPRINTTEMPLATE) {
 776                 WARN("Unsupported cmdID = %d\n", prgCmds[i].cmdID);
 777                 prgCmds[i].cmdf = 0;
 778                 hres = OLECMDERR_E_NOTSUPPORTED;
 779             }else {
 780                 if(prgCmds[i].cmdID == OLECMDID_OPEN || prgCmds[i].cmdID == OLECMDID_NEW) {
 781                     IOleCommandTarget *cmdtrg = NULL;
 782                     OLECMD olecmd;
 783
 784                     prgCmds[i].cmdf = OLECMDF_SUPPORTED;
 785                     if(This->client) {
 786                         hr = IOleClientSite_QueryInterface(This->client, &IID_IOleCommandTarget,
 787                                 (void**)&cmdtrg);
 788                         if(SUCCEEDED(hr)) {
 789                             olecmd.cmdID = prgCmds[i].cmdID;
 790                             olecmd.cmdf = 0;
 791
 792                             hr = IOleCommandTarget_QueryStatus(cmdtrg, NULL, 1, &olecmd, NULL);
 793                             if(SUCCEEDED(hr) && olecmd.cmdf)
 794                                 prgCmds[i].cmdf = olecmd.cmdf;
 795                         }
 796                     }else {
 797                         ERR("This->client == NULL, native would crash\n");
 798                     }
 799                 }else {
 800                     prgCmds[i].cmdf = exec_table[prgCmds[i].cmdID].cmdf;
 801                     TRACE("cmdID = %d  returning %x\n", prgCmds[i].cmdID, prgCmds[i].cmdf);
 802                 }
 803                 hres = S_OK;
 804             }
 805         }
 806
 807         if(pCmdText)
 808             FIXME("Set pCmdText\n");
 809     }else if(IsEqualGUID(&CGID_MSHTML, pguidCmdGroup)) {
 810         ULONG i;
 811
 812         for(i=0; i<cCmds; i++) {
 813             HRESULT hres = query_from_table(This, base_cmds, prgCmds+i);
 814             if(hres == OLECMDERR_E_NOTSUPPORTED)
 815                 hres = query_from_table(This, editmode_cmds, prgCmds+i);
 816             if(hres == OLECMDERR_E_NOTSUPPORTED)
 817                 FIXME("CGID_MSHTML: unsupported cmdID %d\n", prgCmds[i].cmdID);
 818         }
 819
 820         hres = prgCmds[i-1].cmdf ? S_OK : OLECMDERR_E_NOTSUPPORTED;
 821
 822         if(pCmdText)
 823             FIXME("Set pCmdText\n");
 824     }else {
 825         FIXME("Unsupported pguidCmdGroup %s\n", debugstr_guid(pguidCmdGroup));
 826         hres = OLECMDERR_E_UNKNOWNGROUP;
 827     }
 828
 829     return hres;
 830 }
 831
 832 static HRESULT exec_from_table(HTMLDocument *This, const cmdtable_t *cmdtable, DWORD cmdid,
 833                                DWORD cmdexecopt, VARIANT *in, VARIANT *out)
 834 {
 835     const cmdtable_t *iter = cmdtable;
 836
 837     while(iter->id && iter->id != cmdid)
 838         iter++;
 839
 840     if(!iter->id || !iter->exec)
 841         return OLECMDERR_E_NOTSUPPORTED;
 842
 843     return iter->exec(This, cmdexecopt, in, out);
 844 }
 845
 846 static HRESULT WINAPI OleCommandTarget_Exec(IOleCommandTarget *iface, const GUID *pguidCmdGroup,
 847         DWORD nCmdID, DWORD nCmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
 848 {
 849     HTMLDocument *This = CMDTARGET_THIS(iface);
 850
 851     if(!pguidCmdGroup) {
 852         if(nCmdID<OLECMDID_OPEN || nCmdID>OLECMDID_GETPRINTTEMPLATE || !exec_table[nCmdID].func) {
 853             WARN("Unsupported cmdID = %d\n", nCmdID);
 854             return OLECMDERR_E_NOTSUPPORTED;
 855         }
 856
 857         return exec_table[nCmdID].func(This, nCmdexecopt, pvaIn, pvaOut);
 858     }else if(IsEqualGUID(&CGID_Explorer, pguidCmdGroup)) {
 859         FIXME("unsupported nCmdID %d of CGID_Explorer group\n", nCmdID);
 860         TRACE("%p %p\n", pvaIn, pvaOut);
 861         return OLECMDERR_E_NOTSUPPORTED;
 862     }else if(IsEqualGUID(&CGID_ShellDocView, pguidCmdGroup)) {
 863         FIXME("unsupported nCmdID %d of CGID_ShellDocView group\n", nCmdID);
 864         return OLECMDERR_E_NOTSUPPORTED;
 865     }else if(IsEqualGUID(&CGID_MSHTML, pguidCmdGroup)) {
 866         HRESULT hres = exec_from_table(This, base_cmds, nCmdID, nCmdexecopt, pvaIn, pvaOut);
 867         if(hres == OLECMDERR_E_NOTSUPPORTED)
 868             hres = exec_from_table(This, editmode_cmds, nCmdID,
 869                                    nCmdexecopt, pvaIn, pvaOut);
 870         if(hres == OLECMDERR_E_NOTSUPPORTED)
 871             FIXME("unsupported nCmdID %d of CGID_MSHTML group\n", nCmdID);
 872
 873         return hres;
 874     }
 875
 876     FIXME("Unsupported pguidCmdGroup %s\n", debugstr_guid(pguidCmdGroup));
 877     return OLECMDERR_E_UNKNOWNGROUP;
 878 }
 879
 880 #undef CMDTARGET_THIS
 881
 882 static const IOleCommandTargetVtbl OleCommandTargetVtbl = {
 883     OleCommandTarget_QueryInterface,
 884     OleCommandTarget_AddRef,
 885     OleCommandTarget_Release,
 886     OleCommandTarget_QueryStatus,
 887     OleCommandTarget_Exec
 888 };
 889
 890 void show_context_menu(HTMLDocument *This, DWORD dwID, POINT *ppt, IDispatch *elem)
 891 {
 892     HMENU menu_res, menu;
 893     DWORD cmdid;
 894     HRESULT hres;
 895
 896     hres = IDocHostUIHandler_ShowContextMenu(This->hostui, dwID, ppt,
 897             (IUnknown*)CMDTARGET(This), elem);
 898     if(hres == S_OK)
 899         return;
 900
 901     menu_res = LoadMenuW(get_shdoclc(), MAKEINTRESOURCEW(IDR_BROWSE_CONTEXT_MENU));
 902     menu = GetSubMenu(menu_res, dwID);
 903
 904     cmdid = TrackPopupMenu(menu, TPM_LEFTALIGN | TPM_RIGHTBUTTON | TPM_RETURNCMD,
 905             ppt->x, ppt->y, 0, This->hwnd, NULL);
 906     DestroyMenu(menu_res);
 907
 908     if(cmdid)
 909         IOleCommandTarget_Exec(CMDTARGET(This), &CGID_MSHTML, cmdid, 0, NULL, NULL);
 910 }
 911
 912 void HTMLDocument_OleCmd_Init(HTMLDocument *This)
 913 {
 914     This->lpOleCommandTargetVtbl = &OleCommandTargetVtbl;
 915 }