1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
|
/* Subroutines for the gcc driver.
Copyright (C) 2009-2015 Free Software Foundation, Inc.
Contributed by Georg-Johann Lay <avr@gjlay.de>
This file is part of GCC.
GCC is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 3, or (at your option)
any later version.
GCC is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with GCC; see the file COPYING3. If not see
<http://www.gnu.org/licenses/>. */
#include "config.h"
#include "system.h"
#include "coretypes.h"
#include "diagnostic.h"
#include "tm.h"
// Remove -nodevicelib from the command line if not needed
#define X_NODEVLIB "%<nodevicelib"
static const char dir_separator_str[] = { DIR_SEPARATOR, 0 };
static const char specfiles_doc_url[] =
"http://gcc.gnu.org/onlinedocs/gcc/Spec-Files.html";
static const char*
avr_diagnose_devicespecs_error (const char *mcu, const char *filename)
{
error ("cannot access device-specs for %qs expected at %qs",
mcu, filename);
// Inform about natively supported devices and cores.
if (strncmp (mcu, "avr", strlen ("avr")))
avr_inform_devices ();
avr_inform_core_architectures ();
inform (input_location, "you can provide your own specs files, "
"see <%s> for details", specfiles_doc_url);
return X_NODEVLIB;
}
/* Implement spec function `device-specs-file´.
Compose -specs=<specs-file-name>%s. If everything went well then argv[0]
is the inflated (absolute) specs directory and argv[1] is a device or
core name as supplied by -mmcu=*. When building GCC the path might
be relative. */
const char*
avr_devicespecs_file (int argc, const char **argv)
{
char *specfile_name;
const char *mmcu = NULL;
#ifdef DEBUG_SPECS
if (verbose_flag)
fnotice (stderr, "Running spec function '%s' with %d args\n\n",
__FUNCTION__, argc);
#endif
switch (argc)
{
case 0:
fatal_error (input_location,
"bad usage of spec function %qs", "device-specs-file");
return X_NODEVLIB;
case 1:
if (0 == strcmp ("device-specs", argv[0]))
{
/* FIXME: This means "device-specs%s" from avr.h:DRIVER_SELF_SPECS
has not been resolved to a path. That case can occur when the
c++ testsuite is run from the build directory. DejaGNU's
libgloss.exp:get_multilibs runs $compiler without -B, i.e.runs
xgcc without specifying a prefix. Without any prefix, there is
no means to find out where the specs files might be located.
get_multilibs runs xgcc --print-multi-lib, hence we don't actually
need information form a specs file and may skip it here. */
return X_NODEVLIB;
}
mmcu = AVR_MMCU_DEFAULT;
break;
default:
mmcu = argv[1];
// Allow specifying the same MCU more than once.
for (int i = 2; i < argc; i++)
if (0 != strcmp (mmcu, argv[i]))
{
error ("specified option %qs more than once", "-mmcu");
return X_NODEVLIB;
}
break;
}
specfile_name = concat (argv[0], dir_separator_str, "specs-", mmcu, NULL);
#ifdef DEBUG_SPECS
if (verbose_flag)
fnotice (stderr, "'%s': mmcu='%s'\n'%s': specfile='%s'\n\n",
__FUNCTION__, mmcu, __FUNCTION__, specfile_name);
#endif
// Filter out silly -mmcu= arguments like "foo bar".
for (const char *s = mmcu; *s; s++)
if (!ISALNUM (*s)
&& '-' != *s
&& '_' != *s)
{
error ("strange device name %qs after %qs: bad character %qc",
mmcu, "-mmcu=", *s);
return X_NODEVLIB;
}
if (/* When building / configuring the compiler we might get a relative path
as supplied by "-B.". Assume that the specs file exists and MCU is
a core, not a proper device then, i.e. we have "-mmcu=avr*". */
(0 == strncmp (mmcu, "avr", strlen ("avr"))
&& specfile_name[0] == '.')
/* vanilla */
|| (IS_ABSOLUTE_PATH (specfile_name)
&& !access (specfile_name, R_OK)))
{
return concat ("-specs=device-specs", dir_separator_str, "specs-", mmcu,
// Use '%s' instead of the expanded specfile_name. This
// is the easiest way to handle pathes containing spaces.
"%s",
#if defined (WITH_AVRLIBC)
" %{mmcu=avr*:" X_NODEVLIB "} %{!mmcu=*:" X_NODEVLIB "}",
#else
" " X_NODEVLIB,
#endif
NULL);
}
return avr_diagnose_devicespecs_error (mmcu, specfile_name);
}
|
