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

驱动编程

开发平台:

Unix_Linux

  1. /*
  2.  * mm.c - Micro Memory(tm) PCI memory board block device driver - v2.3
  3.  *
  4.  * (C) 2001 San Mehat <nettwerk@valinux.com>
  5.  * (C) 2001 Johannes Erdfelt <jerdfelt@valinux.com>
  6.  * (C) 2001 NeilBrown <neilb@cse.unsw.edu.au>
  7.  *
  8.  * This driver for the Micro Memory PCI Memory Module with Battery Backup
  9.  * is Copyright Micro Memory Inc 2001-2002.  All rights reserved.
  10.  *
  11.  * This driver is released to the public under the terms of the
  12.  *  GNU GENERAL PUBLIC LICENSE version 2
  13.  * See the file COPYING for details.
  14.  *
  15.  * This driver provides a standard block device interface for Micro Memory(tm)
  16.  * PCI based RAM boards.
  17.  * 10/05/01: Phap Nguyen - Rebuilt the driver
  18.  * 10/22/01: Phap Nguyen - v2.1 Added disk partitioning
  19.  * 29oct2001:NeilBrown   - Use make_request_fn instead of request_fn
  20.  *                       - use stand disk partitioning (so fdisk works).
  21.  * 08nov2001:NeilBrown  - change driver name from "mm" to "umem"
  22.  *  - incorporate into main kernel
  23.  * 08apr2002:NeilBrown   - Move some of interrupt handle to tasklet
  24.  *  - use spin_lock_bh instead of _irq
  25.  *  - Never block on make_request.  queue
  26.  *    bh's instead.
  27.  *  - unregister umem from devfs at mod unload
  28.  *  - Change version to 2.3
  29.  * 07Nov2001:Phap Nguyen - Select pci read command: 06, 12, 15 (Decimal)
  30.  * 07Jan2002: P. Nguyen  - Used PCI Memory Write & Invalidate for DMA
  31.  * 15May2002:NeilBrown   - convert to bio for 2.5
  32.  * 17May2002:NeilBrown   - remove init_mem initialisation.  Instead detect
  33.  *  - a sequence of writes that cover the card, and
  34.  *  - set initialised bit then.
  35.  */
  36. //#define DEBUG /* uncomment if you want debugging info (pr_debug) */
  37. #include <linux/config.h>
  38. #include <linux/sched.h>
  39. #include <linux/fs.h>
  40. #include <linux/bio.h>
  41. #include <linux/kernel.h>
  42. #include <linux/mm.h>
  43. #include <linux/mman.h>
  44. #include <linux/ioctl.h>
  45. #include <linux/module.h>
  46. #include <linux/init.h>
  47. #include <linux/interrupt.h>
  48. #include <linux/smp_lock.h>
  49. #include <linux/timer.h>
  50. #include <linux/pci.h>
  51. #include <linux/slab.h>
  52. #include <linux/fcntl.h>        /* O_ACCMODE */
  53. #include <linux/hdreg.h>  /* HDIO_GETGEO */
  54. #include <linux/umem.h>
  55. #include <asm/uaccess.h>
  56. #include <asm/io.h>
  57. #define MM_MAXCARDS 4
  58. #define MM_RAHEAD 2      /* two sectors */
  59. #define MM_BLKSIZE 1024  /* 1k blocks */
  60. #define MM_HARDSECT 512  /* 512-byte hardware sectors */
  61. #define MM_SHIFT 6       /* max 64 partitions on 4 cards  */
  62. /*
  63.  * Version Information
  64.  */
  65. #define DRIVER_VERSION "v2.3"
  66. #define DRIVER_AUTHOR "San Mehat, Johannes Erdfelt, NeilBrown"
  67. #define DRIVER_DESC "Micro Memory(tm) PCI memory board block driver"
  68. static int debug;
  69. /* #define HW_TRACE(x)     writeb(x,cards[0].csr_remap + MEMCTRLSTATUS_MAGIC) */
  70. #define HW_TRACE(x)
  71. #define DEBUG_LED_ON_TRANSFER 0x01
  72. #define DEBUG_BATTERY_POLLING 0x02
  73. module_param(debug, int, 0644);
  74. MODULE_PARM_DESC(debug, "Debug bitmask");
  75. static int pci_read_cmd = 0x0C; /* Read Multiple */
  76. module_param(pci_read_cmd, int, 0);
  77. MODULE_PARM_DESC(pci_read_cmd, "PCI read command");
  78. static int pci_write_cmd = 0x0F; /* Write and Invalidate */
  79. module_param(pci_write_cmd, int, 0);
  80. MODULE_PARM_DESC(pci_write_cmd, "PCI write command");
  81. static int pci_cmds;
  82. static int major_nr;
  83. #include <linux/blkdev.h>
  84. #include <linux/blkpg.h>
  85. struct cardinfo {
  86. int card_number;
  87. struct pci_dev *dev;
  88. int irq;
  89. unsigned long csr_base;
  90. unsigned char __iomem *csr_remap;
  91. unsigned long csr_len;
  92. #ifdef CONFIG_MM_MAP_MEMORY
  93. unsigned long mem_base;
  94. unsigned char __iomem *mem_remap;
  95. unsigned long mem_len;
  96. #endif
  97. unsigned int win_size; /* PCI window size */
  98. unsigned int mm_size;  /* size in kbytes */
  99. unsigned int init_size; /* initial segment, in sectors,
  100.     * that we know to
  101.     * have been written
  102.     */
  103. struct bio *bio, *currentbio, **biotail;
  104. request_queue_t *queue;
  105. struct mm_page {
  106. dma_addr_t page_dma;
  107. struct mm_dma_desc *desc;
  108. int   cnt, headcnt;
  109. struct bio *bio, **biotail;
  110. } mm_pages[2];
  111. #define DESC_PER_PAGE ((PAGE_SIZE*2)/sizeof(struct mm_dma_desc))
  112. int  Active, Ready;
  113. struct tasklet_struct tasklet;
  114. unsigned int dma_status;
  115. struct {
  116. int good;
  117. int warned;
  118. unsigned long last_change;
  119. } battery[2];
  120. spinlock_t  lock;
  121. int check_batteries;
  122. int flags;
  123. };
  124. static struct cardinfo cards[MM_MAXCARDS];
  125. static struct block_device_operations mm_fops;
  126. static struct timer_list battery_timer;
  127. static int num_cards = 0;
  128. static struct gendisk *mm_gendisk[MM_MAXCARDS];
  129. static void check_batteries(struct cardinfo *card);
  130. /*
  131. -----------------------------------------------------------------------------------
  132. --                           get_userbit
  133. -----------------------------------------------------------------------------------
  134. */
  135. static int get_userbit(struct cardinfo *card, int bit)
  136. {
  137. unsigned char led;
  138. led = readb(card->csr_remap + MEMCTRLCMD_LEDCTRL);
  139. return led & bit;
  140. }
  141. /*
  142. -----------------------------------------------------------------------------------
  143. --                            set_userbit
  144. -----------------------------------------------------------------------------------
  145. */
  146. static int set_userbit(struct cardinfo *card, int bit, unsigned char state)
  147. {
  148. unsigned char led;
  149. led = readb(card->csr_remap + MEMCTRLCMD_LEDCTRL);
  150. if (state)
  151. led |= bit;
  152. else
  153. led &= ~bit;
  154. writeb(led, card->csr_remap + MEMCTRLCMD_LEDCTRL);
  155. return 0;
  156. }
  157. /*
  158. -----------------------------------------------------------------------------------
  159. --                             set_led
  160. -----------------------------------------------------------------------------------
  161. */
  162. /*
  163.  * NOTE: For the power LED, use the LED_POWER_* macros since they differ
  164.  */
  165. static void set_led(struct cardinfo *card, int shift, unsigned char state)
  166. {
  167. unsigned char led;
  168. led = readb(card->csr_remap + MEMCTRLCMD_LEDCTRL);
  169. if (state == LED_FLIP)
  170. led ^= (1<<shift);
  171. else {
  172. led &= ~(0x03 << shift);
  173. led |= (state << shift);
  174. }
  175. writeb(led, card->csr_remap + MEMCTRLCMD_LEDCTRL);
  176. }
  177. #ifdef MM_DIAG
  178. /*
  179. -----------------------------------------------------------------------------------
  180. --                              dump_regs
  181. -----------------------------------------------------------------------------------
  182. */
  183. static void dump_regs(struct cardinfo *card)
  184. {
  185. unsigned char *p;
  186. int i, i1;
  187. p = card->csr_remap;
  188. for (i = 0; i < 8; i++) {
  189. printk(KERN_DEBUG "%p   ", p);
  190. for (i1 = 0; i1 < 16; i1++)
  191. printk("%02x ", *p++);
  192. printk("n");
  193. }
  194. }
  195. #endif
  196. /*
  197. -----------------------------------------------------------------------------------
  198. --                            dump_dmastat
  199. -----------------------------------------------------------------------------------
  200. */
  201. static void dump_dmastat(struct cardinfo *card, unsigned int dmastat)
  202. {
  203. printk(KERN_DEBUG "MM%d*: DMAstat - ", card->card_number);
  204. if (dmastat & DMASCR_ANY_ERR)
  205. printk("ANY_ERR ");
  206. if (dmastat & DMASCR_MBE_ERR)
  207. printk("MBE_ERR ");
  208. if (dmastat & DMASCR_PARITY_ERR_REP)
  209. printk("PARITY_ERR_REP ");
  210. if (dmastat & DMASCR_PARITY_ERR_DET)
  211. printk("PARITY_ERR_DET ");
  212. if (dmastat & DMASCR_SYSTEM_ERR_SIG)
  213. printk("SYSTEM_ERR_SIG ");
  214. if (dmastat & DMASCR_TARGET_ABT)
  215. printk("TARGET_ABT ");
  216. if (dmastat & DMASCR_MASTER_ABT)
  217. printk("MASTER_ABT ");
  218. if (dmastat & DMASCR_CHAIN_COMPLETE)
  219. printk("CHAIN_COMPLETE ");
  220. if (dmastat & DMASCR_DMA_COMPLETE)
  221. printk("DMA_COMPLETE ");
  222. printk("n");
  223. }
  224. /*
  225.  * Theory of request handling
  226.  *
  227.  * Each bio is assigned to one mm_dma_desc - which may not be enough FIXME
  228.  * We have two pages of mm_dma_desc, holding about 64 descriptors
  229.  * each.  These are allocated at init time.
  230.  * One page is "Ready" and is either full, or can have request added.
  231.  * The other page might be "Active", which DMA is happening on it.
  232.  *
  233.  * Whenever IO on the active page completes, the Ready page is activated
  234.  * and the ex-Active page is clean out and made Ready.
  235.  * Otherwise the Ready page is only activated when it becomes full, or
  236.  * when mm_unplug_device is called via the unplug_io_fn.
  237.  *
  238.  * If a request arrives while both pages a full, it is queued, and b_rdev is
  239.  * overloaded to record whether it was a read or a write.
  240.  *
  241.  * The interrupt handler only polls the device to clear the interrupt.
  242.  * The processing of the result is done in a tasklet.
  243.  */
  244. static void mm_start_io(struct cardinfo *card)
  245. {
  246. /* we have the lock, we know there is
  247.  * no IO active, and we know that card->Active
  248.  * is set
  249.  */
  250. struct mm_dma_desc *desc;
  251. struct mm_page *page;
  252. int offset;
  253. /* make the last descriptor end the chain */
  254. page = &card->mm_pages[card->Active];
  255. pr_debug("start_io: %d %d->%dn", card->Active, page->headcnt, page->cnt-1);
  256. desc = &page->desc[page->cnt-1];
  257. desc->control_bits |= cpu_to_le32(DMASCR_CHAIN_COMP_EN);
  258. desc->control_bits &= ~cpu_to_le32(DMASCR_CHAIN_EN);
  259. desc->sem_control_bits = desc->control_bits;
  260.        
  261. if (debug & DEBUG_LED_ON_TRANSFER)
  262. set_led(card, LED_REMOVE, LED_ON);
  263. desc = &page->desc[page->headcnt];
  264. writel(0, card->csr_remap + DMA_PCI_ADDR);
  265. writel(0, card->csr_remap + DMA_PCI_ADDR + 4);
  266. writel(0, card->csr_remap + DMA_LOCAL_ADDR);
  267. writel(0, card->csr_remap + DMA_LOCAL_ADDR + 4);
  268. writel(0, card->csr_remap + DMA_TRANSFER_SIZE);
  269. writel(0, card->csr_remap + DMA_TRANSFER_SIZE + 4);
  270. writel(0, card->csr_remap + DMA_SEMAPHORE_ADDR);
  271. writel(0, card->csr_remap + DMA_SEMAPHORE_ADDR + 4);
  272. offset = ((char*)desc) - ((char*)page->desc);
  273. writel(cpu_to_le32((page->page_dma+offset)&0xffffffff),
  274.        card->csr_remap + DMA_DESCRIPTOR_ADDR);
  275. /* Force the value to u64 before shifting otherwise >> 32 is undefined C
  276.  * and on some ports will do nothing ! */
  277. writel(cpu_to_le32(((u64)page->page_dma)>>32),
  278.        card->csr_remap + DMA_DESCRIPTOR_ADDR + 4);
  279. /* Go, go, go */
  280. writel(cpu_to_le32(DMASCR_GO | DMASCR_CHAIN_EN | pci_cmds),
  281.        card->csr_remap + DMA_STATUS_CTRL);
  282. }
  283. static int add_bio(struct cardinfo *card);
  284. static void activate(struct cardinfo *card)
  285. {
  286. /* if No page is Active, and Ready is 
  287.  * not empty, then switch Ready page
  288.  * to active and start IO.
  289.  * Then add any bh's that are available to Ready
  290.  */
  291. do {
  292. while (add_bio(card))
  293. ;
  294. if (card->Active == -1 &&
  295.     card->mm_pages[card->Ready].cnt > 0) {
  296. card->Active = card->Ready;
  297. card->Ready = 1-card->Ready;
  298. mm_start_io(card);
  299. }
  300. } while (card->Active == -1 && add_bio(card));
  301. }
  302. static inline void reset_page(struct mm_page *page)
  303. {
  304. page->cnt = 0;
  305. page->headcnt = 0;
  306. page->bio = NULL;
  307. page->biotail = & page->bio;
  308. }
  309. static void mm_unplug_device(request_queue_t *q)
  310. {
  311. struct cardinfo *card = q->queuedata;
  312. unsigned long flags;
  313. spin_lock_irqsave(&card->lock, flags);
  314. if (blk_remove_plug(q))
  315. activate(card);
  316. spin_unlock_irqrestore(&card->lock, flags);
  317. }
  318. /* 
  319.  * If there is room on Ready page, take
  320.  * one bh off list and add it.
  321.  * return 1 if there was room, else 0.
  322.  */
  323. static int add_bio(struct cardinfo *card)
  324. {
  325. struct mm_page *p;
  326. struct mm_dma_desc *desc;
  327. dma_addr_t dma_handle;
  328. int offset;
  329. struct bio *bio;
  330. int rw;
  331. int len;
  332. bio = card->currentbio;
  333. if (!bio && card->bio) {
  334. card->currentbio = card->bio;
  335. card->bio = card->bio->bi_next;
  336. if (card->bio == NULL)
  337. card->biotail = &card->bio;
  338. card->currentbio->bi_next = NULL;
  339. return 1;
  340. }
  341. if (!bio)
  342. return 0;
  343. rw = bio_rw(bio);
  344. if (card->mm_pages[card->Ready].cnt >= DESC_PER_PAGE)
  345. return 0;
  346. len = bio_iovec(bio)->bv_len;
  347. dma_handle = pci_map_page(card->dev, 
  348.   bio_page(bio),
  349.   bio_offset(bio),
  350.   len,
  351.   (rw==READ) ?
  352.   PCI_DMA_FROMDEVICE : PCI_DMA_TODEVICE);
  353. p = &card->mm_pages[card->Ready];
  354. desc = &p->desc[p->cnt];
  355. p->cnt++;
  356. if ((p->biotail) != &bio->bi_next) {
  357. *(p->biotail) = bio;
  358. p->biotail = &(bio->bi_next);
  359. bio->bi_next = NULL;
  360. }
  361. desc->data_dma_handle = dma_handle;
  362. desc->pci_addr = cpu_to_le64((u64)desc->data_dma_handle);
  363. desc->local_addr= cpu_to_le64(bio->bi_sector << 9);
  364. desc->transfer_size = cpu_to_le32(len);
  365. offset = ( ((char*)&desc->sem_control_bits) - ((char*)p->desc));
  366. desc->sem_addr = cpu_to_le64((u64)(p->page_dma+offset));
  367. desc->zero1 = desc->zero2 = 0;
  368. offset = ( ((char*)(desc+1)) - ((char*)p->desc));
  369. desc->next_desc_addr = cpu_to_le64(p->page_dma+offset);
  370. desc->control_bits = cpu_to_le32(DMASCR_GO|DMASCR_ERR_INT_EN|
  371.  DMASCR_PARITY_INT_EN|
  372.  DMASCR_CHAIN_EN |
  373.  DMASCR_SEM_EN |
  374.  pci_cmds);
  375. if (rw == WRITE)
  376. desc->control_bits |= cpu_to_le32(DMASCR_TRANSFER_READ);
  377. desc->sem_control_bits = desc->control_bits;
  378. bio->bi_sector += (len>>9);
  379. bio->bi_size -= len;
  380. bio->bi_idx++;
  381. if (bio->bi_idx >= bio->bi_vcnt) 
  382. card->currentbio = NULL;
  383. return 1;
  384. }
  385. static void process_page(unsigned long data)
  386. {
  387. /* check if any of the requests in the page are DMA_COMPLETE,
  388.  * and deal with them appropriately.
  389.  * If we find a descriptor without DMA_COMPLETE in the semaphore, then
  390.  * dma must have hit an error on that descriptor, so use dma_status instead
  391.  * and assume that all following descriptors must be re-tried.
  392.  */
  393. struct mm_page *page;
  394. struct bio *return_bio=NULL;
  395. struct cardinfo *card = (struct cardinfo *)data;
  396. unsigned int dma_status = card->dma_status;
  397. spin_lock_bh(&card->lock);
  398. if (card->Active < 0)
  399. goto out_unlock;
  400. page = &card->mm_pages[card->Active];
  401. while (page->headcnt < page->cnt) {
  402. struct bio *bio = page->bio;
  403. struct mm_dma_desc *desc = &page->desc[page->headcnt];
  404. int control = le32_to_cpu(desc->sem_control_bits);
  405. int last=0;
  406. int idx;
  407. if (!(control & DMASCR_DMA_COMPLETE)) {
  408. control = dma_status;
  409. last=1; 
  410. }
  411. page->headcnt++;
  412. idx = bio->bi_phys_segments;
  413. bio->bi_phys_segments++;
  414. if (bio->bi_phys_segments >= bio->bi_vcnt)
  415. page->bio = bio->bi_next;
  416. pci_unmap_page(card->dev, desc->data_dma_handle, 
  417.        bio_iovec_idx(bio,idx)->bv_len,
  418.  (control& DMASCR_TRANSFER_READ) ?
  419. PCI_DMA_TODEVICE : PCI_DMA_FROMDEVICE);
  420. if (control & DMASCR_HARD_ERROR) {
  421. /* error */
  422. clear_bit(BIO_UPTODATE, &bio->bi_flags);
  423. printk(KERN_WARNING "MM%d: I/O error on sector %d/%dn",
  424.        card->card_number, 
  425.        le32_to_cpu(desc->local_addr)>>9,
  426.        le32_to_cpu(desc->transfer_size));
  427. dump_dmastat(card, control);
  428. } else if (test_bit(BIO_RW, &bio->bi_rw) &&
  429.    le32_to_cpu(desc->local_addr)>>9 == card->init_size) {
  430. card->init_size += le32_to_cpu(desc->transfer_size)>>9;
  431. if (card->init_size>>1 >= card->mm_size) {
  432. printk(KERN_INFO "MM%d: memory now initialisedn",
  433.        card->card_number);
  434. set_userbit(card, MEMORY_INITIALIZED, 1);
  435. }
  436. }
  437. if (bio != page->bio) {
  438. bio->bi_next = return_bio;
  439. return_bio = bio;
  440. }
  441. if (last) break;
  442. }
  443. if (debug & DEBUG_LED_ON_TRANSFER)
  444. set_led(card, LED_REMOVE, LED_OFF);
  445. if (card->check_batteries) {
  446. card->check_batteries = 0;
  447. check_batteries(card);
  448. }
  449. if (page->headcnt >= page->cnt) {
  450. reset_page(page);
  451. card->Active = -1;
  452. activate(card);
  453. } else {
  454. /* haven't finished with this one yet */
  455. pr_debug("do some moren");
  456. mm_start_io(card);
  457. }
  458.  out_unlock:
  459. spin_unlock_bh(&card->lock);
  460. while(return_bio) {
  461. struct bio *bio = return_bio;
  462. return_bio = bio->bi_next;
  463. bio->bi_next = NULL;
  464. bio_endio(bio, bio->bi_size, 0);
  465. }
  466. }
  467. /*
  468. -----------------------------------------------------------------------------------
  469. --                              mm_make_request
  470. -----------------------------------------------------------------------------------
  471. */
  472. static int mm_make_request(request_queue_t *q, struct bio *bio)
  473. {
  474. struct cardinfo *card = q->queuedata;
  475. pr_debug("mm_make_request %ld %dn", bh->b_rsector, bh->b_size);
  476. bio->bi_phys_segments = bio->bi_idx; /* count of completed segments*/
  477. spin_lock_irq(&card->lock);
  478. *card->biotail = bio;
  479. bio->bi_next = NULL;
  480. card->biotail = &bio->bi_next;
  481. blk_plug_device(q);
  482. spin_unlock_irq(&card->lock);
  483. return 0;
  484. }
  485. /*
  486. -----------------------------------------------------------------------------------
  487. --                              mm_interrupt
  488. -----------------------------------------------------------------------------------
  489. */
  490. static irqreturn_t mm_interrupt(int irq, void *__card, struct pt_regs *regs)
  491. {
  492. struct cardinfo *card = (struct cardinfo *) __card;
  493. unsigned int dma_status;
  494. unsigned short cfg_status;
  495. HW_TRACE(0x30);
  496. dma_status = le32_to_cpu(readl(card->csr_remap + DMA_STATUS_CTRL));
  497. if (!(dma_status & (DMASCR_ERROR_MASK | DMASCR_CHAIN_COMPLETE))) {
  498. /* interrupt wasn't for me ... */
  499. return IRQ_NONE;
  500.         }
  501. /* clear COMPLETION interrupts */
  502. if (card->flags & UM_FLAG_NO_BYTE_STATUS)
  503. writel(cpu_to_le32(DMASCR_DMA_COMPLETE|DMASCR_CHAIN_COMPLETE),
  504.        card->csr_remap+ DMA_STATUS_CTRL);
  505. else
  506. writeb((DMASCR_DMA_COMPLETE|DMASCR_CHAIN_COMPLETE) >> 16,
  507.        card->csr_remap+ DMA_STATUS_CTRL + 2);
  508. /* log errors and clear interrupt status */
  509. if (dma_status & DMASCR_ANY_ERR) {
  510. unsigned int data_log1, data_log2;
  511. unsigned int addr_log1, addr_log2;
  512. unsigned char stat, count, syndrome, check;
  513. stat = readb(card->csr_remap + MEMCTRLCMD_ERRSTATUS);
  514. data_log1 = le32_to_cpu(readl(card->csr_remap + ERROR_DATA_LOG));
  515. data_log2 = le32_to_cpu(readl(card->csr_remap + ERROR_DATA_LOG + 4));
  516. addr_log1 = le32_to_cpu(readl(card->csr_remap + ERROR_ADDR_LOG));
  517. addr_log2 = readb(card->csr_remap + ERROR_ADDR_LOG + 4);
  518. count = readb(card->csr_remap + ERROR_COUNT);
  519. syndrome = readb(card->csr_remap + ERROR_SYNDROME);
  520. check = readb(card->csr_remap + ERROR_CHECK);
  521. dump_dmastat(card, dma_status);
  522. if (stat & 0x01)
  523. printk(KERN_ERR "MM%d*: Memory access error detected (err count %d)n",
  524. card->card_number, count);
  525. if (stat & 0x02)
  526. printk(KERN_ERR "MM%d*: Multi-bit EDC errorn",
  527. card->card_number);
  528. printk(KERN_ERR "MM%d*: Fault Address 0x%02x%08x, Fault Data 0x%08x%08xn",
  529. card->card_number, addr_log2, addr_log1, data_log2, data_log1);
  530. printk(KERN_ERR "MM%d*: Fault Check 0x%02x, Fault Syndrome 0x%02xn",
  531. card->card_number, check, syndrome);
  532. writeb(0, card->csr_remap + ERROR_COUNT);
  533. }
  534. if (dma_status & DMASCR_PARITY_ERR_REP) {
  535. printk(KERN_ERR "MM%d*: PARITY ERROR REPORTEDn", card->card_number);
  536. pci_read_config_word(card->dev, PCI_STATUS, &cfg_status);
  537. pci_write_config_word(card->dev, PCI_STATUS, cfg_status);
  538. }
  539. if (dma_status & DMASCR_PARITY_ERR_DET) {
  540. printk(KERN_ERR "MM%d*: PARITY ERROR DETECTEDn", card->card_number); 
  541. pci_read_config_word(card->dev, PCI_STATUS, &cfg_status);
  542. pci_write_config_word(card->dev, PCI_STATUS, cfg_status);
  543. }
  544. if (dma_status & DMASCR_SYSTEM_ERR_SIG) {
  545. printk(KERN_ERR "MM%d*: SYSTEM ERRORn", card->card_number); 
  546. pci_read_config_word(card->dev, PCI_STATUS, &cfg_status);
  547. pci_write_config_word(card->dev, PCI_STATUS, cfg_status);
  548. }
  549. if (dma_status & DMASCR_TARGET_ABT) {
  550. printk(KERN_ERR "MM%d*: TARGET ABORTn", card->card_number); 
  551. pci_read_config_word(card->dev, PCI_STATUS, &cfg_status);
  552. pci_write_config_word(card->dev, PCI_STATUS, cfg_status);
  553. }
  554. if (dma_status & DMASCR_MASTER_ABT) {
  555. printk(KERN_ERR "MM%d*: MASTER ABORTn", card->card_number); 
  556. pci_read_config_word(card->dev, PCI_STATUS, &cfg_status);
  557. pci_write_config_word(card->dev, PCI_STATUS, cfg_status);
  558. }
  559. /* and process the DMA descriptors */
  560. card->dma_status = dma_status;
  561. tasklet_schedule(&card->tasklet);
  562. HW_TRACE(0x36);
  563. return IRQ_HANDLED; 
  564. }
  565. /*
  566. -----------------------------------------------------------------------------------
  567. --                         set_fault_to_battery_status
  568. -----------------------------------------------------------------------------------
  569. */
  570. /*
  571.  * If both batteries are good, no LED
  572.  * If either battery has been warned, solid LED
  573.  * If both batteries are bad, flash the LED quickly
  574.  * If either battery is bad, flash the LED semi quickly
  575.  */
  576. static void set_fault_to_battery_status(struct cardinfo *card)
  577. {
  578. if (card->battery[0].good && card->battery[1].good)
  579. set_led(card, LED_FAULT, LED_OFF);
  580. else if (card->battery[0].warned || card->battery[1].warned)
  581. set_led(card, LED_FAULT, LED_ON);
  582. else if (!card->battery[0].good && !card->battery[1].good)
  583. set_led(card, LED_FAULT, LED_FLASH_7_0);
  584. else
  585. set_led(card, LED_FAULT, LED_FLASH_3_5);
  586. }
  587. static void init_battery_timer(void);
  588. /*
  589. -----------------------------------------------------------------------------------
  590. --                            check_battery
  591. -----------------------------------------------------------------------------------
  592. */
  593. static int check_battery(struct cardinfo *card, int battery, int status)
  594. {
  595. if (status != card->battery[battery].good) {
  596. card->battery[battery].good = !card->battery[battery].good;
  597. card->battery[battery].last_change = jiffies;
  598. if (card->battery[battery].good) {
  599. printk(KERN_ERR "MM%d: Battery %d now goodn",
  600. card->card_number, battery + 1);
  601. card->battery[battery].warned = 0;
  602. } else
  603. printk(KERN_ERR "MM%d: Battery %d now FAILEDn",
  604. card->card_number, battery + 1);
  605. return 1;
  606. } else if (!card->battery[battery].good &&
  607.    !card->battery[battery].warned &&
  608.    time_after_eq(jiffies, card->battery[battery].last_change +
  609.  (HZ * 60 * 60 * 5))) {
  610. printk(KERN_ERR "MM%d: Battery %d still FAILED after 5 hoursn",
  611. card->card_number, battery + 1);
  612. card->battery[battery].warned = 1;
  613. return 1;
  614. }
  615. return 0;
  616. }
  617. /*
  618. -----------------------------------------------------------------------------------
  619. --                              check_batteries
  620. -----------------------------------------------------------------------------------
  621. */
  622. static void check_batteries(struct cardinfo *card)
  623. {
  624. /* NOTE: this must *never* be called while the card
  625.  * is doing (bus-to-card) DMA, or you will need the
  626.  * reset switch
  627.  */
  628. unsigned char status;
  629. int ret1, ret2;
  630. status = readb(card->csr_remap + MEMCTRLSTATUS_BATTERY);
  631. if (debug & DEBUG_BATTERY_POLLING)
  632. printk(KERN_DEBUG "MM%d: checking battery status, 1 = %s, 2 = %sn",
  633.        card->card_number,
  634.        (status & BATTERY_1_FAILURE) ? "FAILURE" : "OK",
  635.        (status & BATTERY_2_FAILURE) ? "FAILURE" : "OK");
  636. ret1 = check_battery(card, 0, !(status & BATTERY_1_FAILURE));
  637. ret2 = check_battery(card, 1, !(status & BATTERY_2_FAILURE));
  638. if (ret1 || ret2)
  639. set_fault_to_battery_status(card);
  640. }
  641. static void check_all_batteries(unsigned long ptr)
  642. {
  643. int i;
  644. for (i = 0; i < num_cards; i++) 
  645. if (!(cards[i].flags & UM_FLAG_NO_BATT)) {
  646. struct cardinfo *card = &cards[i];
  647. spin_lock_bh(&card->lock);
  648. if (card->Active >= 0)
  649. card->check_batteries = 1;
  650. else
  651. check_batteries(card);
  652. spin_unlock_bh(&card->lock);
  653. }
  654. init_battery_timer();
  655. }
  656. /*
  657. -----------------------------------------------------------------------------------
  658. --                            init_battery_timer
  659. -----------------------------------------------------------------------------------
  660. */
  661. static void init_battery_timer(void)
  662. {
  663. init_timer(&battery_timer);
  664. battery_timer.function = check_all_batteries;
  665. battery_timer.expires = jiffies + (HZ * 60);
  666. add_timer(&battery_timer);
  667. }
  668. /*
  669. -----------------------------------------------------------------------------------
  670. --                              del_battery_timer
  671. -----------------------------------------------------------------------------------
  672. */
  673. static void del_battery_timer(void)
  674. {
  675. del_timer(&battery_timer);
  676. }
  677. /*
  678. -----------------------------------------------------------------------------------
  679. --                                mm_revalidate
  680. -----------------------------------------------------------------------------------
  681. */
  682. /*
  683.  * Note no locks taken out here.  In a worst case scenario, we could drop
  684.  * a chunk of system memory.  But that should never happen, since validation
  685.  * happens at open or mount time, when locks are held.
  686.  *
  687.  * That's crap, since doing that while some partitions are opened
  688.  * or mounted will give you really nasty results.
  689.  */
  690. static int mm_revalidate(struct gendisk *disk)
  691. {
  692. struct cardinfo *card = disk->private_data;
  693. set_capacity(disk, card->mm_size << 1);
  694. return 0;
  695. }
  696. /*
  697. -----------------------------------------------------------------------------------
  698. --                            mm_ioctl
  699. -----------------------------------------------------------------------------------
  700. */
  701. static int mm_ioctl(struct inode *i, struct file *f, unsigned int cmd, unsigned long arg)
  702. {
  703. if (cmd == HDIO_GETGEO) {
  704. struct cardinfo *card = i->i_bdev->bd_disk->private_data;
  705. int size = card->mm_size * (1024 / MM_HARDSECT);
  706. struct hd_geometry geo;
  707. /*
  708.  * get geometry: we have to fake one...  trim the size to a
  709.  * multiple of 2048 (1M): tell we have 32 sectors, 64 heads,
  710.  * whatever cylinders.
  711.  */
  712. geo.heads     = 64;
  713. geo.sectors   = 32;
  714. geo.start     = get_start_sect(i->i_bdev);
  715. geo.cylinders = size / (geo.heads * geo.sectors);
  716. if (copy_to_user((void __user *) arg, &geo, sizeof(geo)))
  717. return -EFAULT;
  718. return 0;
  719. }
  720. return -EINVAL;
  721. }
  722. /*
  723. -----------------------------------------------------------------------------------
  724. --                                mm_check_change
  725. -----------------------------------------------------------------------------------
  726.   Future support for removable devices
  727. */
  728. static int mm_check_change(struct gendisk *disk)
  729. {
  730. /*  struct cardinfo *dev = disk->private_data; */
  731. return 0;
  732. }
  733. /*
  734. -----------------------------------------------------------------------------------
  735. --                             mm_fops
  736. -----------------------------------------------------------------------------------
  737. */
  738. static struct block_device_operations mm_fops = {
  739. .owner = THIS_MODULE,
  740. .ioctl = mm_ioctl,
  741. .revalidate_disk= mm_revalidate,
  742. .media_changed = mm_check_change,
  743. };
  744. /*
  745. -----------------------------------------------------------------------------------
  746. --                                mm_pci_probe
  747. -----------------------------------------------------------------------------------
  748. */
  749. static int __devinit mm_pci_probe(struct pci_dev *dev, const struct pci_device_id *id)
  750. {
  751. int ret = -ENODEV;
  752. struct cardinfo *card = &cards[num_cards];
  753. unsigned char mem_present;
  754. unsigned char batt_status;
  755. unsigned int saved_bar, data;
  756. int magic_number;
  757. if (pci_enable_device(dev) < 0)
  758. return -ENODEV;
  759. pci_write_config_byte(dev, PCI_LATENCY_TIMER, 0xF8);
  760. pci_set_master(dev);
  761. card->dev         = dev;
  762. card->card_number = num_cards;
  763. card->csr_base = pci_resource_start(dev, 0);
  764. card->csr_len  = pci_resource_len(dev, 0);
  765. #ifdef CONFIG_MM_MAP_MEMORY
  766. card->mem_base = pci_resource_start(dev, 1);
  767. card->mem_len  = pci_resource_len(dev, 1);
  768. #endif
  769. printk(KERN_INFO "Micro Memory(tm) controller #%d found at %02x:%02x (PCI Mem Module (Battery Backup))n",
  770.        card->card_number, dev->bus->number, dev->devfn);
  771. if (pci_set_dma_mask(dev, 0xffffffffffffffffLL) &&
  772.     !pci_set_dma_mask(dev, 0xffffffffLL)) {
  773. printk(KERN_WARNING "MM%d: NO suitable DMA foundn",num_cards);
  774. return  -ENOMEM;
  775. }
  776. if (!request_mem_region(card->csr_base, card->csr_len, "Micro Memory")) {
  777. printk(KERN_ERR "MM%d: Unable to request memory regionn", card->card_number);
  778. ret = -ENOMEM;
  779. goto failed_req_csr;
  780. }
  781. card->csr_remap = ioremap_nocache(card->csr_base, card->csr_len);
  782. if (!card->csr_remap) {
  783. printk(KERN_ERR "MM%d: Unable to remap memory regionn", card->card_number);
  784. ret = -ENOMEM;
  785. goto failed_remap_csr;
  786. }
  787. printk(KERN_INFO "MM%d: CSR 0x%08lx -> 0x%p (0x%lx)n", card->card_number,
  788.        card->csr_base, card->csr_remap, card->csr_len);
  789. #ifdef CONFIG_MM_MAP_MEMORY
  790. if (!request_mem_region(card->mem_base, card->mem_len, "Micro Memory")) {
  791. printk(KERN_ERR "MM%d: Unable to request memory regionn", card->card_number);
  792. ret = -ENOMEM;
  793. goto failed_req_mem;
  794. }
  795. if (!(card->mem_remap = ioremap(card->mem_base, cards->mem_len))) {
  796. printk(KERN_ERR "MM%d: Unable to remap memory regionn", card->card_number);
  797. ret = -ENOMEM;
  798. goto failed_remap_mem;
  799. }
  800. printk(KERN_INFO "MM%d: MEM 0x%8lx -> 0x%8lx (0x%lx)n", card->card_number,
  801.        card->mem_base, card->mem_remap, card->mem_len);
  802. #else
  803. printk(KERN_INFO "MM%d: MEM area not remapped (CONFIG_MM_MAP_MEMORY not set)n",
  804.        card->card_number);
  805. #endif
  806. switch(card->dev->device) {
  807. case 0x5415:
  808. card->flags |= UM_FLAG_NO_BYTE_STATUS | UM_FLAG_NO_BATTREG;
  809. magic_number = 0x59;
  810. break;
  811. case 0x5425:
  812. card->flags |= UM_FLAG_NO_BYTE_STATUS;
  813. magic_number = 0x5C;
  814. break;
  815. case 0x6155:
  816. card->flags |= UM_FLAG_NO_BYTE_STATUS | UM_FLAG_NO_BATTREG | UM_FLAG_NO_BATT;
  817. magic_number = 0x99;
  818. break;
  819. default:
  820. magic_number = 0x100;
  821. break;
  822. }
  823. if (readb(card->csr_remap + MEMCTRLSTATUS_MAGIC) != magic_number) {
  824. printk(KERN_ERR "MM%d: Magic number invalidn", card->card_number);
  825. ret = -ENOMEM;
  826. goto failed_magic;
  827. }
  828. card->mm_pages[0].desc = pci_alloc_consistent(card->dev,
  829.       PAGE_SIZE*2,
  830.       &card->mm_pages[0].page_dma);
  831. card->mm_pages[1].desc = pci_alloc_consistent(card->dev,
  832.       PAGE_SIZE*2,
  833.       &card->mm_pages[1].page_dma);
  834. if (card->mm_pages[0].desc == NULL ||
  835.     card->mm_pages[1].desc == NULL) {
  836. printk(KERN_ERR "MM%d: alloc failedn", card->card_number);
  837. goto failed_alloc;
  838. }
  839. reset_page(&card->mm_pages[0]);
  840. reset_page(&card->mm_pages[1]);
  841. card->Ready = 0; /* page 0 is ready */
  842. card->Active = -1; /* no page is active */
  843. card->bio = NULL;
  844. card->biotail = &card->bio;
  845. card->queue = blk_alloc_queue(GFP_KERNEL);
  846. if (!card->queue)
  847. goto failed_alloc;
  848. blk_queue_make_request(card->queue, mm_make_request);
  849. card->queue->queuedata = card;
  850. card->queue->unplug_fn = mm_unplug_device;
  851. tasklet_init(&card->tasklet, process_page, (unsigned long)card);
  852. card->check_batteries = 0;
  853. mem_present = readb(card->csr_remap + MEMCTRLSTATUS_MEMORY);
  854. switch (mem_present) {
  855. case MEM_128_MB:
  856. card->mm_size = 1024 * 128;
  857. break;
  858. case MEM_256_MB:
  859. card->mm_size = 1024 * 256;
  860. break;
  861. case MEM_512_MB:
  862. card->mm_size = 1024 * 512;
  863. break;
  864. case MEM_1_GB:
  865. card->mm_size = 1024 * 1024;
  866. break;
  867. case MEM_2_GB:
  868. card->mm_size = 1024 * 2048;
  869. break;
  870. default:
  871. card->mm_size = 0;
  872. break;
  873. }
  874. /* Clear the LED's we control */
  875. set_led(card, LED_REMOVE, LED_OFF);
  876. set_led(card, LED_FAULT, LED_OFF);
  877. batt_status = readb(card->csr_remap + MEMCTRLSTATUS_BATTERY);
  878. card->battery[0].good = !(batt_status & BATTERY_1_FAILURE);
  879. card->battery[1].good = !(batt_status & BATTERY_2_FAILURE);
  880. card->battery[0].last_change = card->battery[1].last_change = jiffies;
  881. if (card->flags & UM_FLAG_NO_BATT) 
  882. printk(KERN_INFO "MM%d: Size %d KBn",
  883.        card->card_number, card->mm_size);
  884. else {
  885. printk(KERN_INFO "MM%d: Size %d KB, Battery 1 %s (%s), Battery 2 %s (%s)n",
  886.        card->card_number, card->mm_size,
  887.        (batt_status & BATTERY_1_DISABLED ? "Disabled" : "Enabled"),
  888.        card->battery[0].good ? "OK" : "FAILURE",
  889.        (batt_status & BATTERY_2_DISABLED ? "Disabled" : "Enabled"),
  890.        card->battery[1].good ? "OK" : "FAILURE");
  891. set_fault_to_battery_status(card);
  892. }
  893. pci_read_config_dword(dev, PCI_BASE_ADDRESS_1, &saved_bar);
  894. data = 0xffffffff;
  895. pci_write_config_dword(dev, PCI_BASE_ADDRESS_1, data);
  896. pci_read_config_dword(dev, PCI_BASE_ADDRESS_1, &data);
  897. pci_write_config_dword(dev, PCI_BASE_ADDRESS_1, saved_bar);
  898. data &= 0xfffffff0;
  899. data = ~data;
  900. data += 1;
  901. card->win_size = data;
  902. if (request_irq(dev->irq, mm_interrupt, SA_SHIRQ, "pci-umem", card)) {
  903. printk(KERN_ERR "MM%d: Unable to allocate IRQn", card->card_number);
  904. ret = -ENODEV;
  905. goto failed_req_irq;
  906. }
  907. card->irq = dev->irq;
  908. printk(KERN_INFO "MM%d: Window size %d bytes, IRQ %dn", card->card_number,
  909.        card->win_size, card->irq);
  910.         spin_lock_init(&card->lock);
  911. pci_set_drvdata(dev, card);
  912. if (pci_write_cmd != 0x0F)  /* If not Memory Write & Invalidate */
  913. pci_write_cmd = 0x07; /* then Memory Write command */
  914. if (pci_write_cmd & 0x08) { /* use Memory Write and Invalidate */
  915. unsigned short cfg_command;
  916. pci_read_config_word(dev, PCI_COMMAND, &cfg_command);
  917. cfg_command |= 0x10; /* Memory Write & Invalidate Enable */
  918. pci_write_config_word(dev, PCI_COMMAND, cfg_command);
  919. }
  920. pci_cmds = (pci_read_cmd << 28) | (pci_write_cmd << 24);
  921. num_cards++;
  922. if (!get_userbit(card, MEMORY_INITIALIZED)) {
  923. printk(KERN_INFO "MM%d: memory NOT initialized. Consider over-writing whole device.n", card->card_number);
  924. card->init_size = 0;
  925. } else {
  926. printk(KERN_INFO "MM%d: memory already initializedn", card->card_number);
  927. card->init_size = card->mm_size;
  928. }
  929. /* Enable ECC */
  930. writeb(EDC_STORE_CORRECT, card->csr_remap + MEMCTRLCMD_ERRCTRL);
  931. return 0;
  932.  failed_req_irq:
  933.  failed_alloc:
  934. if (card->mm_pages[0].desc)
  935. pci_free_consistent(card->dev, PAGE_SIZE*2,
  936.     card->mm_pages[0].desc,
  937.     card->mm_pages[0].page_dma);
  938. if (card->mm_pages[1].desc)
  939. pci_free_consistent(card->dev, PAGE_SIZE*2,
  940.     card->mm_pages[1].desc,
  941.     card->mm_pages[1].page_dma);
  942.  failed_magic:
  943. #ifdef CONFIG_MM_MAP_MEMORY
  944. iounmap(card->mem_remap);
  945.  failed_remap_mem:
  946. release_mem_region(card->mem_base, card->mem_len);
  947.  failed_req_mem:
  948. #endif
  949. iounmap(card->csr_remap);
  950.  failed_remap_csr:
  951. release_mem_region(card->csr_base, card->csr_len);
  952.  failed_req_csr:
  953. return ret;
  954. }
  955. /*
  956. -----------------------------------------------------------------------------------
  957. --                              mm_pci_remove
  958. -----------------------------------------------------------------------------------
  959. */
  960. static void mm_pci_remove(struct pci_dev *dev)
  961. {
  962. struct cardinfo *card = pci_get_drvdata(dev);
  963. tasklet_kill(&card->tasklet);
  964. iounmap(card->csr_remap);
  965. release_mem_region(card->csr_base, card->csr_len);
  966. #ifdef CONFIG_MM_MAP_MEMORY
  967. iounmap(card->mem_remap);
  968. release_mem_region(card->mem_base, card->mem_len);
  969. #endif
  970. free_irq(card->irq, card);
  971. if (card->mm_pages[0].desc)
  972. pci_free_consistent(card->dev, PAGE_SIZE*2,
  973.     card->mm_pages[0].desc,
  974.     card->mm_pages[0].page_dma);
  975. if (card->mm_pages[1].desc)
  976. pci_free_consistent(card->dev, PAGE_SIZE*2,
  977.     card->mm_pages[1].desc,
  978.     card->mm_pages[1].page_dma);
  979. blk_put_queue(card->queue);
  980. }
  981. static const struct pci_device_id mm_pci_ids[] = { {
  982. .vendor = PCI_VENDOR_ID_MICRO_MEMORY,
  983. .device = PCI_DEVICE_ID_MICRO_MEMORY_5415CN,
  984. }, {
  985. .vendor = PCI_VENDOR_ID_MICRO_MEMORY,
  986. .device = PCI_DEVICE_ID_MICRO_MEMORY_5425CN,
  987. }, {
  988. .vendor = PCI_VENDOR_ID_MICRO_MEMORY,
  989. .device = PCI_DEVICE_ID_MICRO_MEMORY_6155,
  990. }, {
  991. .vendor = 0x8086,
  992. .device = 0xB555,
  993. .subvendor= 0x1332,
  994. .subdevice= 0x5460,
  995. .class = 0x050000,
  996. .class_mask= 0,
  997. }, { /* end: all zeroes */ }
  998. };
  999. MODULE_DEVICE_TABLE(pci, mm_pci_ids);
  1000. static struct pci_driver mm_pci_driver = {
  1001. .name = "umem",
  1002. .id_table = mm_pci_ids,
  1003. .probe = mm_pci_probe,
  1004. .remove = mm_pci_remove,
  1005. };
  1006. /*
  1007. -----------------------------------------------------------------------------------
  1008. --                               mm_init
  1009. -----------------------------------------------------------------------------------
  1010. */
  1011. static int __init mm_init(void)
  1012. {
  1013. int retval, i;
  1014. int err;
  1015. printk(KERN_INFO DRIVER_VERSION " : " DRIVER_DESC "n");
  1016. retval = pci_module_init(&mm_pci_driver);
  1017. if (retval)
  1018. return -ENOMEM;
  1019. err = major_nr = register_blkdev(0, "umem");
  1020. if (err < 0)
  1021. return -EIO;
  1022. for (i = 0; i < num_cards; i++) {
  1023. mm_gendisk[i] = alloc_disk(1 << MM_SHIFT);
  1024. if (!mm_gendisk[i])
  1025. goto out;
  1026. }
  1027. for (i = 0; i < num_cards; i++) {
  1028. struct gendisk *disk = mm_gendisk[i];
  1029. sprintf(disk->disk_name, "umem%c", 'a'+i);
  1030. sprintf(disk->devfs_name, "umem/card%d", i);
  1031. spin_lock_init(&cards[i].lock);
  1032. disk->major = major_nr;
  1033. disk->first_minor  = i << MM_SHIFT;
  1034. disk->fops = &mm_fops;
  1035. disk->private_data = &cards[i];
  1036. disk->queue = cards[i].queue;
  1037. set_capacity(disk, cards[i].mm_size << 1);
  1038. add_disk(disk);
  1039. }
  1040. init_battery_timer();
  1041. printk("MM: desc_per_page = %ldn", DESC_PER_PAGE);
  1042. /* printk("mm_init: Done. 10-19-01 9:00n"); */
  1043. return 0;
  1044. out:
  1045. unregister_blkdev(major_nr, "umem");
  1046. while (i--)
  1047. put_disk(mm_gendisk[i]);
  1048. return -ENOMEM;
  1049. }
  1050. /*
  1051. -----------------------------------------------------------------------------------
  1052. --                             mm_cleanup
  1053. -----------------------------------------------------------------------------------
  1054. */
  1055. static void __exit mm_cleanup(void)
  1056. {
  1057. int i;
  1058. del_battery_timer();
  1059. for (i=0; i < num_cards ; i++) {
  1060. del_gendisk(mm_gendisk[i]);
  1061. put_disk(mm_gendisk[i]);
  1062. }
  1063. pci_unregister_driver(&mm_pci_driver);
  1064. unregister_blkdev(major_nr, "umem");
  1065. }
  1066. module_init(mm_init);
  1067. module_exit(mm_cleanup);
  1068. MODULE_AUTHOR(DRIVER_AUTHOR);
  1069. MODULE_DESCRIPTION(DRIVER_DESC);
  1070. MODULE_LICENSE("GPL");