Fixed tests of GetAcceptLanguagesA for win2k and win XP.
[wine] / dlls / shlwapi / tests / ordinal.c
1 /* Unit test suite for SHLWAPI ordinal functions
2  *
3  * Copyright 2004 Jon Griffiths
4  *
5  * This library is free software; you can redistribute it and/or
6  * modify it under the terms of the GNU Lesser General Public
7  * License as published by the Free Software Foundation; either
8  * version 2.1 of the License, or (at your option) any later version.
9  *
10  * This library is distributed in the hope that it will be useful,
11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13  * Lesser General Public License for more details.
14  *
15  * You should have received a copy of the GNU Lesser General Public
16  * License along with this library; if not, write to the Free Software
17  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
18  */
19
20 #include <stdlib.h>
21 #include <stdio.h>
22
23 #include "wine/test.h"
24 #include "winbase.h"
25 #include "winerror.h"
26 #include "winuser.h"
27 #define NO_SHLWAPI_REG
28 #define NO_SHLWAPI_PATH
29 #define NO_SHLWAPI_GDI
30 #define NO_SHLWAPI_STREAM
31 #include "shlwapi.h"
32
33 /* Function ptrs for ordinal calls */
34 static HMODULE hShlwapi;
35 static int (WINAPI *pSHSearchMapInt)(const int*,const int*,int,int);
36 static HRESULT (WINAPI *pGetAcceptLanguagesA)(LPSTR,LPDWORD);
37
38 static void test_GetAcceptLanguagesA(void)
39 {   HRESULT retval;
40     DWORD buffersize, buffersize2, exactsize;
41     char buffer[100];
42
43     if (!pGetAcceptLanguagesA)
44         return;
45
46     buffersize = sizeof(buffer);
47     memset(buffer, 0, sizeof(buffer));
48     SetLastError(ERROR_SUCCESS);
49     retval = pGetAcceptLanguagesA( buffer, &buffersize);
50     trace("GetAcceptLanguagesA: retval %08lx, size %08lx, buffer (%s),"
51         " last error %ld\n", retval, buffersize, buffer, GetLastError());
52     if(retval != S_OK) {
53         trace("GetAcceptLanguagesA: skipping tests\n");
54         return;
55     }
56     ok( (ERROR_NO_IMPERSONATION_TOKEN == GetLastError()) || 
57         (ERROR_CLASS_DOES_NOT_EXIST == GetLastError()) ||
58         (ERROR_SUCCESS == GetLastError()), "last error set to %ld\n", GetLastError());
59     exactsize = strlen(buffer);
60
61     SetLastError(ERROR_SUCCESS);
62     retval = pGetAcceptLanguagesA( NULL, NULL);
63     ok(retval == E_FAIL,
64        "function result wrong: got %08lx; expected E_FAIL\n", retval);
65     ok(ERROR_SUCCESS == GetLastError(), "last error set to %ld\n", GetLastError());
66
67     buffersize = sizeof(buffer);
68     SetLastError(ERROR_SUCCESS);
69     retval = pGetAcceptLanguagesA( NULL, &buffersize);
70     ok(retval == E_FAIL,
71        "function result wrong: got %08lx; expected E_FAIL\n", retval);
72     ok(buffersize == sizeof(buffer),
73        "buffersize was changed (2nd parameter; not on Win2k)\n");
74     ok(ERROR_SUCCESS == GetLastError(), "last error set to %ld\n", GetLastError());
75
76     SetLastError(ERROR_SUCCESS);
77     retval = pGetAcceptLanguagesA( buffer, NULL);
78     ok(retval == E_FAIL,
79        "function result wrong: got %08lx; expected E_FAIL\n", retval);
80     ok(ERROR_SUCCESS == GetLastError(), "last error set to %ld\n", GetLastError());
81
82     buffersize = 0;
83     memset(buffer, 0, sizeof(buffer));
84     SetLastError(ERROR_SUCCESS);
85     retval = pGetAcceptLanguagesA( buffer, &buffersize);
86     ok(retval == E_FAIL,
87        "function result wrong: got %08lx; expected E_FAIL\n", retval);
88     ok(buffersize == 0,
89        "buffersize wrong(changed) got %08lx; expected 0 (2nd parameter; not on Win2k)\n", buffersize);
90     ok(ERROR_SUCCESS == GetLastError(), "last error set to %ld\n", GetLastError());
91
92     buffersize = buffersize2 = 1;
93     memset(buffer, 0, sizeof(buffer));
94     retval = pGetAcceptLanguagesA( buffer, &buffersize);
95     ok(retval == E_INVALIDARG, "function result wrong: got %08lx; expected E_INVALIDARG\n", retval);
96     ok(buffersize == 0,
97                  "buffersize wrong: got %08lx, expected 0 (2nd parameter;Win2k)\n", buffersize);
98     ok(ERROR_INSUFFICIENT_BUFFER == GetLastError(),
99                  "last error wrong: got %08lx; expected ERROR_INSUFFICIENT_BUFFER\n", GetLastError());
100     ok(buffersize2 == strlen(buffer),
101                  "buffer content (length) wrong: got %08x, expected %08lx \n", strlen(buffer), buffersize2);
102
103     buffersize = buffersize2 = exactsize;
104     memset(buffer, 0, sizeof(buffer));
105     SetLastError(ERROR_SUCCESS);
106     retval = pGetAcceptLanguagesA( buffer, &buffersize);
107     ok(retval == E_INVALIDARG, "function result wrong: got %08lx; expected E_INVALIDARG\n", retval);
108     ok(buffersize == 0,
109                  "buffersize wrong: got %08lx, expected 0 (2nd parameter;Win2k)\n", buffersize);
110     ok(ERROR_INSUFFICIENT_BUFFER == GetLastError(),
111                  "last error wrong: got %08lx; expected ERROR_INSUFFICIENT_BUFFER\n", GetLastError());
112     ok(buffersize2 == strlen(buffer),
113        "buffer content (length) wrong: got %08x, expected %08lx \n", strlen(buffer), buffersize2);
114 }
115
116 static void test_SHSearchMapInt(void)
117 {
118   int keys[8], values[8];
119   int i = 0;
120
121   if (!pSHSearchMapInt)
122     return;
123
124   memset(keys, 0, sizeof(keys));
125   memset(values, 0, sizeof(values));
126   keys[0] = 99; values[0] = 101;
127
128   /* NULL key/value lists crash native, so skip testing them */
129
130   /* 1 element */
131   i = pSHSearchMapInt(keys, values, 1, keys[0]);
132   ok(i == values[0], "Len 1, expected %d, got %d\n", values[0], i);
133
134   /* Key doesn't exist */
135   i = pSHSearchMapInt(keys, values, 1, 100);
136   ok(i == -1, "Len 1 - bad key, expected -1, got %d\n", i);
137
138   /* Len = 0 => not found */
139   i = pSHSearchMapInt(keys, values, 0, keys[0]);
140   ok(i == -1, "Len 1 - passed len 0, expected -1, got %d\n", i);
141
142   /* 2 elements, len = 1 */
143   keys[1] = 98; values[1] = 102;
144   i = pSHSearchMapInt(keys, values, 1, keys[1]);
145   ok(i == -1, "Len 1 - array len 2, expected -1, got %d\n", i);
146
147   /* 2 elements, len = 2 */
148   i = pSHSearchMapInt(keys, values, 2, keys[1]);
149   ok(i == values[1], "Len 2, expected %d, got %d\n", values[1], i);
150
151   /* Searches forward */
152   keys[2] = 99; values[2] = 103;
153   i = pSHSearchMapInt(keys, values, 3, keys[0]);
154   ok(i == values[0], "Len 3, expected %d, got %d\n", values[0], i);
155 }
156
157
158 START_TEST(ordinal)
159 {
160   hShlwapi = LoadLibraryA("shlwapi.dll");
161   ok(hShlwapi != 0, "LoadLibraryA failed\n");
162   if (!hShlwapi)
163     return;
164
165   pGetAcceptLanguagesA = (void*)GetProcAddress(hShlwapi, (LPSTR)14);
166   pSHSearchMapInt = (void*)GetProcAddress(hShlwapi, (LPSTR)198);
167
168   test_GetAcceptLanguagesA();
169   test_SHSearchMapInt();
170   FreeLibrary(hShlwapi);
171 }