nbd's makefile/menuconfig rewrite
[openwrt/svn-archive/archive.git] / openwrt / target / utils / src / motorola-bin.c
1 /*
2 * motorola-bin.c
3 *
4 * Copyright (C) 2005 Mike Baker
5 * Openwrt.org
6 *
7 * $Id$
8 *
9 * This program is free software; you can redistribute it and/or
10 * modify it under the terms of the GNU General Public License
11 * as published by the Free Software Foundation; either version 2
12 * of the License, or (at your option) any later version.
13 *
14 * This program is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 * GNU General Public License for more details.
18 *
19 * You should have received a copy of the GNU General Public License
20 * along with this program; if not, write to the Free Software
21 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
22 *
23 */
24
25 #include <stdio.h>
26 #include <stdlib.h>
27 #include <unistd.h>
28 #include <fcntl.h>
29 #include <sys/mman.h>
30 #include <string.h>
31 #include <netinet/in.h>
32
33 unsigned long *crc32;
34
35 void init_crc32()
36 {
37 unsigned long crc;
38 unsigned long poly = ntohl(0x2083b8ed);
39 int n, bit;
40 if ((crc32 = (unsigned long *) malloc(256 * sizeof(unsigned long))) == (void *)-1) {
41 perror("malloc");
42 exit(1);
43 }
44 for (n = 0; n < 256; n++) {
45 crc = (unsigned long) n;
46 for (bit = 0; bit < 8; bit++)
47 crc = (crc & 1) ? (poly ^ (crc >> 1)) : (crc >> 1);
48 crc32[n] = crc;
49 }
50 }
51
52 unsigned int crc32buf(char *buf, size_t len)
53 {
54 unsigned int crc = 0xFFFFFFFF;
55 for (; len; len--, buf++)
56 crc = crc32[(crc ^ *buf) & 0xff] ^ (crc >> 8);
57 return crc;
58 }
59
60 struct motorola {
61 unsigned int crc; // crc32 of the remainder
62 unsigned int flags; // unknown, 10577050
63 char *trx; // standard trx
64 };
65
66 int main(int argc, char **argv)
67 {
68 unsigned int len;
69 int fd;
70 void *trx;
71 struct motorola *firmware;
72
73 if (argc<3) {
74 printf("%s <trx> <motorola.bin>\n",argv[0]);
75 exit(0);
76 }
77
78 // mmap trx file
79 if (((fd = open(argv[1], O_RDONLY)) < 0)
80 || ((len = lseek(fd, 0, SEEK_END)) < 0)
81 || ((trx = mmap(0, len, PROT_READ, MAP_SHARED, fd, 0)) == (void *) (-1))
82 || (close(fd) < 0)) {
83 perror("open/malloc");
84 exit(-1);
85 }
86
87 // create a firmware image in memory
88 // and copy the trx to it
89 firmware = malloc(len+8);
90 memcpy(&firmware->trx,trx,len);
91 munmap(trx,len);
92
93 // setup the motorola headers
94 init_crc32();
95 firmware->flags = ntohl(0x10577050);
96 firmware->crc = htonl(crc32buf((char *)&firmware->flags,len+4));
97
98 // write the firmware
99 if (((fd = open(argv[2], O_CREAT|O_WRONLY,0644)) < 0)
100 || (write(fd,firmware,len+8) != len+8)
101 || (close(fd) < 0)) {
102 perror("write");
103 exit(-1);
104 }
105
106 free(firmware);
107
108 return 0;
109 }