msvcp100: Added _Container_base12 class tests.

dlls/msvcp100/tests/Makefile.in

@@ -4,6 +4,7 @@ MODCFLAGS = @BUILTINFLAG@
 EXTRAINCL = -I$(top_srcdir)/include/msvcrt
 
 C_SRCS = \
+	misc.c \
 	string.c
 
 @MAKE_TEST_RULES@

dlls/msvcp100/tests/misc.c

+/*
+ * Copyright 2012 Piotr Caban for CodeWeavers
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public
+ * License as published by the Free Software Foundation; either
+ * version 2.1 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
+ */
+
+#include <stdio.h>
+
+#include <windef.h>
+#include <winbase.h>
+#include "wine/test.h"
+
+struct __Container_proxy;
+
+typedef struct {
+    struct __Container_proxy *proxy;
+} _Container_base12;
+
+typedef struct __Iterator_base12 {
+    struct __Container_proxy *proxy;
+    struct __Iterator_base12 *next;
+} _Iterator_base12;
+
+typedef struct __Container_proxy {
+    const _Container_base12 *cont;
+    _Iterator_base12 *head;
+} _Container_proxy;
+
+#undef __thiscall
+#ifdef __i386__
+#define __thiscall __stdcall
+#else
+#define __thiscall __cdecl
+#endif
+
+static _Container_base12* (__thiscall *p__Container_base12_copy_ctor)(_Container_base12*, _Container_base12*);
+static _Container_base12* (__thiscall *p__Container_base12_ctor)(_Container_base12*);
+static void (__thiscall *p__Container_base12__Orphan_all)(_Container_base12*);
+static void (__thiscall *p__Container_base12_dtor)(_Container_base12*);
+static _Iterator_base12** (__thiscall *p__Container_base12__Getpfirst)(_Container_base12*);
+static void (__thiscall *p__Container_base12__Swap_all)(_Container_base12*, _Container_base12*);
+
+/* Emulate a __thiscall */
+#ifdef __i386__
+
+#include "pshpack1.h"
+struct thiscall_thunk
+{
+    BYTE pop_eax;    /* popl  %eax (ret addr) */
+    BYTE pop_edx;    /* popl  %edx (func) */
+    BYTE pop_ecx;    /* popl  %ecx (this) */
+    BYTE push_eax;   /* pushl %eax */
+    WORD jmp_edx;    /* jmp  *%edx */
+};
+#include "poppack.h"
+
+static void * (WINAPI *call_thiscall_func1)( void *func, void *this );
+static void * (WINAPI *call_thiscall_func2)( void *func, void *this, const void *a );
+
+static void init_thiscall_thunk(void)
+{
+    struct thiscall_thunk *thunk = VirtualAlloc( NULL, sizeof(*thunk),
+            MEM_COMMIT, PAGE_EXECUTE_READWRITE );
+    thunk->pop_eax  = 0x58;   /* popl  %eax */
+    thunk->pop_edx  = 0x5a;   /* popl  %edx */
+    thunk->pop_ecx  = 0x59;   /* popl  %ecx */
+    thunk->push_eax = 0x50;   /* pushl %eax */
+    thunk->jmp_edx  = 0xe2ff; /* jmp  *%edx */
+    call_thiscall_func1 = (void *)thunk;
+    call_thiscall_func2 = (void *)thunk;
+}
+
+#define call_func1(func,_this) call_thiscall_func1(func,_this)
+#define call_func2(func,_this,a) call_thiscall_func2(func,_this,(const void*)a)
+
+#else
+
+#define init_thiscall_thunk()
+#define call_func1(func,_this) func(_this)
+#define call_func2(func,_this,a) func(_this,a)
+
+#endif /* __i386__ */
+
+#define SETNOFAIL(x,y) x = (void*)GetProcAddress(msvcp,y)
+#define SET(x,y) do { SETNOFAIL(x,y); ok(x != NULL, "Export '%s' not found\n", y); } while(0)
+static BOOL init(void)
+{
+    HMODULE msvcp = LoadLibraryA("msvcp100.dll");
+    if(!msvcp) {
+        win_skip("msvcp100.dll not installed\n");
+        return FALSE;
+    }
+
+    if(sizeof(void*) == 8) { /* 64-bit initialization */
+        SET(p__Container_base12_copy_ctor, "??0_Container_base12@std@@QEAA@AEBU01@@Z");
+        SET(p__Container_base12_ctor, "??0_Container_base12@std@@QEAA@XZ");
+        SET(p__Container_base12__Orphan_all, "?_Orphan_all@_Container_base12@std@@QEAAXXZ");
+        SET(p__Container_base12_dtor, "??1_Container_base12@std@@QEAA@XZ");
+        SET(p__Container_base12__Getpfirst, "?_Getpfirst@_Container_base12@std@@QEBAPEAPEAU_Iterator_base12@2@XZ");
+        SET(p__Container_base12__Swap_all, "?_Swap_all@_Container_base12@std@@QEAAXAEAU12@@Z");
+    }else {
+        SET(p__Container_base12_copy_ctor, "??0_Container_base12@std@@QAE@ABU01@@Z");
+        SET(p__Container_base12_ctor, "??0_Container_base12@std@@QAE@XZ");
+        SET(p__Container_base12__Orphan_all, "?_Orphan_all@_Container_base12@std@@QAEXXZ");
+        SET(p__Container_base12_dtor, "??1_Container_base12@std@@QAE@XZ");
+        SET(p__Container_base12__Getpfirst, "?_Getpfirst@_Container_base12@std@@QBEPAPAU_Iterator_base12@2@XZ");
+        SET(p__Container_base12__Swap_all, "?_Swap_all@_Container_base12@std@@QAEXAAU12@@Z");
+    }
+
+    init_thiscall_thunk();
+    return TRUE;
+}
+
+static void test__Container_base12(void)
+{
+    _Container_base12 c1, c2;
+    _Iterator_base12 i1, i2, **pi;
+    _Container_proxy p1, p2;
+
+    call_func1(p__Container_base12_ctor, &c1);
+    ok(c1.proxy == NULL, "c1.proxy != NULL\n");
+
+    p1.cont = NULL;
+    p1.head = NULL;
+    c1.proxy = &p1;
+    call_func2(p__Container_base12_copy_ctor, &c2, &c1);
+    ok(c1.proxy == &p1, "c1.proxy = %p, expected %p\n", c1.proxy, &p1);
+    ok(c2.proxy == NULL, "c2.proxy != NULL\n");
+
+    p1.head = &i1;
+    i1.proxy = &p1;
+    i1.next = &i2;
+    i2.proxy = &p1;
+    i2.next = NULL;
+    pi = call_func1(p__Container_base12__Getpfirst, &c1);
+    ok(pi == &p1.head, "pi = %p, expected %p\n", pi, &p1.head);
+    pi = call_func1(p__Container_base12__Getpfirst, &c2);
+    ok(pi == NULL, "pi != NULL\n");
+
+    p1.cont = &c1;
+    call_func1(p__Container_base12_dtor, &c1);
+    ok(p1.cont == &c1, "p1.cont = %p, expected %p\n", p1.cont, &c1);
+    ok(p1.head == &i1, "p1.head = %p, expected %p\n", p1.head, &i1);
+    ok(i1.proxy == &p1, "i1.proxy = %p, expected %p\n", i1.proxy, &p1);
+    ok(i1.next == &i2, "i1.next = %p, expected %p\n", i1.next, &i2);
+    ok(i2.proxy == &p1, "i2.proxy = %p, expected %p\n", i2.proxy, &p1);
+    ok(i2.next == NULL, "i2.next != NULL\n");
+
+    call_func1(p__Container_base12__Orphan_all, &c1);
+    ok(p1.cont == &c1, "p1.cont = %p, expected %p\n", p1.cont, &c1);
+    ok(p1.head == &i1, "p1.head = %p, expected %p\n", p1.head, &i1);
+    ok(i1.proxy == &p1, "i1.proxy = %p, expected %p\n", i1.proxy, &p1);
+    ok(i1.next == &i2, "i1.next = %p, expected %p\n", i1.next, &i2);
+    ok(i2.proxy == &p1, "i2.proxy = %p, expected %p\n", i2.proxy, &p1);
+    ok(i2.next == NULL, "i2.next != NULL\n");
+
+    c2.proxy = NULL;
+    call_func2(p__Container_base12__Swap_all, &c1, &c2);
+    ok(c1.proxy == NULL, "c1.proxy != NULL\n");
+    ok(c2.proxy == &p1, "c2.proxy = %p, expected %p\n", c2.proxy, &p2);
+    ok(p1.cont == &c2, "p1.cont = %p, expected %p\n", p1.cont, &c2);
+
+    c1.proxy = &p2;
+    p2.cont = (void*)0xdeadbeef;
+    p2.head = (void*)0xdeadbeef;
+    p1.head = &i1;
+    call_func2(p__Container_base12__Swap_all, &c1, &c2);
+    ok(c1.proxy == &p1, "c1.proxt = %p, expected %p\n", c1.proxy, &p1);
+    ok(p1.cont == &c1, "p1.cont = %p, expected %p\n", p1.cont, &c1);
+    ok(p1.head == &i1, "p1.head = %p, expected %p\n", p1.head, &i1);
+    ok(c2.proxy == &p2, "c2.proxy = %p, expected %p\n", c2.proxy, &p2);
+    ok(p2.cont == &c2, "p2.cont = %p, expected %p\n", p2.cont, &c2);
+    ok(p2.head == (void*)0xdeadbeef, "p2.head = %p, expected 0xdeadbeef\n", p2.head);
+}
+
+START_TEST(misc)
+{
+    if(!init())
+        return;
+
+    test__Container_base12();
+}