#include <sys/types.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <strings.h>

extern unsigned last_sel_file_record_len;

cmd_update_bin(argc, argv)
	char **argv;
{
	unsigned offset, len;
	u_char data[255];
	int rc;

	offset = strtoul(argv[1], 0, 0);
	if (offset > 0x7FFF) {
		fprintf(stderr, "error: offset argument is out of range\n");
		return(-1);
	}
	rc = read_hex_data_file(argv[2], data, 255);
	if (rc < 0)
		return(rc);
	len = rc;
	return update_bin_op(offset, data, len);
}

cmd_update_bin_imm(argc, argv)
	char **argv;
{
	unsigned offset, len;
	u_char data[255];
	int rc;

	offset = strtoul(argv[1], 0, 0);
	if (offset > 0x7FFF) {
		fprintf(stderr, "error: offset argument is out of range\n");
		return(-1);
	}
	rc = decode_hex_data_from_string(argv[2], data, 1, 255);
	if (rc < 0)
		return(rc);
	len = rc;
	return update_bin_op(offset, data, len);
}

cmd_update_rec(argc, argv)
	char **argv;
{
	unsigned recno, mode;
	u_char data[255];
	int rc;

	if (!last_sel_file_record_len) {
		fprintf(stderr, "error: no record-based file selected\n");
		return(-1);
	}
	if (!strcmp(argv[1], "prev")) {
		recno = 0;
		mode = 0x03;
	} else {
		recno = strtoul(argv[1], 0, 0);
		if (recno < 1 || recno > 255) {
			fprintf(stderr,
			"error: record number argument is out of range\n");
			return(-1);
		}
		mode = 0x04;
	}
	rc = read_hex_data_file(argv[2], data, 255);
	if (rc < 0)
		return(rc);
	if (rc != last_sel_file_record_len) {
		fprintf(stderr, "error: hex data length != EF record length\n");
		return(-1);
	}
	return update_rec_op(recno, mode, data, last_sel_file_record_len);
}

cmd_update_rec_imm(argc, argv)
	char **argv;
{
	unsigned recno, mode;
	u_char data[255];
	int rc;

	if (!last_sel_file_record_len) {
		fprintf(stderr, "error: no record-based file selected\n");
		return(-1);
	}
	if (!strcmp(argv[1], "prev")) {
		recno = 0;
		mode = 0x03;
	} else {
		recno = strtoul(argv[1], 0, 0);
		if (recno < 1 || recno > 255) {
			fprintf(stderr,
			"error: record number argument is out of range\n");
			return(-1);
		}
		mode = 0x04;
	}
	rc = decode_hex_data_from_string(argv[2], data, 1, 255);
	if (rc < 0)
		return(rc);
	if (rc != last_sel_file_record_len) {
		fprintf(stderr, "error: hex data length != EF record length\n");
		return(-1);
	}
	return update_rec_op(recno, mode, data, last_sel_file_record_len);
}

cmd_update_rec_fill(argc, argv)
	char **argv;
{
	unsigned recno, mode, fill_byte;
	u_char data[255];

	if (!last_sel_file_record_len) {
		fprintf(stderr, "error: no record-based file selected\n");
		return(-1);
	}
	if (!strcmp(argv[1], "prev")) {
		recno = 0;
		mode = 0x03;
	} else {
		recno = strtoul(argv[1], 0, 0);
		if (recno < 1 || recno > 255) {
			fprintf(stderr,
			"error: record number argument is out of range\n");
			return(-1);
		}
		mode = 0x04;
	}
	fill_byte = strtoul(argv[2], 0, 16);
	if (fill_byte > 0xFF) {
		fprintf(stderr, "error: invalid fill byte argument\n");
		return(-1);
	}
	memset(data, fill_byte, last_sel_file_record_len);
	return update_rec_op(recno, mode, data, last_sel_file_record_len);
}