Use get_symbol_version_string in BFD_JUMP_TABLE_SYMBOLS
[deliverable/binutils-gdb.git] / bfd / ihex.c
CommitLineData
252b5132 1/* BFD back-end for Intel Hex objects.
4b95cf5c 2 Copyright (C) 1995-2014 Free Software Foundation, Inc.
252b5132
RH
3 Written by Ian Lance Taylor of Cygnus Support <ian@cygnus.com>.
4
3d8dbe36 5 This file is part of BFD, the Binary File Descriptor library.
252b5132 6
3d8dbe36
NC
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
cd123cb7 9 the Free Software Foundation; either version 3 of the License, or
3d8dbe36 10 (at your option) any later version.
252b5132 11
3d8dbe36
NC
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
252b5132 16
3d8dbe36
NC
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the Free Software
cd123cb7
NC
19 Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
20 MA 02110-1301, USA. */
21
252b5132
RH
22
23/* This is what Intel Hex files look like:
24
251. INTEL FORMATS
26
27A. Intel 1
28
29 16-bit address-field format, for files 64k bytes in length or less.
30
31 DATA RECORD
32 Byte 1 Header = colon(:)
33 2..3 The number of data bytes in hex notation
34 4..5 High byte of the record load address
35 6..7 Low byte of the record load address
36 8..9 Record type, must be "00"
37 10..x Data bytes in hex notation:
38 x = (number of bytes - 1) * 2 + 11
39 x+1..x+2 Checksum in hex notation
40 x+3..x+4 Carriage return, line feed
41
42 END RECORD
43 Byte 1 Header = colon (:)
44 2..3 The byte count, must be "00"
45 4..7 Transfer-address (usually "0000")
46 the jump-to address, execution start address
47 8..9 Record type, must be "01"
48 10..11 Checksum, in hex notation
49 12..13 Carriage return, line feed
50
51B. INTEL 2
52
53 MCS-86 format, using a 20-bit address for files larger than 64K bytes.
54
55 DATA RECORD
56 Byte 1 Header = colon (:)
57 2..3 The byte count of this record, hex notation
58 4..5 High byte of the record load address
59 6..7 Low byte of the record load address
60 8..9 Record type, must be "00"
61 10..x The data bytes in hex notation:
62 x = (number of data bytes - 1) * 2 + 11
63 x+1..x+2 Checksum in hex notation
64 x+3..x+4 Carriage return, line feed
65
66 EXTENDED ADDRESS RECORD
67 Byte 1 Header = colon(:)
68 2..3 The byte count, must be "02"
69 4..7 Load address, must be "0000"
70 8..9 Record type, must be "02"
71 10..11 High byte of the offset address
72 12..13 Low byte of the offset address
73 14..15 Checksum in hex notation
74 16..17 Carriage return, line feed
75
76 The checksums are the two's complement of the 8-bit sum
77 without carry of the byte count, offset address, and the
78 record type.
79
80 START ADDRESS RECORD
81 Byte 1 Header = colon (:)
82 2..3 The byte count, must be "04"
83 4..7 Load address, must be "0000"
84 8..9 Record type, must be "03"
85 10..13 8086 CS value
86 14..17 8086 IP value
87 18..19 Checksum in hex notation
88 20..21 Carriage return, line feed
89
90Another document reports these additional types:
91
92 EXTENDED LINEAR ADDRESS RECORD
93 Byte 1 Header = colon (:)
94 2..3 The byte count, must be "02"
95 4..7 Load address, must be "0000"
96 8..9 Record type, must be "04"
97 10..13 Upper 16 bits of address of subsequent records
98 14..15 Checksum in hex notation
99 16..17 Carriage return, line feed
100
101 START LINEAR ADDRESS RECORD
102 Byte 1 Header = colon (:)
103 2..3 The byte count, must be "02"
104 4..7 Load address, must be "0000"
105 8..9 Record type, must be "05"
106 10..13 Upper 16 bits of start address
107 14..15 Checksum in hex notation
108 16..17 Carriage return, line feed
109
110The MRI compiler uses this, which is a repeat of type 5:
111
112 EXTENDED START RECORD
113 Byte 1 Header = colon (:)
114 2..3 The byte count, must be "04"
115 4..7 Load address, must be "0000"
116 8..9 Record type, must be "05"
117 10..13 Upper 16 bits of start address
118 14..17 Lower 16 bits of start address
119 18..19 Checksum in hex notation
116c20d2 120 20..21 Carriage return, line feed. */
252b5132 121
252b5132 122#include "sysdep.h"
3db64b00 123#include "bfd.h"
252b5132
RH
124#include "libbfd.h"
125#include "libiberty.h"
3882b010 126#include "safe-ctype.h"
252b5132 127
252b5132
RH
128/* The number of bytes we put on one line during output. */
129
65d7f9a6 130#define CHUNK 16
252b5132 131
3d8dbe36 132/* Macros for converting between hex and binary. */
252b5132 133
3d8dbe36 134#define NIBBLE(x) (hex_value (x))
252b5132
RH
135#define HEX2(buffer) ((NIBBLE ((buffer)[0]) << 4) + NIBBLE ((buffer)[1]))
136#define HEX4(buffer) ((HEX2 (buffer) << 8) + HEX2 ((buffer) + 2))
3d8dbe36 137#define ISHEX(x) (hex_p (x))
252b5132
RH
138
139/* When we write out an ihex value, the values can not be output as
140 they are seen. Instead, we hold them in memory in this structure. */
141
142struct ihex_data_list
143{
144 struct ihex_data_list *next;
145 bfd_byte *data;
146 bfd_vma where;
147 bfd_size_type size;
148};
149
150/* The ihex tdata information. */
151
152struct ihex_data_struct
153{
154 struct ihex_data_list *head;
155 struct ihex_data_list *tail;
156};
157
158/* Initialize by filling in the hex conversion array. */
159
160static void
116c20d2 161ihex_init (void)
252b5132 162{
b34976b6 163 static bfd_boolean inited;
252b5132
RH
164
165 if (! inited)
166 {
b34976b6 167 inited = TRUE;
252b5132
RH
168 hex_init ();
169 }
170}
171
172/* Create an ihex object. */
173
b34976b6 174static bfd_boolean
116c20d2 175ihex_mkobject (bfd *abfd)
252b5132 176{
487e54f2 177 struct ihex_data_struct *tdata;
252b5132 178
a50b1753 179 tdata = (struct ihex_data_struct *) bfd_alloc (abfd, sizeof (* tdata));
487e54f2 180 if (tdata == NULL)
b34976b6 181 return FALSE;
487e54f2
AM
182
183 abfd->tdata.ihex_data = tdata;
184 tdata->head = NULL;
185 tdata->tail = NULL;
b34976b6 186 return TRUE;
252b5132
RH
187}
188
189/* Read a byte from a BFD. Set *ERRORPTR if an error occurred.
190 Return EOF on error or end of file. */
191
192static INLINE int
116c20d2 193ihex_get_byte (bfd *abfd, bfd_boolean *errorptr)
252b5132
RH
194{
195 bfd_byte c;
196
dc810e39 197 if (bfd_bread (&c, (bfd_size_type) 1, abfd) != 1)
252b5132
RH
198 {
199 if (bfd_get_error () != bfd_error_file_truncated)
b34976b6 200 *errorptr = TRUE;
252b5132
RH
201 return EOF;
202 }
203
204 return (int) (c & 0xff);
205}
206
207/* Report a problem in an Intel Hex file. */
208
209static void
116c20d2 210ihex_bad_byte (bfd *abfd, unsigned int lineno, int c, bfd_boolean error)
252b5132
RH
211{
212 if (c == EOF)
213 {
214 if (! error)
215 bfd_set_error (bfd_error_file_truncated);
216 }
217 else
218 {
219 char buf[10];
220
3882b010 221 if (! ISPRINT (c))
252b5132
RH
222 sprintf (buf, "\\%03o", (unsigned int) c);
223 else
224 {
225 buf[0] = c;
226 buf[1] = '\0';
227 }
228 (*_bfd_error_handler)
d003868e
AM
229 (_("%B:%d: unexpected character `%s' in Intel Hex file"),
230 abfd, lineno, buf);
252b5132
RH
231 bfd_set_error (bfd_error_bad_value);
232 }
233}
234
235/* Read an Intel hex file and turn it into sections. We create a new
236 section for each contiguous set of bytes. */
237
b34976b6 238static bfd_boolean
116c20d2 239ihex_scan (bfd *abfd)
252b5132
RH
240{
241 bfd_vma segbase;
242 bfd_vma extbase;
243 asection *sec;
dc810e39 244 unsigned int lineno;
b34976b6 245 bfd_boolean error;
252b5132
RH
246 bfd_byte *buf = NULL;
247 size_t bufsize;
248 int c;
249
250 if (bfd_seek (abfd, (file_ptr) 0, SEEK_SET) != 0)
251 goto error_return;
252
253 abfd->start_address = 0;
254
255 segbase = 0;
256 extbase = 0;
257 sec = NULL;
258 lineno = 1;
b34976b6 259 error = FALSE;
252b5132 260 bufsize = 0;
3d8dbe36 261
252b5132
RH
262 while ((c = ihex_get_byte (abfd, &error)) != EOF)
263 {
264 if (c == '\r')
265 continue;
266 else if (c == '\n')
267 {
268 ++lineno;
269 continue;
270 }
271 else if (c != ':')
272 {
273 ihex_bad_byte (abfd, lineno, c, error);
274 goto error_return;
275 }
276 else
277 {
278 file_ptr pos;
279 char hdr[8];
280 unsigned int i;
281 unsigned int len;
282 bfd_vma addr;
283 unsigned int type;
284 unsigned int chars;
285 unsigned int chksum;
286
287 /* This is a data record. */
252b5132
RH
288 pos = bfd_tell (abfd) - 1;
289
290 /* Read the header bytes. */
dc810e39 291 if (bfd_bread (hdr, (bfd_size_type) 8, abfd) != 8)
252b5132
RH
292 goto error_return;
293
294 for (i = 0; i < 8; i++)
295 {
296 if (! ISHEX (hdr[i]))
297 {
298 ihex_bad_byte (abfd, lineno, hdr[i], error);
299 goto error_return;
300 }
301 }
302
303 len = HEX2 (hdr);
304 addr = HEX4 (hdr + 2);
305 type = HEX2 (hdr + 6);
306
307 /* Read the data bytes. */
252b5132
RH
308 chars = len * 2 + 2;
309 if (chars >= bufsize)
310 {
a50b1753 311 buf = (bfd_byte *) bfd_realloc (buf, (bfd_size_type) chars);
252b5132
RH
312 if (buf == NULL)
313 goto error_return;
314 bufsize = chars;
315 }
316
dc810e39 317 if (bfd_bread (buf, (bfd_size_type) chars, abfd) != chars)
252b5132
RH
318 goto error_return;
319
320 for (i = 0; i < chars; i++)
321 {
322 if (! ISHEX (buf[i]))
323 {
0102ea8c 324 ihex_bad_byte (abfd, lineno, buf[i], error);
252b5132
RH
325 goto error_return;
326 }
327 }
328
329 /* Check the checksum. */
330 chksum = len + addr + (addr >> 8) + type;
331 for (i = 0; i < len; i++)
332 chksum += HEX2 (buf + 2 * i);
333 if (((- chksum) & 0xff) != (unsigned int) HEX2 (buf + 2 * i))
334 {
335 (*_bfd_error_handler)
d003868e
AM
336 (_("%B:%u: bad checksum in Intel Hex file (expected %u, found %u)"),
337 abfd, lineno,
252b5132
RH
338 (- chksum) & 0xff, (unsigned int) HEX2 (buf + 2 * i));
339 bfd_set_error (bfd_error_bad_value);
340 goto error_return;
341 }
342
343 switch (type)
344 {
345 case 0:
346 /* This is a data record. */
347 if (sec != NULL
eea6121a 348 && sec->vma + sec->size == extbase + segbase + addr)
252b5132
RH
349 {
350 /* This data goes at the end of the section we are
351 currently building. */
eea6121a 352 sec->size += len;
252b5132
RH
353 }
354 else if (len > 0)
355 {
356 char secbuf[20];
357 char *secname;
dc810e39 358 bfd_size_type amt;
117ed4f8 359 flagword flags;
252b5132
RH
360
361 sprintf (secbuf, ".sec%d", bfd_count_sections (abfd) + 1);
dc810e39 362 amt = strlen (secbuf) + 1;
a50b1753 363 secname = (char *) bfd_alloc (abfd, amt);
252b5132
RH
364 if (secname == NULL)
365 goto error_return;
366 strcpy (secname, secbuf);
117ed4f8
AM
367 flags = SEC_HAS_CONTENTS | SEC_LOAD | SEC_ALLOC;
368 sec = bfd_make_section_with_flags (abfd, secname, flags);
252b5132
RH
369 if (sec == NULL)
370 goto error_return;
252b5132
RH
371 sec->vma = extbase + segbase + addr;
372 sec->lma = extbase + segbase + addr;
eea6121a 373 sec->size = len;
252b5132
RH
374 sec->filepos = pos;
375 }
376 break;
377
378 case 1:
379 /* An end record. */
380 if (abfd->start_address == 0)
381 abfd->start_address = addr;
382 if (buf != NULL)
383 free (buf);
b34976b6 384 return TRUE;
252b5132
RH
385
386 case 2:
387 /* An extended address record. */
388 if (len != 2)
389 {
390 (*_bfd_error_handler)
d003868e
AM
391 (_("%B:%u: bad extended address record length in Intel Hex file"),
392 abfd, lineno);
252b5132
RH
393 bfd_set_error (bfd_error_bad_value);
394 goto error_return;
395 }
396
397 segbase = HEX4 (buf) << 4;
398
399 sec = NULL;
400
401 break;
402
403 case 3:
404 /* An extended start address record. */
405 if (len != 4)
406 {
407 (*_bfd_error_handler)
d003868e
AM
408 (_("%B:%u: bad extended start address length in Intel Hex file"),
409 abfd, lineno);
252b5132
RH
410 bfd_set_error (bfd_error_bad_value);
411 goto error_return;
412 }
413
414 abfd->start_address += (HEX4 (buf) << 4) + HEX4 (buf + 4);
415
416 sec = NULL;
417
418 break;
419
420 case 4:
421 /* An extended linear address record. */
422 if (len != 2)
423 {
424 (*_bfd_error_handler)
d003868e
AM
425 (_("%B:%u: bad extended linear address record length in Intel Hex file"),
426 abfd, lineno);
252b5132
RH
427 bfd_set_error (bfd_error_bad_value);
428 goto error_return;
429 }
430
431 extbase = HEX4 (buf) << 16;
432
433 sec = NULL;
434
435 break;
436
437 case 5:
438 /* An extended linear start address record. */
439 if (len != 2 && len != 4)
440 {
441 (*_bfd_error_handler)
d003868e
AM
442 (_("%B:%u: bad extended linear start address length in Intel Hex file"),
443 abfd, lineno);
252b5132
RH
444 bfd_set_error (bfd_error_bad_value);
445 goto error_return;
446 }
447
448 if (len == 2)
449 abfd->start_address += HEX4 (buf) << 16;
450 else
451 abfd->start_address = (HEX4 (buf) << 16) + HEX4 (buf + 4);
452
453 sec = NULL;
454
455 break;
456
457 default:
458 (*_bfd_error_handler)
d003868e
AM
459 (_("%B:%u: unrecognized ihex type %u in Intel Hex file"),
460 abfd, lineno, type);
252b5132
RH
461 bfd_set_error (bfd_error_bad_value);
462 goto error_return;
463 }
464 }
465 }
466
467 if (error)
468 goto error_return;
469
470 if (buf != NULL)
471 free (buf);
472
b34976b6 473 return TRUE;
252b5132
RH
474
475 error_return:
476 if (buf != NULL)
477 free (buf);
b34976b6 478 return FALSE;
252b5132
RH
479}
480
481/* Try to recognize an Intel Hex file. */
482
483static const bfd_target *
116c20d2 484ihex_object_p (bfd *abfd)
252b5132 485{
116c20d2 486 void * tdata_save;
252b5132
RH
487 bfd_byte b[9];
488 unsigned int i;
489 unsigned int type;
490
491 ihex_init ();
492
493 if (bfd_seek (abfd, (file_ptr) 0, SEEK_SET) != 0)
494 return NULL;
dc810e39 495 if (bfd_bread (b, (bfd_size_type) 9, abfd) != 9)
252b5132
RH
496 {
497 if (bfd_get_error () == bfd_error_file_truncated)
498 bfd_set_error (bfd_error_wrong_format);
499 return NULL;
500 }
501
502 if (b[0] != ':')
503 {
504 bfd_set_error (bfd_error_wrong_format);
505 return NULL;
506 }
507
508 for (i = 1; i < 9; i++)
509 {
510 if (! ISHEX (b[i]))
511 {
512 bfd_set_error (bfd_error_wrong_format);
513 return NULL;
514 }
515 }
516
517 type = HEX2 (b + 7);
518 if (type > 5)
519 {
520 bfd_set_error (bfd_error_wrong_format);
521 return NULL;
522 }
523
524 /* OK, it looks like it really is an Intel Hex file. */
487e54f2
AM
525 tdata_save = abfd->tdata.any;
526 if (! ihex_mkobject (abfd) || ! ihex_scan (abfd))
527 {
528 if (abfd->tdata.any != tdata_save && abfd->tdata.any != NULL)
529 bfd_release (abfd, abfd->tdata.any);
530 abfd->tdata.any = tdata_save;
531 return NULL;
532 }
252b5132
RH
533
534 return abfd->xvec;
535}
536
537/* Read the contents of a section in an Intel Hex file. */
538
b34976b6 539static bfd_boolean
116c20d2 540ihex_read_section (bfd *abfd, asection *section, bfd_byte *contents)
252b5132
RH
541{
542 int c;
543 bfd_byte *p;
544 bfd_byte *buf = NULL;
545 size_t bufsize;
b34976b6 546 bfd_boolean error;
252b5132
RH
547
548 if (bfd_seek (abfd, section->filepos, SEEK_SET) != 0)
549 goto error_return;
550
551 p = contents;
552 bufsize = 0;
b34976b6 553 error = FALSE;
252b5132
RH
554 while ((c = ihex_get_byte (abfd, &error)) != EOF)
555 {
556 char hdr[8];
557 unsigned int len;
252b5132
RH
558 unsigned int type;
559 unsigned int i;
560
561 if (c == '\r' || c == '\n')
562 continue;
563
564 /* This is called after ihex_scan has succeeded, so we ought to
565 know the exact format. */
566 BFD_ASSERT (c == ':');
567
dc810e39 568 if (bfd_bread (hdr, (bfd_size_type) 8, abfd) != 8)
252b5132
RH
569 goto error_return;
570
571 len = HEX2 (hdr);
252b5132
RH
572 type = HEX2 (hdr + 6);
573
574 /* We should only see type 0 records here. */
575 if (type != 0)
576 {
577 (*_bfd_error_handler)
d003868e 578 (_("%B: internal error in ihex_read_section"), abfd);
252b5132
RH
579 bfd_set_error (bfd_error_bad_value);
580 goto error_return;
581 }
582
583 if (len * 2 > bufsize)
584 {
a50b1753 585 buf = (bfd_byte *) bfd_realloc (buf, (bfd_size_type) len * 2);
252b5132
RH
586 if (buf == NULL)
587 goto error_return;
588 bufsize = len * 2;
589 }
590
dc810e39 591 if (bfd_bread (buf, (bfd_size_type) len * 2, abfd) != len * 2)
252b5132
RH
592 goto error_return;
593
594 for (i = 0; i < len; i++)
595 *p++ = HEX2 (buf + 2 * i);
eea6121a 596 if ((bfd_size_type) (p - contents) >= section->size)
252b5132
RH
597 {
598 /* We've read everything in the section. */
599 if (buf != NULL)
600 free (buf);
b34976b6 601 return TRUE;
252b5132
RH
602 }
603
604 /* Skip the checksum. */
dc810e39 605 if (bfd_bread (buf, (bfd_size_type) 2, abfd) != 2)
252b5132
RH
606 goto error_return;
607 }
608
eea6121a 609 if ((bfd_size_type) (p - contents) < section->size)
252b5132
RH
610 {
611 (*_bfd_error_handler)
d003868e 612 (_("%B: bad section length in ihex_read_section"), abfd);
252b5132
RH
613 bfd_set_error (bfd_error_bad_value);
614 goto error_return;
615 }
616
617 if (buf != NULL)
618 free (buf);
619
b34976b6 620 return TRUE;
252b5132
RH
621
622 error_return:
623 if (buf != NULL)
624 free (buf);
b34976b6 625 return FALSE;
252b5132
RH
626}
627
628/* Get the contents of a section in an Intel Hex file. */
629
b34976b6 630static bfd_boolean
116c20d2
NC
631ihex_get_section_contents (bfd *abfd,
632 asection *section,
633 void * location,
634 file_ptr offset,
635 bfd_size_type count)
252b5132
RH
636{
637 if (section->used_by_bfd == NULL)
638 {
eea6121a 639 section->used_by_bfd = bfd_alloc (abfd, section->size);
252b5132 640 if (section->used_by_bfd == NULL)
b34976b6 641 return FALSE;
a50b1753
NC
642 if (! ihex_read_section (abfd, section,
643 (bfd_byte *) section->used_by_bfd))
b34976b6 644 return FALSE;
252b5132
RH
645 }
646
647 memcpy (location, (bfd_byte *) section->used_by_bfd + offset,
648 (size_t) count);
649
b34976b6 650 return TRUE;
252b5132
RH
651}
652
653/* Set the contents of a section in an Intel Hex file. */
654
b34976b6 655static bfd_boolean
116c20d2
NC
656ihex_set_section_contents (bfd *abfd,
657 asection *section,
658 const void * location,
659 file_ptr offset,
660 bfd_size_type count)
252b5132
RH
661{
662 struct ihex_data_list *n;
663 bfd_byte *data;
664 struct ihex_data_struct *tdata;
665
666 if (count == 0
667 || (section->flags & SEC_ALLOC) == 0
668 || (section->flags & SEC_LOAD) == 0)
b34976b6 669 return TRUE;
252b5132 670
a50b1753 671 n = (struct ihex_data_list *) bfd_alloc (abfd, sizeof (* n));
252b5132 672 if (n == NULL)
b34976b6 673 return FALSE;
252b5132 674
a50b1753 675 data = (bfd_byte *) bfd_alloc (abfd, count);
252b5132 676 if (data == NULL)
b34976b6 677 return FALSE;
252b5132
RH
678 memcpy (data, location, (size_t) count);
679
680 n->data = data;
681 n->where = section->lma + offset;
682 n->size = count;
683
684 /* Sort the records by address. Optimize for the common case of
685 adding a record to the end of the list. */
686 tdata = abfd->tdata.ihex_data;
687 if (tdata->tail != NULL
688 && n->where >= tdata->tail->where)
689 {
690 tdata->tail->next = n;
691 n->next = NULL;
692 tdata->tail = n;
693 }
694 else
695 {
116c20d2 696 struct ihex_data_list **pp;
252b5132
RH
697
698 for (pp = &tdata->head;
699 *pp != NULL && (*pp)->where < n->where;
700 pp = &(*pp)->next)
701 ;
702 n->next = *pp;
703 *pp = n;
704 if (n->next == NULL)
705 tdata->tail = n;
706 }
707
b34976b6 708 return TRUE;
252b5132
RH
709}
710
711/* Write a record out to an Intel Hex file. */
712
b34976b6 713static bfd_boolean
116c20d2
NC
714ihex_write_record (bfd *abfd,
715 size_t count,
716 unsigned int addr,
717 unsigned int type,
718 bfd_byte *data)
252b5132
RH
719{
720 static const char digs[] = "0123456789ABCDEF";
721 char buf[9 + CHUNK * 2 + 4];
722 char *p;
723 unsigned int chksum;
724 unsigned int i;
dc810e39 725 size_t total;
252b5132
RH
726
727#define TOHEX(buf, v) \
728 ((buf)[0] = digs[((v) >> 4) & 0xf], (buf)[1] = digs[(v) & 0xf])
729
730 buf[0] = ':';
731 TOHEX (buf + 1, count);
732 TOHEX (buf + 3, (addr >> 8) & 0xff);
733 TOHEX (buf + 5, addr & 0xff);
734 TOHEX (buf + 7, type);
735
736 chksum = count + addr + (addr >> 8) + type;
737
738 for (i = 0, p = buf + 9; i < count; i++, p += 2, data++)
739 {
740 TOHEX (p, *data);
741 chksum += *data;
742 }
743
744 TOHEX (p, (- chksum) & 0xff);
745 p[2] = '\r';
746 p[3] = '\n';
747
dc810e39
AM
748 total = 9 + count * 2 + 4;
749 if (bfd_bwrite (buf, (bfd_size_type) total, abfd) != total)
b34976b6 750 return FALSE;
252b5132 751
b34976b6 752 return TRUE;
252b5132
RH
753}
754
755/* Write out an Intel Hex file. */
756
b34976b6 757static bfd_boolean
116c20d2 758ihex_write_object_contents (bfd *abfd)
252b5132
RH
759{
760 bfd_vma segbase;
761 bfd_vma extbase;
762 struct ihex_data_list *l;
763
764 segbase = 0;
765 extbase = 0;
766 for (l = abfd->tdata.ihex_data->head; l != NULL; l = l->next)
767 {
768 bfd_vma where;
769 bfd_byte *p;
770 bfd_size_type count;
771
772 where = l->where;
773 p = l->data;
774 count = l->size;
116c20d2 775
252b5132
RH
776 while (count > 0)
777 {
dc810e39
AM
778 size_t now;
779 unsigned int rec_addr;
252b5132
RH
780
781 now = count;
dc810e39 782 if (count > CHUNK)
252b5132
RH
783 now = CHUNK;
784
785 if (where > segbase + extbase + 0xffff)
786 {
787 bfd_byte addr[2];
788
789 /* We need a new base address. */
790 if (where <= 0xfffff)
791 {
792 /* The addresses should be sorted. */
793 BFD_ASSERT (extbase == 0);
794
795 segbase = where & 0xf0000;
796 addr[0] = (bfd_byte)(segbase >> 12) & 0xff;
797 addr[1] = (bfd_byte)(segbase >> 4) & 0xff;
798 if (! ihex_write_record (abfd, 2, 0, 2, addr))
b34976b6 799 return FALSE;
252b5132
RH
800 }
801 else
802 {
803 /* The extended address record and the extended
804 linear address record are combined, at least by
805 some readers. We need an extended linear address
806 record here, so if we've already written out an
807 extended address record, zero it out to avoid
808 confusion. */
809 if (segbase != 0)
810 {
811 addr[0] = 0;
812 addr[1] = 0;
813 if (! ihex_write_record (abfd, 2, 0, 2, addr))
b34976b6 814 return FALSE;
252b5132
RH
815 segbase = 0;
816 }
817
818 extbase = where & 0xffff0000;
819 if (where > extbase + 0xffff)
820 {
821 char buf[20];
822
823 sprintf_vma (buf, where);
824 (*_bfd_error_handler)
ca09e32b 825 (_("%s: address 0x%s out of range for Intel Hex file"),
252b5132
RH
826 bfd_get_filename (abfd), buf);
827 bfd_set_error (bfd_error_bad_value);
b34976b6 828 return FALSE;
252b5132
RH
829 }
830 addr[0] = (bfd_byte)(extbase >> 24) & 0xff;
831 addr[1] = (bfd_byte)(extbase >> 16) & 0xff;
832 if (! ihex_write_record (abfd, 2, 0, 4, addr))
b34976b6 833 return FALSE;
252b5132
RH
834 }
835 }
836
dc810e39 837 rec_addr = where - (extbase + segbase);
9e81ee67
NC
838
839 /* Output records shouldn't cross 64K boundaries. */
3d8dbe36
NC
840 if (rec_addr + now > 0xffff)
841 now = 0x10000 - rec_addr;
9e81ee67 842
dc810e39 843 if (! ihex_write_record (abfd, now, rec_addr, 0, p))
b34976b6 844 return FALSE;
252b5132
RH
845
846 where += now;
847 p += now;
848 count -= now;
849 }
850 }
851
852 if (abfd->start_address != 0)
853 {
854 bfd_vma start;
855 bfd_byte startbuf[4];
856
857 start = abfd->start_address;
858
859 if (start <= 0xfffff)
860 {
861 startbuf[0] = (bfd_byte)((start & 0xf0000) >> 12) & 0xff;
862 startbuf[1] = 0;
863 startbuf[2] = (bfd_byte)(start >> 8) & 0xff;
864 startbuf[3] = (bfd_byte)start & 0xff;
865 if (! ihex_write_record (abfd, 4, 0, 3, startbuf))
b34976b6 866 return FALSE;
252b5132
RH
867 }
868 else
869 {
870 startbuf[0] = (bfd_byte)(start >> 24) & 0xff;
871 startbuf[1] = (bfd_byte)(start >> 16) & 0xff;
872 startbuf[2] = (bfd_byte)(start >> 8) & 0xff;
873 startbuf[3] = (bfd_byte)start & 0xff;
874 if (! ihex_write_record (abfd, 4, 0, 5, startbuf))
b34976b6 875 return FALSE;
252b5132
RH
876 }
877 }
878
879 if (! ihex_write_record (abfd, 0, 0, 1, NULL))
b34976b6 880 return FALSE;
252b5132 881
b34976b6 882 return TRUE;
252b5132
RH
883}
884
252b5132
RH
885/* Set the architecture for the output file. The architecture is
886 irrelevant, so we ignore errors about unknown architectures. */
887
b34976b6 888static bfd_boolean
116c20d2
NC
889ihex_set_arch_mach (bfd *abfd,
890 enum bfd_architecture arch,
891 unsigned long mach)
252b5132
RH
892{
893 if (! bfd_default_set_arch_mach (abfd, arch, mach))
894 {
895 if (arch != bfd_arch_unknown)
b34976b6 896 return FALSE;
252b5132 897 }
b34976b6 898 return TRUE;
252b5132
RH
899}
900
901/* Get the size of the headers, for the linker. */
902
252b5132 903static int
a6b96beb
AM
904ihex_sizeof_headers (bfd *abfd ATTRIBUTE_UNUSED,
905 struct bfd_link_info *info ATTRIBUTE_UNUSED)
252b5132
RH
906{
907 return 0;
908}
909
910/* Some random definitions for the target vector. */
911
116c20d2
NC
912#define ihex_close_and_cleanup _bfd_generic_close_and_cleanup
913#define ihex_bfd_free_cached_info _bfd_generic_bfd_free_cached_info
914#define ihex_new_section_hook _bfd_generic_new_section_hook
915#define ihex_get_section_contents_in_window _bfd_generic_get_section_contents_in_window
916#define ihex_get_symtab_upper_bound bfd_0l
917#define ihex_canonicalize_symtab ((long (*) (bfd *, asymbol **)) bfd_0l)
918#define ihex_make_empty_symbol _bfd_generic_make_empty_symbol
919#define ihex_print_symbol _bfd_nosymbols_print_symbol
920#define ihex_get_symbol_info _bfd_nosymbols_get_symbol_info
60bb06bc 921#define ihex_get_symbol_version_string _bfd_nosymbols_get_symbol_version_string
116c20d2
NC
922#define ihex_bfd_is_target_special_symbol ((bfd_boolean (*) (bfd *, asymbol *)) bfd_false)
923#define ihex_bfd_is_local_label_name _bfd_nosymbols_bfd_is_local_label_name
924#define ihex_get_lineno _bfd_nosymbols_get_lineno
925#define ihex_find_nearest_line _bfd_nosymbols_find_nearest_line
9c461f7d 926#define ihex_find_line _bfd_nosymbols_find_line
4ab527b0 927#define ihex_find_inliner_info _bfd_nosymbols_find_inliner_info
116c20d2
NC
928#define ihex_bfd_make_debug_symbol _bfd_nosymbols_bfd_make_debug_symbol
929#define ihex_read_minisymbols _bfd_nosymbols_read_minisymbols
930#define ihex_minisymbol_to_symbol _bfd_nosymbols_minisymbol_to_symbol
116c20d2
NC
931#define ihex_bfd_get_relocated_section_contents bfd_generic_get_relocated_section_contents
932#define ihex_bfd_relax_section bfd_generic_relax_section
933#define ihex_bfd_gc_sections bfd_generic_gc_sections
ae17ab41 934#define ihex_bfd_lookup_section_flags bfd_generic_lookup_section_flags
116c20d2
NC
935#define ihex_bfd_merge_sections bfd_generic_merge_sections
936#define ihex_bfd_is_group_section bfd_generic_is_group_section
937#define ihex_bfd_discard_group bfd_generic_discard_group
938#define ihex_section_already_linked _bfd_generic_section_already_linked
3023e3f6 939#define ihex_bfd_define_common_symbol bfd_generic_define_common_symbol
116c20d2 940#define ihex_bfd_link_hash_table_create _bfd_generic_link_hash_table_create
116c20d2
NC
941#define ihex_bfd_link_add_symbols _bfd_generic_link_add_symbols
942#define ihex_bfd_link_just_syms _bfd_generic_link_just_syms
1338dd10
PB
943#define ihex_bfd_copy_link_hash_symbol_type \
944 _bfd_generic_copy_link_hash_symbol_type
116c20d2
NC
945#define ihex_bfd_final_link _bfd_generic_final_link
946#define ihex_bfd_link_split_section _bfd_generic_link_split_section
252b5132
RH
947
948/* The Intel Hex target vector. */
949
950const bfd_target ihex_vec =
951{
116c20d2 952 "ihex", /* Name. */
252b5132 953 bfd_target_ihex_flavour,
116c20d2
NC
954 BFD_ENDIAN_UNKNOWN, /* Target byte order. */
955 BFD_ENDIAN_UNKNOWN, /* Target headers byte order. */
956 0, /* Object flags. */
957 (SEC_HAS_CONTENTS | SEC_ALLOC | SEC_LOAD), /* Section flags. */
958 0, /* Leading underscore. */
959 ' ', /* AR_pad_char. */
960 16, /* AR_max_namelen. */
0aabe54e 961 0, /* match priority. */
252b5132
RH
962 bfd_getb64, bfd_getb_signed_64, bfd_putb64,
963 bfd_getb32, bfd_getb_signed_32, bfd_putb32,
116c20d2 964 bfd_getb16, bfd_getb_signed_16, bfd_putb16, /* Data. */
252b5132
RH
965 bfd_getb64, bfd_getb_signed_64, bfd_putb64,
966 bfd_getb32, bfd_getb_signed_32, bfd_putb32,
116c20d2 967 bfd_getb16, bfd_getb_signed_16, bfd_putb16, /* Headers. */
252b5132
RH
968
969 {
970 _bfd_dummy_target,
116c20d2 971 ihex_object_p, /* bfd_check_format. */
252b5132
RH
972 _bfd_dummy_target,
973 _bfd_dummy_target,
974 },
975 {
976 bfd_false,
977 ihex_mkobject,
978 _bfd_generic_mkarchive,
979 bfd_false,
980 },
116c20d2 981 { /* bfd_write_contents. */
252b5132
RH
982 bfd_false,
983 ihex_write_object_contents,
984 _bfd_write_archive_contents,
985 bfd_false,
986 },
987
988 BFD_JUMP_TABLE_GENERIC (ihex),
989 BFD_JUMP_TABLE_COPY (_bfd_generic),
990 BFD_JUMP_TABLE_CORE (_bfd_nocore),
991 BFD_JUMP_TABLE_ARCHIVE (_bfd_noarchive),
992 BFD_JUMP_TABLE_SYMBOLS (ihex),
72f6ea61 993 BFD_JUMP_TABLE_RELOCS (_bfd_norelocs),
252b5132
RH
994 BFD_JUMP_TABLE_WRITE (ihex),
995 BFD_JUMP_TABLE_LINK (ihex),
996 BFD_JUMP_TABLE_DYNAMIC (_bfd_nodynamic),
997
c3c89269 998 NULL,
dc810e39 999
116c20d2 1000 NULL
252b5132 1001};
This page took 0.789088 seconds and 4 git commands to generate.