git.oblomov.eu Git - wine/blob - dlls/urlmon/tests/url.c

   1 /*
   2  * UrlMon URL tests
   3  *
   4  * Copyright 2004 Kevin Koltzau
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  19  */
  20
  21 #include <stdarg.h>
  22 #include "windef.h"
  23 #include "winbase.h"
  24 #include "urlmon.h"
  25
  26 #include "wine/test.h"
  27
  28 const WCHAR TEST_URL_1[] = {'h','t','t','p',':','/','/','w','w','w','.','w','i','n','e','h','q','.','o','r','g','/','\0'};
  29 const WCHAR TEST_PART_URL_1[] = {'/','t','e','s','t','/','\0'};
  30
  31 static void test_CreateURLMoniker(LPCWSTR url1, LPCWSTR url2)
  32 {
  33     HRESULT hr;
  34     IMoniker *mon1 = NULL;
  35     IMoniker *mon2 = NULL;
  36
  37     hr = CreateURLMoniker(NULL, url1, &mon1);
  38     ok(SUCCEEDED(hr), "failed to create moniker: 0x%08lx\n", hr);
  39     if(SUCCEEDED(hr)) {
  40         hr = CreateURLMoniker(mon1, url2, &mon2);
  41         ok(SUCCEEDED(hr), "failed to create moniker: 0x%08lx\n", hr);
  42     }
  43     if(mon1) IMoniker_Release(mon1);
  44     if(mon2) IMoniker_Release(mon2);
  45 }
  46
  47 static void test_create()
  48 {
  49     test_CreateURLMoniker(TEST_URL_1, TEST_PART_URL_1);
  50 }
  51
  52 START_TEST(url)
  53 {
  54     test_create();
  55 }