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	dpavlin	28	/*
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