#Normal system
CFLAGS=-MMD -O2 -Wall -I/opt/local/include -g
+
LDFLAGS=-L/opt/local/lib
LDLIBS=-lusb-1.0 -lrt
-CC=gcc
-HMLAN_OBJS=hmcfgusb.o hmland.o util.o
-HMSNIFF_OBJS=hmcfgusb.o hmuartlgw.o hmsniff.o
-FLASH_HMCFGUSB_OBJS=hmcfgusb.o firmware.o util.o flash-hmcfgusb.o
-FLASH_HMMODUART_OBJS=hmuartlgw.o firmware.o util.o flash-hmmoduart.o
-FLASH_OTA_OBJS=hmcfgusb.o culfw.o hmuartlgw.o firmware.o util.o flash-ota.o hm.o aes.o
+ifeq ($(firstword $(origin CC)),default)
+CC:=gcc
+endif
+
+HMLAN_OBJS:=hmcfgusb.o hmland.o util.o
+HMSNIFF_OBJS:=hmcfgusb.o hmuartlgw.o hmsniff.o
+FLASH_HMCFGUSB_OBJS:=hmcfgusb.o firmware.o util.o flash-hmcfgusb.o
+FLASH_HMMODUART_OBJS:=hmuartlgw.o firmware.o util.o flash-hmmoduart.o
+FLASH_OTA_OBJS:=hmcfgusb.o culfw.o hmuartlgw.o firmware.o util.o flash-ota.o hm.o aes.o
-OBJS=$(HMLAN_OBJS) $(HMSNIFF_OBJS) $(FLASH_HMCFGUSB_OBJS) $(FLASH_HMMODUART_OBJS) $(FLASH_OTA_OBJS)
+OBJS:=$(HMLAN_OBJS) $(HMSNIFF_OBJS) $(FLASH_HMCFGUSB_OBJS) $(FLASH_HMMODUART_OBJS) $(FLASH_OTA_OBJS)
all: hmland hmsniff flash-hmcfgusb flash-hmmoduart flash-ota
-DEPEND=$(OBJS:.o=.d)
+DEPEND:=$(OBJS:.o=.d)
-include $(DEPEND)
hmland: $(HMLAN_OBJS)
///////////////////\r
// Test functions\r
///////////////////\r
-int aes_test();\r
-int aes_ecb_test();\r
-int aes_cbc_test();\r
-int aes_ctr_test();\r
-int aes_ccm_test();\r
+int aes_test(void);\r
+int aes_ecb_test(void);\r
+int aes_cbc_test(void);\r
+int aes_ctr_test(void);\r
+int aes_ccm_test(void);\r
\r
#endif // AES_H\r
return NULL;
}
-int culfw_send(struct culfw_dev *dev, char *cmd, int cmdlen)
+int culfw_send(struct culfw_dev *dev, const char *cmd, int cmdlen)
{
int w = 0;
int ret;
};
struct culfw_dev *culfw_init(char *device, uint32_t speed, culfw_cb_fn cb, void *data);
-int culfw_send(struct culfw_dev *dev, char *cmd, int cmdlen);
+int culfw_send(struct culfw_dev *dev, const char *cmd, int cmdlen);
int culfw_poll(struct culfw_dev *dev, int timeout);
void culfw_close(struct culfw_dev *dev);
void culfw_flush(struct culfw_dev *dev);
--- /dev/null
+#!/bin/sh
+
+modprobe cp210x
+echo 1b1f c020 >/sys/bus/usb-serial/drivers/cp210x/new_id
/* generic firmware-functions for HomeMatic
*
- * Copyright (c) 2014-16 Michael Gernoth <michael@gernoth.net>
+ * Copyright (c) 2014-20 Michael Gernoth <michael@gernoth.net>
*
* Permission is hereby granted, free of charge, to any person obtaining a copy
* of this software and associated documentation files (the "Software"), to
#include <sys/stat.h>
#include <fcntl.h>
#include <sys/time.h>
+#include <unistd.h>
#include "util.h"
#include "firmware.h"
+#define CRC16_INIT 0xFFFF
+#define CRC16_POLY 0x1021
+
/* This might be wrong, but it works for current fw */
#define MAX_BLOCK_LENGTH 2048
-struct firmware* firmware_read_firmware(char *filename, int debug)
+#define HEX_BLOCK_LENGTH_328P 128
+#define HEX_BLOCK_LENGTH_644P 256
+#define HEX_IMAGE_SIZE_328P 0x7000
+#define HEX_IMAGE_SIZE_644P 0xF000
+#define HEX_IMAGE_SIZE_MAX 0x10000
+
+static uint16_t crc16(uint8_t* buf, int length, uint16_t crc)
+{
+ int i;
+ uint16_t flag;
+
+ while (length--) {
+ for (i = 0; i < 8; i++) {
+ flag = crc & 0x8000;
+ crc <<= 1;
+ if (*buf & 0x80) {
+ crc |= 1;
+ }
+ if (flag) {
+ crc ^= CRC16_POLY;
+ }
+ *buf <<= 1;
+ }
+ buf++;
+ }
+
+ return crc;
+}
+
+static struct firmware* firmware_read_ihex(int fd, struct firmware *fw, int atmega, int debug)
+{
+ uint8_t buf[2*MAX_BLOCK_LENGTH];
+ uint8_t image[HEX_IMAGE_SIZE_MAX];
+ uint16_t len = 0;
+ uint16_t addr = 0;
+ uint16_t type = 0;
+ uint32_t offset = 0;
+ uint32_t image_size = HEX_IMAGE_SIZE_328P;
+ uint32_t block_length = HEX_BLOCK_LENGTH_328P;
+ int r;
+ int i;
+
+ switch (atmega) {
+ case ATMEGA_644P:
+ printf("Using Atmega644P values for direct hex flashing\n");
+ image_size = HEX_IMAGE_SIZE_644P;
+ block_length = HEX_BLOCK_LENGTH_644P;
+ break;
+ case ATMEGA_328P:
+ printf("Using Atmega328P values for direct hex flashing\n");
+ image_size = HEX_IMAGE_SIZE_328P;
+ block_length = HEX_BLOCK_LENGTH_328P;
+ break;
+ default:
+ fprintf(stderr, "Atmega-type (328P/644P) not specified for flashing hex files\n");
+ exit(EXIT_FAILURE);
+ break;
+ }
+
+ memset(image, 0xff, sizeof(image));
+
+ while (1) {
+ memset(buf, 0, sizeof(buf));
+ len = 2 /* len */ + 4 /* len */ + 2 /* type */;
+ r = read(fd, buf, len);
+ if (r < 0) {
+ perror("read");
+ exit(EXIT_FAILURE);
+ } else if (r == 0) {
+ fprintf(stderr, "EOF without EOF record, Firmware file not valid!\n");
+ exit(EXIT_FAILURE);
+ } else if (r != len) {
+ printf("can't get record information!\n");
+ exit(EXIT_FAILURE);
+ }
+
+ for (i = 0; i < r; i++) {
+ if (!validate_nibble(buf[i])) {
+ fprintf(stderr, "Firmware file not valid!\n");
+ exit(EXIT_FAILURE);
+ }
+ }
+
+ len = (ascii_to_nibble(buf[0]) & 0xf)<< 4;
+ len |= ascii_to_nibble(buf[1]) & 0xf;
+
+ addr = (ascii_to_nibble(buf[2]) & 0xf)<< 4;
+ addr |= ascii_to_nibble(buf[3]) & 0xf;
+ addr <<= 8;
+ addr |= (ascii_to_nibble(buf[4]) & 0xf)<< 4;
+ addr |= ascii_to_nibble(buf[5]) & 0xf;
+
+ type = (ascii_to_nibble(buf[6]) & 0xf)<< 4;
+ type |= ascii_to_nibble(buf[7]) & 0xf;
+
+ if (debug)
+ printf("Length: %d, Address: 0x%04x, Type: 0x%02x\n", len, addr, type);
+
+ if (len > MAX_BLOCK_LENGTH) {
+ fprintf(stderr, "Invalid block-length %u > %u for block %d!\n", len, MAX_BLOCK_LENGTH, fw->fw_blocks+1);
+ exit(EXIT_FAILURE);
+ }
+
+ if (type == 0x00) {
+ r = read(fd, buf, (len * 2) + 2 /* crc */);
+ if (r < 0) {
+ perror("read");
+ exit(EXIT_FAILURE);
+ } else if (r == 0) {
+ break;
+ } else if (r < ((len * 2) + 2)) {
+ fprintf(stderr, "short read, aborting (%d < %d)\n", r, (len * 2) + 2);
+ exit(EXIT_FAILURE);
+ }
+
+ for (i = 0; i < len * 2; i+=2) {
+ if ((!validate_nibble(buf[i])) ||
+ (!validate_nibble(buf[i+1]))) {
+ fprintf(stderr, "Firmware file not valid!\n");
+ exit(EXIT_FAILURE);
+ }
+
+ image[addr + (i/2)] = (ascii_to_nibble(buf[i]) & 0xf)<< 4;
+ image[addr + (i/2)] |= ascii_to_nibble(buf[i+1]) & 0xf;
+ }
+
+ while (1) {
+ r = read(fd, buf, 1);
+ if (r < 0) {
+ perror("read");
+ exit(EXIT_FAILURE);
+ } else if (r == 0) {
+ break;
+ } else {
+ if (buf[0] == ':') {
+ break;
+ }
+ }
+ }
+ } else if (type == 0x01) {
+ break;
+ } else {
+ fprintf(stderr, "Can't handle iHex type 0x%02x\n", type);
+ exit(EXIT_FAILURE);
+ }
+ }
+
+ image[image_size-2] = 0x00;
+ image[image_size-1] = 0x00;
+
+ while (offset < image_size) {
+ fw->fw = realloc(fw->fw, sizeof(uint8_t*) * (fw->fw_blocks + 1));
+ if (fw->fw == NULL) {
+ perror("Can't reallocate fw->fw-blocklist");
+ exit(EXIT_FAILURE);
+ }
+
+ len = block_length;
+
+ fw->fw[fw->fw_blocks] = malloc(len + 4);
+ if (fw->fw[fw->fw_blocks] == NULL) {
+ perror("Can't allocate memory for fw->fw-block");
+ exit(EXIT_FAILURE);
+ }
+
+ fw->fw[fw->fw_blocks][0] = (fw->fw_blocks >> 8) & 0xff;
+ fw->fw[fw->fw_blocks][1] = fw->fw_blocks & 0xff;
+ fw->fw[fw->fw_blocks][2] = (len >> 8) & 0xff;
+ fw->fw[fw->fw_blocks][3] = len & 0xff;
+
+ memcpy(fw->fw[fw->fw_blocks] + 4, image + offset, len);
+
+ if ((len + offset) == image_size) {
+ uint16_t crc;
+
+ crc = crc16(image, image_size, CRC16_INIT);
+
+ if (debug)
+ printf("CRC: %04x\n", crc);
+
+ fw->fw[fw->fw_blocks][len+3] = (crc >> 8) & 0xff;
+ fw->fw[fw->fw_blocks][len+2] = crc & 0xff;
+ }
+
+ fw->fw_blocks++;
+ if (debug)
+ printf("Firmware block %d with length %u read.\n", fw->fw_blocks, len);
+
+ offset += len;
+ }
+
+ if (fw->fw_blocks == 0) {
+ fprintf(stderr, "Firmware file not valid!\n");
+ exit(EXIT_FAILURE);
+ }
+
+ printf("Firmware with %d blocks successfully read.\n", fw->fw_blocks);
+
+ return fw;
+}
+
+struct firmware* firmware_read_firmware(char *filename, int atmega, int debug)
{
struct firmware *fw;
struct stat stat_buf;
- uint8_t buf[4096];
+ uint8_t buf[2*MAX_BLOCK_LENGTH];
uint16_t len;
int fd;
int r;
}
printf("Reading firmware from %s...\n", filename);
+
+ memset(buf, 0, sizeof(buf));
+ r = read(fd, buf, 1);
+ if (r != 1) {
+ perror("read");
+ exit(EXIT_FAILURE);
+ }
+
+ //Intel hex?
+ if (buf[0] == ':') {
+ printf("HEX file detected (AsksinPP)\n");
+ return firmware_read_ihex(fd, fw, atmega, debug);
+ }
+
+ if (lseek(fd, 0, SEEK_SET) != 0) {
+ perror("lseek");
+ exit(EXIT_FAILURE);
+ }
+
do {
memset(buf, 0, sizeof(buf));
r = read(fd, buf, 4);
/* generic firmware-functions for HomeMatic
*
- * Copyright (c) 2014-16 Michael Gernoth <michael@gernoth.net>
+ * Copyright (c) 2014-20 Michael Gernoth <michael@gernoth.net>
*
* Permission is hereby granted, free of charge, to any person obtaining a copy
* of this software and associated documentation files (the "Software"), to
int fw_blocks;
};
-struct firmware* firmware_read_firmware(char *filename, int debug);
+enum atmega_device {
+ ATMEGA_UNKNOWN,
+ ATMEGA_328P,
+ ATMEGA_644P,
+};
+
+struct firmware* firmware_read_firmware(char *filename, int atmega, int debug);
void firmware_free(struct firmware *fw);
/* flasher for HM-CFG-USB
*
- * Copyright (c) 2013-16 Michael Gernoth <michael@gernoth.net>
+ * Copyright (c) 2013-20 Michael Gernoth <michael@gernoth.net>
*
* Permission is hereby granted, free of charge, to any person obtaining a copy
* of this software and associated documentation files (the "Software"), to
exit(EXIT_FAILURE);
}
- fw = firmware_read_firmware(filename, debug);
+ fw = firmware_read_firmware(filename, ATMEGA_UNKNOWN, debug);
if (!fw)
exit(EXIT_FAILURE);
/* flasher for HM-MOD-UART
*
- * Copyright (c) 2016-17 Michael Gernoth <michael@gernoth.net>
+ * Copyright (c) 2016-20 Michael Gernoth <michael@gernoth.net>
*
* Permission is hereby granted, free of charge, to any person obtaining a copy
* of this software and associated documentation files (the "Software"), to
exit(EXIT_FAILURE);
}
- fw = firmware_read_firmware(filename, debug);
+ fw = firmware_read_firmware(filename, ATMEGA_UNKNOWN, debug);
if (!fw)
exit(EXIT_FAILURE);
/* flasher for HomeMatic-devices supporting OTA updates
*
- * Copyright (c) 2014-17 Michael Gernoth <michael@gernoth.net>
+ * Copyright (c) 2014-20 Michael Gernoth <michael@gernoth.net>
* Copyright (c) 2017 noansi (TSCULFW-support)
*
* Permission is hereby granted, free of charge, to any person obtaining a copy
rpos++;
}
- if (hmid && (SRC(rdata->message) != hmid))
+ if (hmid && (SRC(rdata->message) != (int)hmid))
return 0;
rdata->message_type = MESSAGE_TYPE_E;
{
fprintf(stderr, "Syntax: %s parameters options\n\n", prog);
fprintf(stderr, "Mandatory parameters:\n");
- fprintf(stderr, "\t-f firmware.eq3\tfirmware file to flash\n");
+ fprintf(stderr, "\t-f firmware.eq3\teq3 firmware file to flash\n");
+ fprintf(stderr, "or\t-f firmware.hex\thex firmware file to flash (AsksinPP), needs -3 or -6\n");
fprintf(stderr, "\t-s SERIAL\tserial of device to flash (optional when using -D)\n");
fprintf(stderr, "\nOptional parameters:\n");
fprintf(stderr, "\t-c device\tenable CUL-mode with CUL at path \"device\"\n");
fprintf(stderr, "\t-l\t\tlower payloadlen (required for devices with little RAM, e.g. CUL v2 and CUL v4)\n");
fprintf(stderr, "\t-S serial\tuse HM-CFG-USB with given serial\n");
fprintf(stderr, "\t-U device\tuse HM-MOD-UART on given device\n");
+ fprintf(stderr, "\t-3\t\tuse Atmega328P configuration when directly flashing AsksinPP hex\n");
+ fprintf(stderr, "\t-6\t\tuse Atmega644P configuration when directly flashing AsksinPP hex\n");
fprintf(stderr, "\t-h\t\tthis help\n");
fprintf(stderr, "\nOptional parameters for automatically sending device to bootloader\n");
fprintf(stderr, "\t-C\t\tHMID of central (3 hex-bytes, no prefix, e.g. ABCDEF)\n");
struct firmware *fw;
char *hmcfgusb_serial = NULL;
char *uart = NULL;
+ int atmega = ATMEGA_UNKNOWN;
int block;
int pfd;
int debug = 0;
printf("HomeMatic OTA flasher version " VERSION "\n\n");
- while((opt = getopt(argc, argv, "b:c:f:hls:C:D:K:S:U:")) != -1) {
+ while((opt = getopt(argc, argv, "b:c:f:hls:C:D:K:S:U:36")) != -1) {
switch (opt) {
case 'b':
bps = atoi(optarg);
case 'U':
uart = optarg;
break;
+ case '3':
+ atmega = ATMEGA_328P;
+ break;
+ case '6':
+ atmega = ATMEGA_644P;
+ break;
case 'h':
case ':':
case '?':
exit(EXIT_FAILURE);
}
- fw = firmware_read_firmware(fw_file, debug);
+ fw = firmware_read_firmware(fw_file, atmega, debug);
if (!fw)
exit(EXIT_FAILURE);
if (serial && !strncmp((char*)&(rdata.message[0x0b]), serial, 10)) {
hmid = SRC(rdata.message);
break;
- } else if (!serial && SRC(rdata.message) == hmid) {
+ } else if (!serial && SRC(rdata.message) == (int)hmid) {
serial = (char*)&(rdata.message[0x0b]);
break;
}
* IN THE SOFTWARE.
*/
-static void asciishow(unsigned char *buf, int len)
+static void asciishow(const unsigned char *buf, int len)
{
int i;
}
}
-static void hexdump(unsigned char *buf, int len, char *prefix)
+static void hexdump(const unsigned char *buf, int len, const char *prefix)
{
int i, j;
static int libusb_initialized = 0;
/* Not in all libusb-1.0 versions, so we have to roll our own :-( */
-static char * usb_strerror(int e)
+static const char* usb_strerror(int e)
{
static char unknerr[256];
return unknerr;
}
+static const char* usb_str_transfer_status(int e)
+{
+ static char unknerr[256];
+
+ switch (e) {
+ case LIBUSB_TRANSFER_COMPLETED:
+ return "Transfer completed";
+ case LIBUSB_TRANSFER_ERROR:
+ return "Transfer error";
+ case LIBUSB_TRANSFER_TIMED_OUT:
+ return "Transfer timed out";
+ case LIBUSB_TRANSFER_CANCELLED:
+ return "Transfer cancelled";
+ case LIBUSB_TRANSFER_STALL:
+ return "For bulk/interrupt endpoints: endpoint stalled. For control endpoints: control request not supported.";
+ case LIBUSB_TRANSFER_NO_DEVICE:
+ return "No device";
+ case LIBUSB_TRANSFER_OVERFLOW:
+ return "Transfer overflow";
+ };
+ snprintf(unknerr, sizeof(unknerr), "Unknown transfer status %d / 0x%02x", e, e);
+ return unknerr;
+}
+
static libusb_device_handle *hmcfgusb_find(int vid, int pid, char *serial) {
libusb_device_handle *devh = NULL;
libusb_device **list;
if (transfer->status != LIBUSB_TRANSFER_COMPLETED) {
if (transfer->status != LIBUSB_TRANSFER_TIMED_OUT) {
if (transfer->status != LIBUSB_TRANSFER_CANCELLED)
- fprintf(stderr, "Interrupt transfer not completed: %s!\n", usb_strerror(transfer->status));
+ fprintf(stderr, "Interrupt transfer not completed: %s!\n", usb_str_transfer_status(transfer->status));
quit = EIO;
goto out;
fprintf(f, "%s.%06ld: ", ts, tv.tv_usec);
}
-static void write_log(char *buf, int len, char *fmt, ...)
+static void write_log(const char *buf, int len, const char *fmt, ...)
{
va_list ap;
int i;
if (fmt) {
if (logfile) {
va_start(ap, fmt);
+#pragma GCC diagnostic push
+#pragma GCC diagnostic ignored "-Wformat-nonliteral"
vfprintf(logfile, fmt, ap);
+#pragma GCC diagnostic pop
va_end(ap);
}
if (verbose) {
va_start(ap, fmt);
+#pragma GCC diagnostic push
+#pragma GCC diagnostic ignored "-Wformat-nonliteral"
vprintf(fmt, ap);
+#pragma GCC diagnostic pop
va_end(ap);
}
}
fflush(logfile);
}
-static int format_part_out(uint8_t **inpos, int inlen, uint8_t **outpos, int outlen, int len, int flags)
+static int format_part_out(uint8_t **inpos, int inlen, uint8_t **outpos, int outlen, size_t len, int flags)
{
uint8_t *buf_out = *outpos;
uint8_t *outend = *outpos + outlen;
uint8_t *inend = *inpos + inlen;
- int i;
+ size_t i;
if (flags & FLAG_COMMA_BEFORE) {
CHECK_SPACE(1);
uint8_t *inend = *inpos + inlen;
if (flags & FLAG_LENGTH_BYTE) {
- int len = 0;
+ size_t len = 0;
uint8_t *ip;
ip = *inpos;
parse_part_in(&inpos, (last-(inpos-cmd)), &outpos, (sizeof(out)-(outpos-out)), 0);
parse_part_in(&inpos, (last-(inpos-cmd)), &outpos, (sizeof(out)-(outpos-out)), 0);
parse_part_in(&inpos, (last-(inpos-cmd)), &outpos, (sizeof(out)-(outpos-out)), FLAG_LENGTH_BYTE);
+ // Fallthrough to default expected, no break here
default:
parse_part_in(&inpos, (last-(inpos-cmd)), &outpos, (sizeof(out)-(outpos-out)), FLAG_IGNORE_COMMAS);
break;
exit(EXIT_FAILURE);
}
- if (fscanf(pidfile, "%u", &old_pid) != 1) {
+ if (fscanf(pidfile, "%d", &old_pid) != 1) {
fclose(pidfile);
fprintf(stderr, "Can't read old PID from " PID_FILE ", already running?\n");
exit(EXIT_FAILURE);
static int verbose = 0;
/* See HMConfig.pm */
-char *hm_message_types(uint8_t type, uint8_t subtype)
+const char *hm_message_types(uint8_t type, uint8_t subtype)
{
switch(type) {
case 0x00: