annotate gcc/config/avr/gen-avr-mmcu-texi.c @ 158:494b0b89df80 default tip

...
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Mon, 25 May 2020 18:13:55 +0900
parents 1830386684a0
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
145
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
1 /* Copyright (C) 2012-2020 Free Software Foundation, Inc.
111
kono
parents:
diff changeset
2 Contributed by Georg-Johann Lay (avr@gjlay.de)
kono
parents:
diff changeset
3
kono
parents:
diff changeset
4 This file is part of GCC.
kono
parents:
diff changeset
5
kono
parents:
diff changeset
6 GCC is free software; you can redistribute it and/or modify
kono
parents:
diff changeset
7 it under the terms of the GNU General Public License as published by
kono
parents:
diff changeset
8 the Free Software Foundation; either version 3, or (at your option)
kono
parents:
diff changeset
9 any later version.
kono
parents:
diff changeset
10
kono
parents:
diff changeset
11 GCC is distributed in the hope that it will be useful,
kono
parents:
diff changeset
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
kono
parents:
diff changeset
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
kono
parents:
diff changeset
14 GNU General Public License for more details.
kono
parents:
diff changeset
15
kono
parents:
diff changeset
16 You should have received a copy of the GNU General Public License
kono
parents:
diff changeset
17 along with GCC; see the file COPYING3. If not see
kono
parents:
diff changeset
18 <http://www.gnu.org/licenses/>. */
kono
parents:
diff changeset
19
kono
parents:
diff changeset
20 #include <stdlib.h>
kono
parents:
diff changeset
21 #include <stdio.h>
kono
parents:
diff changeset
22 #include <string.h>
kono
parents:
diff changeset
23
kono
parents:
diff changeset
24 #define IN_GEN_AVR_MMCU_TEXI
kono
parents:
diff changeset
25
kono
parents:
diff changeset
26 #include "avr-devices.c"
kono
parents:
diff changeset
27
145
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
28 static const avr_mcu_t*
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
29 mcus[sizeof avr_mcu_types / sizeof avr_mcu_types[0]];
111
kono
parents:
diff changeset
30
kono
parents:
diff changeset
31 static int letter (char c)
kono
parents:
diff changeset
32 {
kono
parents:
diff changeset
33 return c >= 'a' && c <= 'z';
kono
parents:
diff changeset
34 }
kono
parents:
diff changeset
35
kono
parents:
diff changeset
36 static int digit (char c)
kono
parents:
diff changeset
37 {
kono
parents:
diff changeset
38 return c >= '0' && c <= '9';
kono
parents:
diff changeset
39 }
kono
parents:
diff changeset
40
kono
parents:
diff changeset
41 static int
145
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
42 str_prefix_p (const char *str, const char *prefix)
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
43 {
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
44 return strncmp (str, prefix, strlen (prefix)) == 0;
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
45 }
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
46
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
47
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
48 /* Used by string comparator to group MCUs by their
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
49 name prefix like "attiny" or "atmega". */
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
50
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
51 static int
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
52 c_prefix (const char *str)
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
53 {
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
54 static const char *const prefixes[] =
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
55 {
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
56 "attiny", "atmega", "atxmega", "ata", "at90"
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
57 };
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
58
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
59 int i, n = (int) (sizeof (prefixes) / sizeof (*prefixes));
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
60
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
61 for (i = 0; i < n; i++)
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
62 if (str_prefix_p (str, prefixes[i]))
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
63 return i;
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
64
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
65 return n;
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
66 }
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
67
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
68
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
69 /* If A starts a group of digits, return their value as a number. */
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
70
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
71 static int
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
72 c_number (const char *a)
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
73 {
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
74 int val = 0;
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
75
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
76 if (digit (*a) && ! digit (*(a-1)))
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
77 {
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
78 while (digit (*a))
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
79 val = 10 * val + (*a++) - '0';
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
80 }
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
81
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
82 return val;
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
83 }
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
84
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
85
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
86 /* Compare two MCUs and order them for easy lookup. */
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
87
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
88 static int
111
kono
parents:
diff changeset
89 comparator (const void *va, const void *vb)
kono
parents:
diff changeset
90 {
145
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
91 const avr_mcu_t *mcu_a = *(const avr_mcu_t* const*) va;
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
92 const avr_mcu_t *mcu_b = *(const avr_mcu_t* const*) vb;
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
93 const char *a = mcu_a->name;
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
94 const char *b = mcu_b->name;
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
95
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
96 // First, group MCUs according to their pure-letter prefix.
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
97
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
98 int c = c_prefix (a) - c_prefix (b);
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
99 if (c)
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
100 return c;
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
101
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
102 // Second, if their prefixes are the same, group according to
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
103 // their flash size.
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
104
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
105 c = (int) mcu_a->flash_size - (int) mcu_b->flash_size;
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
106 if (c)
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
107 return c;
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
108
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
109 // Third, group according to aligned groups of digits.
111
kono
parents:
diff changeset
110
kono
parents:
diff changeset
111 while (*a && *b)
kono
parents:
diff changeset
112 {
145
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
113 c = c_number (a) - c_number (b);
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
114 if (c)
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
115 return c;
111
kono
parents:
diff changeset
116
kono
parents:
diff changeset
117 if (*a != *b)
145
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
118 return *a - *b;
111
kono
parents:
diff changeset
119
kono
parents:
diff changeset
120 a++;
kono
parents:
diff changeset
121 b++;
kono
parents:
diff changeset
122 }
kono
parents:
diff changeset
123
kono
parents:
diff changeset
124 return *a - *b;
kono
parents:
diff changeset
125 }
kono
parents:
diff changeset
126
kono
parents:
diff changeset
127 static void
kono
parents:
diff changeset
128 print_mcus (size_t n_mcus)
kono
parents:
diff changeset
129 {
kono
parents:
diff changeset
130 int duplicate = 0;
kono
parents:
diff changeset
131 size_t i;
kono
parents:
diff changeset
132
kono
parents:
diff changeset
133 if (!n_mcus)
kono
parents:
diff changeset
134 return;
kono
parents:
diff changeset
135
145
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
136 qsort (mcus, n_mcus, sizeof (avr_mcu_t*), comparator);
111
kono
parents:
diff changeset
137
kono
parents:
diff changeset
138 printf ("@*@var{mcu}@tie{}=");
kono
parents:
diff changeset
139
kono
parents:
diff changeset
140 for (i = 0; i < n_mcus; i++)
kono
parents:
diff changeset
141 {
145
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
142 printf (" @code{%s}%s", mcus[i]->name, i == n_mcus-1 ? ".\n\n" : ",");
111
kono
parents:
diff changeset
143
145
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
144 if (i && !strcmp (mcus[i]->name, mcus[i-1]->name))
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
145 {
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
146 // Sanity-check: Fail on devices that are present more than once.
111
kono
parents:
diff changeset
147
145
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
148 duplicate = 1;
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
149 fprintf (stderr, "error: duplicate device: %s\n", mcus[i]->name);
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
150 }
111
kono
parents:
diff changeset
151 }
kono
parents:
diff changeset
152
kono
parents:
diff changeset
153 if (duplicate)
kono
parents:
diff changeset
154 exit (1);
kono
parents:
diff changeset
155 }
kono
parents:
diff changeset
156
kono
parents:
diff changeset
157 int main (void)
kono
parents:
diff changeset
158 {
kono
parents:
diff changeset
159 enum avr_arch_id arch_id = ARCH_UNKNOWN;
kono
parents:
diff changeset
160 size_t i, n_mcus = 0;
kono
parents:
diff changeset
161 const avr_mcu_t *mcu;
kono
parents:
diff changeset
162
145
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
163 printf ("@c Copyright (C) 2012-2020 Free Software Foundation, Inc.\n");
111
kono
parents:
diff changeset
164 printf ("@c This is part of the GCC manual.\n");
kono
parents:
diff changeset
165 printf ("@c For copying conditions, see the file "
145
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
166 "gcc/doc/include/fdl.texi.\n\n");
111
kono
parents:
diff changeset
167
kono
parents:
diff changeset
168 printf ("@c This file is generated automatically using\n");
kono
parents:
diff changeset
169 printf ("@c gcc/config/avr/gen-avr-mmcu-texi.c from:\n");
145
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
170 printf ("@c gcc/config/avr/avr-arch.h\n");
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
171 printf ("@c gcc/config/avr/avr-devices.c\n");
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
172 printf ("@c gcc/config/avr/avr-mcus.def\n\n");
111
kono
parents:
diff changeset
173
kono
parents:
diff changeset
174 printf ("@c Please do not edit manually.\n\n");
kono
parents:
diff changeset
175
kono
parents:
diff changeset
176 printf ("@table @code\n\n");
kono
parents:
diff changeset
177
kono
parents:
diff changeset
178 for (mcu = avr_mcu_types; mcu->name; mcu++)
kono
parents:
diff changeset
179 {
kono
parents:
diff changeset
180 if (mcu->macro == NULL)
145
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
181 {
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
182 arch_id = mcu->arch_id;
111
kono
parents:
diff changeset
183
145
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
184 // Start a new architecture: Flush the MCUs collected so far.
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
185 print_mcus (n_mcus);
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
186 n_mcus = 0;
111
kono
parents:
diff changeset
187
145
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
188 for (i = 0; i < sizeof (avr_texinfo) / sizeof (*avr_texinfo); i++)
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
189 if (arch_id == avr_texinfo[i].arch_id)
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
190 printf ("@item %s\n%s\n", mcu->name, avr_texinfo[i].texinfo);
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
191 }
111
kono
parents:
diff changeset
192 else if (arch_id == (enum avr_arch_id) mcu->arch_id)
145
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
193 {
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
194 mcus[n_mcus++] = mcu;
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
195 }
111
kono
parents:
diff changeset
196 }
kono
parents:
diff changeset
197
kono
parents:
diff changeset
198 print_mcus (n_mcus);
kono
parents:
diff changeset
199 printf ("@end table\n");
kono
parents:
diff changeset
200
kono
parents:
diff changeset
201 return EXIT_SUCCESS;
kono
parents:
diff changeset
202 }