d8c6b9e87adf606cab28b7dda52fe7b6481db00b
1 /* Precompiled header implementation for the C languages.
2 Copyright (C) 2000, 2002 Free Software Foundation, Inc.
4 This file is part of GNU CC.
6 GNU CC is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 2, or (at your option)
11 GNU CC is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with GNU CC; see the file COPYING. If not, write to
18 the Free Software Foundation, 59 Temple Place - Suite 330,
19 Boston, MA 02111-1307, USA. */
23 #include "coretypes.h"
32 #include "langhooks.h"
36 unsigned long asm_size
;
39 #define IDENT_LENGTH 8
41 static FILE *pch_outfile
;
43 extern char *asm_file_name
;
44 static long asm_file_startpos
;
46 static const char * get_ident
PARAMS((void));
51 static char result
[IDENT_LENGTH
];
52 static const char template[IDENT_LENGTH
] = "gpch.010";
54 memcpy (result
, template, IDENT_LENGTH
);
55 if (c_language
== clk_c
)
56 result
[4] = flag_objc
? 'o' : 'C';
57 else if (c_language
== clk_cplusplus
)
58 result
[4] = flag_objc
? 'O' : '+';
71 /* We're precompiling a header file, so when it's actually used,
72 it'll be at least one level deep. */
73 (*debug_hooks
->start_source_file
) (lineno
, input_filename
);
75 f
= fopen (pch_file
, "w+b");
77 fatal_io_error ("can't open %s", pch_file
);
80 if (fwrite (get_ident(), IDENT_LENGTH
, 1, f
) != 1)
81 fatal_io_error ("can't write to %s", pch_file
);
83 /* We need to be able to re-read the output. */
84 /* The driver always provides a valid -o option. */
85 if (asm_file_name
== NULL
86 || strcmp (asm_file_name
, "-") == 0)
87 fatal_error ("`%s' is not a valid output file", asm_file_name
);
89 asm_file_startpos
= ftell (asm_out_file
);
91 cpp_save_state (parse_in
, f
);
101 struct c_pch_header h
;
103 cpp_write_pch_deps (parse_in
, pch_outfile
);
105 asm_file_end
= ftell (asm_out_file
);
106 h
.asm_size
= asm_file_end
- asm_file_startpos
;
108 if (fwrite (&h
, sizeof (h
), 1, pch_outfile
) != 1)
109 fatal_io_error ("can't write %s", pch_file
);
111 buf
= xmalloc (16384);
112 fflush (asm_out_file
);
114 if (fseek (asm_out_file
, asm_file_startpos
, SEEK_SET
) != 0)
115 fatal_io_error ("can't seek in %s", asm_file_name
);
117 for (written
= asm_file_startpos
; written
< asm_file_end
; )
119 long size
= asm_file_end
- written
;
122 if (fread (buf
, size
, 1, asm_out_file
) != 1)
123 fatal_io_error ("can't read %s", asm_file_name
);
124 if (fwrite (buf
, size
, 1, pch_outfile
) != 1)
125 fatal_io_error ("can't write %s", pch_file
);
130 gt_pch_save (pch_outfile
);
131 cpp_write_pch_state (parse_in
, pch_outfile
);
133 fclose (pch_outfile
);
137 c_common_valid_pch (pfile
, name
, fd
)
144 char ident
[IDENT_LENGTH
];
145 const char *pch_ident
;
150 /* Perform a quick test of whether this is a valid
151 precompiled header for C. */
153 sizeread
= read (fd
, ident
, IDENT_LENGTH
);
156 fatal_io_error ("can't read %s", name
);
159 else if (sizeread
!= IDENT_LENGTH
)
162 pch_ident
= get_ident();
163 if (memcmp (ident
, pch_ident
, IDENT_LENGTH
) != 0)
165 if (cpp_get_options (pfile
)->warn_invalid_pch
)
167 if (memcmp (ident
, pch_ident
, 5) == 0)
168 /* It's a PCH, for the right language, but has the wrong version.
170 cpp_error (pfile
, DL_WARNING
,
171 "%s: not compatible with this GCC version", name
);
172 else if (memcmp (ident
, pch_ident
, 4) == 0)
173 /* It's a PCH for the wrong language. */
174 cpp_error (pfile
, DL_WARNING
, "%s: not for %s", name
,
177 /* Not any kind of PCH. */
178 cpp_error (pfile
, DL_WARNING
, "%s: not a PCH file", name
);
183 /* Check the preprocessor macros are the same as when the PCH was
186 result
= cpp_valid_state (pfile
, name
, fd
);
194 c_common_read_pch (pfile
, name
, fd
, orig_name
)
198 const char *orig_name
;
201 struct c_pch_header h
;
203 unsigned long written
;
204 struct save_macro_data
*smd
;
206 /* Before we wrote the file, we started a source file, so we have to start
207 one here to match. */
208 (*debug_hooks
->start_source_file
) (lineno
, orig_name
);
210 f
= fdopen (fd
, "rb");
213 cpp_errno (pfile
, DL_ERROR
, "calling fdopen");
219 if (fread (&h
, sizeof (h
), 1, f
) != 1)
221 cpp_errno (pfile
, DL_ERROR
, "reading");
225 buf
= xmalloc (16384);
226 for (written
= 0; written
< h
.asm_size
; )
228 long size
= h
.asm_size
- written
;
231 if (fread (buf
, size
, 1, f
) != 1
232 || fwrite (buf
, size
, 1, asm_out_file
) != 1)
233 cpp_errno (pfile
, DL_ERROR
, "reading");
238 cpp_prepare_state (pfile
, &smd
);
242 if (cpp_read_state (pfile
, name
, f
, smd
) != 0)
247 (*debug_hooks
->end_source_file
) (lineno
);