265908c59e20f8ceabbead38ee065eab622967b1
[fw/altos] / ao-tools / ao-elftohex / ao-elftohex.c
1 /*
2  * Copyright © 2013 Keith Packard <keithp@keithp.com>
3  *
4  * This program is free software; you can redistribute it and/or modify
5  * it under the terms of the GNU General Public License as published by
6  * the Free Software Foundation; either version 2 of the License, or
7  * (at your option) any later version.
8  *
9  * This program is distributed in the hope that it will be useful, but
10  * WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12  * General Public License for more details.
13  *
14  * You should have received a copy of the GNU General Public License along
15  * with this program; if not, write to the Free Software Foundation, Inc.,
16  * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
17  */
18
19 #include <getopt.h>
20 #include <stdlib.h>
21 #include <string.h>
22 #include "ao-hex.h"
23 #include "ao-elf.h"
24 #include "ao-verbose.h"
25
26 static const struct option options[] = {
27         { .name = "verbose", .has_arg = 1, .val = 'v' },
28         { .name = "output", .has_arg = 1, .val = 'o' },
29         { 0, 0, 0, 0},
30 };
31
32 static void usage(char *program)
33 {
34         fprintf(stderr, "usage: %s [--verbose=<level>] [--output=<output.ihx>] <input.elf>\n", program);
35         exit(1);
36 }
37
38 static int
39 ends_with(char *whole, char *suffix)
40 {
41         int whole_len = strlen(whole);
42         int suffix_len = strlen(suffix);
43
44         if (suffix_len > whole_len)
45                 return 0;
46         return strcmp(whole + whole_len - suffix_len, suffix) == 0;
47 }
48
49 int
50 main (int argc, char **argv)
51 {
52         char                    *input = NULL;
53         char                    *output = NULL;
54         struct ao_hex_image     *image;
55         struct ao_sym           *file_symbols;
56         int                     num_file_symbols;
57         FILE                    *file;
58         int                     c;
59
60         while ((c = getopt_long(argc, argv, "v:o:", options, NULL)) != -1) {
61                 switch (c) {
62                 case 'o':
63                         output = optarg;
64                         break;
65                 case 'v':
66                         ao_verbose = (int) strtol(optarg, NULL, 0);
67                         break;
68                 default:
69                         usage(argv[0]);
70                         break;
71                 }
72         }
73
74         input = argv[optind];
75         if (input == NULL)
76                 usage(argv[0]);
77
78         if (ends_with (input, ".ihx"))
79                 image = ao_hex_load(input, &file_symbols, &num_file_symbols);
80         else
81                 image = ao_load_elf(input, &file_symbols, &num_file_symbols);
82
83         if (!image)
84                 usage(argv[0]);
85
86         if (!output)
87                 file = stdout;
88         else {
89                 file = fopen(output, "w");
90                 if (!file) {
91                         perror(output);
92                         exit(1);
93                 }
94         }
95
96         if (!ao_hex_save(file, image, file_symbols, num_file_symbols)) {
97                 fprintf(stderr, "%s: failed to write hex file\n", output ? output : "<stdout>");
98                 if (output)
99                         unlink(output);
100                 exit(1);
101         }
102         exit(0);
103 }