Merge with rsync://fileserver/linux
[linux-2.6] / arch / sparc / mm / generic.c
1 /* $Id: generic.c,v 1.14 2001/12/21 04:56:15 davem Exp $
2  * generic.c: Generic Sparc mm routines that are not dependent upon
3  *            MMU type but are Sparc specific.
4  *
5  * Copyright (C) 1996 David S. Miller (davem@caip.rutgers.edu)
6  */
7
8 #include <linux/kernel.h>
9 #include <linux/mm.h>
10 #include <linux/swap.h>
11 #include <linux/pagemap.h>
12
13 #include <asm/pgalloc.h>
14 #include <asm/pgtable.h>
15 #include <asm/page.h>
16 #include <asm/cacheflush.h>
17 #include <asm/tlbflush.h>
18
19 static inline void forget_pte(pte_t page)
20 {
21 #if 0 /* old 2.4 code */
22         if (pte_none(page))
23                 return;
24         if (pte_present(page)) {
25                 unsigned long pfn = pte_pfn(page);
26                 struct page *ptpage;
27                 if (!pfn_valid(pfn))
28                         return;
29                 ptpage = pfn_to_page(pfn);
30                 if (PageReserved(ptpage))
31                         return;
32                 page_cache_release(ptpage);
33                 return;
34         }
35         swap_free(pte_to_swp_entry(page));
36 #else
37         if (!pte_none(page)) {
38                 printk("forget_pte: old mapping existed!\n");
39                 BUG();
40         }
41 #endif
42 }
43
44 /* Remap IO memory, the same way as remap_pfn_range(), but use
45  * the obio memory space.
46  *
47  * They use a pgprot that sets PAGE_IO and does not check the
48  * mem_map table as this is independent of normal memory.
49  */
50 static inline void io_remap_pte_range(struct mm_struct *mm, pte_t * pte, unsigned long address, unsigned long size,
51         unsigned long offset, pgprot_t prot, int space)
52 {
53         unsigned long end;
54
55         address &= ~PMD_MASK;
56         end = address + size;
57         if (end > PMD_SIZE)
58                 end = PMD_SIZE;
59         do {
60                 pte_t oldpage = *pte;
61                 pte_clear(mm, address, pte);
62                 set_pte(pte, mk_pte_io(offset, prot, space));
63                 forget_pte(oldpage);
64                 address += PAGE_SIZE;
65                 offset += PAGE_SIZE;
66                 pte++;
67         } while (address < end);
68 }
69
70 static inline int io_remap_pmd_range(struct mm_struct *mm, pmd_t * pmd, unsigned long address, unsigned long size,
71         unsigned long offset, pgprot_t prot, int space)
72 {
73         unsigned long end;
74
75         address &= ~PGDIR_MASK;
76         end = address + size;
77         if (end > PGDIR_SIZE)
78                 end = PGDIR_SIZE;
79         offset -= address;
80         do {
81                 pte_t * pte = pte_alloc_map(mm, pmd, address);
82                 if (!pte)
83                         return -ENOMEM;
84                 io_remap_pte_range(mm, pte, address, end - address, address + offset, prot, space);
85                 address = (address + PMD_SIZE) & PMD_MASK;
86                 pmd++;
87         } while (address < end);
88         return 0;
89 }
90
91 int io_remap_page_range(struct vm_area_struct *vma, unsigned long from, unsigned long offset, unsigned long size, pgprot_t prot, int space)
92 {
93         int error = 0;
94         pgd_t * dir;
95         unsigned long beg = from;
96         unsigned long end = from + size;
97         struct mm_struct *mm = vma->vm_mm;
98
99         prot = __pgprot(pg_iobits);
100         offset -= from;
101         dir = pgd_offset(mm, from);
102         flush_cache_range(vma, beg, end);
103
104         spin_lock(&mm->page_table_lock);
105         while (from < end) {
106                 pmd_t *pmd = pmd_alloc(current->mm, dir, from);
107                 error = -ENOMEM;
108                 if (!pmd)
109                         break;
110                 error = io_remap_pmd_range(mm, pmd, from, end - from, offset + from, prot, space);
111                 if (error)
112                         break;
113                 from = (from + PGDIR_SIZE) & PGDIR_MASK;
114                 dir++;
115         }
116         spin_unlock(&mm->page_table_lock);
117
118         flush_tlb_range(vma, beg, end);
119         return error;
120 }
121
122 int io_remap_pfn_range(struct vm_area_struct *vma, unsigned long from,
123                         unsigned long pfn, unsigned long size, pgprot_t prot)
124 {
125         int error = 0;
126         pgd_t * dir;
127         unsigned long beg = from;
128         unsigned long end = from + size;
129         struct mm_struct *mm = vma->vm_mm;
130         int space = GET_IOSPACE(pfn);
131         unsigned long offset = GET_PFN(pfn) << PAGE_SHIFT;
132
133         prot = __pgprot(pg_iobits);
134         offset -= from;
135         dir = pgd_offset(mm, from);
136         flush_cache_range(vma, beg, end);
137
138         spin_lock(&mm->page_table_lock);
139         while (from < end) {
140                 pmd_t *pmd = pmd_alloc(current->mm, dir, from);
141                 error = -ENOMEM;
142                 if (!pmd)
143                         break;
144                 error = io_remap_pmd_range(mm, pmd, from, end - from, offset + from, prot, space);
145                 if (error)
146                         break;
147                 from = (from + PGDIR_SIZE) & PGDIR_MASK;
148                 dir++;
149         }
150         spin_unlock(&mm->page_table_lock);
151
152         flush_tlb_range(vma, beg, end);
153         return error;
154 }