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--;
}
}
|