dlls/mstask/tests/task.c

   1 /*
   2  * Test suite for Task interface
   3  *
   4  * Copyright (C) 2008 Google (Roy Shea)
   5  * Copyright (C) 2018 Dmitry Timoshkov
   6  *
   7  * This library is free software; you can redistribute it and/or
   8  * modify it under the terms of the GNU Lesser General Public
   9  * License as published by the Free Software Foundation; either
  10  * version 2.1 of the License, or (at your option) any later version.
  11  *
  12  * This library is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15  * Lesser General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU Lesser General Public
  18  * License along with this library; if not, write to the Free Software
  19  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  20  */
  21
  22 #define COBJMACROS
  23
  24 #include "corerror.h"
  25 #include "mstask.h"
  26 #include "wine/test.h"
  27
  28 static ITaskScheduler *scheduler;
  29 static const WCHAR task_name[] = {'T','e','s','t','i','n','g',0};
  30 static const WCHAR empty[] = {0};
  31
  32 static LPCWSTR path_resolve_name(LPCWSTR base_name)
  33 {
  34     static WCHAR buffer[MAX_PATH];
  35     int len;
  36
  37     len = SearchPathW(NULL, base_name, NULL, 0, NULL, NULL);
  38     if (len == 0)
  39         return base_name;
  40     else if (len < MAX_PATH)
  41     {
  42         SearchPathW(NULL, base_name, NULL, MAX_PATH, buffer, NULL);
  43         return buffer;
  44     }
  45     return NULL;
  46 }
  47
  48 static void test_SetApplicationName_GetApplicationName(void)
  49 {
  50     ITask *test_task;
  51     HRESULT hres;
  52     LPWSTR stored_name;
  53     LPCWSTR full_name;
  54     const WCHAR non_application_name[] = {'N','o','S','u','c','h',
  55             'A','p','p','l','i','c','a','t','i','o','n', 0};
  56     const WCHAR notepad_exe[] = {
  57             'n','o','t','e','p','a','d','.','e','x','e', 0};
  58     const WCHAR notepad[] = {'n','o','t','e','p','a','d', 0};
  59
  60     hres = ITaskScheduler_NewWorkItem(scheduler, task_name, &CLSID_CTask,
  61                                       &IID_ITask, (IUnknown **)&test_task);
  62     ok(hres == S_OK, "Failed to setup test_task\n");
  63
  64     /* Attempt getting before setting application name */
  65     hres = ITask_GetApplicationName(test_task, &stored_name);
  66     ok(hres == S_OK, "GetApplicationName failed: %08x\n", hres);
  67     if (hres == S_OK)
  68     {
  69         ok(!lstrcmpiW(stored_name, empty),
  70                 "Got %s, expected empty string\n", wine_dbgstr_w(stored_name));
  71         CoTaskMemFree(stored_name);
  72     }
  73
  74     /* Set application name to a nonexistent application and then get
  75      * the application name that is actually stored */
  76     hres = ITask_SetApplicationName(test_task, non_application_name);
  77     ok(hres == S_OK, "Failed setting name %s: %08x\n",
  78             wine_dbgstr_w(non_application_name), hres);
  79     hres = ITask_GetApplicationName(test_task, &stored_name);
  80     ok(hres == S_OK, "GetApplicationName failed: %08x\n", hres);
  81     if (hres == S_OK)
  82     {
  83         full_name = path_resolve_name(non_application_name);
  84         ok(!lstrcmpiW(stored_name, full_name), "Got %s, expected %s\n",
  85                 wine_dbgstr_w(stored_name), wine_dbgstr_w(full_name));
  86         CoTaskMemFree(stored_name);
  87     }
  88
  89     /* Set a valid application name with program type extension and then
  90      * get the stored name */
  91     hres = ITask_SetApplicationName(test_task, notepad_exe);
  92     ok(hres == S_OK, "Failed setting name %s: %08x\n",
  93             wine_dbgstr_w(notepad_exe), hres);
  94     hres = ITask_GetApplicationName(test_task, &stored_name);
  95     ok(hres == S_OK, "GetApplicationName failed: %08x\n", hres);
  96     if (hres == S_OK)
  97     {
  98         full_name = path_resolve_name(notepad_exe);
  99         ok(!lstrcmpiW(stored_name, full_name), "Got %s, expected %s\n",
 100                 wine_dbgstr_w(stored_name), wine_dbgstr_w(full_name));
 101         CoTaskMemFree(stored_name);
 102     }
 103
 104     /* Set a valid application name without program type extension and
 105      * then get the stored name */
 106     hres = ITask_SetApplicationName(test_task, notepad);
 107     ok(hres == S_OK, "Failed setting name %s: %08x\n", wine_dbgstr_w(notepad), hres);
 108     hres = ITask_GetApplicationName(test_task, &stored_name);
 109     ok(hres == S_OK, "GetApplicationName failed: %08x\n", hres);
 110     if (hres == S_OK)
 111     {
 112         full_name = path_resolve_name(notepad_exe);  /* XP SP1 appends .exe */
 113         if (lstrcmpiW(stored_name, full_name) != 0)
 114         {
 115             full_name = path_resolve_name(notepad);
 116             ok(!lstrcmpiW(stored_name, full_name), "Got %s, expected %s\n",
 117                wine_dbgstr_w(stored_name), wine_dbgstr_w(full_name));
 118         }
 119         CoTaskMemFree(stored_name);
 120     }
 121
 122     /* After having a valid application name set, set application the name
 123      * to a nonexistent application and then get the name that is
 124      * actually stored */
 125     hres = ITask_SetApplicationName(test_task, non_application_name);
 126     ok(hres == S_OK, "Failed setting name %s: %08x\n",
 127             wine_dbgstr_w(non_application_name), hres);
 128     hres = ITask_GetApplicationName(test_task, &stored_name);
 129     ok(hres == S_OK, "GetApplicationName failed: %08x\n", hres);
 130     if (hres == S_OK)
 131     {
 132         full_name = path_resolve_name(non_application_name);
 133         ok(!lstrcmpiW(stored_name, full_name), "Got %s, expected %s\n",
 134                 wine_dbgstr_w(stored_name), wine_dbgstr_w(full_name));
 135         CoTaskMemFree(stored_name);
 136     }
 137
 138     /* Clear application name */
 139     hres = ITask_SetApplicationName(test_task, empty);
 140     ok(hres == S_OK, "Failed setting name %s: %08x\n", wine_dbgstr_w(empty), hres);
 141     hres = ITask_GetApplicationName(test_task, &stored_name);
 142     ok(hres == S_OK, "GetApplicationName failed: %08x\n", hres);
 143     if (hres == S_OK)
 144     {
 145         ok(!lstrcmpiW(stored_name, empty),
 146                 "Got %s, expected empty string\n", wine_dbgstr_w(stored_name));
 147         CoTaskMemFree(stored_name);
 148     }
 149
 150     ITask_Release(test_task);
 151 }
 152
 153 static void test_CreateTrigger(void)
 154 {
 155     ITask *test_task;
 156     HRESULT hres;
 157     WORD trigger_index;
 158     ITaskTrigger *test_trigger;
 159
 160     hres = ITaskScheduler_NewWorkItem(scheduler, task_name, &CLSID_CTask,
 161                                       &IID_ITask, (IUnknown **)&test_task);
 162     ok(hres == S_OK, "Failed to setup test_task\n");
 163
 164     hres = ITask_CreateTrigger(test_task, &trigger_index, &test_trigger);
 165     ok(hres == S_OK, "Failed to create trigger: 0x%08x\n", hres);
 166
 167     ITaskTrigger_Release(test_trigger);
 168     ITask_Release(test_task);
 169 }
 170
 171 static void test_SetParameters_GetParameters(void)
 172 {
 173     ITask *test_task;
 174     HRESULT hres;
 175     LPWSTR parameters;
 176     const WCHAR parameters_a[] = {'f','o','o','.','t','x','t', 0};
 177     const WCHAR parameters_b[] = {'f','o','o','.','t','x','t',' ',
 178         'b','a','r','.','t','x','t', 0};
 179
 180     hres = ITaskScheduler_NewWorkItem(scheduler, task_name, &CLSID_CTask,
 181                                       &IID_ITask, (IUnknown **)&test_task);
 182     ok(hres == S_OK, "Failed to setup test_task\n");
 183
 184     /* Get parameters before setting them */
 185     hres = ITask_GetParameters(test_task, &parameters);
 186     ok(hres == S_OK, "GetParameters failed: %08x\n", hres);
 187     if (hres == S_OK)
 188     {
 189         ok(!lstrcmpW(parameters, empty),
 190                 "Got %s, expected empty string\n", wine_dbgstr_w(parameters));
 191         CoTaskMemFree(parameters);
 192     }
 193
 194     /* Set parameters to a simple string */
 195     hres = ITask_SetParameters(test_task, parameters_a);
 196     ok(hres == S_OK, "Failed setting parameters %s: %08x\n",
 197             wine_dbgstr_w(parameters_a), hres);
 198     hres = ITask_GetParameters(test_task, &parameters);
 199     ok(hres == S_OK, "GetParameters failed: %08x\n", hres);
 200     if (hres == S_OK)
 201     {
 202         ok(!lstrcmpW(parameters, parameters_a), "Got %s, expected %s\n",
 203                 wine_dbgstr_w(parameters), wine_dbgstr_w(parameters_a));
 204         CoTaskMemFree(parameters);
 205     }
 206
 207     /* Update parameters to a different simple string */
 208     hres = ITask_SetParameters(test_task, parameters_b);
 209     ok(hres == S_OK, "Failed setting parameters %s: %08x\n",
 210             wine_dbgstr_w(parameters_b), hres);
 211     hres = ITask_GetParameters(test_task, &parameters);
 212     ok(hres == S_OK, "GetParameters failed: %08x\n", hres);
 213     if (hres == S_OK)
 214     {
 215         ok(!lstrcmpW(parameters, parameters_b), "Got %s, expected %s\n",
 216                 wine_dbgstr_w(parameters), wine_dbgstr_w(parameters_b));
 217         CoTaskMemFree(parameters);
 218     }
 219
 220     /* Clear parameters */
 221     hres = ITask_SetParameters(test_task, empty);
 222     ok(hres == S_OK, "Failed setting parameters %s: %08x\n",
 223             wine_dbgstr_w(empty), hres);
 224     hres = ITask_GetParameters(test_task, &parameters);
 225     ok(hres == S_OK, "GetParameters failed: %08x\n", hres);
 226     if (hres == S_OK)
 227     {
 228         ok(!lstrcmpW(parameters, empty),
 229                 "Got %s, expected empty string\n", wine_dbgstr_w(parameters));
 230         CoTaskMemFree(parameters);
 231     }
 232
 233     ITask_Release(test_task);
 234 }
 235
 236 static void test_SetComment_GetComment(void)
 237 {
 238     ITask *test_task;
 239     HRESULT hres;
 240     LPWSTR comment;
 241     const WCHAR comment_a[] = {'C','o','m','m','e','n','t','.', 0};
 242     const WCHAR comment_b[] = {'L','o','n','g','e','r',' ',
 243             'c','o','m','m','e','n','t','.', 0};
 244
 245     hres = ITaskScheduler_NewWorkItem(scheduler, task_name, &CLSID_CTask,
 246                                       &IID_ITask, (IUnknown **)&test_task);
 247     ok(hres == S_OK, "Failed to setup test_task\n");
 248
 249     /* Get comment before setting it*/
 250     hres = ITask_GetComment(test_task, &comment);
 251     ok(hres == S_OK, "GetComment failed: %08x\n", hres);
 252     if (hres == S_OK)
 253     {
 254         ok(!lstrcmpW(comment, empty),
 255                 "Got %s, expected empty string\n", wine_dbgstr_w(comment));
 256         CoTaskMemFree(comment);
 257     }
 258
 259     /* Set comment to a simple string */
 260     hres = ITask_SetComment(test_task, comment_a);
 261     ok(hres == S_OK, "Failed setting comment %s: %08x\n",
 262             wine_dbgstr_w(comment_a), hres);
 263     hres = ITask_GetComment(test_task, &comment);
 264     ok(hres == S_OK, "GetComment failed: %08x\n", hres);
 265     if (hres == S_OK)
 266     {
 267         ok(!lstrcmpW(comment, comment_a), "Got %s, expected %s\n",
 268                 wine_dbgstr_w(comment), wine_dbgstr_w(comment_a));
 269         CoTaskMemFree(comment);
 270     }
 271
 272     /* Update comment to a different simple string */
 273     hres = ITask_SetComment(test_task, comment_b);
 274     ok(hres == S_OK, "Failed setting comment %s: %08x\n",
 275             wine_dbgstr_w(comment_b), hres);
 276     hres = ITask_GetComment(test_task, &comment);
 277     ok(hres == S_OK, "GetComment failed: %08x\n", hres);
 278     if (hres == S_OK)
 279     {
 280         ok(!lstrcmpW(comment, comment_b), "Got %s, expected %s\n",
 281                 wine_dbgstr_w(comment), wine_dbgstr_w(comment_b));
 282         CoTaskMemFree(comment);
 283     }
 284
 285     /* Clear comment */
 286     hres = ITask_SetComment(test_task, empty);
 287     ok(hres == S_OK, "Failed setting comment %s: %08x\n",
 288             wine_dbgstr_w(empty), hres);
 289     hres = ITask_GetComment(test_task, &comment);
 290     ok(hres == S_OK, "GetComment failed: %08x\n", hres);
 291     if (hres == S_OK)
 292     {
 293         ok(!lstrcmpW(comment, empty),
 294                 "Got %s, expected empty string\n", wine_dbgstr_w(comment));
 295         CoTaskMemFree(comment);
 296     }
 297
 298     ITask_Release(test_task);
 299 }
 300
 301 static void test_SetMaxRunTime_GetMaxRunTime(void)
 302 {
 303     ITask *test_task;
 304     HRESULT hres;
 305     DWORD max_run_time;
 306
 307     hres = ITaskScheduler_NewWorkItem(scheduler, task_name, &CLSID_CTask,
 308                                       &IID_ITask, (IUnknown **)&test_task);
 309     ok(hres == S_OK, "Failed to setup test_task\n");
 310
 311     /* Default time is 3 days:
 312      * 3 days * 24 hours * 60 minutes * 60 seconds * 1000 ms = 259200000 */
 313     max_run_time = 0;
 314     hres = ITask_GetMaxRunTime(test_task, &max_run_time);
 315     ok(hres == S_OK, "Failed to get max runtime: 0x%08x\n", hres);
 316     ok(max_run_time == 259200000, "Expected 259200000: %d\n", max_run_time);
 317
 318     /* Basic set test */
 319     max_run_time = 0;
 320     hres = ITask_SetMaxRunTime(test_task, 1234);
 321     ok(hres == S_OK, "Failed to set max runtime: 0x%08x\n", hres);
 322     hres = ITask_GetMaxRunTime(test_task, &max_run_time);
 323     ok(hres == S_OK, "Failed to get max runtime: 0x%08x\n", hres);
 324     ok(max_run_time == 1234, "Expected 1234: %d\n", max_run_time);
 325
 326     /* Verify that time can be set to zero */
 327     max_run_time = 1;
 328     hres = ITask_SetMaxRunTime(test_task, 0);
 329     ok(hres == S_OK, "Failed to set max runtime: 0x%08x\n", hres);
 330     hres = ITask_GetMaxRunTime(test_task, &max_run_time);
 331     ok(hres == S_OK, "Failed to get max runtime: 0x%08x\n", hres);
 332     ok(max_run_time == 0, "Expected 0: %d\n", max_run_time);
 333
 334     /* Check resolution by setting time to one */
 335     max_run_time = 0;
 336     hres = ITask_SetMaxRunTime(test_task, 1);
 337     ok(hres == S_OK, "Failed to set max runtime: 0x%08x\n", hres);
 338     hres = ITask_GetMaxRunTime(test_task, &max_run_time);
 339     ok(hres == S_OK, "Failed to get max runtime: 0x%08x\n", hres);
 340     ok(max_run_time == 1, "Expected 1: %d\n", max_run_time);
 341
 342     /* Verify that time can be set to INFINITE */
 343     max_run_time = 0;
 344     hres = ITask_SetMaxRunTime(test_task, INFINITE);
 345     ok(hres == S_OK, "Failed to set max runtime: 0x%08x\n", hres);
 346     hres = ITask_GetMaxRunTime(test_task, &max_run_time);
 347     ok(hres == S_OK, "Failed to get max runtime: 0x%08x\n", hres);
 348     ok(max_run_time == INFINITE, "Expected INFINITE: %d\n", max_run_time);
 349
 350     ITask_Release(test_task);
 351 }
 352
 353 static void test_SetAccountInformation_GetAccountInformation(void)
 354 {
 355     ITask *test_task;
 356     HRESULT hres;
 357     LPWSTR account_name;
 358     const WCHAR dummy_account_name[] = {'N', 'o', 'S', 'u', 'c', 'h',
 359             'A', 'c', 'c', 'o', 'u', 'n', 't', 0};
 360     const WCHAR dummy_account_name_b[] = {'N', 'o', 'S', 'u', 'c', 'h',
 361             'A', 'c', 'c', 'o', 'u', 'n', 't', 'B', 0};
 362
 363     hres = ITaskScheduler_NewWorkItem(scheduler, task_name, &CLSID_CTask,
 364                                       &IID_ITask, (IUnknown **)&test_task);
 365     ok(hres == S_OK, "Failed to setup test_task\n");
 366
 367     /* Get account information before it is set */
 368     hres = ITask_GetAccountInformation(test_task, &account_name);
 369     /* WinXP returns HRESULT_FROM_WIN32(ERROR_FILE_NOT_FOUND): 0x80070002 but
 370      * Win2K returns SCHED_E_CANNOT_OPEN_TASK: 0x8004130d
 371      * Win9x doesn't support security services */
 372     if (hres == SCHED_E_NO_SECURITY_SERVICES || hres == SCHED_E_SERVICE_NOT_RUNNING)
 373     {
 374         win_skip("Security services are not supported\n");
 375         ITask_Release(test_task);
 376     }
 377     ok(hres == HRESULT_FROM_WIN32(ERROR_FILE_NOT_FOUND) ||
 378             hres == SCHED_E_CANNOT_OPEN_TASK,
 379             "Unset account name generated: 0x%08x\n", hres);
 380
 381     /* Attempt to set to a dummy account without a password */
 382     /* This test passes on WinXP but fails on Win2K */
 383     hres = ITask_SetAccountInformation(test_task, dummy_account_name, NULL);
 384     ok(hres == S_OK,
 385             "Failed setting dummy account with no password: %08x\n", hres);
 386     hres = ITask_GetAccountInformation(test_task, &account_name);
 387     ok(hres == S_OK ||
 388        broken(hres == HRESULT_FROM_WIN32(ERROR_FILE_NOT_FOUND) ||
 389               hres == SCHED_E_CANNOT_OPEN_TASK ||
 390               hres == 0x200),  /* win2k */
 391        "GetAccountInformation failed: %08x\n", hres);
 392     if (hres == S_OK)
 393     {
 394         ok(!lstrcmpW(account_name, dummy_account_name),
 395                 "Got %s, expected %s\n", wine_dbgstr_w(account_name),
 396                 wine_dbgstr_w(dummy_account_name));
 397         CoTaskMemFree(account_name);
 398     }
 399
 400     /* Attempt to set to a dummy account with a (invalid) password */
 401     /* This test passes on WinXP but fails on Win2K */
 402     hres = ITask_SetAccountInformation(test_task, dummy_account_name_b,
 403             dummy_account_name_b);
 404     ok(hres == S_OK,
 405             "Failed setting dummy account with password: %08x\n", hres);
 406     hres = ITask_GetAccountInformation(test_task, &account_name);
 407     ok(hres == S_OK ||
 408        broken(hres == HRESULT_FROM_WIN32(ERROR_FILE_NOT_FOUND) ||
 409               hres == SCHED_E_CANNOT_OPEN_TASK ||
 410               hres == 0x200),  /* win2k */
 411        "GetAccountInformation failed: %08x\n", hres);
 412     if (hres == S_OK)
 413     {
 414         ok(!lstrcmpW(account_name, dummy_account_name_b),
 415                 "Got %s, expected %s\n", wine_dbgstr_w(account_name),
 416                 wine_dbgstr_w(dummy_account_name_b));
 417         CoTaskMemFree(account_name);
 418     }
 419
 420     /* Attempt to set to the local system account */
 421     hres = ITask_SetAccountInformation(test_task, empty, NULL);
 422     ok(hres == S_OK, "Failed setting system account: %08x\n", hres);
 423     hres = ITask_GetAccountInformation(test_task, &account_name);
 424     ok(hres == S_OK ||
 425        broken(hres == HRESULT_FROM_WIN32(ERROR_FILE_NOT_FOUND) ||
 426               hres == SCHED_E_CANNOT_OPEN_TASK ||
 427               hres == 0x200),  /* win2k */
 428        "GetAccountInformation failed: %08x\n", hres);
 429     if (hres == S_OK)
 430     {
 431         ok(!lstrcmpW(account_name, empty),
 432                 "Got %s, expected empty string\n", wine_dbgstr_w(account_name));
 433         CoTaskMemFree(account_name);
 434     }
 435
 436     ITask_Release(test_task);
 437 }
 438
 439 static void test_task_state(void)
 440 {
 441     ITask *test_task;
 442     HRESULT hr, status;
 443     DWORD flags, val;
 444     WORD val1, val2;
 445     SYSTEMTIME st;
 446
 447     hr = ITaskScheduler_NewWorkItem(scheduler, task_name, &CLSID_CTask,
 448                                     &IID_ITask, (IUnknown **)&test_task);
 449     ok(hr == S_OK, "Failed to setup test_task\n");
 450
 451     if (0) /* crashes under Windows */
 452         hr = ITask_GetFlags(test_task, NULL);
 453
 454     flags = 0xdeadbeef;
 455     hr = ITask_GetFlags(test_task, &flags);
 456     ok(hr == S_OK, "GetFlags error %#x\n", hr);
 457     ok(flags == 0, "got %#x\n", flags);
 458
 459     if (0) /* crashes under Windows */
 460         hr = ITask_GetTaskFlags(test_task, NULL);
 461
 462     flags = 0xdeadbeef;
 463     hr = ITask_GetTaskFlags(test_task, &flags);
 464     ok(hr == S_OK, "GetTaskFlags error %#x\n", hr);
 465     ok(flags == 0, "got %#x\n", flags);
 466
 467     if (0) /* crashes under Windows */
 468         hr = ITask_GetStatus(test_task, NULL);
 469
 470     status = 0xdeadbeef;
 471     hr = ITask_GetStatus(test_task, &status);
 472     ok(hr == S_OK, "GetStatus error %#x\n", hr);
 473     ok(status == SCHED_S_TASK_NOT_SCHEDULED, "got %#x\n", status);
 474
 475     if (0) /* crashes under Windows */
 476         hr = ITask_GetErrorRetryCount(test_task, NULL);
 477
 478     hr = ITask_GetErrorRetryCount(test_task, &val1);
 479     ok(hr == E_NOTIMPL, "got %#x\n", hr);
 480
 481     if (0) /* crashes under Windows */
 482         hr = ITask_GetErrorRetryInterval(test_task, NULL);
 483
 484     hr = ITask_GetErrorRetryInterval(test_task, &val1);
 485     ok(hr == E_NOTIMPL, "got %#x\n", hr);
 486
 487     if (0) /* crashes under Windows */
 488         hr = ITask_GetIdleWait(test_task, NULL, NULL);
 489
 490     val1 = 0xdead;
 491     val2 = 0xbeef;
 492     hr = ITask_GetIdleWait(test_task, &val1, &val2);
 493     ok(hr == S_OK, "got %#x\n", hr);
 494     ok(val1 == 10, "got %u\n", val1);
 495     ok(val2 == 60, "got %u\n", val2);
 496
 497     if (0) /* crashes under Windows */
 498         hr = ITask_GetPriority(test_task, NULL);
 499
 500     val = 0xdeadbeef;
 501     hr = ITask_GetPriority(test_task, &val);
 502     ok(hr == S_OK, "got %#x\n", hr);
 503     ok(val == NORMAL_PRIORITY_CLASS, "got %#x\n", val);
 504
 505     if (0) /* crashes under Windows */
 506         hr = ITask_GetExitCode(test_task, NULL);
 507
 508     val = 0xdeadbeef;
 509     hr = ITask_GetExitCode(test_task, &val);
 510     ok(hr == SCHED_S_TASK_HAS_NOT_RUN, "got %#x\n", hr);
 511     ok(val == 0, "got %#x\n", val);
 512
 513     if (0) /* crashes under Windows */
 514         hr = ITask_GetMostRecentRunTime(test_task, NULL);
 515
 516     memset(&st, 0xff, sizeof(st));
 517     hr = ITask_GetMostRecentRunTime(test_task, &st);
 518     ok(hr == SCHED_S_TASK_HAS_NOT_RUN, "got %#x\n", hr);
 519     ok(st.wYear == 0, "got %u\n", st.wYear);
 520     ok(st.wMonth == 0, "got %u\n", st.wMonth);
 521     ok(st.wDay == 0, "got %u\n", st.wDay);
 522     ok(st.wHour == 0, "got %u\n", st.wHour);
 523     ok(st.wMinute == 0, "got %u\n", st.wMinute);
 524     ok(st.wSecond == 0, "got %u\n", st.wSecond);
 525
 526     ITask_Release(test_task);
 527 }
 528
 529 static void save_job(ITask *task)
 530 {
 531     HRESULT hr;
 532     IPersistFile *pfile;
 533
 534     hr = ITask_QueryInterface(task, &IID_IPersistFile, (void **)&pfile);
 535     ok(hr == S_OK, "QueryInterface error %#x\n", hr);
 536
 537     hr = IPersistFile_Save(pfile, NULL, FALSE);
 538     ok(hr == S_OK, "got %#x\n", hr);
 539
 540     IPersistFile_Release(pfile);
 541 }
 542
 543 static void test_Run(void)
 544 {
 545     static const WCHAR wine_test_runW[] = { 'w','i','n','e','_','t','e','s','t','_','r','u','n',0 };
 546     static const WCHAR cmdW[] = { 'c','m','d','.','e','x','e',0 };
 547     ITask *task;
 548     ITaskTrigger *trigger;
 549     WORD idx, i;
 550     TASK_TRIGGER trigger_data;
 551     SYSTEMTIME st;
 552     HRESULT hr, status;
 553
 554     /* cleanup after previous runs */
 555     ITaskScheduler_Delete(scheduler, wine_test_runW);
 556
 557     hr = ITaskScheduler_NewWorkItem(scheduler, wine_test_runW, &CLSID_CTask,
 558                                     &IID_ITask, (IUnknown **)&task);
 559     ok(hr == S_OK, "got %#x\n", hr);
 560
 561     hr = ITask_Run(task);
 562     ok(hr == SCHED_E_TASK_NOT_READY, "got %#x\n", hr);
 563
 564     hr = ITask_Terminate(task);
 565     ok(hr == SCHED_E_TASK_NOT_RUNNING, "got %#x\n", hr);
 566
 567     hr = ITask_GetStatus(task, &status);
 568     ok(hr == S_OK, "got %#x\n", hr);
 569     ok(status == SCHED_S_TASK_NOT_SCHEDULED, "got %#x\n", status);
 570
 571     save_job(task);
 572
 573     hr = ITask_GetStatus(task, &status);
 574     ok(hr == S_OK, "got %#x\n", hr);
 575     ok(status == SCHED_S_TASK_NOT_SCHEDULED, "got %#x\n", status);
 576
 577     hr = ITask_CreateTrigger(task, &idx, &trigger);
 578     ok(hr == S_OK, "got %#x\n", hr);
 579
 580     memset(&trigger_data, 0, sizeof(trigger_data));
 581     trigger_data.cbTriggerSize = sizeof(trigger_data);
 582     trigger_data.Reserved1 = 0;
 583     GetLocalTime(&st);
 584     trigger_data.wBeginYear = st.wYear;
 585     trigger_data.wBeginMonth = st.wMonth;
 586     trigger_data.wBeginDay = st.wDay;
 587     trigger_data.wStartHour = st.wHour;
 588     trigger_data.wStartMinute = st.wMinute;
 589     trigger_data.TriggerType = TASK_TIME_TRIGGER_WEEKLY;
 590     trigger_data.Type.Weekly.WeeksInterval = 1;
 591     trigger_data.Type.Weekly.rgfDaysOfTheWeek = 0x7f; /* every day */
 592     hr = ITaskTrigger_SetTrigger(trigger, &trigger_data);
 593     ok(hr == S_OK, "got %#x\n", hr);
 594     ITaskTrigger_Release(trigger);
 595
 596     hr = ITask_SetApplicationName(task, cmdW);
 597     ok(hr == S_OK, "got %#x\n", hr);
 598
 599     hr = ITask_SetParameters(task, empty);
 600     ok(hr == S_OK, "got %#x\n", hr);
 601
 602     hr = ITask_SetWorkingDirectory(task, empty);
 603     ok(hr == S_OK, "got %#x\n", hr);
 604
 605     /* Save the task so that the Scheduler service would notice the changes */
 606     save_job(task);
 607
 608     hr = ITask_GetStatus(task, &status);
 609     ok(hr == S_OK, "got %#x\n", hr);
 610     ok(status == SCHED_S_TASK_HAS_NOT_RUN, "got %#x\n", status);
 611
 612     hr = ITask_Run(task);
 613     ok(hr == S_OK, "got %#x\n", hr);
 614
 615     /* According to MSDN the task status doesn't update dynamically */
 616     hr = ITask_GetStatus(task, &status);
 617     ok(hr == S_OK, "got %#x\n", hr);
 618     ok(status == SCHED_S_TASK_HAS_NOT_RUN, "got %#x\n", status);
 619
 620     ITask_Release(task);
 621
 622     /* Running the process associated with the task to start up may
 623      * take quite a bit a of time, and waiting for it during the test
 624      * may be not the best idea.
 625      *
 626      * This is how it's supposed to look like in the application
 627      * (the loop should be infinite):
 628      */
 629     for (i = 0; i < 3; i++)
 630     {
 631         hr = ITaskScheduler_Activate(scheduler, wine_test_runW, &IID_ITask, (IUnknown **)&task);
 632         ok(hr == S_OK, "Activate error %#x\n", hr);
 633
 634         hr = ITask_GetStatus(task, &status);
 635         ok(hr == S_OK, "got %#x\n", hr);
 636
 637         ITask_Release(task);
 638
 639         if (status == SCHED_S_TASK_RUNNING) break;
 640
 641         Sleep(100);
 642     }
 643
 644     hr = ITaskScheduler_Activate(scheduler, wine_test_runW, &IID_ITask, (IUnknown **)&task);
 645     ok(hr == S_OK, "Activate error %#x\n", hr);
 646
 647     hr = ITask_GetStatus(task, &status);
 648     ok(hr == S_OK, "got %#x\n", hr);
 649
 650     if (status == SCHED_S_TASK_RUNNING)
 651     {
 652         hr = ITask_Terminate(task);
 653         ok(hr == S_OK, "got %#x\n", hr);
 654
 655         ITask_Release(task);
 656
 657         /* Waiting for the process associated with the task to terminate
 658          * may take quite a bit a of time, and waiting for it during the
 659          * test is not practical.
 660          *
 661          * This is how it's supposed to look like in the application
 662          * (the loop should be infinite):
 663          */
 664         for (i = 0; i < 3; i++)
 665         {
 666             hr = ITaskScheduler_Activate(scheduler, wine_test_runW, &IID_ITask, (IUnknown **)&task);
 667             ok(hr == S_OK, "Activate error %#x\n", hr);
 668
 669             hr = ITask_GetStatus(task, &status);
 670             ok(hr == S_OK, "got %#x\n", hr);
 671
 672             ITask_Release(task);
 673
 674             if (status != SCHED_S_TASK_RUNNING) break;
 675
 676             Sleep(100);
 677         }
 678     }
 679     else
 680         ITask_Release(task);
 681
 682     hr = ITaskScheduler_Delete(scheduler, wine_test_runW);
 683     ok(hr == S_OK, "got %#x\n", hr);
 684 }
 685
 686 static void test_SetFlags(void)
 687 {
 688     HRESULT hr;
 689     ITask *task;
 690     DWORD flags;
 691
 692     hr = ITaskScheduler_NewWorkItem(scheduler, task_name, &CLSID_CTask,
 693                                     &IID_ITask, (IUnknown **)&task);
 694     ok(hr == S_OK, "got %#x\n", hr);
 695
 696     hr = ITask_SetFlags(task, 0);
 697     ok(hr == S_OK, "got %#x\n", hr);
 698
 699     flags = 0xdeadbeef;
 700     hr = ITask_GetFlags(task, &flags);
 701     ok(hr == S_OK, "got %#x\n", hr);
 702     ok(flags == 0, "got %#x\n", flags);
 703
 704     hr = ITask_SetFlags(task, 0xffffffff);
 705     ok(hr == S_OK, "got %#x\n", hr);
 706
 707     flags = 0xdeadbeef;
 708     hr = ITask_GetFlags(task, &flags);
 709     ok(hr == S_OK, "got %#x\n", hr);
 710     ok(flags == 0x7fff, "got %#x\n", flags);
 711
 712     hr = ITask_SetFlags(task, 0x9234);
 713     ok(hr == S_OK, "got %#x\n", hr);
 714
 715     flags = 0xdeadbeef;
 716     hr = ITask_GetFlags(task, &flags);
 717     ok(hr == S_OK, "got %#x\n", hr);
 718     ok(flags == 0x1234, "got %#x\n", flags);
 719
 720     ITask_Release(task);
 721 }
 722
 723 static void test_workitem_data(void)
 724 {
 725     static BYTE hello[] = "Hello World!";
 726     HRESULT hr;
 727     ITask *task;
 728     WORD count;
 729     BYTE *data;
 730
 731     hr = ITaskScheduler_NewWorkItem(scheduler, task_name, &CLSID_CTask,
 732                                     &IID_ITask, (IUnknown **)&task);
 733     ok(hr == S_OK, "got %#x\n", hr);
 734
 735     if (0) /* crashes under Windows */
 736         hr = ITask_GetWorkItemData(task, &count, NULL);
 737     if (0) /* crashes under Windows */
 738         hr = ITask_GetWorkItemData(task, NULL, &data);
 739
 740     count = 0xdead;
 741     data = (BYTE *)0xdeadbeef;
 742     hr = ITask_GetWorkItemData(task, &count, &data);
 743     ok(hr == S_OK, "got %#x\n", hr);
 744     ok(count == 0, "got %u\n", count);
 745     ok(data == NULL, "got %p\n", data);
 746
 747     hr = ITask_SetWorkItemData(task, sizeof(hello), NULL);
 748     ok(hr == E_INVALIDARG, "got %#x\n", hr);
 749
 750     hr = ITask_SetWorkItemData(task, 0, hello);
 751     ok(hr == E_INVALIDARG, "got %#x\n", hr);
 752
 753     hr = ITask_SetWorkItemData(task, sizeof(hello), hello);
 754     ok(hr == S_OK, "got %#x\n", hr);
 755
 756     count = 0xdead;
 757     data = NULL;
 758     hr = ITask_GetWorkItemData(task, &count, &data);
 759     ok(hr == S_OK, "got %#x\n", hr);
 760     ok(count == sizeof(hello), "got %u\n", count);
 761     ok(data != NULL, "got NULL\n");
 762     ok(!memcmp(data, hello, sizeof(hello)), "data mismatch\n");
 763
 764     hr = ITask_SetWorkItemData(task, 0, NULL);
 765     ok(hr == S_OK, "got %#x\n", hr);
 766
 767     count = 0xdead;
 768     data = (BYTE *)0xdeadbeef;
 769     hr = ITask_GetWorkItemData(task, &count, &data);
 770     ok(hr == S_OK, "got %#x\n", hr);
 771     ok(count == 0, "got %u\n", count);
 772     ok(data == NULL, "got %p\n", data);
 773
 774     ITask_Release(task);
 775 }
 776
 777 START_TEST(task)
 778 {
 779     HRESULT hr;
 780
 781     CoInitialize(NULL);
 782     hr = CoCreateInstance(&CLSID_CTaskScheduler, NULL, CLSCTX_INPROC_SERVER,
 783                           &IID_ITaskScheduler, (void **)&scheduler);
 784     ok(hr == S_OK, "failed to create task scheduler: %#x\n", hr);
 785
 786     test_SetApplicationName_GetApplicationName();
 787     test_CreateTrigger();
 788     test_SetParameters_GetParameters();
 789     test_SetComment_GetComment();
 790     test_SetMaxRunTime_GetMaxRunTime();
 791     test_SetAccountInformation_GetAccountInformation();
 792     test_task_state();
 793     test_Run();
 794     test_SetFlags();
 795     test_workitem_data();
 796
 797     ITaskScheduler_Release(scheduler);
 798     CoUninitialize();
 799 }