347 lines
7.7 KiB
C
347 lines
7.7 KiB
C
/*
|
|
* Copyright (c) 2003-2009, Takahide Matsutsuka.
|
|
* All rights reserved.
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without
|
|
* modification, are permitted provided that the following conditions
|
|
* are met:
|
|
* 1. Redistributions of source code must retain the above copyright
|
|
* notice, this list of conditions and the following disclaimer.
|
|
* 2. Redistributions in binary form must reproduce the above
|
|
* copyright notice, this list of conditions and the following
|
|
* disclaimer in the documentation and/or other materials provided
|
|
* with the distribution.
|
|
* 3. The name of the author may not be used to endorse or promote
|
|
* products derived from this software without specific prior
|
|
* written permission.
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS
|
|
* OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
|
|
* WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
|
* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
|
|
* DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
|
|
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
|
|
* GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
|
|
* INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
|
|
* WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
|
|
* NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
|
|
* SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
|
*
|
|
* $Id: hexameter.c,v 1.3 2009/12/15 07:13:14 matsutsuka Exp $
|
|
*
|
|
*/
|
|
|
|
/*
|
|
* A main file for hexameter.
|
|
*/
|
|
|
|
#define MAX_PATH 1024
|
|
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <unistd.h>
|
|
#include <ctype.h>
|
|
|
|
#include "ihx2bin.h"
|
|
|
|
#define MAXFILES 256
|
|
|
|
typedef struct {
|
|
char* output;
|
|
char* dir;
|
|
char *files[MAXFILES];
|
|
unsigned int defsize;
|
|
struct ConvertDefinition defs[DEF_MAX];
|
|
unsigned char verbose;
|
|
// number of the ihx files
|
|
int length;
|
|
// output file size
|
|
int size;
|
|
// output file wriiten size
|
|
int written;
|
|
} Configuration;
|
|
|
|
static
|
|
const char* IHXEXT = ".ihx";
|
|
|
|
static
|
|
const char *strcasestr(const char *haystack, const char *needle) {
|
|
int haypos;
|
|
int needlepos;
|
|
|
|
haypos = 0;
|
|
while (haystack[haypos]) {
|
|
if (tolower (haystack[haypos]) == tolower(needle[0])) {
|
|
needlepos = 1;
|
|
while ( (needle[needlepos]) &&
|
|
(tolower(haystack[haypos + needlepos])
|
|
== tolower(needle[needlepos])) )
|
|
++needlepos;
|
|
if (! needle[needlepos]) return (haystack + haypos);
|
|
}
|
|
++haypos;
|
|
}
|
|
return NULL;
|
|
}
|
|
|
|
static
|
|
char *changeExt(const char *path, const char* ext) {
|
|
char *p;
|
|
char *tail;
|
|
char *changed;
|
|
int len;
|
|
int extlen = strlen(ext);
|
|
|
|
for (tail = (char*) path; *tail != 0; tail++);
|
|
for (p = tail; p > path; p--) {
|
|
if (*p == '.') {
|
|
len = p - path;
|
|
changed = (char*) malloc(len + extlen + 2);
|
|
|
|
strncpy(changed, path, len + 1);
|
|
strcpy(changed + len + 1, ext);
|
|
return changed;
|
|
}
|
|
}
|
|
|
|
len = strlen(path);
|
|
changed = (char*) malloc(len + extlen + 2);
|
|
strncpy(changed, path, len);
|
|
*(changed + len) = '.';
|
|
strcpy(changed + len + 1, ext);
|
|
return changed;
|
|
}
|
|
|
|
static
|
|
unsigned char analyzeOption(int argc, char **argv, Configuration *config) {
|
|
int c;
|
|
char *defval;
|
|
|
|
opterr = 0;
|
|
while ((c = getopt(argc, argv, "hvo:d:b:")) != EOF) {
|
|
switch (c) {
|
|
case 'v':
|
|
config->verbose = 1;
|
|
break;
|
|
case 'o':
|
|
config->output = optarg;
|
|
break;
|
|
case 'b':
|
|
sscanf(optarg, "%x", &config->size);
|
|
break;
|
|
case 'd':
|
|
if (config->defsize >= DEF_MAX) {
|
|
printf("excess number of definitions\n");
|
|
return 1;
|
|
}
|
|
defval = strchr(optarg, '=');
|
|
if (defval) {
|
|
*defval = 0;
|
|
config->defs[config->defsize].name = optarg;
|
|
config->defs[config->defsize].value = defval + 1;
|
|
config->defsize++;
|
|
} else {
|
|
printf("definition value required:%s\n", optarg);
|
|
return 1;
|
|
}
|
|
|
|
break;
|
|
case 'h':
|
|
printf("Hexameter: Convert Intel HEX file (ihx) to binary file, ver. 2.1.3\n");
|
|
printf("Copyright (c) 2003-2009 Takahide Matsutsuka <markn@markn.org>\n");
|
|
printf("Usage: hexameter [options] <ihx|bin> [<ihx|bin>...]\n");
|
|
printf("Options:\n");
|
|
printf(" -v verbose output\n");
|
|
printf(" -o <output file name>\n");
|
|
printf(" -d <name>=<value> define property\n");
|
|
printf(" -b <output file size in hexadecimal bytes>\n");
|
|
printf(" -h show this help\n");
|
|
|
|
return 1;
|
|
default:
|
|
printf("unknown option:%c\n", optopt);
|
|
return 1;
|
|
}
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
#if 0
|
|
static
|
|
int isFileExists(const char *dir, const char *filename) {
|
|
char path[MAX_PATH];
|
|
FILE *f;
|
|
|
|
if (!filename) {
|
|
return 0;
|
|
}
|
|
if (dir) {
|
|
strcpy(path, dir);
|
|
strcpy(path + strlen(path), filename);
|
|
} else {
|
|
strcpy(path, filename);
|
|
}
|
|
if (!(f = fopen(path, "rb"))) {
|
|
printf("cannot open: %s\n", filename);
|
|
return 1;
|
|
}
|
|
fclose(f);
|
|
|
|
return 0;
|
|
}
|
|
#endif
|
|
|
|
/**
|
|
* @return 1 if given filename has an extension of ".ihx"
|
|
*/
|
|
static
|
|
int isIhx(const char *filename) {
|
|
const char* pos = strcasestr(filename, IHXEXT);
|
|
if (pos && pos[strlen(IHXEXT)] == 0) {
|
|
return 1;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
static
|
|
int checkExistence(Configuration *config) {
|
|
int i;
|
|
FILE *f;
|
|
|
|
for (i = 0; i < config->length; i++) {
|
|
f = fopen(config->files[i], "r");
|
|
if (!f) {
|
|
printf("cannot open: %s\n", config->files[i]);
|
|
return 1;
|
|
}
|
|
fclose(f);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
/**
|
|
* @return writtn size in bytes
|
|
*/
|
|
static
|
|
int copy(FILE *out, const char* dir, const char* filename, unsigned char verbose) {
|
|
FILE *in;
|
|
int ch;
|
|
char path[MAX_PATH];
|
|
int bytes = 0;
|
|
if (!filename) {
|
|
return 0;
|
|
}
|
|
if (dir) {
|
|
strcpy(path, dir);
|
|
strcpy(path + strlen(path), filename);
|
|
} else {
|
|
strcpy(path, filename);
|
|
}
|
|
in = fopen(path, "rb");
|
|
while ((ch = getc(in)) != EOF) {
|
|
putc(ch, out);
|
|
bytes++;
|
|
}
|
|
fclose(in);
|
|
if (verbose) {
|
|
printf("imported file: %s, size=%d\n", path, bytes);
|
|
}
|
|
return bytes;
|
|
}
|
|
|
|
static
|
|
int output(Configuration *config) {
|
|
FILE *out;
|
|
int i;
|
|
|
|
if (!(out = fopen(config->output, "wb"))) {
|
|
printf("cannot open output file:%s\n", config->output);
|
|
return 1;
|
|
}
|
|
|
|
for (i = 0; i < config->length; i++) {
|
|
struct ConvertInfo info;
|
|
info.out = out;
|
|
info.filename = config->files[i];
|
|
info.verbose = config->verbose;
|
|
info.defsize = config->defsize;
|
|
info.defs = config->defs;
|
|
|
|
if (isIhx(config->files[i])) {
|
|
config->written += ihx2bin(&info);
|
|
} else {
|
|
config->written += copy(out, NULL, config->files[i], config->verbose);
|
|
}
|
|
}
|
|
|
|
if (config->size) {
|
|
if (config->verbose) {
|
|
printf("Writing trailing bytes\n");
|
|
}
|
|
for (; config->size > config->written; config->written++) {
|
|
putc(0, out);
|
|
}
|
|
}
|
|
|
|
fclose(out);
|
|
return 0;
|
|
}
|
|
|
|
|
|
int main(int argc, char **argv) {
|
|
Configuration config;
|
|
unsigned char r;
|
|
|
|
memset(&config, 0, sizeof(Configuration));
|
|
|
|
#ifndef __CYGWIN__
|
|
r = analyzeOption(argc, argv, &config);
|
|
if (r) {
|
|
return r;
|
|
}
|
|
#endif
|
|
while (optind < argc) {
|
|
#ifdef __CYGWIN__
|
|
r = analyzeOption(argc, argv, &config);
|
|
if (r) {
|
|
return r;
|
|
}
|
|
#endif
|
|
if (config.length >= MAXFILES) {
|
|
printf("too much files specified\n");
|
|
return 1;
|
|
}
|
|
config.files[config.length] = argv[optind];
|
|
config.length++;
|
|
optind++;
|
|
}
|
|
|
|
if (config.length == 0) {
|
|
printf("no input specified\n");
|
|
return 1;
|
|
}
|
|
|
|
if (config.output == NULL) {
|
|
config.output = changeExt(config.files[0], "bin");
|
|
}
|
|
|
|
r = checkExistence(&config);
|
|
if (r) {
|
|
return r;
|
|
}
|
|
if (config.verbose) {
|
|
printf("Generating file: %s\n", config.output);
|
|
}
|
|
r = output(&config);
|
|
if (r) {
|
|
return r;
|
|
}
|
|
|
|
if (config.verbose) {
|
|
printf("Done.\n");
|
|
}
|
|
return 0;
|
|
}
|