summaryrefslogtreecommitdiff
path: root/usr.sbin/ospfd/iso_cksum.c
blob: de8d2c6a15689194373099bf8e2de245e80c49b4 (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
/*	$OpenBSD: iso_cksum.c,v 1.2 2005/10/12 09:51:58 claudio Exp $ */

/*
 * Copyright (c) 2005 Claudio Jeker <claudio@openbsd.org>
 *
 * Permission to use, copy, modify, and distribute this software for any
 * purpose with or without fee is hereby granted, provided that the above
 * copyright notice and this permission notice appear in all copies.
 *
 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
 */

#include <sys/types.h>

#include "ospfd.h"
#include "log.h"

/* implementation of Fletcher Checksum -- see RFC 1008 for more info */

/* pos needs to be 0 for verify and 2 <= pos < len for calculation */
u_int16_t
iso_cksum(void *buf, u_int16_t len, u_int16_t pos)
{
	u_int8_t	*p = buf;
	int		 c0 = 0, c1 = 0, x;	/* counters */
	u_int16_t	 sop;

	sop = len - pos - 1;	/* pos is an offset (pos 2 is 3rd element) */
	p += 2;			/* jump over age field */
	len -= 2;
	while (len--) {
		c0 += *p++;
		c1 += c0;
		if ((len & 0xfff) == 0) {
			/* overflow protection */
			c0 %= 255;
			c1 %= 255;
		}
#ifdef DEBUG
		if (c0 + 256 < c0 || c1 + 256 < c1)
			fatalx("iso_cksum: overflowed");
#endif
	}

	if (pos) {
		x = ((sop * c0 - c1)) % 255;
		if (x <= 0)
			x += 255;
#if 1
		c1 = 510 - c0 - x;
		if (c1 > 255)
			c1 -= 255;
#else
		c1 = (-c0 - x) % 255;
		if (c1 < 0)
			c1 += 255;
#endif
		c0 = x;
	}

	return (c0 << 8 | c1);
}