#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_into_page(struct page *page, uint8_t c) {
	if (page->gap_start != page->gap_end) {
		page->buffer[page->gap_start] = c;
		page->gap_start++;
	}
}

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