Signed-off-by: Gabor Juhos <juhosg@openwrt.org> SVN-Revision: 33848master
parent
d3c368c324
commit
86b788b1b4
@ -0,0 +1,354 @@ |
||||
/*
|
||||
* Copyright (C) 2012 Gabor Juhos <juhosg@openwrt.org> |
||||
* |
||||
* This program is free software; you can redistribute it and/or modify it |
||||
* under the terms of the GNU General Public License version 2 as published |
||||
* by the Free Software Foundation. |
||||
* |
||||
*/ |
||||
#include <stdio.h> |
||||
#include <stdlib.h> |
||||
#include <stdint.h> |
||||
#include <string.h> |
||||
#include <unistd.h> /* for unlink() */ |
||||
#include <libgen.h> |
||||
#include <getopt.h> /* for getopt() */ |
||||
#include <stdarg.h> |
||||
#include <errno.h> |
||||
#include <sys/stat.h> |
||||
|
||||
#include "cyg_crc.h" |
||||
|
||||
#include <arpa/inet.h> |
||||
#include <netinet/in.h> |
||||
|
||||
#define IH_MAGIC 0x27051956 /* Image Magic Number */ |
||||
#define IH_NMLEN 32 /* Image Name Length */ |
||||
|
||||
#define UM_MAGIC 0x55525F46 |
||||
#define UM_HEADER_LEN 12 |
||||
|
||||
/*
|
||||
* all data in network byte order (aka natural aka bigendian) |
||||
*/ |
||||
struct u_media_header { |
||||
uint32_t ih_magic; /* Image Header Magic Number */ |
||||
uint32_t ih_hcrc; /* Image Header CRC Checksum */ |
||||
uint32_t ih_time; /* Image Creation Timestamp */ |
||||
uint32_t ih_size; /* Image Data Size */ |
||||
uint32_t ih_load; /* Data Load Address */ |
||||
uint32_t ih_ep; /* Entry Point Address */ |
||||
uint32_t ih_dcrc; /* Image Data CRC Checksum */ |
||||
uint8_t ih_os; /* Operating System */ |
||||
uint8_t ih_arch; /* CPU architecture */ |
||||
uint8_t ih_type; /* Image Type */ |
||||
uint8_t ih_comp; /* Compression Type */ |
||||
uint8_t ih_name[IH_NMLEN - UM_HEADER_LEN]; /* Image Name */ |
||||
|
||||
uint32_t ih_UMedia_magic; /* U-Media magic number */ |
||||
uint32_t ih_UMedia_boardID; /* U-Media board ID */ |
||||
uint8_t ih_UMedia_imageType; /* U-Media image type */ |
||||
uint8_t ih_UMedia_LoadDefault; /* U-Media load to factory default setting */ |
||||
uint8_t ih_UMedia_temp1; /* U-Media didn't use this tag */ |
||||
uint8_t ih_UMedia_temp2; /* U-Media didn't use this tag */ |
||||
} __attribute__ ((packed)); |
||||
|
||||
struct if_info { |
||||
char *file_name; /* name of the file */ |
||||
uint32_t file_size; /* length of the file */ |
||||
}; |
||||
|
||||
static char *progname; |
||||
static char *ofname; |
||||
static struct if_info if_info; |
||||
static int factory_defaults; |
||||
static uint32_t board_id; |
||||
static uint8_t image_type; |
||||
|
||||
/*
|
||||
* Message macros |
||||
*/ |
||||
#define ERR(fmt, ...) do { \ |
||||
fflush(0); \
|
||||
fprintf(stderr, "[%s] *** error: " fmt "\n", \
|
||||
progname, ## __VA_ARGS__ ); \
|
||||
} while (0) |
||||
|
||||
#define ERRS(fmt, ...) do { \ |
||||
int save = errno; \
|
||||
fflush(0); \
|
||||
fprintf(stderr, "[%s] *** error: " fmt " (%s)\n", \
|
||||
progname, ## __VA_ARGS__, strerror(save)); \
|
||||
} while (0) |
||||
|
||||
#define DBG(fmt, ...) do { \ |
||||
fprintf(stderr, "[%s] " fmt "\n", progname, ## __VA_ARGS__ ); \
|
||||
} while (0) |
||||
|
||||
static void usage(int status) |
||||
{ |
||||
FILE *stream = (status != EXIT_SUCCESS) ? stderr : stdout; |
||||
|
||||
fprintf(stream, "Usage: %s [OPTIONS...]\n", progname); |
||||
fprintf(stream, |
||||
"\n" |
||||
"Options:\n" |
||||
" -B <board_id> set board ID to <board_id>\n" |
||||
" -i <file> read input from the file <file>\n" |
||||
" -F load factory defaults\n" |
||||
" -o <file> write output to the file <file>\n" |
||||
" -T <type> set image type to <type>\n" |
||||
" -h show this screen\n" |
||||
); |
||||
|
||||
exit(status); |
||||
} |
||||
|
||||
static int str2u32(char *arg, uint32_t *val) |
||||
{ |
||||
char *err = NULL; |
||||
uint32_t t; |
||||
|
||||
errno=0; |
||||
t = strtoul(arg, &err, 0); |
||||
if (errno || (err==arg) || ((err != NULL) && *err)) { |
||||
return -1; |
||||
} |
||||
|
||||
*val = t; |
||||
return 0; |
||||
} |
||||
|
||||
static int str2u8(char *arg, uint8_t *val) |
||||
{ |
||||
char *err = NULL; |
||||
uint32_t t; |
||||
|
||||
errno=0; |
||||
t = strtoul(arg, &err, 0); |
||||
if (errno || (err==arg) || ((err != NULL) && *err)) { |
||||
return -1; |
||||
} |
||||
|
||||
if (t > 255) |
||||
return -1; |
||||
|
||||
*val = t; |
||||
return 0; |
||||
} |
||||
|
||||
static int get_file_stat(struct if_info *fdata) |
||||
{ |
||||
struct stat st; |
||||
int res; |
||||
|
||||
if (fdata->file_name == NULL) |
||||
return 0; |
||||
|
||||
res = stat(fdata->file_name, &st); |
||||
if (res){ |
||||
ERRS("stat failed on %s", fdata->file_name); |
||||
return res; |
||||
} |
||||
|
||||
fdata->file_size = st.st_size; |
||||
return 0; |
||||
} |
||||
|
||||
static int read_to_buf(struct if_info *fdata, char *buf) |
||||
{ |
||||
FILE *f; |
||||
int ret = EXIT_FAILURE; |
||||
|
||||
f = fopen(fdata->file_name, "r"); |
||||
if (f == NULL) { |
||||
ERRS("could not open \"%s\" for reading", fdata->file_name); |
||||
goto out; |
||||
} |
||||
|
||||
errno = 0; |
||||
fread(buf, fdata->file_size, 1, f); |
||||
if (errno != 0) { |
||||
ERRS("unable to read from file \"%s\"", fdata->file_name); |
||||
goto out_close; |
||||
} |
||||
|
||||
ret = EXIT_SUCCESS; |
||||
|
||||
out_close: |
||||
fclose(f); |
||||
out: |
||||
return ret; |
||||
} |
||||
|
||||
static int check_options(void) |
||||
{ |
||||
int ret; |
||||
|
||||
if (ofname == NULL) { |
||||
ERR("no %s specified", "output file"); |
||||
return -1; |
||||
} |
||||
|
||||
if (if_info.file_name == NULL) { |
||||
ERR("no %s specified", "input file"); |
||||
return -1; |
||||
} |
||||
|
||||
ret = get_file_stat(&if_info); |
||||
if (ret) |
||||
return ret; |
||||
|
||||
return 0; |
||||
} |
||||
|
||||
static int write_fw(char *data, int len) |
||||
{ |
||||
FILE *f; |
||||
int ret = EXIT_FAILURE; |
||||
|
||||
f = fopen(ofname, "w"); |
||||
if (f == NULL) { |
||||
ERRS("could not open \"%s\" for writing", ofname); |
||||
goto out; |
||||
} |
||||
|
||||
errno = 0; |
||||
fwrite(data, len, 1, f); |
||||
if (errno) { |
||||
ERRS("unable to write output file"); |
||||
goto out_flush; |
||||
} |
||||
|
||||
ret = EXIT_SUCCESS; |
||||
|
||||
out_flush: |
||||
fflush(f); |
||||
fclose(f); |
||||
if (ret != EXIT_SUCCESS) { |
||||
unlink(ofname); |
||||
} |
||||
out: |
||||
return ret; |
||||
} |
||||
|
||||
static int fix_header(void) |
||||
{ |
||||
int buflen; |
||||
char *buf; |
||||
uint32_t crc, crc_orig; |
||||
struct u_media_header *hdr; |
||||
int ret = EXIT_FAILURE; |
||||
|
||||
buflen = if_info.file_size; |
||||
if (buflen < sizeof(*hdr)) { |
||||
ERR("invalid input file\n"); |
||||
return ret; |
||||
} |
||||
|
||||
buf = malloc(buflen); |
||||
if (!buf) { |
||||
ERR("no memory for buffer\n"); |
||||
goto out; |
||||
} |
||||
|
||||
ret = read_to_buf(&if_info, buf); |
||||
if (ret) |
||||
goto out_free_buf; |
||||
|
||||
hdr = (struct u_media_header *) buf; |
||||
if (ntohl(hdr->ih_magic) != IH_MAGIC) { |
||||
ERR("invalid input file, bad magic\n"); |
||||
goto out_free_buf; |
||||
} |
||||
|
||||
/* verify header CRC */ |
||||
crc_orig = ntohl(hdr->ih_hcrc); |
||||
hdr->ih_hcrc = 0; |
||||
crc = cyg_ether_crc32((unsigned char *)hdr, sizeof(*hdr)); |
||||
if (crc != crc_orig) { |
||||
ERR("invalid input file, bad header CRC\n"); |
||||
goto out_free_buf; |
||||
} |
||||
|
||||
hdr->ih_name[IH_NMLEN - UM_HEADER_LEN - 1] = '\0'; |
||||
|
||||
/* set U-Media specific fields */ |
||||
hdr->ih_UMedia_magic = htonl(UM_MAGIC); |
||||
hdr->ih_UMedia_boardID = htonl(board_id); |
||||
hdr->ih_UMedia_imageType = image_type; |
||||
hdr->ih_UMedia_LoadDefault = (factory_defaults) ? 1 : 0; |
||||
|
||||
/* update header CRC */ |
||||
crc = cyg_ether_crc32((unsigned char *)hdr, sizeof(*hdr)); |
||||
hdr->ih_hcrc = htonl(crc); |
||||
|
||||
ret = write_fw(buf, buflen); |
||||
if (ret) |
||||
goto out_free_buf; |
||||
|
||||
DBG("U-Media header fixed in \"%s\"", ofname); |
||||
|
||||
ret = EXIT_SUCCESS; |
||||
|
||||
out_free_buf: |
||||
free(buf); |
||||
out: |
||||
return ret; |
||||
} |
||||
|
||||
int main(int argc, char *argv[]) |
||||
{ |
||||
int ret = EXIT_FAILURE; |
||||
|
||||
progname = basename(argv[0]); |
||||
|
||||
while (1) { |
||||
int c; |
||||
|
||||
c = getopt(argc, argv, "B:Fi:o:T:h"); |
||||
if (c == -1) |
||||
break; |
||||
|
||||
switch (c) { |
||||
case 'B': |
||||
if (str2u32(optarg, &board_id)) { |
||||
ERR("%s is invalid '%s'", |
||||
"board ID", optarg); |
||||
goto out; |
||||
} |
||||
break; |
||||
case 'T': |
||||
if (str2u8(optarg, &image_type)) { |
||||
ERR("%s is invalid '%s'", |
||||
"image type", optarg); |
||||
goto out; |
||||
} |
||||
break; |
||||
case 'F': |
||||
factory_defaults = 1; |
||||
break; |
||||
case 'i': |
||||
if_info.file_name = optarg; |
||||
break; |
||||
case 'o': |
||||
ofname = optarg; |
||||
break; |
||||
case 'h': |
||||
usage(EXIT_SUCCESS); |
||||
break; |
||||
default: |
||||
usage(EXIT_FAILURE); |
||||
break; |
||||
} |
||||
} |
||||
|
||||
ret = check_options(); |
||||
if (ret) |
||||
goto out; |
||||
|
||||
ret = fix_header(); |
||||
|
||||
out: |
||||
return ret; |
||||
} |
Loading…
Reference in new issue