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
|
/* Configuration for GNU C-compiler for Intel 80386 running DJGPP.
Copyright (C) 1988, 1996, 1998, 1999, 2000, 2001 Free Software Foundation, Inc.
This file is part of GNU CC.
GNU CC 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 2, or (at your option)
any later version.
GNU CC 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 GNU CC; see the file COPYING. If not, write to
the Free Software Foundation, 59 Temple Place - Suite 330,
Boston, MA 02111-1307, USA. */
/* Use semicolons to separate elements of a path. */
#define PATH_SEPARATOR ';'
#define HOST_EXECUTABLE_SUFFIX ".exe"
/* Even though we support "/", allow "\" since everybody tests both. */
#define DIR_SEPARATOR '/'
#define DIR_SEPARATOR_2 '\\'
/* Allow test for DOS drive names. */
#define HAVE_DOS_BASED_FILE_SYSTEM
/* System dependant initialization for collect2
to tell system() to act like Unix. */
#define COLLECT2_HOST_INITIALIZATION \
do { __system_flags |= (__system_allow_multiple_cmds \
| __system_emulate_chdir); } while (0)
/* Define a version appropriate for DOS. */
#undef XREF_FILE_NAME
#define XREF_FILE_NAME(xref_file, file) \
do { \
const char xref_ext[] = ".gxref"; \
strcpy (xref_file, file); \
s = basename (xref_file); \
t = strchr (s, '.'); \
if (t) \
strcpy (t, xref_ext); \
else \
strcat (xref_file, xref_ext); \
} while (0)
/* Change /dev/env/DJDIR/prefix/dir/ to canonical form so gcc_exec_prefix
is set properly in 'gcc.c'. It also helps to cut down the number of times
the value of the DJGPP environment variable 'DJDIR' is evaluated. */
#undef GCC_DRIVER_HOST_INITIALIZATION
#define GCC_DRIVER_HOST_INITIALIZATION \
do { \
/* If the environment variable DJDIR is not defined, then DJGPP is not \
installed correctly and GCC will quickly become confused with the \
default prefix settings. Report the problem now so the user doesn't \
receive deceptive "file not found" error messages later. */ \
char *djdir = getenv ("DJDIR"); \
if (djdir == NULL) \
{ \
/* DJDIR is automatically defined by the DJGPP environment config \
file pointed to by the environment variable DJGPP. Examine DJGPP \
to try and figure out what's wrong. */ \
char *djgpp = getenv ("DJGPP"); \
if (djgpp == NULL) \
fatal ("Environment variable DJGPP not defined."); \
else if (access (djgpp, R_OK) == 0) \
fatal ("Environment variable DJGPP points to missing file '%s'.", \
djgpp); \
else \
fatal ("Environment variable DJGPP points to corrupt file '%s'.", \
djgpp); \
} \
standard_exec_prefix = update_path (standard_exec_prefix, NULL); \
standard_bindir_prefix = update_path (standard_bindir_prefix, NULL); \
standard_startfile_prefix = update_path (standard_startfile_prefix, NULL); \
md_exec_prefix = update_path (md_exec_prefix, NULL); \
} while (0)
/* Canonicalize paths containing '/dev/env/', especially those in
prefix.c. */
#define UPDATE_PATH_HOST_CANONICALIZE(PATH, KEY) \
do { \
if (strncmp (PATH, "/dev/env/", sizeof("/dev/env/") - 1) == 0) \
{ \
static char *djdir; \
static int djdir_len; \
static char fixed_path[FILENAME_MAX + 1]; \
char *new_path; \
/* The default prefixes all use '/dev/env/DJDIR', so optimize \
for this. All other uses of '/dev/env/' go through \
libc's canonicalization function. */ \
_fixpath (PATH, fixed_path); \
/* _fixpath removes any trailing '/', so add it back. */ \
strcat (fixed_path, "/"); \
new_path = xstrdup (fixed_path); \
PATH = new_path; \
return PATH; \
} \
/* If DIR_SEPARATOR_2 isn't in PATH, nothing more need be done. */ \
if (strchr (PATH, DIR_SEPARATOR_2) == NULL) \
return PATH; \
} while (0)
|
