dlls/taskschd/tests/scheduler.c

   1 /*
   2  * Copyright 2014 Dmitry Timoshkov
   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 <stdarg.h>
  20 #include <assert.h>
  21
  22 #define COBJMACROS
  23
  24 #include "windef.h"
  25 #include "winbase.h"
  26 #include "initguid.h"
  27 #include "objbase.h"
  28 #include "taskschd.h"
  29
  30 #include <wine/test.h>
  31
  32 static void test_Connect(void)
  33 {
  34     static WCHAR empty[] = { 0 };
  35     static const WCHAR deadbeefW[] = { '0','.','0','.','0','.','0',0 };
  36     WCHAR comp_name[MAX_COMPUTERNAME_LENGTH + 1];
  37     DWORD len;
  38     HRESULT hr;
  39     BSTR bstr;
  40     VARIANT v_null, v_comp;
  41     VARIANT_BOOL vbool;
  42     BOOL was_connected;
  43     ITaskService *service;
  44
  45     hr = CoCreateInstance(&CLSID_TaskScheduler, NULL, CLSCTX_INPROC_SERVER, &IID_ITaskService, (void **)&service);
  46     if (hr != S_OK)
  47     {
  48         win_skip("CoCreateInstance(CLSID_TaskScheduler) error %#x\n", hr);
  49         return;
  50     }
  51
  52     hr = ITaskService_get_Connected(service, NULL);
  53     ok(hr == E_POINTER, "expected E_POINTER, got %#x\n", hr);
  54
  55     vbool = 0xdead;
  56     hr = ITaskService_get_Connected(service, &vbool);
  57     ok(hr == S_OK, "get_Connected error %#x\n", hr);
  58     ok(vbool == VARIANT_FALSE, "expected VARIANT_FALSE, got %d\n", vbool);
  59
  60     hr = ITaskService_get_TargetServer(service, NULL);
  61     ok(hr == E_POINTER, "expected E_POINTER, got %#x\n", hr);
  62
  63     hr = ITaskService_get_TargetServer(service, &bstr);
  64     ok(hr == HRESULT_FROM_WIN32(ERROR_ONLY_IF_CONNECTED), "expected ERROR_ONLY_IF_CONNECTED, got %#x\n", hr);
  65
  66     /* Win7 doesn't support UNC \\ prefix, but according to a user
  67      * comment on MSDN Win8 supports both ways.
  68      */
  69     len = sizeof(comp_name)/sizeof(comp_name[0]);
  70     GetComputerNameW(comp_name, &len);
  71
  72     V_VT(&v_null) = VT_NULL;
  73
  74     V_VT(&v_comp) = VT_BSTR;
  75     V_BSTR(&v_comp) = SysAllocString(comp_name);
  76
  77     hr = ITaskService_Connect(service, v_comp, v_null, v_null, v_null);
  78     ok(hr == S_OK || hr == E_ACCESSDENIED /* not an administrator */, "Connect error %#x\n", hr);
  79     was_connected = hr == S_OK;
  80     SysFreeString(V_BSTR(&v_comp));
  81
  82     V_BSTR(&v_comp) = SysAllocString(deadbeefW);
  83     hr = ITaskService_Connect(service, v_comp, v_null, v_null, v_null);
  84 todo_wine
  85     ok(hr == HRESULT_FROM_WIN32(RPC_S_INVALID_NET_ADDR), "expected RPC_S_INVALID_NET_ADDR, got %#x\n", hr);
  86     SysFreeString(V_BSTR(&v_comp));
  87
  88     vbool = 0xdead;
  89     hr = ITaskService_get_Connected(service, &vbool);
  90     ok(hr == S_OK, "get_Connected error %#x\n", hr);
  91     ok(vbool == VARIANT_FALSE || (was_connected && vbool == VARIANT_TRUE),
  92        "Connect shouldn't trash an existing connection, got %d (was connected %d)\n", vbool, was_connected);
  93
  94     V_BSTR(&v_comp) = SysAllocString(empty);
  95     hr = ITaskService_Connect(service, v_comp, v_null, v_null, v_null);
  96     ok(hr == S_OK, "Connect error %#x\n", hr);
  97     SysFreeString(V_BSTR(&v_comp));
  98
  99     V_BSTR(&v_comp) = NULL;
 100     hr = ITaskService_Connect(service, v_comp, v_null, v_null, v_null);
 101     ok(hr == S_OK, "Connect error %#x\n", hr);
 102
 103     hr = ITaskService_Connect(service, v_null, v_null, v_null, v_null);
 104     ok(hr == S_OK, "Connect error %#x\n", hr);
 105
 106     vbool = 0xdead;
 107     hr = ITaskService_get_Connected(service, &vbool);
 108     ok(hr == S_OK, "get_Connected error %#x\n", hr);
 109     ok(vbool == VARIANT_TRUE, "expected VARIANT_TRUE, got %d\n", vbool);
 110
 111     hr = ITaskService_get_TargetServer(service, &bstr);
 112     ok(hr == S_OK, "get_TargetServer error %#x\n", hr);
 113     ok(!lstrcmpW(comp_name, bstr), "compname %s != server name %s\n", wine_dbgstr_w(comp_name), wine_dbgstr_w(bstr));
 114     SysFreeString(bstr);
 115
 116     ITaskService_Release(service);
 117 }
 118
 119 static void test_GetFolder(void)
 120 {
 121     static WCHAR dot[] = { '.',0 };
 122     static WCHAR empty[] = { 0 };
 123     static WCHAR slash[] = { '/',0 };
 124     static WCHAR bslash[] = { '\\',0 };
 125     static WCHAR Wine[] = { '\\','W','i','n','e',0 };
 126     static WCHAR Wine_Folder1[] = { '\\','W','i','n','e','\\','F','o','l','d','e','r','1',0 };
 127     static WCHAR Wine_Folder1_[] = { '\\','W','i','n','e','\\','F','o','l','d','e','r','1','\\',0 };
 128     static WCHAR Wine_Folder1_Folder2[] = { '\\','W','i','n','e','\\','F','o','l','d','e','r','1','\\','F','o','l','d','e','r','2',0 };
 129     static WCHAR Folder1_Folder2[] = { '\\','F','o','l','d','e','r','1','\\','F','o','l','d','e','r','2',0 };
 130     static const WCHAR Folder1[] = { 'F','o','l','d','e','r','1',0 };
 131     static const WCHAR Folder2[] = { 'F','o','l','d','e','r','2',0 };
 132     HRESULT hr;
 133     BSTR bstr;
 134     VARIANT v_null;
 135     ITaskService *service;
 136     ITaskFolder *folder, *subfolder, *subfolder2;
 137
 138     hr = CoCreateInstance(&CLSID_TaskScheduler, NULL, CLSCTX_INPROC_SERVER, &IID_ITaskService, (void **)&service);
 139     if (hr != S_OK)
 140     {
 141         win_skip("CoCreateInstance(CLSID_TaskScheduler) error %#x\n", hr);
 142         return;
 143     }
 144
 145     V_VT(&v_null) = VT_NULL;
 146
 147     hr = ITaskService_Connect(service, v_null, v_null, v_null, v_null);
 148     ok(hr == S_OK, "Connect error %#x\n", hr);
 149
 150     hr = ITaskService_GetFolder(service, slash, &folder);
 151 todo_wine
 152     ok(hr == HRESULT_FROM_WIN32(ERROR_INVALID_NAME), "expected ERROR_INVALID_NAME, got %#x\n", hr);
 153
 154     hr = ITaskService_GetFolder(service, dot, &folder);
 155 todo_wine
 156     ok(hr == HRESULT_FROM_WIN32(ERROR_INVALID_NAME), "expected ERROR_INVALID_NAME, got %#x\n", hr);
 157
 158     hr = ITaskService_GetFolder(service, bslash, &folder);
 159     ok(hr == S_OK, "GetFolder error %#x\n", hr);
 160     ITaskFolder_Release(folder);
 161
 162     hr = ITaskService_GetFolder(service, NULL, NULL);
 163     ok(hr == E_POINTER, "expected E_POINTER, got %#x\n", hr);
 164
 165     hr = ITaskService_GetFolder(service, empty, &folder);
 166     ok(hr == S_OK, "GetFolder error %#x\n", hr);
 167     ITaskFolder_Release(folder);
 168
 169     hr = ITaskService_GetFolder(service, NULL, &folder);
 170     ok(hr == S_OK, "GetFolder error %#x\n", hr);
 171
 172     hr = ITaskFolder_get_Name(folder, NULL);
 173     ok(hr == E_POINTER, "expected E_POINTER, got %#x\n", hr);
 174
 175     hr = ITaskFolder_get_Name(folder, &bstr);
 176     ok (hr == S_OK, "get_Name error %#x\n", hr);
 177     ok(!lstrcmpW(bstr, bslash), "expected '\\', got %s\n", wine_dbgstr_w(bstr));
 178     SysFreeString(bstr);
 179
 180     hr = ITaskFolder_get_Path(folder, NULL);
 181     ok(hr == E_POINTER, "expected E_POINTER, got %#x\n", hr);
 182
 183     hr = ITaskFolder_get_Path(folder, &bstr);
 184     ok(hr == S_OK, "get_Path error %#x\n", hr);
 185     ok(!lstrcmpW(bstr, bslash), "expected '\\', got %s\n", wine_dbgstr_w(bstr));
 186     SysFreeString(bstr);
 187
 188     hr = ITaskFolder_CreateFolder(folder, NULL, v_null, &subfolder);
 189     ok(hr == E_INVALIDARG, "expected E_INVALIDARG, got %#x\n", hr);
 190
 191     /* Just in case something was left from previous runs */
 192     ITaskFolder_DeleteFolder(folder, Wine_Folder1_Folder2, 0);
 193     ITaskFolder_DeleteFolder(folder, Wine_Folder1, 0);
 194     ITaskFolder_DeleteFolder(folder, Wine, 0);
 195
 196     hr = ITaskFolder_CreateFolder(folder, slash, v_null, &subfolder);
 197 todo_wine
 198     ok(hr == HRESULT_FROM_WIN32(ERROR_INVALID_NAME), "expected ERROR_INVALID_NAME, got %#x\n", hr);
 199
 200     hr = ITaskService_GetFolder(service, Wine_Folder1_Folder2, &subfolder);
 201     ok(hr == HRESULT_FROM_WIN32(ERROR_PATH_NOT_FOUND), "expected ERROR_PATH_NOT_FOUND, got %#x\n", hr);
 202
 203     hr = ITaskFolder_CreateFolder(folder, bslash, v_null, &subfolder);
 204 todo_wine
 205     ok(hr == E_INVALIDARG, "expected E_INVALIDARG, got %#x\n", hr);
 206
 207     hr = ITaskFolder_CreateFolder(folder, Wine_Folder1_Folder2, v_null, &subfolder);
 208     ok(hr == S_OK, "CreateFolder error %#x\n", hr);
 209     ITaskFolder_Release(subfolder);
 210
 211     hr = ITaskFolder_CreateFolder(folder, Wine, v_null, NULL);
 212     ok(hr == HRESULT_FROM_WIN32(ERROR_ALREADY_EXISTS), "expected ERROR_ALREADY_EXISTS, got %#x\n", hr);
 213
 214     hr = ITaskFolder_CreateFolder(folder, Wine_Folder1_, v_null, &subfolder);
 215 todo_wine
 216     ok(hr == HRESULT_FROM_WIN32(ERROR_INVALID_NAME), "expected ERROR_INVALID_NAME, got %#x\n", hr);
 217
 218     hr = ITaskFolder_CreateFolder(folder, Wine, v_null, &subfolder);
 219     ok(hr == HRESULT_FROM_WIN32(ERROR_ALREADY_EXISTS), "expected ERROR_ALREADY_EXISTS, got %#x\n", hr);
 220     hr = ITaskFolder_CreateFolder(folder, Wine+1, v_null, &subfolder);
 221     ok(hr == HRESULT_FROM_WIN32(ERROR_ALREADY_EXISTS), "expected ERROR_ALREADY_EXISTS, got %#x\n", hr);
 222     hr = ITaskFolder_CreateFolder(folder, Wine_Folder1, v_null, &subfolder);
 223     ok(hr == HRESULT_FROM_WIN32(ERROR_ALREADY_EXISTS), "expected ERROR_ALREADY_EXISTS, got %#x\n", hr);
 224     hr = ITaskFolder_CreateFolder(folder, Wine_Folder1+1, v_null, &subfolder);
 225     ok(hr == HRESULT_FROM_WIN32(ERROR_ALREADY_EXISTS), "expected ERROR_ALREADY_EXISTS, got %#x\n", hr);
 226     hr = ITaskFolder_CreateFolder(folder, Wine_Folder1_Folder2, v_null, &subfolder);
 227     ok(hr == HRESULT_FROM_WIN32(ERROR_ALREADY_EXISTS), "expected ERROR_ALREADY_EXISTS, got %#x\n", hr);
 228     hr = ITaskFolder_CreateFolder(folder, Wine_Folder1_Folder2+1, v_null, &subfolder);
 229     ok(hr == HRESULT_FROM_WIN32(ERROR_ALREADY_EXISTS), "expected ERROR_ALREADY_EXISTS, got %#x\n", hr);
 230
 231     hr = ITaskService_GetFolder(service, Wine_Folder1_Folder2, NULL);
 232     ok(hr == E_POINTER, "expected E_POINTER, got %#x\n", hr);
 233
 234     hr = ITaskService_GetFolder(service, Wine_Folder1_Folder2, &subfolder);
 235     ok(hr == S_OK, "GetFolder error %#x\n", hr);
 236
 237     hr = ITaskFolder_get_Name(subfolder, &bstr);
 238     ok (hr == S_OK, "get_Name error %#x\n", hr);
 239     ok(!lstrcmpW(bstr, Folder2), "expected Folder2, got %s\n", wine_dbgstr_w(bstr));
 240     SysFreeString(bstr);
 241     hr = ITaskFolder_get_Path(subfolder, &bstr);
 242     ok(hr == S_OK, "get_Path error %#x\n", hr);
 243     ok(!lstrcmpW(bstr, Wine_Folder1_Folder2), "expected \\Wine\\Folder1\\Folder2, got %s\n", wine_dbgstr_w(bstr));
 244     SysFreeString(bstr);
 245     ITaskFolder_Release(subfolder);
 246
 247     hr = ITaskService_GetFolder(service, Wine_Folder1_Folder2+1, &subfolder);
 248     ok(hr == S_OK, "GetFolder error %#x\n", hr);
 249     hr = ITaskFolder_get_Name(subfolder, &bstr);
 250     ok (hr == S_OK, "get_Name error %#x\n", hr);
 251     ok(!lstrcmpW(bstr, Folder2), "expected Folder2, got %s\n", wine_dbgstr_w(bstr));
 252     SysFreeString(bstr);
 253     hr = ITaskFolder_get_Path(subfolder, &bstr);
 254     ok(hr == S_OK, "get_Path error %#x\n", hr);
 255     ok(!lstrcmpW(bstr, Wine_Folder1_Folder2+1), "expected Wine\\Folder1\\Folder2, got %s\n", wine_dbgstr_w(bstr));
 256     SysFreeString(bstr);
 257     ITaskFolder_Release(subfolder);
 258
 259     hr = ITaskService_GetFolder(service, Wine_Folder1, &subfolder);
 260     ok(hr == S_OK, "GetFolder error %#x\n", hr);
 261     hr = ITaskFolder_get_Name(subfolder, &bstr);
 262     ok (hr == S_OK, "get_Name error %#x\n", hr);
 263     ok(!lstrcmpW(bstr, Folder1), "expected Folder1, got %s\n", wine_dbgstr_w(bstr));
 264     SysFreeString(bstr);
 265     hr = ITaskFolder_get_Path(subfolder, &bstr);
 266     ok(hr == S_OK, "get_Path error %#x\n", hr);
 267     ok(!lstrcmpW(bstr, Wine_Folder1), "expected \\Wine\\Folder1, got %s\n", wine_dbgstr_w(bstr));
 268     SysFreeString(bstr);
 269     ITaskFolder_Release(subfolder);
 270
 271     hr = ITaskService_GetFolder(service, Wine, &subfolder);
 272     ok(hr == S_OK, "GetFolder error %#x\n", hr);
 273     hr = ITaskFolder_get_Name(subfolder, &bstr);
 274     ok (hr == S_OK, "get_Name error %#x\n", hr);
 275     ok(!lstrcmpW(bstr, Wine+1), "expected Wine, got %s\n", wine_dbgstr_w(bstr));
 276     SysFreeString(bstr);
 277     hr = ITaskFolder_get_Path(subfolder, &bstr);
 278     ok(hr == S_OK, "get_Path error %#x\n", hr);
 279     ok(!lstrcmpW(bstr, Wine), "expected \\Wine, got %s\n", wine_dbgstr_w(bstr));
 280     SysFreeString(bstr);
 281     ITaskFolder_Release(subfolder);
 282
 283     hr = ITaskService_GetFolder(service, Wine+1, &subfolder);
 284     ok(hr == S_OK, "GetFolder error %#x\n", hr);
 285     hr = ITaskFolder_get_Name(subfolder, &bstr);
 286     ok (hr == S_OK, "get_Name error %#x\n", hr);
 287     ok(!lstrcmpW(bstr, Wine+1), "expected Wine, got %s\n", wine_dbgstr_w(bstr));
 288     SysFreeString(bstr);
 289     hr = ITaskFolder_get_Path(subfolder, &bstr);
 290     ok(hr == S_OK, "get_Path error %#x\n", hr);
 291     ok(!lstrcmpW(bstr, Wine+1), "expected Wine, got %s\n", wine_dbgstr_w(bstr));
 292     SysFreeString(bstr);
 293
 294     hr = ITaskFolder_GetFolder(subfolder, bslash, &subfolder2);
 295 todo_wine
 296     ok(hr == HRESULT_FROM_WIN32(ERROR_INVALID_NAME), "expected ERROR_INVALID_NAME, got %#x\n", hr);
 297
 298     hr = ITaskFolder_GetFolder(subfolder, NULL, &subfolder2);
 299     ok(hr == E_INVALIDARG, "expected E_INVALIDARG, got %#x\n", hr);
 300
 301     hr = ITaskFolder_GetFolder(subfolder, empty, &subfolder2);
 302     ok(hr == S_OK, "GetFolder error %#x\n", hr);
 303     hr = ITaskFolder_get_Name(subfolder2, &bstr);
 304     ok (hr == S_OK, "get_Name error %#x\n", hr);
 305     ok(!lstrcmpW(bstr, Wine+1), "expected Wine, got %s\n", wine_dbgstr_w(bstr));
 306     SysFreeString(bstr);
 307     hr = ITaskFolder_get_Path(subfolder2, &bstr);
 308     ok(hr == S_OK, "get_Path error %#x\n", hr);
 309     ok(!lstrcmpW(bstr, Wine+1), "expected Wine, got %s\n", wine_dbgstr_w(bstr));
 310     SysFreeString(bstr);
 311     ITaskFolder_Release(subfolder2);
 312
 313     hr = ITaskFolder_GetFolder(subfolder, Folder1_Folder2, &subfolder2);
 314     ok(hr == S_OK, "GetFolder error %#x\n", hr);
 315     hr = ITaskFolder_get_Name(subfolder2, &bstr);
 316     ok (hr == S_OK, "get_Name error %#x\n", hr);
 317     ok(!lstrcmpW(bstr, Folder2), "expected Folder2, got %s\n", wine_dbgstr_w(bstr));
 318     SysFreeString(bstr);
 319     hr = ITaskFolder_get_Path(subfolder2, &bstr);
 320     ok(hr == S_OK, "get_Path error %#x\n", hr);
 321     ok(!lstrcmpW(bstr, Wine_Folder1_Folder2+1), "expected Wine\\Folder1\\Folder2, got %s\n", wine_dbgstr_w(bstr));
 322     SysFreeString(bstr);
 323     ITaskFolder_Release(subfolder2);
 324
 325     hr = ITaskFolder_GetFolder(subfolder, Folder1_Folder2+1, &subfolder2);
 326     ok(hr == S_OK, "GetFolder error %#x\n", hr);
 327
 328     hr = ITaskFolder_get_Name(subfolder2, &bstr);
 329     ok (hr == S_OK, "get_Name error %#x\n", hr);
 330     ok(!lstrcmpW(bstr, Folder2), "expected Folder2, got %s\n", wine_dbgstr_w(bstr));
 331     SysFreeString(bstr);
 332     hr = ITaskFolder_get_Path(subfolder2, &bstr);
 333     ok(hr == S_OK, "get_Path error %#x\n", hr);
 334     ok(!lstrcmpW(bstr, Wine_Folder1_Folder2+1), "expected Wine\\Folder1\\Folder2, got %s\n", wine_dbgstr_w(bstr));
 335     SysFreeString(bstr);
 336     ITaskFolder_Release(subfolder2);
 337
 338     ITaskFolder_Release(subfolder);
 339
 340     hr = ITaskFolder_DeleteFolder(folder, Wine_Folder1_Folder2, 0);
 341     ok(hr == S_OK, "DeleteFolder error %#x\n", hr);
 342     ITaskFolder_DeleteFolder(folder, Wine_Folder1+1, 0);
 343     ok(hr == S_OK, "DeleteFolder error %#x\n", hr);
 344     hr = ITaskFolder_DeleteFolder(folder, Wine+1, 0);
 345     ok(hr == S_OK, "DeleteFolder error %#x\n", hr);
 346
 347     hr = ITaskFolder_DeleteFolder(folder, Wine, 0);
 348     ok(hr == HRESULT_FROM_WIN32(ERROR_FILE_NOT_FOUND), "expected ERROR_FILE_NOT_FOUND, got %#x\n", hr);
 349
 350     hr = ITaskFolder_DeleteFolder(folder, NULL, 0);
 351     ok(hr == E_ACCESSDENIED || hr == E_INVALIDARG /* Vista */, "expected E_ACCESSDENIED, got %#x\n", hr);
 352
 353     hr = ITaskFolder_DeleteFolder(folder, empty, 0);
 354     ok(hr == E_ACCESSDENIED || hr == E_INVALIDARG /* Vista */, "expected E_ACCESSDENIED, got %#x\n", hr);
 355
 356     hr = ITaskFolder_DeleteFolder(folder, slash, 0);
 357 todo_wine
 358     ok(hr == HRESULT_FROM_WIN32(ERROR_INVALID_NAME), "expected ERROR_INVALID_NAME, got %#x\n", hr);
 359
 360     ITaskFolder_Release(folder);
 361     ITaskService_Release(service);
 362 }
 363
 364 static void set_var(int vt, VARIANT *var, LONG val)
 365 {
 366     V_VT(var) = vt;
 367
 368     switch(vt)
 369     {
 370     case VT_I1:
 371     case VT_UI1:
 372         V_UI1(var) = (BYTE)val;
 373         break;
 374
 375     case VT_I2:
 376     case VT_UI2:
 377         V_UI2(var) = (USHORT)val;
 378         break;
 379
 380     case VT_I4:
 381     case VT_UI4:
 382         V_UI4(var) = val;
 383         break;
 384
 385     case VT_I8:
 386     case VT_UI8:
 387         V_UI8(var) = val;
 388         break;
 389
 390     case VT_INT:
 391     case VT_UINT:
 392         V_UINT(var) = val;
 393         break;
 394
 395     default:
 396         assert(0);
 397         break;
 398     }
 399 }
 400
 401 static void test_FolderCollection(void)
 402 {
 403     static WCHAR Wine[] = { '\\','W','i','n','e',0 };
 404     static WCHAR Wine_Folder1[] = { '\\','W','i','n','e','\\','F','o','l','d','e','r','1',0 };
 405     static WCHAR Wine_Folder2[] = { '\\','W','i','n','e','\\','F','o','l','d','e','r','2',0 };
 406     static WCHAR Wine_Folder3[] = { '\\','W','i','n','e','\\','F','o','l','d','e','r','3',0 };
 407     static const WCHAR Folder1[] = { 'F','o','l','d','e','r','1',0 };
 408     static const WCHAR Folder2[] = { 'F','o','l','d','e','r','2',0 };
 409     HRESULT hr;
 410     BSTR bstr;
 411     VARIANT v_null, var[3];
 412     ITaskService *service;
 413     ITaskFolder *root, *folder, *subfolder;
 414     ITaskFolderCollection *folders;
 415     IUnknown *unknown;
 416     IEnumVARIANT *enumvar;
 417     ULONG count, i;
 418     VARIANT idx;
 419     static const int vt[] = { VT_I1, VT_I2, VT_I4, VT_I8, VT_UI1, VT_UI2, VT_UI4, VT_UI8, VT_INT, VT_UINT };
 420
 421     hr = CoCreateInstance(&CLSID_TaskScheduler, NULL, CLSCTX_INPROC_SERVER, &IID_ITaskService, (void **)&service);
 422     if (hr != S_OK)
 423     {
 424         win_skip("CoCreateInstance(CLSID_TaskScheduler) error %#x\n", hr);
 425         return;
 426     }
 427
 428     V_VT(&v_null) = VT_NULL;
 429
 430     hr = ITaskService_Connect(service, v_null, v_null, v_null, v_null);
 431     ok(hr == S_OK, "Connect error %#x\n", hr);
 432
 433     hr = ITaskService_GetFolder(service, NULL, &root);
 434     ok(hr == S_OK, "GetFolder error %#x\n", hr);
 435
 436     /* Just in case something was left from previous runs */
 437     ITaskFolder_DeleteFolder(root, Wine_Folder1, 0);
 438     ITaskFolder_DeleteFolder(root, Wine_Folder2, 0);
 439     ITaskFolder_DeleteFolder(root, Wine_Folder3, 0);
 440     ITaskFolder_DeleteFolder(root, Wine, 0);
 441
 442     hr = ITaskFolder_CreateFolder(root, Wine_Folder1, v_null, &subfolder);
 443     ok(hr == S_OK, "CreateFolder error %#x\n", hr);
 444     ITaskFolder_Release(subfolder);
 445
 446     hr = ITaskFolder_CreateFolder(root, Wine_Folder2, v_null, &subfolder);
 447     ok(hr == S_OK, "CreateFolder error %#x\n", hr);
 448     ITaskFolder_Release(subfolder);
 449
 450     hr = ITaskFolder_GetFolder(root, Wine, &folder);
 451     ok(hr == S_OK, "GetFolder error %#x\n", hr);
 452
 453     hr = ITaskFolder_GetFolders(folder, 0, &folders);
 454     ok(hr == S_OK, "GetFolders error %#x\n", hr);
 455
 456     ITaskFolder_Release(folder);
 457
 458     hr = ITaskFolderCollection_get_Count(folders, NULL);
 459     ok (hr == E_POINTER, "expected E_POINTER, got %#x\n", hr);
 460
 461     count = 0;
 462     hr = ITaskFolderCollection_get_Count(folders, (LONG *)&count);
 463     ok(hr == S_OK, "get_Count error %#x\n", hr);
 464     ok(count == 2, "expected 2, got %d\n", count);
 465
 466     hr = ITaskFolder_CreateFolder(root, Wine_Folder3, v_null, &subfolder);
 467     ok(hr == S_OK, "CreateFolder error %#x\n", hr);
 468     ITaskFolder_Release(subfolder);
 469
 470     count = 0;
 471     hr = ITaskFolderCollection_get_Count(folders, (LONG *)&count);
 472     ok(hr == S_OK, "get_Count error %#x\n", hr);
 473     ok(count == 2, "expected 2, got %d\n", count);
 474
 475     set_var(VT_INT, &idx, 0);
 476     hr = ITaskFolderCollection_get_Item(folders, idx, NULL);
 477     ok (hr == E_POINTER, "expected E_POINTER, got %#x\n", hr);
 478
 479     for (i = 0; i < sizeof(vt)/sizeof(vt[0]); i++)
 480     {
 481         set_var(vt[i], &idx, 1);
 482         hr = ITaskFolderCollection_get_Item(folders, idx, &subfolder);
 483         ok(hr == S_OK, "get_Item(vt = %d) error %#x\n", vt[i], hr);
 484         ITaskFolder_Release(subfolder);
 485     }
 486
 487     for (i = 0; i <= count; i++)
 488     {
 489         V_VT(&idx) = VT_I4;
 490         V_UI4(&idx) = i;
 491         hr = ITaskFolderCollection_get_Item(folders, idx, &subfolder);
 492         if (i == 0)
 493         {
 494             ok (hr == E_INVALIDARG, "expected E_INVALIDARG, got %#x\n", hr);
 495             continue;
 496         }
 497         ok(hr == S_OK, "get_Item error %#x\n", hr);
 498
 499         hr = ITaskFolder_get_Path(subfolder, &bstr);
 500         ok(hr == S_OK, "get_Path error %#x\n", hr);
 501         if (i == 1)
 502             ok(!lstrcmpW(bstr, Wine_Folder1), "expected \\Wine\\Folder1, got %s\n", wine_dbgstr_w(bstr));
 503         else
 504             ok(!lstrcmpW(bstr, Wine_Folder2), "expected \\Wine\\Folder2, got %s\n", wine_dbgstr_w(bstr));
 505         SysFreeString(bstr);
 506
 507         hr = ITaskFolder_get_Name(subfolder, &bstr);
 508         ok(hr == S_OK, "get_Name error %#x\n", hr);
 509         if (i == 1)
 510             ok(!lstrcmpW(bstr, Folder1), "expected Folder1, got %s\n", wine_dbgstr_w(bstr));
 511         else
 512             ok(!lstrcmpW(bstr, Folder2), "expected Folder2, got %s\n", wine_dbgstr_w(bstr));
 513
 514         ITaskFolder_Release(subfolder);
 515
 516         V_VT(&idx) = VT_BSTR;
 517         V_BSTR(&idx) = bstr;
 518         hr = ITaskFolderCollection_get_Item(folders, idx, &subfolder);
 519         ok(hr == S_OK, "get_Item error %#x\n", hr);
 520         SysFreeString(bstr);
 521
 522         hr = ITaskFolder_get_Path(subfolder, &bstr);
 523         ok(hr == S_OK, "get_Path error %#x\n", hr);
 524         if (i == 1)
 525             ok(!lstrcmpW(bstr, Wine_Folder1), "expected \\Wine\\Folder1, got %s\n", wine_dbgstr_w(bstr));
 526         else
 527             ok(!lstrcmpW(bstr, Wine_Folder2), "expected \\Wine\\Folder2, got %s\n", wine_dbgstr_w(bstr));
 528         SysFreeString(bstr);
 529
 530         hr = ITaskFolder_get_Name(subfolder, &bstr);
 531         ok(hr == S_OK, "get_Name error %#x\n", hr);
 532         if (i == 1)
 533             ok(!lstrcmpW(bstr, Folder1), "expected Folder1, got %s\n", wine_dbgstr_w(bstr));
 534         else
 535             ok(!lstrcmpW(bstr, Folder2), "expected Folder2, got %s\n", wine_dbgstr_w(bstr));
 536
 537         ITaskFolder_Release(subfolder);
 538     }
 539
 540     V_VT(&idx) = VT_I4;
 541     V_UI4(&idx) = 3;
 542     hr = ITaskFolderCollection_get_Item(folders, idx, &subfolder);
 543     ok (hr == E_INVALIDARG, "expected E_INVALIDARG, got %#x\n", hr);
 544
 545     hr = ITaskFolderCollection_QueryInterface(folders, &IID_IEnumVARIANT, (void **)&enumvar);
 546     ok(hr == E_NOINTERFACE, "expected E_NOINTERFACE, got %#x\n", hr);
 547     hr = ITaskFolderCollection_QueryInterface(folders, &IID_IEnumUnknown, (void **)&enumvar);
 548     ok(hr == E_NOINTERFACE, "expected E_NOINTERFACE, got %#x\n", hr);
 549
 550     hr = ITaskFolderCollection_get__NewEnum(folders, NULL);
 551     ok (hr == E_POINTER, "expected E_POINTER, got %#x\n", hr);
 552
 553     hr = ITaskFolderCollection_get__NewEnum(folders, &unknown);
 554     ok(hr == S_OK, "get__NewEnum error %#x\n", hr);
 555     hr = IUnknown_QueryInterface(unknown, &IID_IEnumUnknown, (void **)&enumvar);
 556     ok(hr == E_NOINTERFACE, "expected E_NOINTERFACE, got %#x\n", hr);
 557     hr = IUnknown_QueryInterface(unknown, &IID_IEnumVARIANT, (void **)&enumvar);
 558     ok(hr == S_OK, "QueryInterface error %#x\n", hr);
 559     IEnumVARIANT_Release(enumvar);
 560
 561     hr = IUnknown_QueryInterface(unknown, &IID_IUnknown, (void **)&enumvar);
 562     ok(hr == S_OK, "QueryInterface error %#x\n", hr);
 563
 564     hr = IEnumVARIANT_Skip(enumvar, 0);
 565     ok(hr == S_OK, "expected S_OK, got %#x\n", hr);
 566     hr = IEnumVARIANT_Skip(enumvar, 2);
 567     ok(hr == S_OK, "expected S_OK, got %#x\n", hr);
 568     hr = IEnumVARIANT_Skip(enumvar, 1);
 569     ok(hr == S_FALSE, "expected S_FALSE, got %#x\n", hr);
 570
 571     hr = IEnumVARIANT_Reset(enumvar);
 572     ok(hr == S_OK, "expected S_OK, got %#x\n", hr);
 573
 574     count = -1;
 575     hr = IEnumVARIANT_Next(enumvar, 1, NULL, &count);
 576     ok(hr == E_POINTER, "expected E_POINTER, got %#x\n", hr);
 577
 578     memset(var, 0, sizeof(var));
 579     count = -1;
 580     hr = IEnumVARIANT_Next(enumvar, 1, var, &count);
 581     ok(hr == S_OK, "expected S_OK, got %#x\n", hr);
 582     ok(count == 1, "expected 1, got %d\n", count);
 583     hr = ITaskFolder_get_Path((ITaskFolder *)V_DISPATCH(&var[0]), &bstr);
 584     ok(hr == S_OK, "get_Path error %#x\n", hr);
 585     ok(!lstrcmpW(bstr, Wine_Folder2), "expected \\Wine\\Folder2, got %s\n", wine_dbgstr_w(bstr));
 586     SysFreeString(bstr);
 587     hr = ITaskFolder_get_Name((ITaskFolder *)V_DISPATCH(&var[0]), &bstr);
 588     ok(hr == S_OK, "get_Name error %#x\n", hr);
 589     ok(!lstrcmpW(bstr, Folder2), "expected Folder2, got %s\n", wine_dbgstr_w(bstr));
 590     IDispatch_Release(V_DISPATCH(&var[0]));
 591
 592     memset(var, 0, sizeof(var));
 593     count = -1;
 594     hr = IEnumVARIANT_Next(enumvar, 1, var, &count);
 595     ok(hr == S_FALSE, "expected S_FALSE, got %#x\n", hr);
 596     ok(count == 0, "expected 0, got %d\n", count);
 597
 598     count = -1;
 599     hr = IEnumVARIANT_Next(enumvar, 1, NULL, &count);
 600     ok(hr == S_FALSE, "expected S_FALSE, got %#x\n", hr);
 601     ok(count == 0, "expected 0, got %d\n", count);
 602
 603     hr = IEnumVARIANT_Reset(enumvar);
 604     ok(hr == S_OK, "expected S_OK, got %#x\n", hr);
 605
 606     memset(var, 0, sizeof(var));
 607     count = -1;
 608     hr = IEnumVARIANT_Next(enumvar, 3, var, &count);
 609     ok(hr == S_FALSE, "expected S_FALSE, got %#x\n", hr);
 610     ok(count == 2, "expected 2, got %d\n", count);
 611     ok(V_VT(&var[0]) == VT_DISPATCH, "expected VT_DISPATCH, got %d\n", V_VT(&var[0]));
 612     ok(V_VT(&var[1]) == VT_DISPATCH, "expected VT_DISPATCH, got %d\n", V_VT(&var[1]));
 613     IEnumVARIANT_Release(enumvar);
 614
 615     for (i = 0; i < count; i++)
 616     {
 617         hr = IDispatch_QueryInterface(V_DISPATCH(&var[i]), &IID_ITaskFolder, (void **)&subfolder);
 618         ok(hr == S_OK, "QueryInterface error %#x\n", hr);
 619
 620         hr = ITaskFolder_get_Path(subfolder, &bstr);
 621         ok(hr == S_OK, "get_Path error %#x\n", hr);
 622         if (i == 0)
 623             ok(!lstrcmpW(bstr, Wine_Folder1), "expected \\Wine\\Folder1, got %s\n", wine_dbgstr_w(bstr));
 624         else
 625             ok(!lstrcmpW(bstr, Wine_Folder2), "expected \\Wine\\Folder2, got %s\n", wine_dbgstr_w(bstr));
 626         SysFreeString(bstr);
 627
 628         hr = ITaskFolder_get_Name(subfolder, &bstr);
 629         ok(hr == S_OK, "get_Name error %#x\n", hr);
 630         if (i == 0)
 631             ok(!lstrcmpW(bstr, Folder1), "expected Folder1, got %s\n", wine_dbgstr_w(bstr));
 632         else
 633             ok(!lstrcmpW(bstr, Folder2), "expected Folder2, got %s\n", wine_dbgstr_w(bstr));
 634
 635         ITaskFolder_Release(subfolder);
 636     }
 637
 638     IDispatch_Release(V_DISPATCH(&var[0]));
 639     IDispatch_Release(V_DISPATCH(&var[1]));
 640
 641     ITaskFolderCollection_Release(folders);
 642
 643     hr = ITaskFolder_DeleteFolder(root, Wine_Folder1, 0);
 644     ok(hr == S_OK, "DeleteFolder error %#x\n", hr);
 645     hr = ITaskFolder_DeleteFolder(root, Wine_Folder2, 0);
 646     ok(hr == S_OK, "DeleteFolder error %#x\n", hr);
 647     hr = ITaskFolder_DeleteFolder(root, Wine_Folder3, 0);
 648     ok(hr == S_OK, "DeleteFolder error %#x\n", hr);
 649     hr = ITaskFolder_DeleteFolder(root, Wine, 0);
 650     ok(hr == S_OK, "DeleteFolder error %#x\n", hr);
 651
 652     ITaskFolder_Release(root);
 653     ITaskService_Release(service);
 654 }
 655
 656 START_TEST(scheduler)
 657 {
 658     OleInitialize(NULL);
 659
 660     test_Connect();
 661     test_GetFolder();
 662     test_FolderCollection();
 663
 664     OleUninitialize();
 665 }