1 #include <stdlib.h>
2 #include <stdio.h>
3 #include <stddef.h>
4
5 #include "libgccjit.h"
6
7 #include "harness.h"
8
9 #define BUFFER_SIZE (1024)
10
11 char test_buffer[1024];
12
13 void
create_code(gcc_jit_context * ctxt,void * user_data)14 create_code (gcc_jit_context *ctxt, void *user_data)
15 {
16 /* Let's try to inject the equivalent of:
17 void test_of_array_as_pointer (const char *name)
18 {
19 snprintf (test_buffer, sizeof (test_buffer),
20 "hello %s", name);
21 }
22 */
23 gcc_jit_type *void_type =
24 gcc_jit_context_get_type (ctxt, GCC_JIT_TYPE_VOID);
25 gcc_jit_type *const_char_ptr_type =
26 gcc_jit_context_get_type (ctxt, GCC_JIT_TYPE_CONST_CHAR_PTR);
27 gcc_jit_type *char_type =
28 gcc_jit_context_get_type (ctxt, GCC_JIT_TYPE_CHAR);
29 gcc_jit_type *char_ptr_type =
30 gcc_jit_type_get_pointer (char_type);
31 gcc_jit_type *int_type =
32 gcc_jit_context_get_type (ctxt, GCC_JIT_TYPE_INT);
33 gcc_jit_type *size_t_type =
34 gcc_jit_context_get_type (ctxt, GCC_JIT_TYPE_SIZE_T);
35 gcc_jit_type *buf_type =
36 gcc_jit_context_new_array_type (ctxt, NULL, char_type, BUFFER_SIZE);
37
38 /* extern int snprintf(char *str, size_t size, const char *format, ...); */
39 gcc_jit_param *param_s =
40 gcc_jit_context_new_param (ctxt, NULL, char_ptr_type, "s");
41 gcc_jit_param *param_n =
42 gcc_jit_context_new_param (ctxt, NULL, size_t_type, "n");
43 gcc_jit_param *param_format =
44 gcc_jit_context_new_param (ctxt, NULL, const_char_ptr_type, "format");
45 gcc_jit_param *snprintf_params[3] = {param_s, param_n, param_format};
46 gcc_jit_function *snprintf =
47 gcc_jit_context_new_function (ctxt, NULL,
48 GCC_JIT_FUNCTION_IMPORTED,
49 int_type,
50 "snprintf",
51 3, snprintf_params,
52 1);
53
54 gcc_jit_param *param_name =
55 gcc_jit_context_new_param (ctxt, NULL, const_char_ptr_type, "name");
56 gcc_jit_function *test_fn =
57 gcc_jit_context_new_function (ctxt, NULL,
58 GCC_JIT_FUNCTION_EXPORTED,
59 void_type,
60 "test_of_array_as_pointer",
61 1, ¶m_name,
62 0);
63
64 gcc_jit_lvalue *buffer =
65 gcc_jit_context_new_global (ctxt, NULL,
66 GCC_JIT_GLOBAL_IMPORTED,
67 buf_type,
68 "test_buffer");
69
70 gcc_jit_block *block = gcc_jit_function_new_block(test_fn, "entry");
71
72 /* snprintf(buffer, sizeof(buffer), "hello %s", name); */
73 gcc_jit_rvalue *args[4];
74 args[0] = gcc_jit_context_new_cast (
75 ctxt, NULL,
76 /* Here's the difference with test-array-as-pointer.c: */
77 gcc_jit_lvalue_as_rvalue (buffer),
78 char_ptr_type);
79 args[1] = gcc_jit_context_new_rvalue_from_int (ctxt,
80 size_t_type,
81 BUFFER_SIZE);
82 args[2] = gcc_jit_context_new_string_literal (ctxt, "hello %s");
83 args[3] = gcc_jit_param_as_rvalue (param_name);
84
85 gcc_jit_block_add_eval (
86 block, NULL,
87 gcc_jit_context_new_call (ctxt, NULL, snprintf, 4, args));
88 gcc_jit_block_end_with_void_return (block, NULL);
89 }
90
91 void
verify_code(gcc_jit_context * ctxt,gcc_jit_result * result)92 verify_code (gcc_jit_context *ctxt, gcc_jit_result *result)
93 {
94 CHECK_VALUE (result, NULL);
95
96 /* Verify that the correct error message was emitted. */
97 CHECK_STRING_VALUE (gcc_jit_context_get_first_error (ctxt),
98 "gcc_jit_context_new_cast:"
99 " cannot cast test_buffer"
100 " from type: char[1024]"
101 " to type: char *");
102 }
103