src/cpus/generate_sparc_loadstore.c

/*
 *  Copyright (C) 2006  Anders Gavare.  All rights reserved.
 *
 *  Redistribution and use in source and binary forms, with or without
 *  modification, are permitted provided that the following conditions are met:
 *
 *  1. Redistributions of source code must retain the above copyright
 *     notice, this list of conditions and the following disclaimer.
 *  2. Redistributions in binary form must reproduce the above copyright
 *     notice, this list of conditions and the following disclaimer in the
 *     documentation and/or other materials provided with the distribution.
 *  3. The name of the author may not be used to endorse or promote products
 *     derived from this software without specific prior written permission.
 *
 *  THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
 *  ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 *  IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 *  ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
 *  FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
 *  DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
 *  OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 *  HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
 *  LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
 *  OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 *  SUCH DAMAGE.
 *
 *
 *  $Id: generate_sparc_loadstore.c,v 1.1 2006/07/02 11:01:20 debug Exp $
 */

#include <stdio.h>
#include <string.h>


void print_function_name(int use_imm, int store, int size, int signedness)
{
        if (use_imm)
                printf("i");
        if (store)
                printf("s");
        else {
                printf("l");
                if (!signedness)
                        printf("u");
        }
        printf("%i", 1 << size);
}


void loadstore(int mode32, int use_imm, int store, int size, int signedness)
{
        if (store && signedness)
                return;

        printf("#if%sdef MODE32\n", mode32? "" : "n");

        if (use_imm)
                printf("#define LS_USE_IMM\n");

        if (store)
                printf("#define LS_STORE\n");
        else
                printf("#define LS_LOAD\n");

        printf("#define LS_N sparc%s_instr_", mode32? "32" : "");
        print_function_name(use_imm, store, size, signedness);
        printf("\n");

        printf("#define LS_GENERIC_N sparc%s_generic_", mode32? "32" : "");
        print_function_name(use_imm, store, size, signedness);
        printf("\n");

        printf("#define LS_%i\n", 1 << size);
        printf("#define LS_SIZE %i\n", 1 << size);

        if (signedness && !store)
                printf("#define LS_SIGNED\n");

        printf("#include \"cpu_sparc_instr_loadstore.c\"\n");

        if (signedness && !store)
                printf("#undef LS_SIGNED\n");

        printf("#undef LS_SIZE\n");
        printf("#undef LS_%i\n", 1 << size);

        printf("#undef LS_GENERIC_N\n");
        printf("#undef LS_N\n");

        if (store)
                printf("#undef LS_STORE\n");
        else
                printf("#undef LS_LOAD\n");

        if (use_imm)
                printf("#undef LS_USE_IMM\n");

        printf("#endif\n");
}


int main(int argc, char *argv[])
{
        int store, mode32, size, signedness, use_imm;

        printf("\n/*  AUTOMATICALLY GENERATED! Do not edit.  */\n\n");

        for (mode32=0; mode32<=1; mode32++)
           for (use_imm=0; use_imm<=1; use_imm++)
              for (store=0; store<=1; store++)
                for (size=0; size<=3; size++)
                    for (signedness=0; signedness<=1; signedness++)
                        loadstore(mode32, use_imm, store, size, signedness);

        /*  Array of pointers to fast load/store functions:  */
        for (mode32=0; mode32<=1; mode32++) {
                printf("#if%sdef MODE32\n", mode32? "" : "n");
                printf("\n\nvoid (*sparc%s_loadstore[32])(struct cpu *, struct "
                    "sparc_instr_call *) = {\n", mode32? "32" : "");
                for (use_imm=0; use_imm<=1; use_imm++)
                   for (store=0; store<=1; store++)
                     for (size=0; size<=3; size++)
                        for (signedness=0; signedness<=1; signedness++) {
                                if (store || size || signedness || use_imm)
                                        printf(",\n");

                                if (store && signedness) {
                                        printf("\tsparc%s_instr_invalid",
                                            mode32? "32" : "");
                                        continue;
                                }

                                printf("\tsparc%s_instr_", mode32? "32" : "");
                                print_function_name(use_imm, store,
                                    size, signedness);
                        }
                printf(" };\n");
                printf("#endif\n");
        }

        return 0;
}

