← Back to branch summary

~ubuntu-branches/ubuntu/saucy/mozjs17/saucy

« back to all changes in this revision

Viewing changes to js/src/ctypes/libffi/testsuite/libffi.call/cls_pointer.c

  • Committer: Package Import Robot
  • Author(s): Rico Tzschichholz
  • Date: 2013-05-25 12:24:23 UTC
  • Revision ID: package-import@ubuntu.com-20130525122423-zmxucrhtensw90xy
Tags: upstream-17.0.0
Import upstream version 17.0.0

Show diffs side-by-side

added added

removed removed

Lines of Context:
js/src/ctypes/libffi/testsuite/libffi.call/cls_pointer.c
 
1
/* Area:                ffi_call, closure_call
 
2
   Purpose:             Check pointer arguments.
 
3
   Limitations: none.
 
4
   PR:                  none.
 
5
   Originator:  Blake Chaffin 6/6/2007  */
 
6
 
 
7
/* { dg-do run { xfail strongarm*-*-* xscale*-*-* } } */
 
8
#include "ffitest.h"
 
9
 
 
10
void* cls_pointer_fn(void* a1, void* a2)
 
11
{
 
12
        void*   result  = (void*)((intptr_t)a1 + (intptr_t)a2);
 
13
 
 
14
        printf("0x%08x 0x%08x: 0x%08x\n", 
 
15
               (unsigned int)(uintptr_t) a1,
 
16
               (unsigned int)(uintptr_t) a2,
 
17
               (unsigned int)(uintptr_t) result);
 
18
 
 
19
        return result;
 
20
}
 
21
 
 
22
static void
 
23
cls_pointer_gn(ffi_cif* cif __UNUSED__, void* resp, 
 
24
               void** args, void* userdata __UNUSED__)
 
25
{
 
26
        void*   a1      = *(void**)(args[0]);
 
27
        void*   a2      = *(void**)(args[1]);
 
28
 
 
29
        *(void**)resp = cls_pointer_fn(a1, a2);
 
30
}
 
31
 
 
32
int main (void)
 
33
{
 
34
        ffi_cif cif;
 
35
        void *code;
 
36
        ffi_closure*    pcl = ffi_closure_alloc(sizeof(ffi_closure), &code);
 
37
        void*                   args[3];
 
38
//      ffi_type                cls_pointer_type;
 
39
        ffi_type*               arg_types[3];
 
40
 
 
41
/*      cls_pointer_type.size = sizeof(void*);
 
42
        cls_pointer_type.alignment = 0;
 
43
        cls_pointer_type.type = FFI_TYPE_POINTER;
 
44
        cls_pointer_type.elements = NULL;*/
 
45
 
 
46
        void*   arg1    = (void*)0x12345678;
 
47
        void*   arg2    = (void*)0x89abcdef;
 
48
        ffi_arg res             = 0;
 
49
 
 
50
        arg_types[0] = &ffi_type_pointer;
 
51
        arg_types[1] = &ffi_type_pointer;
 
52
        arg_types[2] = NULL;
 
53
 
 
54
        CHECK(ffi_prep_cif(&cif, FFI_DEFAULT_ABI, 2, &ffi_type_pointer,
 
55
                arg_types) == FFI_OK);
 
56
 
 
57
        args[0] = &arg1;
 
58
        args[1] = &arg2;
 
59
        args[2] = NULL;
 
60
 
 
61
        ffi_call(&cif, FFI_FN(cls_pointer_fn), &res, args);
 
62
        /* { dg-output "0x12345678 0x89abcdef: 0x9be02467" } */
 
63
        printf("res: 0x%08x\n", (unsigned int) res);
 
64
        /* { dg-output "\nres: 0x9be02467" } */
 
65
 
 
66
        CHECK(ffi_prep_closure_loc(pcl, &cif, cls_pointer_gn, NULL, code) == FFI_OK);
 
67
 
 
68
        res = (ffi_arg)((void*(*)(void*, void*))(code))(arg1, arg2);
 
69
        /* { dg-output "\n0x12345678 0x89abcdef: 0x9be02467" } */
 
70
        printf("res: 0x%08x\n", (unsigned int) res);
 
71
        /* { dg-output "\nres: 0x9be02467" } */
 
72
 
 
73
        exit(0);
 
74
}