regression: mmap for fd
[lunaix-os.git] / lunaix-os / kernel / mm / region.c
1 #include <lunaix/mm/region.h>
2 #include <lunaix/mm/valloc.h>
3
4 #include <klibc/string.h>
5
6 struct mm_region*
7 region_create(ptr_t start, ptr_t end, u32_t attr)
8 {
9     return valloc(sizeof(struct mm_region));
10 }
11
12 void
13 region_add(vm_regions_t* lead, struct mm_region* vmregion)
14 {
15     if (llist_empty(lead)) {
16         llist_append(lead, &vmregion->head);
17         return vmregion;
18     }
19
20     ptr_t cur_end = 0;
21     struct mm_region *pos = (struct mm_region*)lead,
22                      *n = list_entry(lead->next, struct mm_region, head);
23     do {
24         if (vmregion->start >= cur_end && vmregion->end <= n->start) {
25             break;
26         }
27         cur_end = n->end;
28         pos = n;
29         n = list_entry(n->head.next, struct mm_region, head);
30     } while ((ptr_t)&pos->head != (ptr_t)lead);
31
32     // XXX caution. require mm_region::head to be the lead of struct
33     llist_insert_after(&pos->head, &vmregion->head);
34 }
35
36 void
37 region_release_all(vm_regions_t* lead)
38 {
39     struct mm_region *pos, *n;
40
41     llist_for_each(pos, n, lead, head)
42     {
43         vfree(pos);
44     }
45 }
46
47 void
48 region_copy(vm_regions_t* src, vm_regions_t* dest)
49 {
50     if (!src) {
51         return;
52     }
53
54     struct mm_region *pos, *n, *dup;
55
56     llist_for_each(pos, n, src, head)
57     {
58         dup = valloc(sizeof(struct mm_region));
59         memcpy(dup, pos, sizeof(*pos));
60         region_add(dest, dup);
61     }
62 }
63
64 struct mm_region*
65 region_get(vm_regions_t* lead, unsigned long vaddr)
66 {
67     if (llist_empty(lead)) {
68         return NULL;
69     }
70
71     struct mm_region *pos, *n;
72
73     llist_for_each(pos, n, lead, head)
74     {
75         if (pos->start <= vaddr && vaddr < pos->end) {
76             return pos;
77         }
78     }
79     return NULL;
80 }