annotate nt/addsection.c @ 84731:758743eeccc7

*** empty log message ***
author Glenn Morris <rgm@gnu.org>
date Fri, 21 Sep 2007 03:59:25 +0000
parents 075eb71f218d
children e27f17d9c8ed f55f9811f5d7
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
24097
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
1 /* Add an uninitialized data section to an executable.
75249
4ad431d8e164 Update copyright for years from Emacs 21 to present (mainly adding
Glenn Morris <rgm@gnu.org>
parents: 68648
diff changeset
2 Copyright (C) 1999, 2001, 2002, 2003, 2004, 2005,
4ad431d8e164 Update copyright for years from Emacs 21 to present (mainly adding
Glenn Morris <rgm@gnu.org>
parents: 68648
diff changeset
3 2006, 2007 Free Software Foundation, Inc.
24097
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
4
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
5 This file is part of GNU Emacs.
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
6
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
7 GNU Emacs is free software; you can redistribute it and/or modify
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
8 it under the terms of the GNU General Public License as published by
78246
075eb71f218d Switch license to GPLv3 or later.
Glenn Morris <rgm@gnu.org>
parents: 75249
diff changeset
9 the Free Software Foundation; either version 3, or (at your option)
24097
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
10 any later version.
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
11
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
12 GNU Emacs is distributed in the hope that it will be useful,
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
15 GNU General Public License for more details.
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
16
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
17 You should have received a copy of the GNU General Public License
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
18 along with GNU Emacs; see the file COPYING. If not, write to
64083
23a17af379b1 Update FSF's address.
Lute Kamstra <lute@gnu.org>
parents: 63247
diff changeset
19 the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
23a17af379b1 Update FSF's address.
Lute Kamstra <lute@gnu.org>
parents: 63247
diff changeset
20 Boston, MA 02110-1301, USA.
24097
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
21
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
22 Andrew Innes <andrewi@harlequin.co.uk> 04-Jan-1999
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
23 based on code from unexw32.c
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
24 */
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
25
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
26 #include <stdlib.h>
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
27 #include <stdio.h>
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
28 #include <fcntl.h>
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
29 #include <time.h>
31347
cdc16c6e33be (_ANONYMOUS_UNION) [__GNUC__]: New define.
Andrew Innes <andrewi@gnu.org>
parents: 31085
diff changeset
30 #ifdef __GNUC__
cdc16c6e33be (_ANONYMOUS_UNION) [__GNUC__]: New define.
Andrew Innes <andrewi@gnu.org>
parents: 31085
diff changeset
31 #define _ANONYMOUS_UNION
cdc16c6e33be (_ANONYMOUS_UNION) [__GNUC__]: New define.
Andrew Innes <andrewi@gnu.org>
parents: 31085
diff changeset
32 #define _ANONYMOUS_STRUCT
cdc16c6e33be (_ANONYMOUS_UNION) [__GNUC__]: New define.
Andrew Innes <andrewi@gnu.org>
parents: 31085
diff changeset
33 #endif
24097
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
34 #include <windows.h>
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
35
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
36 /* Include relevant definitions from IMAGEHLP.H, which can be found
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
37 in \\win32sdk\mstools\samples\image\include\imagehlp.h. */
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
38
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
39 PIMAGE_NT_HEADERS
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
40 (__stdcall * pfnCheckSumMappedFile) (LPVOID BaseAddress,
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
41 DWORD FileLength,
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
42 LPDWORD HeaderSum,
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
43 LPDWORD CheckSum);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
44
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
45 #undef min
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
46 #undef max
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
47 #define min(x, y) (((x) < (y)) ? (x) : (y))
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
48 #define max(x, y) (((x) > (y)) ? (x) : (y))
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
49
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
50
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
51 /* File handling. */
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
52
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
53 typedef struct file_data {
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
54 char *name;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
55 unsigned long size;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
56 HANDLE file;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
57 HANDLE file_mapping;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
58 unsigned char *file_base;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
59 } file_data;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
60
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
61 int
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
62 open_input_file (file_data *p_file, char *filename)
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
63 {
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
64 HANDLE file;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
65 HANDLE file_mapping;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
66 void *file_base;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
67 unsigned long size, upper_size;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
68
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
69 file = CreateFile (filename, GENERIC_READ, FILE_SHARE_READ, NULL,
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
70 OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, 0);
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 31347
diff changeset
71 if (file == INVALID_HANDLE_VALUE)
24097
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
72 return FALSE;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
73
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
74 size = GetFileSize (file, &upper_size);
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 31347
diff changeset
75 file_mapping = CreateFileMapping (file, NULL, PAGE_READONLY,
24097
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
76 0, size, NULL);
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 31347
diff changeset
77 if (!file_mapping)
24097
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
78 return FALSE;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
79
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
80 file_base = MapViewOfFile (file_mapping, FILE_MAP_READ, 0, 0, size);
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 31347
diff changeset
81 if (file_base == 0)
24097
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
82 return FALSE;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
83
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
84 p_file->name = filename;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
85 p_file->size = size;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
86 p_file->file = file;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
87 p_file->file_mapping = file_mapping;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
88 p_file->file_base = file_base;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
89
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
90 return TRUE;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
91 }
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
92
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
93 int
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
94 open_output_file (file_data *p_file, char *filename, unsigned long size)
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
95 {
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
96 HANDLE file;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
97 HANDLE file_mapping;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
98 void *file_base;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
99
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
100 file = CreateFile (filename, GENERIC_READ | GENERIC_WRITE, 0, NULL,
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
101 CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL, 0);
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 31347
diff changeset
102 if (file == INVALID_HANDLE_VALUE)
24097
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
103 return FALSE;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
104
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 31347
diff changeset
105 file_mapping = CreateFileMapping (file, NULL, PAGE_READWRITE,
24097
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
106 0, size, NULL);
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 31347
diff changeset
107 if (!file_mapping)
24097
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
108 return FALSE;
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 31347
diff changeset
109
24097
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
110 file_base = MapViewOfFile (file_mapping, FILE_MAP_WRITE, 0, 0, size);
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 31347
diff changeset
111 if (file_base == 0)
24097
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
112 return FALSE;
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 31347
diff changeset
113
24097
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
114 p_file->name = filename;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
115 p_file->size = size;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
116 p_file->file = file;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
117 p_file->file_mapping = file_mapping;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
118 p_file->file_base = file_base;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
119
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
120 return TRUE;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
121 }
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
122
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
123 /* Close the system structures associated with the given file. */
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
124 void
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
125 close_file_data (file_data *p_file)
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
126 {
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
127 UnmapViewOfFile (p_file->file_base);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
128 CloseHandle (p_file->file_mapping);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
129 /* For the case of output files, set final size. */
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
130 SetFilePointer (p_file->file, p_file->size, NULL, FILE_BEGIN);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
131 SetEndOfFile (p_file->file);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
132 CloseHandle (p_file->file);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
133 }
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
134
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
135
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
136 /* Routines to manipulate NT executable file sections. */
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
137
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
138 unsigned long
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
139 get_unrounded_section_size (PIMAGE_SECTION_HEADER p_section)
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
140 {
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
141 /* The true section size, before rounding, for an initialized data or
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
142 code section. (Supposedly some linkers swap the meaning of these
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
143 two values.) */
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
144 return min (p_section->SizeOfRawData,
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
145 p_section->Misc.VirtualSize);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
146 }
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
147
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
148 /* Return pointer to section header for named section. */
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
149 IMAGE_SECTION_HEADER *
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
150 find_section (char * name, IMAGE_NT_HEADERS * nt_header)
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
151 {
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
152 PIMAGE_SECTION_HEADER section;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
153 int i;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
154
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
155 section = IMAGE_FIRST_SECTION (nt_header);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
156
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
157 for (i = 0; i < nt_header->FileHeader.NumberOfSections; i++)
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
158 {
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
159 if (strcmp (section->Name, name) == 0)
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
160 return section;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
161 section++;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
162 }
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
163 return NULL;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
164 }
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
165
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
166 /* Return pointer to section header for section containing the given
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
167 relative virtual address. */
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
168 IMAGE_SECTION_HEADER *
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
169 rva_to_section (DWORD rva, IMAGE_NT_HEADERS * nt_header)
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
170 {
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
171 PIMAGE_SECTION_HEADER section;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
172 int i;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
173
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
174 section = IMAGE_FIRST_SECTION (nt_header);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
175
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
176 for (i = 0; i < nt_header->FileHeader.NumberOfSections; i++)
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
177 {
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
178 /* Some linkers (eg. the NT SDK linker I believe) swapped the
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
179 meaning of these two values - or rather, they ignored
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
180 VirtualSize entirely and always set it to zero. This affects
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
181 some very old exes (eg. gzip dated Dec 1993). Since
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
182 w32_executable_type relies on this function to work reliably,
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
183 we need to cope with this. */
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
184 DWORD real_size = max (section->SizeOfRawData,
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
185 section->Misc.VirtualSize);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
186 if (rva >= section->VirtualAddress
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
187 && rva < section->VirtualAddress + real_size)
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
188 return section;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
189 section++;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
190 }
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
191 return NULL;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
192 }
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
193
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
194 /* Return pointer to section header for section containing the given
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
195 offset in its raw data area. */
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
196 IMAGE_SECTION_HEADER *
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
197 offset_to_section (DWORD offset, IMAGE_NT_HEADERS * nt_header)
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
198 {
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
199 PIMAGE_SECTION_HEADER section;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
200 int i;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
201
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
202 section = IMAGE_FIRST_SECTION (nt_header);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
203
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
204 for (i = 0; i < nt_header->FileHeader.NumberOfSections; i++)
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
205 {
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
206 if (offset >= section->PointerToRawData
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
207 && offset < section->PointerToRawData + section->SizeOfRawData)
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
208 return section;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
209 section++;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
210 }
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
211 return NULL;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
212 }
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
213
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
214 /* Return offset to an object in dst, given offset in src. We assume
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
215 there is at least one section in both src and dst images, and that
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
216 the some sections may have been added to dst (after sections in src). */
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
217 static DWORD
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
218 relocate_offset (DWORD offset,
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
219 IMAGE_NT_HEADERS * src_nt_header,
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
220 IMAGE_NT_HEADERS * dst_nt_header)
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
221 {
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
222 PIMAGE_SECTION_HEADER src_section = IMAGE_FIRST_SECTION (src_nt_header);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
223 PIMAGE_SECTION_HEADER dst_section = IMAGE_FIRST_SECTION (dst_nt_header);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
224 int i = 0;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
225
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
226 while (offset >= src_section->PointerToRawData)
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
227 {
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
228 if (offset < src_section->PointerToRawData + src_section->SizeOfRawData)
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
229 break;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
230 i++;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
231 if (i == src_nt_header->FileHeader.NumberOfSections)
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
232 {
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
233 /* Handle offsets after the last section. */
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
234 dst_section = IMAGE_FIRST_SECTION (dst_nt_header);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
235 dst_section += dst_nt_header->FileHeader.NumberOfSections - 1;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
236 while (dst_section->PointerToRawData == 0)
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
237 dst_section--;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
238 while (src_section->PointerToRawData == 0)
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
239 src_section--;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
240 return offset
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
241 + (dst_section->PointerToRawData + dst_section->SizeOfRawData)
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
242 - (src_section->PointerToRawData + src_section->SizeOfRawData);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
243 }
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
244 src_section++;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
245 dst_section++;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
246 }
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
247 return offset +
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
248 (dst_section->PointerToRawData - src_section->PointerToRawData);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
249 }
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
250
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
251 #define OFFSET_TO_RVA(offset, section) \
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
252 (section->VirtualAddress + ((DWORD)(offset) - section->PointerToRawData))
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
253
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
254 #define RVA_TO_OFFSET(rva, section) \
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
255 (section->PointerToRawData + ((DWORD)(rva) - section->VirtualAddress))
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
256
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
257 #define RVA_TO_SECTION_OFFSET(rva, section) \
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
258 ((DWORD)(rva) - section->VirtualAddress)
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
259
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
260 /* Convert address in executing image to RVA. */
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
261 #define PTR_TO_RVA(ptr) ((DWORD)(ptr) - (DWORD) GetModuleHandle (NULL))
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
262
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
263 #define PTR_TO_OFFSET(ptr, pfile_data) \
31085
ab2cd9e121f1 (PTR_TO_OFFSET): Cast ptr to unsigned char*.
Andrew Innes <andrewi@gnu.org>
parents: 24236
diff changeset
264 ((unsigned char *)(ptr) - (pfile_data)->file_base)
24097
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
265
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
266 #define OFFSET_TO_PTR(offset, pfile_data) \
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
267 ((pfile_data)->file_base + (DWORD)(offset))
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
268
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
269 #define ROUND_UP(p, align) (((DWORD)(p) + (align)-1) & ~((align)-1))
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
270 #define ROUND_DOWN(p, align) ((DWORD)(p) & ~((align)-1))
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
271
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
272
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
273 static void
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 31347
diff changeset
274 copy_executable_and_add_section (file_data *p_infile,
24097
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
275 file_data *p_outfile,
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
276 char *new_section_name,
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
277 DWORD new_section_size)
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
278 {
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
279 unsigned char *dst;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
280 PIMAGE_DOS_HEADER dos_header;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
281 PIMAGE_NT_HEADERS nt_header;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
282 PIMAGE_NT_HEADERS dst_nt_header;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
283 PIMAGE_SECTION_HEADER section;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
284 PIMAGE_SECTION_HEADER dst_section;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
285 DWORD offset;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
286 int i;
63245
c16acb8501d2 (copy_executable_and_add_section): Pass non-zero
Eli Zaretskii <eliz@gnu.org>
parents: 52401
diff changeset
287 int be_verbose = GetEnvironmentVariable ("DEBUG_DUMP", NULL, 0) > 0;
24097
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
288
63245
c16acb8501d2 (copy_executable_and_add_section): Pass non-zero
Eli Zaretskii <eliz@gnu.org>
parents: 52401
diff changeset
289 #define COPY_CHUNK(message, src, size, verbose) \
24097
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
290 do { \
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
291 unsigned char *s = (void *)(src); \
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
292 unsigned long count = (size); \
63245
c16acb8501d2 (copy_executable_and_add_section): Pass non-zero
Eli Zaretskii <eliz@gnu.org>
parents: 52401
diff changeset
293 if (verbose) \
c16acb8501d2 (copy_executable_and_add_section): Pass non-zero
Eli Zaretskii <eliz@gnu.org>
parents: 52401
diff changeset
294 { \
c16acb8501d2 (copy_executable_and_add_section): Pass non-zero
Eli Zaretskii <eliz@gnu.org>
parents: 52401
diff changeset
295 printf ("%s\n", (message)); \
c16acb8501d2 (copy_executable_and_add_section): Pass non-zero
Eli Zaretskii <eliz@gnu.org>
parents: 52401
diff changeset
296 printf ("\t0x%08x Offset in input file.\n", s - p_infile->file_base); \
c16acb8501d2 (copy_executable_and_add_section): Pass non-zero
Eli Zaretskii <eliz@gnu.org>
parents: 52401
diff changeset
297 printf ("\t0x%08x Offset in output file.\n", dst - p_outfile->file_base); \
c16acb8501d2 (copy_executable_and_add_section): Pass non-zero
Eli Zaretskii <eliz@gnu.org>
parents: 52401
diff changeset
298 printf ("\t0x%08x Size in bytes.\n", count); \
c16acb8501d2 (copy_executable_and_add_section): Pass non-zero
Eli Zaretskii <eliz@gnu.org>
parents: 52401
diff changeset
299 } \
24097
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
300 memcpy (dst, s, count); \
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
301 dst += count; \
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
302 } while (0)
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
303
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
304 #define DST_TO_OFFSET() PTR_TO_OFFSET (dst, p_outfile)
24236
c83c9b5cc93f ROUND_UP_DST_AND_ZERO): Renamed from ROUND_UP_DST. Zeroes the
Andrew Innes <andrewi@gnu.org>
parents: 24097
diff changeset
305 #define ROUND_UP_DST_AND_ZERO(align) \
c83c9b5cc93f ROUND_UP_DST_AND_ZERO): Renamed from ROUND_UP_DST. Zeroes the
Andrew Innes <andrewi@gnu.org>
parents: 24097
diff changeset
306 do { \
c83c9b5cc93f ROUND_UP_DST_AND_ZERO): Renamed from ROUND_UP_DST. Zeroes the
Andrew Innes <andrewi@gnu.org>
parents: 24097
diff changeset
307 unsigned char *newdst = p_outfile->file_base \
c83c9b5cc93f ROUND_UP_DST_AND_ZERO): Renamed from ROUND_UP_DST. Zeroes the
Andrew Innes <andrewi@gnu.org>
parents: 24097
diff changeset
308 + ROUND_UP (DST_TO_OFFSET (), (align)); \
c83c9b5cc93f ROUND_UP_DST_AND_ZERO): Renamed from ROUND_UP_DST. Zeroes the
Andrew Innes <andrewi@gnu.org>
parents: 24097
diff changeset
309 /* Zero the alignment slop; it may actually initialize real data. */ \
c83c9b5cc93f ROUND_UP_DST_AND_ZERO): Renamed from ROUND_UP_DST. Zeroes the
Andrew Innes <andrewi@gnu.org>
parents: 24097
diff changeset
310 memset (dst, 0, newdst - dst); \
c83c9b5cc93f ROUND_UP_DST_AND_ZERO): Renamed from ROUND_UP_DST. Zeroes the
Andrew Innes <andrewi@gnu.org>
parents: 24097
diff changeset
311 dst = newdst; \
c83c9b5cc93f ROUND_UP_DST_AND_ZERO): Renamed from ROUND_UP_DST. Zeroes the
Andrew Innes <andrewi@gnu.org>
parents: 24097
diff changeset
312 } while (0)
24097
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
313
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
314 /* Copy the source image sequentially, ie. section by section after
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
315 copying the headers and section table, to simplify the process of
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
316 adding an extra section table entry (which might force the raw
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
317 section data to be relocated).
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
318
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
319 Note that dst is updated implicitly by each COPY_CHUNK. */
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
320
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
321 dos_header = (PIMAGE_DOS_HEADER) p_infile->file_base;
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 31347
diff changeset
322 nt_header = (PIMAGE_NT_HEADERS) (((unsigned long) dos_header) +
24097
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
323 dos_header->e_lfanew);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
324 section = IMAGE_FIRST_SECTION (nt_header);
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 31347
diff changeset
325
24097
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
326 dst = (unsigned char *) p_outfile->file_base;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
327
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
328 COPY_CHUNK ("Copying DOS header...", dos_header,
63245
c16acb8501d2 (copy_executable_and_add_section): Pass non-zero
Eli Zaretskii <eliz@gnu.org>
parents: 52401
diff changeset
329 (DWORD) nt_header - (DWORD) dos_header, be_verbose);
24097
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
330 dst_nt_header = (PIMAGE_NT_HEADERS) dst;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
331 COPY_CHUNK ("Copying NT header...", nt_header,
63245
c16acb8501d2 (copy_executable_and_add_section): Pass non-zero
Eli Zaretskii <eliz@gnu.org>
parents: 52401
diff changeset
332 (DWORD) section - (DWORD) nt_header, be_verbose);
24097
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
333 dst_section = (PIMAGE_SECTION_HEADER) dst;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
334 COPY_CHUNK ("Copying section table...", section,
63245
c16acb8501d2 (copy_executable_and_add_section): Pass non-zero
Eli Zaretskii <eliz@gnu.org>
parents: 52401
diff changeset
335 nt_header->FileHeader.NumberOfSections * sizeof (*section),
c16acb8501d2 (copy_executable_and_add_section): Pass non-zero
Eli Zaretskii <eliz@gnu.org>
parents: 52401
diff changeset
336 be_verbose);
24097
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
337
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
338 /* To improve the efficiency of demand loading, make the file
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
339 alignment match the section alignment (VC++ 6.0 does this by
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
340 default anyway). */
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
341 dst_nt_header->OptionalHeader.FileAlignment =
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
342 dst_nt_header->OptionalHeader.SectionAlignment;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
343
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
344 /* Add an uninitialized data section at the end, of the specified name
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
345 and virtual size. */
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
346 if (find_section (new_section_name, nt_header) == NULL)
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
347 /* Leave room for extra section table entry; filled in below. */
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
348 dst += sizeof (*section);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
349 else
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
350 new_section_name = NULL;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
351
24236
c83c9b5cc93f ROUND_UP_DST_AND_ZERO): Renamed from ROUND_UP_DST. Zeroes the
Andrew Innes <andrewi@gnu.org>
parents: 24097
diff changeset
352 /* Align the first section's raw data area, and set the header size
c83c9b5cc93f ROUND_UP_DST_AND_ZERO): Renamed from ROUND_UP_DST. Zeroes the
Andrew Innes <andrewi@gnu.org>
parents: 24097
diff changeset
353 field accordingly. */
c83c9b5cc93f ROUND_UP_DST_AND_ZERO): Renamed from ROUND_UP_DST. Zeroes the
Andrew Innes <andrewi@gnu.org>
parents: 24097
diff changeset
354 ROUND_UP_DST_AND_ZERO (dst_nt_header->OptionalHeader.FileAlignment);
c83c9b5cc93f ROUND_UP_DST_AND_ZERO): Renamed from ROUND_UP_DST. Zeroes the
Andrew Innes <andrewi@gnu.org>
parents: 24097
diff changeset
355 dst_nt_header->OptionalHeader.SizeOfHeaders = DST_TO_OFFSET ();
c83c9b5cc93f ROUND_UP_DST_AND_ZERO): Renamed from ROUND_UP_DST. Zeroes the
Andrew Innes <andrewi@gnu.org>
parents: 24097
diff changeset
356
24097
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
357 for (i = 0; i < nt_header->FileHeader.NumberOfSections; i++)
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
358 {
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
359 char msg[100];
63245
c16acb8501d2 (copy_executable_and_add_section): Pass non-zero
Eli Zaretskii <eliz@gnu.org>
parents: 52401
diff changeset
360 /* Windows section names are fixed 8-char strings, only
c16acb8501d2 (copy_executable_and_add_section): Pass non-zero
Eli Zaretskii <eliz@gnu.org>
parents: 52401
diff changeset
361 zero-terminated if the name is shorter than 8 characters. */
c16acb8501d2 (copy_executable_and_add_section): Pass non-zero
Eli Zaretskii <eliz@gnu.org>
parents: 52401
diff changeset
362 sprintf (msg, "Copying raw data for %.8s...", section->Name);
24097
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
363
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
364 /* Update the file-relative offset for this section's raw data (if
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
365 it has any) in case things have been relocated; we will update
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
366 the other offsets below once we know where everything is. */
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
367 if (dst_section->PointerToRawData)
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
368 dst_section->PointerToRawData = DST_TO_OFFSET ();
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
369
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
370 /* Can always copy the original raw data. */
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
371 COPY_CHUNK
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
372 (msg, OFFSET_TO_PTR (section->PointerToRawData, p_infile),
63245
c16acb8501d2 (copy_executable_and_add_section): Pass non-zero
Eli Zaretskii <eliz@gnu.org>
parents: 52401
diff changeset
373 section->SizeOfRawData, be_verbose);
24097
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
374
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
375 /* Round up the raw data size to the new alignment. */
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
376 dst_section->SizeOfRawData =
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
377 ROUND_UP (dst_section->SizeOfRawData,
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
378 dst_nt_header->OptionalHeader.FileAlignment);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
379
24236
c83c9b5cc93f ROUND_UP_DST_AND_ZERO): Renamed from ROUND_UP_DST. Zeroes the
Andrew Innes <andrewi@gnu.org>
parents: 24097
diff changeset
380 /* Align the next section's raw data area. */
c83c9b5cc93f ROUND_UP_DST_AND_ZERO): Renamed from ROUND_UP_DST. Zeroes the
Andrew Innes <andrewi@gnu.org>
parents: 24097
diff changeset
381 ROUND_UP_DST_AND_ZERO (dst_nt_header->OptionalHeader.FileAlignment);
c83c9b5cc93f ROUND_UP_DST_AND_ZERO): Renamed from ROUND_UP_DST. Zeroes the
Andrew Innes <andrewi@gnu.org>
parents: 24097
diff changeset
382
24097
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
383 section++;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
384 dst_section++;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
385 }
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
386
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
387 /* Add the extra section entry (which adds no raw data). */
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
388 if (new_section_name != NULL)
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
389 {
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
390 dst_nt_header->FileHeader.NumberOfSections++;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
391 dst_nt_header->OptionalHeader.SizeOfImage += new_section_size;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
392 strncpy (dst_section->Name, new_section_name, sizeof (dst_section->Name));
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
393 dst_section->VirtualAddress =
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
394 section[-1].VirtualAddress
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
395 + ROUND_UP (section[-1].Misc.VirtualSize,
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
396 dst_nt_header->OptionalHeader.SectionAlignment);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
397 dst_section->Misc.VirtualSize = new_section_size;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
398 dst_section->PointerToRawData = 0;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
399 dst_section->SizeOfRawData = 0;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
400 dst_section->Characteristics =
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
401 IMAGE_SCN_CNT_UNINITIALIZED_DATA
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
402 | IMAGE_SCN_MEM_READ
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
403 | IMAGE_SCN_MEM_WRITE;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
404 }
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
405
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
406 /* Copy remainder of source image. */
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
407 section--;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
408 offset = ROUND_UP (section->PointerToRawData + section->SizeOfRawData,
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
409 nt_header->OptionalHeader.FileAlignment);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
410 COPY_CHUNK
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
411 ("Copying remainder of executable...",
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
412 OFFSET_TO_PTR (offset, p_infile),
63245
c16acb8501d2 (copy_executable_and_add_section): Pass non-zero
Eli Zaretskii <eliz@gnu.org>
parents: 52401
diff changeset
413 p_infile->size - offset, be_verbose);
24097
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
414
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
415 /* Final size for new image. */
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
416 p_outfile->size = DST_TO_OFFSET ();
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
417
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
418 /* Now patch up remaining file-relative offsets. */
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
419 section = IMAGE_FIRST_SECTION (nt_header);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
420 dst_section = IMAGE_FIRST_SECTION (dst_nt_header);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
421
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
422 #define ADJUST_OFFSET(var) \
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
423 do { \
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
424 if ((var) != 0) \
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
425 (var) = relocate_offset ((var), nt_header, dst_nt_header); \
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
426 } while (0)
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
427
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
428 dst_nt_header->OptionalHeader.SizeOfInitializedData = 0;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
429 dst_nt_header->OptionalHeader.SizeOfUninitializedData = 0;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
430 for (i = 0; i < dst_nt_header->FileHeader.NumberOfSections; i++)
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
431 {
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
432 /* Recompute data sizes for completeness. */
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
433 if (dst_section[i].Characteristics & IMAGE_SCN_CNT_INITIALIZED_DATA)
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
434 dst_nt_header->OptionalHeader.SizeOfInitializedData +=
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
435 ROUND_UP (dst_section[i].Misc.VirtualSize, dst_nt_header->OptionalHeader.FileAlignment);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
436 else if (dst_section[i].Characteristics & IMAGE_SCN_CNT_UNINITIALIZED_DATA)
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
437 dst_nt_header->OptionalHeader.SizeOfUninitializedData +=
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
438 ROUND_UP (dst_section[i].Misc.VirtualSize, dst_nt_header->OptionalHeader.FileAlignment);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
439
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
440 ADJUST_OFFSET (dst_section[i].PointerToLinenumbers);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
441 }
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
442
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
443 ADJUST_OFFSET (dst_nt_header->FileHeader.PointerToSymbolTable);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
444
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
445 /* Update offsets in debug directory entries. */
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
446 {
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
447 IMAGE_DATA_DIRECTORY debug_dir =
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
448 dst_nt_header->OptionalHeader.DataDirectory[IMAGE_DIRECTORY_ENTRY_DEBUG];
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
449 PIMAGE_DEBUG_DIRECTORY debug_entry;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
450
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
451 section = rva_to_section (debug_dir.VirtualAddress, dst_nt_header);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
452 if (section)
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
453 {
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
454 debug_entry = (PIMAGE_DEBUG_DIRECTORY)
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
455 (RVA_TO_OFFSET (debug_dir.VirtualAddress, section) + p_outfile->file_base);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
456 debug_dir.Size /= sizeof (IMAGE_DEBUG_DIRECTORY);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
457
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
458 for (i = 0; i < debug_dir.Size; i++, debug_entry++)
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
459 ADJUST_OFFSET (debug_entry->PointerToRawData);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
460 }
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
461 }
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
462 }
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
463
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
464
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
465 int
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
466 main (int argc, char **argv)
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
467 {
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
468 file_data in_file, out_file;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
469 char out_filename[MAX_PATH], in_filename[MAX_PATH];
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
470 unsigned long size;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
471 PIMAGE_DOS_HEADER dos_header;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
472 PIMAGE_NT_HEADERS nt_header;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
473
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
474 #define OLD_NAME argv[1]
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
475 #define NEW_NAME argv[2]
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
476 #define SECTION_NAME argv[3]
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
477 #define SECTION_SIZE argv[4]
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
478
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
479 strcpy (in_filename, OLD_NAME);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
480 strcpy (out_filename, NEW_NAME);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
481
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
482 printf ("Dumping from %s\n", in_filename);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
483 printf (" to %s\n", out_filename);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
484
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
485 /* Open the undumped executable file. */
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
486 if (!open_input_file (&in_file, in_filename))
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
487 {
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 31347
diff changeset
488 printf ("Failed to open %s (%d)...bailing.\n",
24097
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
489 in_filename, GetLastError ());
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
490 exit (1);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
491 }
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
492 dos_header = (PIMAGE_DOS_HEADER) in_file.file_base;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
493 nt_header = (PIMAGE_NT_HEADERS) ((char *) dos_header + dos_header->e_lfanew);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
494 /* Allow for expansion due to increasing file align to section align.
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
495 We can overestimate here, since close_file_data will update the
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
496 size exactly. */
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
497 size = in_file.size
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
498 + nt_header->OptionalHeader.SectionAlignment
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
499 * nt_header->FileHeader.NumberOfSections;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
500 if (!open_output_file (&out_file, out_filename, size))
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
501 {
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 31347
diff changeset
502 printf ("Failed to open %s (%d)...bailing.\n",
24097
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
503 out_filename, GetLastError ());
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
504 exit (1);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
505 }
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
506
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
507 copy_executable_and_add_section (&in_file, &out_file,
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
508 SECTION_NAME,
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
509 atoi (SECTION_SIZE) * 1024 * 1024);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
510
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
511 /* Patch up header fields; profiler is picky about this. */
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
512 {
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
513 HANDLE hImagehelp = LoadLibrary ("imagehlp.dll");
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
514 DWORD headersum;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
515 DWORD checksum;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
516
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
517 dos_header = (PIMAGE_DOS_HEADER) out_file.file_base;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
518 nt_header = (PIMAGE_NT_HEADERS) ((char *) dos_header + dos_header->e_lfanew);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
519
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
520 nt_header->OptionalHeader.CheckSum = 0;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
521 // nt_header->FileHeader.TimeDateStamp = time (NULL);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
522 // dos_header->e_cp = size / 512;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
523 // nt_header->OptionalHeader.SizeOfImage = size;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
524
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
525 pfnCheckSumMappedFile = (void *) GetProcAddress (hImagehelp, "CheckSumMappedFile");
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
526 if (pfnCheckSumMappedFile)
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
527 {
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
528 // nt_header->FileHeader.TimeDateStamp = time (NULL);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
529 pfnCheckSumMappedFile (out_file.file_base,
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
530 out_file.size,
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
531 &headersum,
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
532 &checksum);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
533 nt_header->OptionalHeader.CheckSum = checksum;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
534 }
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
535 FreeLibrary (hImagehelp);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
536 }
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
537
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
538 close_file_data (&in_file);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
539 close_file_data (&out_file);
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
540
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
541 return 0;
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
542 }
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
543
6232d3bc1f46 Initial revision
Andrew Innes <andrewi@gnu.org>
parents:
diff changeset
544 /* eof */
52401
695cf19ef79e Add arch taglines
Miles Bader <miles@gnu.org>
parents: 49600
diff changeset
545
695cf19ef79e Add arch taglines
Miles Bader <miles@gnu.org>
parents: 49600
diff changeset
546 /* arch-tag: 17e2b0aa-8c17-4bd1-b24b-1cda689245fa
695cf19ef79e Add arch taglines
Miles Bader <miles@gnu.org>
parents: 49600
diff changeset
547 (do not change this comment) */