1/**************************************************************************
2 *
3 * Copyright 2010 VMware, Inc.
4 * All Rights Reserved.
5 *
6 * Permission is hereby granted, free of charge, to any person obtaining a
7 * copy of this software and associated documentation files (the
8 * "Software"), to deal in the Software without restriction, including
9 * without limitation the rights to use, copy, modify, merge, publish,
10 * distribute, sub license, and/or sell copies of the Software, and to
11 * permit persons to whom the Software is furnished to do so, subject to
12 * the following conditions:
13 *
14 * The above copyright notice and this permission notice (including the
15 * next paragraph) shall be included in all copies or substantial portions
16 * of the Software.
17 *
18 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
19 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
20 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NON-INFRINGEMENT.
21 * IN NO EVENT SHALL VMWARE AND/OR ITS SUPPLIERS BE LIABLE FOR
22 * ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
23 * TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
24 * SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
25 *
26 **************************************************************************/
27
28
29#include <stdlib.h>
30#include <stdio.h>
31
32#include "util/u_pointer.h"
33#include "gallivm/lp_bld.h"
34#include "gallivm/lp_bld_init.h"
35#include "gallivm/lp_bld_assert.h"
36#include "gallivm/lp_bld_printf.h"
37
38#include "lp_test.h"
39
40
41struct printf_test_case {
42   int foo;
43};
44
45void
46write_tsv_header(FILE *fp)
47{
48   fprintf(fp,
49           "result\t"
50           "format\n");
51
52   fflush(fp);
53}
54
55
56
57typedef void (*test_printf_t)(int i);
58
59
60static LLVMValueRef
61add_printf_test(struct gallivm_state *gallivm)
62{
63   LLVMModuleRef module = gallivm->module;
64   LLVMTypeRef args[1] = { LLVMIntTypeInContext(gallivm->context, 32) };
65   LLVMValueRef func = LLVMAddFunction(module, "test_printf", LLVMFunctionType(LLVMVoidTypeInContext(gallivm->context), args, 1, 0));
66   LLVMBuilderRef builder = gallivm->builder;
67   LLVMBasicBlockRef block = LLVMAppendBasicBlockInContext(gallivm->context, func, "entry");
68
69   LLVMSetFunctionCallConv(func, LLVMCCallConv);
70
71   LLVMPositionBuilderAtEnd(builder, block);
72   lp_build_printf(gallivm, "hello, world\n");
73   lp_build_printf(gallivm, "print 5 6: %d %d\n", LLVMConstInt(LLVMInt32TypeInContext(gallivm->context), 5, 0),
74				LLVMConstInt(LLVMInt32TypeInContext(gallivm->context), 6, 0));
75
76   /* Also test lp_build_assert().  This should not fail. */
77   lp_build_assert(gallivm, LLVMConstInt(LLVMInt32TypeInContext(gallivm->context), 1, 0), "assert(1)");
78
79   LLVMBuildRetVoid(builder);
80
81   gallivm_verify_function(gallivm, func);
82
83   return func;
84}
85
86
87PIPE_ALIGN_STACK
88static boolean
89test_printf(unsigned verbose, FILE *fp,
90            const struct printf_test_case *testcase)
91{
92   struct gallivm_state *gallivm;
93   LLVMValueRef test;
94   test_printf_t test_printf_func;
95   boolean success = TRUE;
96
97   gallivm = gallivm_create();
98
99   test = add_printf_test(gallivm);
100
101   gallivm_compile_module(gallivm);
102
103   test_printf_func = (test_printf_t) gallivm_jit_function(gallivm, test);
104
105   test_printf_func(0);
106
107   gallivm_free_function(gallivm, test, test_printf_func);
108
109   gallivm_destroy(gallivm);
110
111   return success;
112}
113
114
115boolean
116test_all(unsigned verbose, FILE *fp)
117{
118   boolean success = TRUE;
119
120   test_printf(verbose, fp, NULL);
121
122   return success;
123}
124
125
126boolean
127test_some(unsigned verbose, FILE *fp,
128          unsigned long n)
129{
130   return test_all(verbose, fp);
131}
132
133
134boolean
135test_single(unsigned verbose, FILE *fp)
136{
137   printf("no test_single()");
138   return TRUE;
139}
140