summaryrefslogtreecommitdiff
path: root/page.c
blob: 5c0bc0a1f07dc7b653fff0d6b02b9c87151a3e30 (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
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
#include <stdint.h>
#include <string.h>
#include <stdlib.h>

#define PAGE_SIZE 4096

struct page {
	uint8_t *buffer;
	uint16_t gap_start;
	uint16_t gap_end;
	struct page *next;
	struct page *prev;
};

struct point {
	struct page *current_page;
	uint16_t offset;
};

void move_point_forward(struct point *point) {
	point->offset++;
	if (point->offset == point->current_page->gap_start + 1) {
		point->offset = point->current_page->gap_end;
	}
	if (point->offset == PAGE_SIZE) {
		point->offset = 0;
		point->current_page = point->current_page->next;
	}
}

void move_point_backward(struct point *point) {
	if (point->offset == 0) {
		point->offset = PAGE_SIZE;
		point->current_page = point->current_page->prev;
	}
	point->offset--;
	if (point->offset == point->current_page->gap_end - 1) {
		point->offset = point->current_page->gap_start;
	}
}

struct page *new_page() {
	struct page *result = malloc(sizeof(struct page));
	result->buffer = malloc(PAGE_SIZE);
	result->gap_start = 0;
	result->gap_end = PAGE_SIZE;
	result->next = 0;
	result->prev = 0;
	return result;
}

static inline void set_half_page_gap(struct page *page) {
	page->gap_start = PAGE_SIZE / 2;
	page->gap_end = PAGE_SIZE;
}

void split_page(struct page *first_half) {
	struct page *second_half = new_page();

	memcpy(second_half->buffer, first_half->buffer + PAGE_SIZE / 2, PAGE_SIZE / 2 - 1);

	set_half_page_gap(first_half);
	set_half_page_gap(second_half);

	if (first_half->next) {
		first_half->next->prev = second_half;
	}
	second_half->next = first_half->next;
	second_half->prev = first_half;
	first_half->next = second_half;
}

void free_page(struct page **page) {
	if ((*page)->prev) {
		(*page)->prev->next = (*page)->next;
	}
	if ((*page)->next) {
		(*page)->next->prev = (*page)->prev;
	}
	struct page *tmp = *page;
	*page = (*page)->prev ?: (*page)->next;
	free(tmp->buffer);
	free(tmp);
}

void move_gap_forward(struct page *page) {
	page->buffer[page->gap_start] = page->buffer[page->gap_end];
	page->gap_start++;
	page->gap_end++;
}

void move_gap_backward(struct page *page) {
	page->gap_end--;
	page->gap_start--;
	page->buffer[page->gap_end] = page->buffer[page->gap_start];
}

void move_gap(struct page *page, uint16_t offset) {
	while (page->gap_start < offset) {
		move_gap_forward(page);
	}
	while (page->gap_start > offset) {
		move_gap_backward(page);
	}
}

void insert_at_point(struct point *point, uint8_t c) {
	struct page *page = point->current_page;
	if (page->gap_start == page->gap_end) {
		split_page(page);
		if (point->offset >= PAGE_SIZE / 2) {
			point->current_page = point->current_page->next;
			point->offset -= PAGE_SIZE / 2;
			page = point->current_page;
		}
	}
	move_gap(page, point->offset);
	page->buffer[page->gap_start] = c;
	page->gap_start++;
	move_point_forward(point);
}

void delete_from_page(struct page *page) {
	if (page->gap_start != 0) {
		page->gap_start--;
	}
}