arch/m68k/amiga/chipram.c

   1 /*
   2 **  linux/amiga/chipram.c
   3 **
   4 **      Modified 03-May-94 by Geert Uytterhoeven <geert@linux-m68k.org>
   5 **          - 64-bit aligned allocations for full AGA compatibility
   6 **
   7 **      Rewritten 15/9/2000 by Geert to use resource management
   8 */
   9
  10 #include <linux/types.h>
  11 #include <linux/kernel.h>
  12 #include <linux/mm.h>
  13 #include <linux/init.h>
  14 #include <linux/ioport.h>
  15 #include <linux/slab.h>
  16 #include <linux/string.h>
  17 #include <linux/module.h>
  18
  19 #include <asm/page.h>
  20 #include <asm/amigahw.h>
  21
  22 unsigned long amiga_chip_size;
  23 EXPORT_SYMBOL(amiga_chip_size);
  24
  25 static struct resource chipram_res = {
  26         .name = "Chip RAM", .start = CHIP_PHYSADDR
  27 };
  28 static unsigned long chipavail;
  29
  30
  31 void __init amiga_chip_init(void)
  32 {
  33         if (!AMIGAHW_PRESENT(CHIP_RAM))
  34                 return;
  35
  36         chipram_res.end = amiga_chip_size-1;
  37         request_resource(&iomem_resource, &chipram_res);
  38
  39         chipavail = amiga_chip_size;
  40 }
  41
  42
  43 void *amiga_chip_alloc(unsigned long size, const char *name)
  44 {
  45         struct resource *res;
  46
  47         /* round up */
  48         size = PAGE_ALIGN(size);
  49
  50         pr_debug("amiga_chip_alloc: allocate %lu bytes\n", size);
  51         res = kzalloc(sizeof(struct resource), GFP_KERNEL);
  52         if (!res)
  53                 return NULL;
  54         res->name = name;
  55
  56         if (allocate_resource(&chipram_res, res, size, 0, UINT_MAX, PAGE_SIZE,
  57                               NULL, NULL) < 0) {
  58                 kfree(res);
  59                 return NULL;
  60         }
  61         chipavail -= size;
  62         pr_debug("amiga_chip_alloc: returning %pR\n", res);
  63         return (void *)ZTWO_VADDR(res->start);
  64 }
  65 EXPORT_SYMBOL(amiga_chip_alloc);
  66
  67
  68         /*
  69          *  Warning:
  70          *  amiga_chip_alloc_res is meant only for drivers that need to
  71          *  allocate Chip RAM before kmalloc() is functional. As a consequence,
  72          *  those drivers must not free that Chip RAM afterwards.
  73          */
  74
  75 void * __init amiga_chip_alloc_res(unsigned long size, struct resource *res)
  76 {
  77         unsigned long start;
  78
  79         /* round up */
  80         size = PAGE_ALIGN(size);
  81         /* dmesg into chipmem prefers memory at the safe end */
  82         start = CHIP_PHYSADDR + chipavail - size;
  83
  84         pr_debug("amiga_chip_alloc_res: allocate %lu bytes\n", size);
  85         if (allocate_resource(&chipram_res, res, size, start, UINT_MAX,
  86                               PAGE_SIZE, NULL, NULL) < 0) {
  87                 pr_err("amiga_chip_alloc_res: first alloc failed!\n");
  88                 if (allocate_resource(&chipram_res, res, size, 0, UINT_MAX,
  89                                       PAGE_SIZE, NULL, NULL) < 0)
  90                         return NULL;
  91         }
  92         chipavail -= size;
  93         pr_debug("amiga_chip_alloc_res: returning %pR\n", res);
  94         return (void *)ZTWO_VADDR(res->start);
  95 }
  96
  97 void amiga_chip_free(void *ptr)
  98 {
  99         unsigned long start = ZTWO_PADDR(ptr);
 100         struct resource **p, *res;
 101         unsigned long size;
 102
 103         for (p = &chipram_res.child; (res = *p); p = &res->sibling) {
 104                 if (res->start != start)
 105                         continue;
 106                 *p = res->sibling;
 107                 size = res->end-start;
 108                 pr_debug("amiga_chip_free: free %lu bytes at %p\n", size, ptr);
 109                 chipavail += size;
 110                 kfree(res);
 111                 return;
 112         }
 113         pr_err("amiga_chip_free: trying to free nonexistent region at %p\n",
 114                ptr);
 115 }
 116 EXPORT_SYMBOL(amiga_chip_free);
 117
 118
 119 unsigned long amiga_chip_avail(void)
 120 {
 121         pr_debug("amiga_chip_avail : %lu bytes\n", chipavail);
 122         return chipavail;
 123 }
 124 EXPORT_SYMBOL(amiga_chip_avail);
 125