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