Import of XFree86 3.9.18
[gstreamer-omap:libdrm.git] / linux / memory.c
1 /* memory.c -- Memory management wrappers for DRM -*- linux-c -*-
2  * Created: Thu Feb  4 14:00:34 1999 by faith@precisioninsight.com
3  * Revised: Sun Feb 13 23:39:37 2000 by kevin@precisioninsight.com
4  *
5  * Copyright 1999 Precision Insight, Inc., Cedar Park, Texas.
6  * All Rights Reserved.
7  *
8  * Permission is hereby granted, free of charge, to any person obtaining a
9  * copy of this software and associated documentation files (the "Software"),
10  * to deal in the Software without restriction, including without limitation
11  * the rights to use, copy, modify, merge, publish, distribute, sublicense,
12  * and/or sell copies of the Software, and to permit persons to whom the
13  * Software is furnished to do so, subject to the following conditions:
14  * 
15  * The above copyright notice and this permission notice (including the next
16  * paragraph) shall be included in all copies or substantial portions of the
17  * Software.
18  * 
19  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
20  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
21  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL
22  * PRECISION INSIGHT AND/OR ITS SUPPLIERS BE LIABLE FOR ANY CLAIM, DAMAGES OR
23  * OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
24  * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
25  * DEALINGS IN THE SOFTWARE.
26  * 
27  * $PI: xc/programs/Xserver/hw/xfree86/os-support/linux/drm/kernel/memory.c,v 1.4 1999/08/20 20:00:53 faith Exp $
28  * $XFree86: xc/programs/Xserver/hw/xfree86/os-support/linux/drm/kernel/memory.c,v 1.4 2000/02/14 06:27:28 martin Exp $
29  *
30  */
31
32 #define __NO_VERSION__
33 #include "drmP.h"
34
35 typedef struct drm_mem_stats {
36         const char        *name;
37         int               succeed_count;
38         int               free_count;
39         int               fail_count;
40         unsigned long     bytes_allocated;
41         unsigned long     bytes_freed;
42 } drm_mem_stats_t;
43
44 static spinlock_t         drm_mem_lock      = SPIN_LOCK_UNLOCKED;
45 static unsigned long      drm_ram_available = 0; /* In pages */
46 static unsigned long      drm_ram_used      = 0;
47 static drm_mem_stats_t    drm_mem_stats[]   = {
48         [DRM_MEM_DMA]      = { "dmabufs"  },
49         [DRM_MEM_SAREA]    = { "sareas"   },
50         [DRM_MEM_DRIVER]   = { "driver"   },
51         [DRM_MEM_MAGIC]    = { "magic"    },
52         [DRM_MEM_IOCTLS]   = { "ioctltab" },
53         [DRM_MEM_MAPS]     = { "maplist"  },
54         [DRM_MEM_VMAS]     = { "vmalist"  },
55         [DRM_MEM_BUFS]     = { "buflist"  },
56         [DRM_MEM_SEGS]     = { "seglist"  },
57         [DRM_MEM_PAGES]    = { "pagelist" },
58         [DRM_MEM_FILES]    = { "files"    },
59         [DRM_MEM_QUEUES]   = { "queues"   },
60         [DRM_MEM_CMDS]     = { "commands" },
61         [DRM_MEM_MAPPINGS] = { "mappings" },
62         [DRM_MEM_BUFLISTS] = { "buflists" },
63         { NULL, 0, }            /* Last entry must be null */
64 };
65
66 void drm_mem_init(void)
67 {
68         drm_mem_stats_t *mem;
69         struct sysinfo  si;
70         
71         for (mem = drm_mem_stats; mem->name; ++mem) {
72                 mem->succeed_count   = 0;
73                 mem->free_count      = 0;
74                 mem->fail_count      = 0;
75                 mem->bytes_allocated = 0;
76                 mem->bytes_freed     = 0;
77         }
78         
79         si_meminfo(&si);
80 #if LINUX_VERSION_CODE < 0x020317
81                                 /* Changed to page count in 2.3.23 */
82         drm_ram_available = si.totalram >> PAGE_SHIFT;
83 #else
84         drm_ram_available = si.totalram;
85 #endif
86         drm_ram_used      = 0;
87 }
88
89 /* drm_mem_info is called whenever a process reads /dev/drm/mem. */
90
91 static int _drm_mem_info(char *buf, char **start, off_t offset, int len,
92                          int *eof, void *data)
93 {
94         drm_mem_stats_t *pt;
95
96         if (offset > 0) return 0; /* no partial requests */
97         len  = 0;
98         *eof = 1;
99         DRM_PROC_PRINT("                  total counts                  "
100                        " |    outstanding  \n");
101         DRM_PROC_PRINT("type       alloc freed fail     bytes      freed"
102                        " | allocs      bytes\n\n");
103         DRM_PROC_PRINT("%-9.9s %5d %5d %4d %10lu kB         |\n",
104                        "system", 0, 0, 0,
105                        drm_ram_available << (PAGE_SHIFT - 10));
106         DRM_PROC_PRINT("%-9.9s %5d %5d %4d %10lu kB         |\n",
107                        "locked", 0, 0, 0, drm_ram_used >> 10);
108         DRM_PROC_PRINT("\n");
109         for (pt = drm_mem_stats; pt->name; pt++) {
110                 DRM_PROC_PRINT("%-9.9s %5d %5d %4d %10lu %10lu | %6d %10ld\n",
111                                pt->name,
112                                pt->succeed_count,
113                                pt->free_count,
114                                pt->fail_count,
115                                pt->bytes_allocated,
116                                pt->bytes_freed,
117                                pt->succeed_count - pt->free_count,
118                                (long)pt->bytes_allocated
119                                - (long)pt->bytes_freed);
120         }
121         
122         return len;
123 }
124
125 int drm_mem_info(char *buf, char **start, off_t offset, int len,
126                  int *eof, void *data)
127 {
128         int ret;
129         
130         spin_lock(&drm_mem_lock);
131         ret = _drm_mem_info(buf, start, offset, len, eof, data);
132         spin_unlock(&drm_mem_lock);
133         return ret;
134 }
135
136 void *drm_alloc(size_t size, int area)
137 {
138         void *pt;
139         
140         if (!size) {
141                 DRM_MEM_ERROR(area, "Allocating 0 bytes\n");
142                 return NULL;
143         }
144         
145         if (!(pt = kmalloc(size, GFP_KERNEL))) {
146                 spin_lock(&drm_mem_lock);
147                 ++drm_mem_stats[area].fail_count;
148                 spin_unlock(&drm_mem_lock);
149                 return NULL;
150         }
151         spin_lock(&drm_mem_lock);
152         ++drm_mem_stats[area].succeed_count;
153         drm_mem_stats[area].bytes_allocated += size;
154         spin_unlock(&drm_mem_lock);
155         return pt;
156 }
157
158 void *drm_realloc(void *oldpt, size_t oldsize, size_t size, int area)
159 {
160         void *pt;
161         
162         if (!(pt = drm_alloc(size, area))) return NULL;
163         if (oldpt && oldsize) {
164                 memcpy(pt, oldpt, oldsize);
165                 drm_free(oldpt, oldsize, area);
166         }
167         return pt;
168 }
169
170 char *drm_strdup(const char *s, int area)
171 {
172         char *pt;
173         int      length = s ? strlen(s) : 0;
174         
175         if (!(pt = drm_alloc(length+1, area))) return NULL;
176         strcpy(pt, s);
177         return pt;
178 }
179
180 void drm_strfree(const char *s, int area)
181 {
182         unsigned int size;
183         
184         if (!s) return;
185         
186         size = 1 + (s ? strlen(s) : 0);
187         drm_free((void *)s, size, area);
188 }
189
190 void drm_free(void *pt, size_t size, int area)
191 {
192         int alloc_count;
193         int free_count;
194         
195         if (!pt) DRM_MEM_ERROR(area, "Attempt to free NULL pointer\n");
196         else     kfree_s(pt, size);
197         spin_lock(&drm_mem_lock);
198         drm_mem_stats[area].bytes_freed += size;
199         free_count  = ++drm_mem_stats[area].free_count;
200         alloc_count =   drm_mem_stats[area].succeed_count;
201         spin_unlock(&drm_mem_lock);
202         if (free_count > alloc_count) {
203                 DRM_MEM_ERROR(area, "Excess frees: %d frees, %d allocs\n",
204                               free_count, alloc_count);
205         }
206 }
207
208 unsigned long drm_alloc_pages(int order, int area)
209 {
210         unsigned long address;
211         unsigned long bytes       = PAGE_SIZE << order;
212         unsigned long addr;
213         unsigned int  sz;
214         
215         spin_lock(&drm_mem_lock);
216         if ((drm_ram_used >> PAGE_SHIFT)
217             > (DRM_RAM_PERCENT * drm_ram_available) / 100) {
218                 spin_unlock(&drm_mem_lock);
219                 return 0;
220         }
221         spin_unlock(&drm_mem_lock);
222         
223         address = __get_free_pages(GFP_KERNEL, order);
224         if (!address) {
225                 spin_lock(&drm_mem_lock);
226                 ++drm_mem_stats[area].fail_count;
227                 spin_unlock(&drm_mem_lock);
228                 return 0;
229         }
230         spin_lock(&drm_mem_lock);
231         ++drm_mem_stats[area].succeed_count;
232         drm_mem_stats[area].bytes_allocated += bytes;
233         drm_ram_used                        += bytes;
234         spin_unlock(&drm_mem_lock);
235         
236         
237                                 /* Zero outside the lock */
238         memset((void *)address, 0, bytes);
239         
240                                 /* Reserve */
241         for (addr = address, sz = bytes;
242              sz > 0;
243              addr += PAGE_SIZE, sz -= PAGE_SIZE) {
244                 mem_map_reserve(MAP_NR(addr));
245         }
246         
247         return address;
248 }
249
250 void drm_free_pages(unsigned long address, int order, int area)
251 {
252         unsigned long bytes = PAGE_SIZE << order;
253         int               alloc_count;
254         int               free_count;
255         unsigned long addr;
256         unsigned int  sz;
257         
258         if (!address) {
259                 DRM_MEM_ERROR(area, "Attempt to free address 0\n");
260         } else {
261                                 /* Unreserve */
262                 for (addr = address, sz = bytes;
263                      sz > 0;
264                      addr += PAGE_SIZE, sz -= PAGE_SIZE) {
265                         mem_map_unreserve(MAP_NR(addr));
266                 }
267                 free_pages(address, order);
268         }
269         
270         spin_lock(&drm_mem_lock);
271         free_count  = ++drm_mem_stats[area].free_count;
272         alloc_count =   drm_mem_stats[area].succeed_count;
273         drm_mem_stats[area].bytes_freed += bytes;
274         drm_ram_used                    -= bytes;
275         spin_unlock(&drm_mem_lock);
276         if (free_count > alloc_count) {
277                 DRM_MEM_ERROR(area,
278                               "Excess frees: %d frees, %d allocs\n",
279                               free_count, alloc_count);
280         }
281 }
282
283 void *drm_ioremap(unsigned long offset, unsigned long size)
284 {
285         void *pt;
286         
287         if (!size) {
288                 DRM_MEM_ERROR(DRM_MEM_MAPPINGS,
289                               "Mapping 0 bytes at 0x%08lx\n", offset);
290                 return NULL;
291         }
292         
293         if (!(pt = ioremap(offset, size))) {
294                 spin_lock(&drm_mem_lock);
295                 ++drm_mem_stats[DRM_MEM_MAPPINGS].fail_count;
296                 spin_unlock(&drm_mem_lock);
297                 return NULL;
298         }
299         spin_lock(&drm_mem_lock);
300         ++drm_mem_stats[DRM_MEM_MAPPINGS].succeed_count;
301         drm_mem_stats[DRM_MEM_MAPPINGS].bytes_allocated += size;
302         spin_unlock(&drm_mem_lock);
303         return pt;
304 }
305
306 void drm_ioremapfree(void *pt, unsigned long size)
307 {
308         int alloc_count;
309         int free_count;
310         
311         if (!pt)
312                 DRM_MEM_ERROR(DRM_MEM_MAPPINGS,
313                               "Attempt to free NULL pointer\n");
314         else
315                 iounmap(pt);
316         
317         spin_lock(&drm_mem_lock);
318         drm_mem_stats[DRM_MEM_MAPPINGS].bytes_freed += size;
319         free_count  = ++drm_mem_stats[DRM_MEM_MAPPINGS].free_count;
320         alloc_count =   drm_mem_stats[DRM_MEM_MAPPINGS].succeed_count;
321         spin_unlock(&drm_mem_lock);
322         if (free_count > alloc_count) {
323                 DRM_MEM_ERROR(DRM_MEM_MAPPINGS,
324                               "Excess frees: %d frees, %d allocs\n",
325                               free_count, alloc_count);
326         }
327 }