z2ram.c
上传用户:ajay2009
上传日期:2009-05-22
资源大小:495k
文件大小:9k
源码类别:

驱动编程

开发平台:

Unix_Linux

  1. /*
  2. ** z2ram - Amiga pseudo-driver to access 16bit-RAM in ZorroII space
  3. **         as a block device, to be used as a RAM disk or swap space
  4. ** 
  5. ** Copyright (C) 1994 by Ingo Wilken (Ingo.Wilken@informatik.uni-oldenburg.de)
  6. **
  7. ** ++Geert: support for zorro_unused_z2ram, better range checking
  8. ** ++roman: translate accesses via an array
  9. ** ++Milan: support for ChipRAM usage
  10. ** ++yambo: converted to 2.0 kernel
  11. ** ++yambo: modularized and support added for 3 minor devices including:
  12. **          MAJOR  MINOR  DESCRIPTION
  13. **          -----  -----  ----------------------------------------------
  14. **          37     0       Use Zorro II and Chip ram
  15. **          37     1       Use only Zorro II ram
  16. **          37     2       Use only Chip ram
  17. **          37     4-7     Use memory list entry 1-4 (first is 0)
  18. ** ++jskov: support for 1-4th memory list entry.
  19. **
  20. ** Permission to use, copy, modify, and distribute this software and its
  21. ** documentation for any purpose and without fee is hereby granted, provided
  22. ** that the above copyright notice appear in all copies and that both that
  23. ** copyright notice and this permission notice appear in supporting
  24. ** documentation.  This software is provided "as is" without express or
  25. ** implied warranty.
  26. */
  27. #define DEVICE_NAME "Z2RAM"
  28. #include <linux/major.h>
  29. #include <linux/vmalloc.h>
  30. #include <linux/init.h>
  31. #include <linux/module.h>
  32. #include <linux/blkdev.h>
  33. #include <linux/bitops.h>
  34. #include <asm/setup.h>
  35. #include <asm/amigahw.h>
  36. #include <asm/pgtable.h>
  37. #include <linux/zorro.h>
  38. extern int m68k_realnum_memory;
  39. extern struct mem_info m68k_memory[NUM_MEMINFO];
  40. #define TRUE                  (1)
  41. #define FALSE                 (0)
  42. #define Z2MINOR_COMBINED      (0)
  43. #define Z2MINOR_Z2ONLY        (1)
  44. #define Z2MINOR_CHIPONLY      (2)
  45. #define Z2MINOR_MEMLIST1      (4)
  46. #define Z2MINOR_MEMLIST2      (5)
  47. #define Z2MINOR_MEMLIST3      (6)
  48. #define Z2MINOR_MEMLIST4      (7)
  49. #define Z2MINOR_COUNT         (8) /* Move this down when adding a new minor */
  50. #define Z2RAM_CHUNK1024       ( Z2RAM_CHUNKSIZE >> 10 )
  51. static u_long *z2ram_map    = NULL;
  52. static u_long z2ram_size    = 0;
  53. static int z2_count         = 0;
  54. static int chip_count       = 0;
  55. static int list_count       = 0;
  56. static int current_device   = -1;
  57. static DEFINE_SPINLOCK(z2ram_lock);
  58. static struct block_device_operations z2_fops;
  59. static struct gendisk *z2ram_gendisk;
  60. static void do_z2_request(request_queue_t *q)
  61. {
  62. struct request *req;
  63. while ((req = elv_next_request(q)) != NULL) {
  64. unsigned long start = req->sector << 9;
  65. unsigned long len  = req->current_nr_sectors << 9;
  66. if (start + len > z2ram_size) {
  67. printk( KERN_ERR DEVICE_NAME ": bad access: block=%lu, count=%un",
  68. req->sector, req->current_nr_sectors);
  69. end_request(req, 0);
  70. continue;
  71. }
  72. while (len) {
  73. unsigned long addr = start & Z2RAM_CHUNKMASK;
  74. unsigned long size = Z2RAM_CHUNKSIZE - addr;
  75. if (len < size)
  76. size = len;
  77. addr += z2ram_map[ start >> Z2RAM_CHUNKSHIFT ];
  78. if (rq_data_dir(req) == READ)
  79. memcpy(req->buffer, (char *)addr, size);
  80. else
  81. memcpy((char *)addr, req->buffer, size);
  82. start += size;
  83. len -= size;
  84. }
  85. end_request(req, 1);
  86. }
  87. }
  88. static void
  89. get_z2ram( void )
  90. {
  91.     int i;
  92.     for ( i = 0; i < Z2RAM_SIZE / Z2RAM_CHUNKSIZE; i++ )
  93.     {
  94. if ( test_bit( i, zorro_unused_z2ram ) )
  95. {
  96.     z2_count++;
  97.     z2ram_map[ z2ram_size++ ] = 
  98. ZTWO_VADDR( Z2RAM_START ) + ( i << Z2RAM_CHUNKSHIFT );
  99.     clear_bit( i, zorro_unused_z2ram );
  100. }
  101.     }
  102.     return;
  103. }
  104. static void
  105. get_chipram( void )
  106. {
  107.     while ( amiga_chip_avail() > ( Z2RAM_CHUNKSIZE * 4 ) )
  108.     {
  109. chip_count++;
  110. z2ram_map[ z2ram_size ] =
  111.     (u_long)amiga_chip_alloc( Z2RAM_CHUNKSIZE, "z2ram" );
  112. if ( z2ram_map[ z2ram_size ] == 0 )
  113. {
  114.     break;
  115. }
  116. z2ram_size++;
  117.     }
  118.     return;
  119. }
  120. static int
  121. z2_open( struct inode *inode, struct file *filp )
  122. {
  123.     int device;
  124.     int max_z2_map = ( Z2RAM_SIZE / Z2RAM_CHUNKSIZE ) *
  125. sizeof( z2ram_map[0] );
  126.     int max_chip_map = ( amiga_chip_size / Z2RAM_CHUNKSIZE ) *
  127. sizeof( z2ram_map[0] );
  128.     int rc = -ENOMEM;
  129.     device = iminor(inode);
  130.     if ( current_device != -1 && current_device != device )
  131.     {
  132. rc = -EBUSY;
  133. goto err_out;
  134.     }
  135.     if ( current_device == -1 )
  136.     {
  137. z2_count   = 0;
  138. chip_count = 0;
  139. list_count = 0;
  140. z2ram_size = 0;
  141. /* Use a specific list entry. */
  142. if (device >= Z2MINOR_MEMLIST1 && device <= Z2MINOR_MEMLIST4) {
  143. int index = device - Z2MINOR_MEMLIST1 + 1;
  144. unsigned long size, paddr, vaddr;
  145. if (index >= m68k_realnum_memory) {
  146. printk( KERN_ERR DEVICE_NAME
  147. ": no such entry in z2ram_mapn" );
  148.         goto err_out;
  149. }
  150. paddr = m68k_memory[index].addr;
  151. size = m68k_memory[index].size & ~(Z2RAM_CHUNKSIZE-1);
  152. #ifdef __powerpc__
  153. /* FIXME: ioremap doesn't build correct memory tables. */
  154. {
  155. vfree(vmalloc (size));
  156. }
  157. vaddr = (unsigned long) __ioremap (paddr, size, 
  158.    _PAGE_WRITETHRU);
  159. #else
  160. vaddr = (unsigned long)z_remap_nocache_nonser(paddr, size);
  161. #endif
  162. z2ram_map = 
  163. kmalloc((size/Z2RAM_CHUNKSIZE)*sizeof(z2ram_map[0]),
  164. GFP_KERNEL);
  165. if ( z2ram_map == NULL )
  166. {
  167.     printk( KERN_ERR DEVICE_NAME
  168. ": cannot get mem for z2ram_mapn" );
  169.     goto err_out;
  170. }
  171. while (size) {
  172. z2ram_map[ z2ram_size++ ] = vaddr;
  173. size -= Z2RAM_CHUNKSIZE;
  174. vaddr += Z2RAM_CHUNKSIZE;
  175. list_count++;
  176. }
  177. if ( z2ram_size != 0 )
  178.     printk( KERN_INFO DEVICE_NAME
  179. ": using %iK List Entry %d Memoryn",
  180. list_count * Z2RAM_CHUNK1024, index );
  181. } else
  182. switch ( device )
  183. {
  184.     case Z2MINOR_COMBINED:
  185. z2ram_map = kmalloc( max_z2_map + max_chip_map, GFP_KERNEL );
  186. if ( z2ram_map == NULL )
  187. {
  188.     printk( KERN_ERR DEVICE_NAME
  189. ": cannot get mem for z2ram_mapn" );
  190.     goto err_out;
  191. }
  192. get_z2ram();
  193. get_chipram();
  194. if ( z2ram_size != 0 )
  195.     printk( KERN_INFO DEVICE_NAME 
  196. ": using %iK Zorro II RAM and %iK Chip RAM (Total %dK)n",
  197. z2_count * Z2RAM_CHUNK1024,
  198. chip_count * Z2RAM_CHUNK1024,
  199. ( z2_count + chip_count ) * Z2RAM_CHUNK1024 );
  200.     break;
  201.          case Z2MINOR_Z2ONLY:
  202. z2ram_map = kmalloc( max_z2_map, GFP_KERNEL );
  203. if ( z2ram_map == NULL )
  204. {
  205.     printk( KERN_ERR DEVICE_NAME
  206. ": cannot get mem for z2ram_mapn" );
  207.     goto err_out;
  208. }
  209. get_z2ram();
  210. if ( z2ram_size != 0 )
  211.     printk( KERN_INFO DEVICE_NAME 
  212. ": using %iK of Zorro II RAMn",
  213. z2_count * Z2RAM_CHUNK1024 );
  214.     break;
  215.     case Z2MINOR_CHIPONLY:
  216. z2ram_map = kmalloc( max_chip_map, GFP_KERNEL );
  217. if ( z2ram_map == NULL )
  218. {
  219.     printk( KERN_ERR DEVICE_NAME
  220. ": cannot get mem for z2ram_mapn" );
  221.     goto err_out;
  222. }
  223. get_chipram();
  224. if ( z2ram_size != 0 )
  225.     printk( KERN_INFO DEVICE_NAME 
  226. ": using %iK Chip RAMn",
  227. chip_count * Z2RAM_CHUNK1024 );
  228.     
  229.     break;
  230.     default:
  231. rc = -ENODEV;
  232. goto err_out;
  233.     break;
  234. }
  235. if ( z2ram_size == 0 )
  236. {
  237.     printk( KERN_NOTICE DEVICE_NAME
  238. ": no unused ZII/Chip RAM foundn" );
  239.     goto err_out_kfree;
  240. }
  241. current_device = device;
  242. z2ram_size <<= Z2RAM_CHUNKSHIFT;
  243. set_capacity(z2ram_gendisk, z2ram_size >> 9);
  244.     }
  245.     return 0;
  246. err_out_kfree:
  247.     kfree(z2ram_map);
  248. err_out:
  249.     return rc;
  250. }
  251. static int
  252. z2_release( struct inode *inode, struct file *filp )
  253. {
  254.     if ( current_device == -1 )
  255. return 0;     
  256.     /*
  257.      * FIXME: unmap memory
  258.      */
  259.     return 0;
  260. }
  261. static struct block_device_operations z2_fops =
  262. {
  263. .owner = THIS_MODULE,
  264. .open = z2_open,
  265. .release = z2_release,
  266. };
  267. static struct kobject *z2_find(dev_t dev, int *part, void *data)
  268. {
  269. *part = 0;
  270. return get_disk(z2ram_gendisk);
  271. }
  272. static struct request_queue *z2_queue;
  273. int __init 
  274. z2_init(void)
  275. {
  276.     int ret;
  277.     if (!MACH_IS_AMIGA)
  278. return -ENXIO;
  279.     ret = -EBUSY;
  280.     if (register_blkdev(Z2RAM_MAJOR, DEVICE_NAME))
  281. goto err;
  282.     ret = -ENOMEM;
  283.     z2ram_gendisk = alloc_disk(1);
  284.     if (!z2ram_gendisk)
  285. goto out_disk;
  286.     z2_queue = blk_init_queue(do_z2_request, &z2ram_lock);
  287.     if (!z2_queue)
  288. goto out_queue;
  289.     z2ram_gendisk->major = Z2RAM_MAJOR;
  290.     z2ram_gendisk->first_minor = 0;
  291.     z2ram_gendisk->fops = &z2_fops;
  292.     sprintf(z2ram_gendisk->disk_name, "z2ram");
  293.     strcpy(z2ram_gendisk->devfs_name, z2ram_gendisk->disk_name);
  294.     z2ram_gendisk->queue = z2_queue;
  295.     add_disk(z2ram_gendisk);
  296.     blk_register_region(MKDEV(Z2RAM_MAJOR, 0), Z2MINOR_COUNT, THIS_MODULE,
  297. z2_find, NULL, NULL);
  298.     return 0;
  299. out_queue:
  300.     put_disk(z2ram_gendisk);
  301. out_disk:
  302.     unregister_blkdev(Z2RAM_MAJOR, DEVICE_NAME);
  303. err:
  304.     return ret;
  305. }
  306. #if defined(MODULE)
  307. MODULE_LICENSE("GPL");
  308. int
  309. init_module( void )
  310. {
  311.     int error;
  312.     
  313.     error = z2_init();
  314.     if ( error == 0 )
  315.     {
  316. printk( KERN_INFO DEVICE_NAME ": loaded as modulen" );
  317.     }
  318.     
  319.     return error;
  320. }
  321. void
  322. cleanup_module( void )
  323. {
  324.     int i, j;
  325.     blk_unregister_region(MKDEV(Z2RAM_MAJOR, 0), 256);
  326.     if ( unregister_blkdev( Z2RAM_MAJOR, DEVICE_NAME ) != 0 )
  327. printk( KERN_ERR DEVICE_NAME ": unregister of device failedn");
  328.     del_gendisk(z2ram_gendisk);
  329.     put_disk(z2ram_gendisk);
  330.     blk_cleanup_queue(z2_queue);
  331.     if ( current_device != -1 )
  332.     {
  333. i = 0;
  334. for ( j = 0 ; j < z2_count; j++ )
  335. {
  336.     set_bit( i++, zorro_unused_z2ram ); 
  337. }
  338. for ( j = 0 ; j < chip_count; j++ )
  339. {
  340.     if ( z2ram_map[ i ] )
  341.     {
  342. amiga_chip_free( (void *) z2ram_map[ i++ ] );
  343.     }
  344. }
  345. if ( z2ram_map != NULL )
  346. {
  347.     kfree( z2ram_map );
  348. }
  349.     }
  350.     return;
  351. #endif