1	/*
2	* Copyright (C) 2006 Anders Gavare. All rights reserved.
3	*
4	* Redistribution and use in source and binary forms, with or without
5	* modification, are permitted provided that the following conditions are met:
6	*
7	* 1. Redistributions of source code must retain the above copyright
8	* notice, this list of conditions and the following disclaimer.
9	* 2. Redistributions in binary form must reproduce the above copyright
10	* notice, this list of conditions and the following disclaimer in the
11	* documentation and/or other materials provided with the distribution.
12	* 3. The name of the author may not be used to endorse or promote products
13	* derived from this software without specific prior written permission.
14	*
15	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
16	* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17	* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18	* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
19	* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
20	* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
21	* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22	* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
23	* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24	* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
25	* SUCH DAMAGE.
26	*
27	*
28	* $Id: generate_sparc_loadstore.c,v 1.1 2006/07/02 11:01:20 debug Exp $
29	*/
30
31	#include <stdio.h>
32	#include <string.h>
33
34
35	void print_function_name(int use_imm, int store, int size, int signedness)
36	{
37	if (use_imm)
38	printf("i");
39	if (store)
40	printf("s");
41	else {
42	printf("l");
43	if (!signedness)
44	printf("u");
45	}
46	printf("%i", 1 << size);
47	}
48
49
50	void loadstore(int mode32, int use_imm, int store, int size, int signedness)
51	{
52	if (store && signedness)
53	return;
54
55	printf("#if%sdef MODE32\n", mode32? "" : "n");
56
57	if (use_imm)
58	printf("#define LS_USE_IMM\n");
59
60	if (store)
61	printf("#define LS_STORE\n");
62	else
63	printf("#define LS_LOAD\n");
64
65	printf("#define LS_N sparc%s_instr_", mode32? "32" : "");
66	print_function_name(use_imm, store, size, signedness);
67	printf("\n");
68
69	printf("#define LS_GENERIC_N sparc%s_generic_", mode32? "32" : "");
70	print_function_name(use_imm, store, size, signedness);
71	printf("\n");
72
73	printf("#define LS_%i\n", 1 << size);
74	printf("#define LS_SIZE %i\n", 1 << size);
75
76	if (signedness && !store)
77	printf("#define LS_SIGNED\n");
78
79	printf("#include \"cpu_sparc_instr_loadstore.c\"\n");
80
81	if (signedness && !store)
82	printf("#undef LS_SIGNED\n");
83
84	printf("#undef LS_SIZE\n");
85	printf("#undef LS_%i\n", 1 << size);
86
87	printf("#undef LS_GENERIC_N\n");
88	printf("#undef LS_N\n");
89
90	if (store)
91	printf("#undef LS_STORE\n");
92	else
93	printf("#undef LS_LOAD\n");
94
95	if (use_imm)
96	printf("#undef LS_USE_IMM\n");
97
98	printf("#endif\n");
99	}
100
101
102	int main(int argc, char *argv[])
103	{
104	int store, mode32, size, signedness, use_imm;
105
106	printf("\n/* AUTOMATICALLY GENERATED! Do not edit. */\n\n");
107
108	for (mode32=0; mode32<=1; mode32++)
109	for (use_imm=0; use_imm<=1; use_imm++)
110	for (store=0; store<=1; store++)
111	for (size=0; size<=3; size++)
112	for (signedness=0; signedness<=1; signedness++)
113	loadstore(mode32, use_imm, store, size, signedness);
114
115	/* Array of pointers to fast load/store functions: */
116	for (mode32=0; mode32<=1; mode32++) {
117	printf("#if%sdef MODE32\n", mode32? "" : "n");
118	printf("\n\nvoid (sparc%s_loadstore[32])(struct cpu , struct "
119	"sparc_instr_call *) = {\n", mode32? "32" : "");
120	for (use_imm=0; use_imm<=1; use_imm++)
121	for (store=0; store<=1; store++)
122	for (size=0; size<=3; size++)
123	for (signedness=0; signedness<=1; signedness++) {
124	if (store \|\| size \|\| signedness \|\| use_imm)
125	printf(",\n");
126
127	if (store && signedness) {
128	printf("\tsparc%s_instr_invalid",
129	mode32? "32" : "");
130	continue;
131	}
132
133	printf("\tsparc%s_instr_", mode32? "32" : "");
134	print_function_name(use_imm, store,
135	size, signedness);
136	}
137	printf(" };\n");
138	printf("#endif\n");
139	}
140
141	return 0;
142	}
143