summaryrefslogtreecommitdiff
path: root/src/fecmodem.cc
blob: f1b269b95783c0bf2e3ec0c8a3b593e38649fa1a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
#include <avr/io.h>
#include <stdlib.h>
#include "fecmodem.h"

uint8_t FECModem::parity128(uint8_t byte)
{
	return pgm_read_byte(&hammingParityLow[byte & 0x0f]) ^ pgm_read_byte(&hammingParityHigh[byte >> 4]);
}

uint8_t FECModem::parity2416(uint8_t byte1, uint8_t byte2)
{
	return parity128(byte1) | (parity128(byte2) << 4);
}

uint8_t FECModem::correct128(uint8_t *byte, uint8_t err)
{
	uint8_t result = pgm_read_byte(&hammingParityCheck[err & 0x0f]);

	if (result != NO_ERROR) {
		if (byte == NULL)
			return 3;
		if (result == UNCORRECTABLE) {
			*byte = 0;
			return 3;
		}
		if (result != ERROR_IN_PARITY) {
			*byte ^= result;
		}
		return 1;
	}
	return 0;
}

uint8_t FECModem::hamming2416(uint8_t *byte1, uint8_t *byte2, uint8_t parity)
{
	uint8_t err;

	if (byte1 == NULL || byte2 == NULL) {
		return 3;
	}

	err = parity2416(*byte1, *byte2) ^ parity;

	if (err) {
		return correct128(byte1, err) + correct128(byte2, err >> 4);
	}

	return 0;
}

uint8_t FECModem::buffer_available()
{
	if (newTransmission())
		hammingState = FIRST_BYTE;
	if (this->Modem::buffer_available() >= 3)
		return 2;
	if (hammingState == SECOND_BYTE)
		return 1;
	return 0;
}

uint8_t FECModem::buffer_get()
{
	uint8_t byte1, parity;
	if (hammingState == SECOND_BYTE) {
		hammingState = FIRST_BYTE;
		return buf_byte;
	}
	hammingState = SECOND_BYTE;
	byte1 = this->Modem::buffer_get();
	buf_byte = this->Modem::buffer_get();
	parity = this->Modem::buffer_get();

	hamming2416(&byte1, &buf_byte, parity);

	return byte1;
}

FECModem modem;