wbsd.c 40 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424142514261427142814291430143114321433143414351436143714381439144014411442144314441445144614471448144914501451145214531454145514561457145814591460146114621463146414651466146714681469147014711472147314741475147614771478147914801481148214831484148514861487148814891490149114921493149414951496149714981499150015011502150315041505150615071508150915101511151215131514151515161517151815191520152115221523152415251526152715281529153015311532153315341535153615371538153915401541154215431544154515461547154815491550155115521553155415551556155715581559156015611562156315641565156615671568156915701571157215731574157515761577157815791580158115821583158415851586158715881589159015911592159315941595159615971598159916001601160216031604160516061607160816091610161116121613161416151616161716181619162016211622162316241625162616271628162916301631163216331634163516361637163816391640164116421643164416451646164716481649165016511652165316541655165616571658165916601661166216631664166516661667166816691670167116721673167416751676167716781679168016811682168316841685168616871688168916901691169216931694169516961697169816991700170117021703170417051706170717081709171017111712171317141715171617171718171917201721172217231724172517261727172817291730173117321733173417351736173717381739174017411742174317441745174617471748174917501751175217531754175517561757175817591760176117621763176417651766176717681769177017711772177317741775177617771778177917801781178217831784178517861787178817891790179117921793179417951796179717981799180018011802180318041805180618071808180918101811181218131814181518161817181818191820182118221823182418251826182718281829183018311832183318341835183618371838183918401841184218431844184518461847184818491850185118521853185418551856185718581859186018611862186318641865186618671868186918701871187218731874187518761877187818791880188118821883188418851886188718881889189018911892189318941895189618971898189919001901190219031904190519061907190819091910191119121913191419151916191719181919192019211922192319241925192619271928192919301931193219331934193519361937193819391940194119421943194419451946194719481949195019511952195319541955195619571958195919601961196219631964196519661967196819691970197119721973197419751976197719781979198019811982198319841985198619871988198919901991199219931994199519961997199819992000200120022003200420052006200720082009201020112012201320142015201620172018201920202021202220232024202520262027202820292030203120322033203420352036203720382039204020412042204320442045204620472048204920502051205220532054205520562057205820592060206120622063206420652066206720682069207020712072207320742075
  1. /*
  2. * linux/drivers/mmc/wbsd.c - Winbond W83L51xD SD/MMC driver
  3. *
  4. * Copyright (C) 2004-2005 Pierre Ossman, All Rights Reserved.
  5. *
  6. * This program is free software; you can redistribute it and/or modify
  7. * it under the terms of the GNU General Public License version 2 as
  8. * published by the Free Software Foundation.
  9. *
  10. *
  11. * Warning!
  12. *
  13. * Changes to the FIFO system should be done with extreme care since
  14. * the hardware is full of bugs related to the FIFO. Known issues are:
  15. *
  16. * - FIFO size field in FSR is always zero.
  17. *
  18. * - FIFO interrupts tend not to work as they should. Interrupts are
  19. * triggered only for full/empty events, not for threshold values.
  20. *
  21. * - On APIC systems the FIFO empty interrupt is sometimes lost.
  22. */
  23. #include <linux/config.h>
  24. #include <linux/module.h>
  25. #include <linux/moduleparam.h>
  26. #include <linux/init.h>
  27. #include <linux/ioport.h>
  28. #include <linux/device.h>
  29. #include <linux/interrupt.h>
  30. #include <linux/dma-mapping.h>
  31. #include <linux/delay.h>
  32. #include <linux/pnp.h>
  33. #include <linux/highmem.h>
  34. #include <linux/mmc/host.h>
  35. #include <linux/mmc/protocol.h>
  36. #include <asm/io.h>
  37. #include <asm/dma.h>
  38. #include <asm/scatterlist.h>
  39. #include "wbsd.h"
  40. #define DRIVER_NAME "wbsd"
  41. #define DRIVER_VERSION "1.4"
  42. #ifdef CONFIG_MMC_DEBUG
  43. #define DBG(x...) \
  44. printk(KERN_DEBUG DRIVER_NAME ": " x)
  45. #define DBGF(f, x...) \
  46. printk(KERN_DEBUG DRIVER_NAME " [%s()]: " f, __func__ , ##x)
  47. #else
  48. #define DBG(x...) do { } while (0)
  49. #define DBGF(x...) do { } while (0)
  50. #endif
  51. /*
  52. * Device resources
  53. */
  54. #ifdef CONFIG_PNP
  55. static const struct pnp_device_id pnp_dev_table[] = {
  56. { "WEC0517", 0 },
  57. { "WEC0518", 0 },
  58. { "", 0 },
  59. };
  60. MODULE_DEVICE_TABLE(pnp, pnp_dev_table);
  61. #endif /* CONFIG_PNP */
  62. static const int config_ports[] = { 0x2E, 0x4E };
  63. static const int unlock_codes[] = { 0x83, 0x87 };
  64. static const int valid_ids[] = {
  65. 0x7112,
  66. };
  67. #ifdef CONFIG_PNP
  68. static unsigned int nopnp = 0;
  69. #else
  70. static const unsigned int nopnp = 1;
  71. #endif
  72. static unsigned int io = 0x248;
  73. static unsigned int irq = 6;
  74. static int dma = 2;
  75. /*
  76. * Basic functions
  77. */
  78. static inline void wbsd_unlock_config(struct wbsd_host* host)
  79. {
  80. BUG_ON(host->config == 0);
  81. outb(host->unlock_code, host->config);
  82. outb(host->unlock_code, host->config);
  83. }
  84. static inline void wbsd_lock_config(struct wbsd_host* host)
  85. {
  86. BUG_ON(host->config == 0);
  87. outb(LOCK_CODE, host->config);
  88. }
  89. static inline void wbsd_write_config(struct wbsd_host* host, u8 reg, u8 value)
  90. {
  91. BUG_ON(host->config == 0);
  92. outb(reg, host->config);
  93. outb(value, host->config + 1);
  94. }
  95. static inline u8 wbsd_read_config(struct wbsd_host* host, u8 reg)
  96. {
  97. BUG_ON(host->config == 0);
  98. outb(reg, host->config);
  99. return inb(host->config + 1);
  100. }
  101. static inline void wbsd_write_index(struct wbsd_host* host, u8 index, u8 value)
  102. {
  103. outb(index, host->base + WBSD_IDXR);
  104. outb(value, host->base + WBSD_DATAR);
  105. }
  106. static inline u8 wbsd_read_index(struct wbsd_host* host, u8 index)
  107. {
  108. outb(index, host->base + WBSD_IDXR);
  109. return inb(host->base + WBSD_DATAR);
  110. }
  111. /*
  112. * Common routines
  113. */
  114. static void wbsd_init_device(struct wbsd_host* host)
  115. {
  116. u8 setup, ier;
  117. /*
  118. * Reset chip (SD/MMC part) and fifo.
  119. */
  120. setup = wbsd_read_index(host, WBSD_IDX_SETUP);
  121. setup |= WBSD_FIFO_RESET | WBSD_SOFT_RESET;
  122. wbsd_write_index(host, WBSD_IDX_SETUP, setup);
  123. /*
  124. * Set DAT3 to input
  125. */
  126. setup &= ~WBSD_DAT3_H;
  127. wbsd_write_index(host, WBSD_IDX_SETUP, setup);
  128. host->flags &= ~WBSD_FIGNORE_DETECT;
  129. /*
  130. * Read back default clock.
  131. */
  132. host->clk = wbsd_read_index(host, WBSD_IDX_CLK);
  133. /*
  134. * Power down port.
  135. */
  136. outb(WBSD_POWER_N, host->base + WBSD_CSR);
  137. /*
  138. * Set maximum timeout.
  139. */
  140. wbsd_write_index(host, WBSD_IDX_TAAC, 0x7F);
  141. /*
  142. * Test for card presence
  143. */
  144. if (inb(host->base + WBSD_CSR) & WBSD_CARDPRESENT)
  145. host->flags |= WBSD_FCARD_PRESENT;
  146. else
  147. host->flags &= ~WBSD_FCARD_PRESENT;
  148. /*
  149. * Enable interesting interrupts.
  150. */
  151. ier = 0;
  152. ier |= WBSD_EINT_CARD;
  153. ier |= WBSD_EINT_FIFO_THRE;
  154. ier |= WBSD_EINT_CCRC;
  155. ier |= WBSD_EINT_TIMEOUT;
  156. ier |= WBSD_EINT_CRC;
  157. ier |= WBSD_EINT_TC;
  158. outb(ier, host->base + WBSD_EIR);
  159. /*
  160. * Clear interrupts.
  161. */
  162. inb(host->base + WBSD_ISR);
  163. }
  164. static void wbsd_reset(struct wbsd_host* host)
  165. {
  166. u8 setup;
  167. printk(KERN_ERR DRIVER_NAME ": Resetting chip\n");
  168. /*
  169. * Soft reset of chip (SD/MMC part).
  170. */
  171. setup = wbsd_read_index(host, WBSD_IDX_SETUP);
  172. setup |= WBSD_SOFT_RESET;
  173. wbsd_write_index(host, WBSD_IDX_SETUP, setup);
  174. }
  175. static void wbsd_request_end(struct wbsd_host* host, struct mmc_request* mrq)
  176. {
  177. unsigned long dmaflags;
  178. DBGF("Ending request, cmd (%x)\n", mrq->cmd->opcode);
  179. if (host->dma >= 0)
  180. {
  181. /*
  182. * Release ISA DMA controller.
  183. */
  184. dmaflags = claim_dma_lock();
  185. disable_dma(host->dma);
  186. clear_dma_ff(host->dma);
  187. release_dma_lock(dmaflags);
  188. /*
  189. * Disable DMA on host.
  190. */
  191. wbsd_write_index(host, WBSD_IDX_DMA, 0);
  192. }
  193. host->mrq = NULL;
  194. /*
  195. * MMC layer might call back into the driver so first unlock.
  196. */
  197. spin_unlock(&host->lock);
  198. mmc_request_done(host->mmc, mrq);
  199. spin_lock(&host->lock);
  200. }
  201. /*
  202. * Scatter/gather functions
  203. */
  204. static inline void wbsd_init_sg(struct wbsd_host* host, struct mmc_data* data)
  205. {
  206. /*
  207. * Get info. about SG list from data structure.
  208. */
  209. host->cur_sg = data->sg;
  210. host->num_sg = data->sg_len;
  211. host->offset = 0;
  212. host->remain = host->cur_sg->length;
  213. }
  214. static inline int wbsd_next_sg(struct wbsd_host* host)
  215. {
  216. /*
  217. * Skip to next SG entry.
  218. */
  219. host->cur_sg++;
  220. host->num_sg--;
  221. /*
  222. * Any entries left?
  223. */
  224. if (host->num_sg > 0)
  225. {
  226. host->offset = 0;
  227. host->remain = host->cur_sg->length;
  228. }
  229. return host->num_sg;
  230. }
  231. static inline char* wbsd_kmap_sg(struct wbsd_host* host)
  232. {
  233. host->mapped_sg = kmap_atomic(host->cur_sg->page, KM_BIO_SRC_IRQ) +
  234. host->cur_sg->offset;
  235. return host->mapped_sg;
  236. }
  237. static inline void wbsd_kunmap_sg(struct wbsd_host* host)
  238. {
  239. kunmap_atomic(host->mapped_sg, KM_BIO_SRC_IRQ);
  240. }
  241. static inline void wbsd_sg_to_dma(struct wbsd_host* host, struct mmc_data* data)
  242. {
  243. unsigned int len, i, size;
  244. struct scatterlist* sg;
  245. char* dmabuf = host->dma_buffer;
  246. char* sgbuf;
  247. size = host->size;
  248. sg = data->sg;
  249. len = data->sg_len;
  250. /*
  251. * Just loop through all entries. Size might not
  252. * be the entire list though so make sure that
  253. * we do not transfer too much.
  254. */
  255. for (i = 0;i < len;i++)
  256. {
  257. sgbuf = kmap_atomic(sg[i].page, KM_BIO_SRC_IRQ) + sg[i].offset;
  258. if (size < sg[i].length)
  259. memcpy(dmabuf, sgbuf, size);
  260. else
  261. memcpy(dmabuf, sgbuf, sg[i].length);
  262. kunmap_atomic(sgbuf, KM_BIO_SRC_IRQ);
  263. dmabuf += sg[i].length;
  264. if (size < sg[i].length)
  265. size = 0;
  266. else
  267. size -= sg[i].length;
  268. if (size == 0)
  269. break;
  270. }
  271. /*
  272. * Check that we didn't get a request to transfer
  273. * more data than can fit into the SG list.
  274. */
  275. BUG_ON(size != 0);
  276. host->size -= size;
  277. }
  278. static inline void wbsd_dma_to_sg(struct wbsd_host* host, struct mmc_data* data)
  279. {
  280. unsigned int len, i, size;
  281. struct scatterlist* sg;
  282. char* dmabuf = host->dma_buffer;
  283. char* sgbuf;
  284. size = host->size;
  285. sg = data->sg;
  286. len = data->sg_len;
  287. /*
  288. * Just loop through all entries. Size might not
  289. * be the entire list though so make sure that
  290. * we do not transfer too much.
  291. */
  292. for (i = 0;i < len;i++)
  293. {
  294. sgbuf = kmap_atomic(sg[i].page, KM_BIO_SRC_IRQ) + sg[i].offset;
  295. if (size < sg[i].length)
  296. memcpy(sgbuf, dmabuf, size);
  297. else
  298. memcpy(sgbuf, dmabuf, sg[i].length);
  299. kunmap_atomic(sgbuf, KM_BIO_SRC_IRQ);
  300. dmabuf += sg[i].length;
  301. if (size < sg[i].length)
  302. size = 0;
  303. else
  304. size -= sg[i].length;
  305. if (size == 0)
  306. break;
  307. }
  308. /*
  309. * Check that we didn't get a request to transfer
  310. * more data than can fit into the SG list.
  311. */
  312. BUG_ON(size != 0);
  313. host->size -= size;
  314. }
  315. /*
  316. * Command handling
  317. */
  318. static inline void wbsd_get_short_reply(struct wbsd_host* host,
  319. struct mmc_command* cmd)
  320. {
  321. /*
  322. * Correct response type?
  323. */
  324. if (wbsd_read_index(host, WBSD_IDX_RSPLEN) != WBSD_RSP_SHORT)
  325. {
  326. cmd->error = MMC_ERR_INVALID;
  327. return;
  328. }
  329. cmd->resp[0] =
  330. wbsd_read_index(host, WBSD_IDX_RESP12) << 24;
  331. cmd->resp[0] |=
  332. wbsd_read_index(host, WBSD_IDX_RESP13) << 16;
  333. cmd->resp[0] |=
  334. wbsd_read_index(host, WBSD_IDX_RESP14) << 8;
  335. cmd->resp[0] |=
  336. wbsd_read_index(host, WBSD_IDX_RESP15) << 0;
  337. cmd->resp[1] =
  338. wbsd_read_index(host, WBSD_IDX_RESP16) << 24;
  339. }
  340. static inline void wbsd_get_long_reply(struct wbsd_host* host,
  341. struct mmc_command* cmd)
  342. {
  343. int i;
  344. /*
  345. * Correct response type?
  346. */
  347. if (wbsd_read_index(host, WBSD_IDX_RSPLEN) != WBSD_RSP_LONG)
  348. {
  349. cmd->error = MMC_ERR_INVALID;
  350. return;
  351. }
  352. for (i = 0;i < 4;i++)
  353. {
  354. cmd->resp[i] =
  355. wbsd_read_index(host, WBSD_IDX_RESP1 + i * 4) << 24;
  356. cmd->resp[i] |=
  357. wbsd_read_index(host, WBSD_IDX_RESP2 + i * 4) << 16;
  358. cmd->resp[i] |=
  359. wbsd_read_index(host, WBSD_IDX_RESP3 + i * 4) << 8;
  360. cmd->resp[i] |=
  361. wbsd_read_index(host, WBSD_IDX_RESP4 + i * 4) << 0;
  362. }
  363. }
  364. static void wbsd_send_command(struct wbsd_host* host, struct mmc_command* cmd)
  365. {
  366. int i;
  367. u8 status, isr;
  368. DBGF("Sending cmd (%x)\n", cmd->opcode);
  369. /*
  370. * Clear accumulated ISR. The interrupt routine
  371. * will fill this one with events that occur during
  372. * transfer.
  373. */
  374. host->isr = 0;
  375. /*
  376. * Send the command (CRC calculated by host).
  377. */
  378. outb(cmd->opcode, host->base + WBSD_CMDR);
  379. for (i = 3;i >= 0;i--)
  380. outb((cmd->arg >> (i * 8)) & 0xff, host->base + WBSD_CMDR);
  381. cmd->error = MMC_ERR_NONE;
  382. /*
  383. * Wait for the request to complete.
  384. */
  385. do {
  386. status = wbsd_read_index(host, WBSD_IDX_STATUS);
  387. } while (status & WBSD_CARDTRAFFIC);
  388. /*
  389. * Do we expect a reply?
  390. */
  391. if ((cmd->flags & MMC_RSP_MASK) != MMC_RSP_NONE)
  392. {
  393. /*
  394. * Read back status.
  395. */
  396. isr = host->isr;
  397. /* Card removed? */
  398. if (isr & WBSD_INT_CARD)
  399. cmd->error = MMC_ERR_TIMEOUT;
  400. /* Timeout? */
  401. else if (isr & WBSD_INT_TIMEOUT)
  402. cmd->error = MMC_ERR_TIMEOUT;
  403. /* CRC? */
  404. else if ((cmd->flags & MMC_RSP_CRC) && (isr & WBSD_INT_CRC))
  405. cmd->error = MMC_ERR_BADCRC;
  406. /* All ok */
  407. else
  408. {
  409. if ((cmd->flags & MMC_RSP_MASK) == MMC_RSP_SHORT)
  410. wbsd_get_short_reply(host, cmd);
  411. else
  412. wbsd_get_long_reply(host, cmd);
  413. }
  414. }
  415. DBGF("Sent cmd (%x), res %d\n", cmd->opcode, cmd->error);
  416. }
  417. /*
  418. * Data functions
  419. */
  420. static void wbsd_empty_fifo(struct wbsd_host* host)
  421. {
  422. struct mmc_data* data = host->mrq->cmd->data;
  423. char* buffer;
  424. int i, fsr, fifo;
  425. /*
  426. * Handle excessive data.
  427. */
  428. if (data->bytes_xfered == host->size)
  429. return;
  430. buffer = wbsd_kmap_sg(host) + host->offset;
  431. /*
  432. * Drain the fifo. This has a tendency to loop longer
  433. * than the FIFO length (usually one block).
  434. */
  435. while (!((fsr = inb(host->base + WBSD_FSR)) & WBSD_FIFO_EMPTY))
  436. {
  437. /*
  438. * The size field in the FSR is broken so we have to
  439. * do some guessing.
  440. */
  441. if (fsr & WBSD_FIFO_FULL)
  442. fifo = 16;
  443. else if (fsr & WBSD_FIFO_FUTHRE)
  444. fifo = 8;
  445. else
  446. fifo = 1;
  447. for (i = 0;i < fifo;i++)
  448. {
  449. *buffer = inb(host->base + WBSD_DFR);
  450. buffer++;
  451. host->offset++;
  452. host->remain--;
  453. data->bytes_xfered++;
  454. /*
  455. * Transfer done?
  456. */
  457. if (data->bytes_xfered == host->size)
  458. {
  459. wbsd_kunmap_sg(host);
  460. return;
  461. }
  462. /*
  463. * End of scatter list entry?
  464. */
  465. if (host->remain == 0)
  466. {
  467. wbsd_kunmap_sg(host);
  468. /*
  469. * Get next entry. Check if last.
  470. */
  471. if (!wbsd_next_sg(host))
  472. {
  473. /*
  474. * We should never reach this point.
  475. * It means that we're trying to
  476. * transfer more blocks than can fit
  477. * into the scatter list.
  478. */
  479. BUG_ON(1);
  480. host->size = data->bytes_xfered;
  481. return;
  482. }
  483. buffer = wbsd_kmap_sg(host);
  484. }
  485. }
  486. }
  487. wbsd_kunmap_sg(host);
  488. /*
  489. * This is a very dirty hack to solve a
  490. * hardware problem. The chip doesn't trigger
  491. * FIFO threshold interrupts properly.
  492. */
  493. if ((host->size - data->bytes_xfered) < 16)
  494. tasklet_schedule(&host->fifo_tasklet);
  495. }
  496. static void wbsd_fill_fifo(struct wbsd_host* host)
  497. {
  498. struct mmc_data* data = host->mrq->cmd->data;
  499. char* buffer;
  500. int i, fsr, fifo;
  501. /*
  502. * Check that we aren't being called after the
  503. * entire buffer has been transfered.
  504. */
  505. if (data->bytes_xfered == host->size)
  506. return;
  507. buffer = wbsd_kmap_sg(host) + host->offset;
  508. /*
  509. * Fill the fifo. This has a tendency to loop longer
  510. * than the FIFO length (usually one block).
  511. */
  512. while (!((fsr = inb(host->base + WBSD_FSR)) & WBSD_FIFO_FULL))
  513. {
  514. /*
  515. * The size field in the FSR is broken so we have to
  516. * do some guessing.
  517. */
  518. if (fsr & WBSD_FIFO_EMPTY)
  519. fifo = 0;
  520. else if (fsr & WBSD_FIFO_EMTHRE)
  521. fifo = 8;
  522. else
  523. fifo = 15;
  524. for (i = 16;i > fifo;i--)
  525. {
  526. outb(*buffer, host->base + WBSD_DFR);
  527. buffer++;
  528. host->offset++;
  529. host->remain--;
  530. data->bytes_xfered++;
  531. /*
  532. * Transfer done?
  533. */
  534. if (data->bytes_xfered == host->size)
  535. {
  536. wbsd_kunmap_sg(host);
  537. return;
  538. }
  539. /*
  540. * End of scatter list entry?
  541. */
  542. if (host->remain == 0)
  543. {
  544. wbsd_kunmap_sg(host);
  545. /*
  546. * Get next entry. Check if last.
  547. */
  548. if (!wbsd_next_sg(host))
  549. {
  550. /*
  551. * We should never reach this point.
  552. * It means that we're trying to
  553. * transfer more blocks than can fit
  554. * into the scatter list.
  555. */
  556. BUG_ON(1);
  557. host->size = data->bytes_xfered;
  558. return;
  559. }
  560. buffer = wbsd_kmap_sg(host);
  561. }
  562. }
  563. }
  564. wbsd_kunmap_sg(host);
  565. /*
  566. * The controller stops sending interrupts for
  567. * 'FIFO empty' under certain conditions. So we
  568. * need to be a bit more pro-active.
  569. */
  570. tasklet_schedule(&host->fifo_tasklet);
  571. }
  572. static void wbsd_prepare_data(struct wbsd_host* host, struct mmc_data* data)
  573. {
  574. u16 blksize;
  575. u8 setup;
  576. unsigned long dmaflags;
  577. DBGF("blksz %04x blks %04x flags %08x\n",
  578. 1 << data->blksz_bits, data->blocks, data->flags);
  579. DBGF("tsac %d ms nsac %d clk\n",
  580. data->timeout_ns / 1000000, data->timeout_clks);
  581. /*
  582. * Calculate size.
  583. */
  584. host->size = data->blocks << data->blksz_bits;
  585. /*
  586. * Check timeout values for overflow.
  587. * (Yes, some cards cause this value to overflow).
  588. */
  589. if (data->timeout_ns > 127000000)
  590. wbsd_write_index(host, WBSD_IDX_TAAC, 127);
  591. else
  592. wbsd_write_index(host, WBSD_IDX_TAAC, data->timeout_ns/1000000);
  593. if (data->timeout_clks > 255)
  594. wbsd_write_index(host, WBSD_IDX_NSAC, 255);
  595. else
  596. wbsd_write_index(host, WBSD_IDX_NSAC, data->timeout_clks);
  597. /*
  598. * Inform the chip of how large blocks will be
  599. * sent. It needs this to determine when to
  600. * calculate CRC.
  601. *
  602. * Space for CRC must be included in the size.
  603. * Two bytes are needed for each data line.
  604. */
  605. if (host->bus_width == MMC_BUS_WIDTH_1)
  606. {
  607. blksize = (1 << data->blksz_bits) + 2;
  608. wbsd_write_index(host, WBSD_IDX_PBSMSB, (blksize >> 4) & 0xF0);
  609. wbsd_write_index(host, WBSD_IDX_PBSLSB, blksize & 0xFF);
  610. }
  611. else if (host->bus_width == MMC_BUS_WIDTH_4)
  612. {
  613. blksize = (1 << data->blksz_bits) + 2 * 4;
  614. wbsd_write_index(host, WBSD_IDX_PBSMSB, ((blksize >> 4) & 0xF0)
  615. | WBSD_DATA_WIDTH);
  616. wbsd_write_index(host, WBSD_IDX_PBSLSB, blksize & 0xFF);
  617. }
  618. else
  619. {
  620. data->error = MMC_ERR_INVALID;
  621. return;
  622. }
  623. /*
  624. * Clear the FIFO. This is needed even for DMA
  625. * transfers since the chip still uses the FIFO
  626. * internally.
  627. */
  628. setup = wbsd_read_index(host, WBSD_IDX_SETUP);
  629. setup |= WBSD_FIFO_RESET;
  630. wbsd_write_index(host, WBSD_IDX_SETUP, setup);
  631. /*
  632. * DMA transfer?
  633. */
  634. if (host->dma >= 0)
  635. {
  636. /*
  637. * The buffer for DMA is only 64 kB.
  638. */
  639. BUG_ON(host->size > 0x10000);
  640. if (host->size > 0x10000)
  641. {
  642. data->error = MMC_ERR_INVALID;
  643. return;
  644. }
  645. /*
  646. * Transfer data from the SG list to
  647. * the DMA buffer.
  648. */
  649. if (data->flags & MMC_DATA_WRITE)
  650. wbsd_sg_to_dma(host, data);
  651. /*
  652. * Initialise the ISA DMA controller.
  653. */
  654. dmaflags = claim_dma_lock();
  655. disable_dma(host->dma);
  656. clear_dma_ff(host->dma);
  657. if (data->flags & MMC_DATA_READ)
  658. set_dma_mode(host->dma, DMA_MODE_READ & ~0x40);
  659. else
  660. set_dma_mode(host->dma, DMA_MODE_WRITE & ~0x40);
  661. set_dma_addr(host->dma, host->dma_addr);
  662. set_dma_count(host->dma, host->size);
  663. enable_dma(host->dma);
  664. release_dma_lock(dmaflags);
  665. /*
  666. * Enable DMA on the host.
  667. */
  668. wbsd_write_index(host, WBSD_IDX_DMA, WBSD_DMA_ENABLE);
  669. }
  670. else
  671. {
  672. /*
  673. * This flag is used to keep printk
  674. * output to a minimum.
  675. */
  676. host->firsterr = 1;
  677. /*
  678. * Initialise the SG list.
  679. */
  680. wbsd_init_sg(host, data);
  681. /*
  682. * Turn off DMA.
  683. */
  684. wbsd_write_index(host, WBSD_IDX_DMA, 0);
  685. /*
  686. * Set up FIFO threshold levels (and fill
  687. * buffer if doing a write).
  688. */
  689. if (data->flags & MMC_DATA_READ)
  690. {
  691. wbsd_write_index(host, WBSD_IDX_FIFOEN,
  692. WBSD_FIFOEN_FULL | 8);
  693. }
  694. else
  695. {
  696. wbsd_write_index(host, WBSD_IDX_FIFOEN,
  697. WBSD_FIFOEN_EMPTY | 8);
  698. wbsd_fill_fifo(host);
  699. }
  700. }
  701. data->error = MMC_ERR_NONE;
  702. }
  703. static void wbsd_finish_data(struct wbsd_host* host, struct mmc_data* data)
  704. {
  705. unsigned long dmaflags;
  706. int count;
  707. u8 status;
  708. WARN_ON(host->mrq == NULL);
  709. /*
  710. * Send a stop command if needed.
  711. */
  712. if (data->stop)
  713. wbsd_send_command(host, data->stop);
  714. /*
  715. * Wait for the controller to leave data
  716. * transfer state.
  717. */
  718. do
  719. {
  720. status = wbsd_read_index(host, WBSD_IDX_STATUS);
  721. } while (status & (WBSD_BLOCK_READ | WBSD_BLOCK_WRITE));
  722. /*
  723. * DMA transfer?
  724. */
  725. if (host->dma >= 0)
  726. {
  727. /*
  728. * Disable DMA on the host.
  729. */
  730. wbsd_write_index(host, WBSD_IDX_DMA, 0);
  731. /*
  732. * Turn of ISA DMA controller.
  733. */
  734. dmaflags = claim_dma_lock();
  735. disable_dma(host->dma);
  736. clear_dma_ff(host->dma);
  737. count = get_dma_residue(host->dma);
  738. release_dma_lock(dmaflags);
  739. /*
  740. * Any leftover data?
  741. */
  742. if (count)
  743. {
  744. printk(KERN_ERR DRIVER_NAME ": Incomplete DMA "
  745. "transfer. %d bytes left.\n", count);
  746. data->error = MMC_ERR_FAILED;
  747. }
  748. else
  749. {
  750. /*
  751. * Transfer data from DMA buffer to
  752. * SG list.
  753. */
  754. if (data->flags & MMC_DATA_READ)
  755. wbsd_dma_to_sg(host, data);
  756. data->bytes_xfered = host->size;
  757. }
  758. }
  759. DBGF("Ending data transfer (%d bytes)\n", data->bytes_xfered);
  760. wbsd_request_end(host, host->mrq);
  761. }
  762. /*****************************************************************************\
  763. * *
  764. * MMC layer callbacks *
  765. * *
  766. \*****************************************************************************/
  767. static void wbsd_request(struct mmc_host* mmc, struct mmc_request* mrq)
  768. {
  769. struct wbsd_host* host = mmc_priv(mmc);
  770. struct mmc_command* cmd;
  771. /*
  772. * Disable tasklets to avoid a deadlock.
  773. */
  774. spin_lock_bh(&host->lock);
  775. BUG_ON(host->mrq != NULL);
  776. cmd = mrq->cmd;
  777. host->mrq = mrq;
  778. /*
  779. * If there is no card in the slot then
  780. * timeout immediatly.
  781. */
  782. if (!(host->flags & WBSD_FCARD_PRESENT))
  783. {
  784. cmd->error = MMC_ERR_TIMEOUT;
  785. goto done;
  786. }
  787. /*
  788. * Does the request include data?
  789. */
  790. if (cmd->data)
  791. {
  792. wbsd_prepare_data(host, cmd->data);
  793. if (cmd->data->error != MMC_ERR_NONE)
  794. goto done;
  795. }
  796. wbsd_send_command(host, cmd);
  797. /*
  798. * If this is a data transfer the request
  799. * will be finished after the data has
  800. * transfered.
  801. */
  802. if (cmd->data && (cmd->error == MMC_ERR_NONE))
  803. {
  804. /*
  805. * Dirty fix for hardware bug.
  806. */
  807. if (host->dma == -1)
  808. tasklet_schedule(&host->fifo_tasklet);
  809. spin_unlock_bh(&host->lock);
  810. return;
  811. }
  812. done:
  813. wbsd_request_end(host, mrq);
  814. spin_unlock_bh(&host->lock);
  815. }
  816. static void wbsd_set_ios(struct mmc_host* mmc, struct mmc_ios* ios)
  817. {
  818. struct wbsd_host* host = mmc_priv(mmc);
  819. u8 clk, setup, pwr;
  820. DBGF("clock %uHz busmode %u powermode %u cs %u Vdd %u width %u\n",
  821. ios->clock, ios->bus_mode, ios->power_mode, ios->chip_select,
  822. ios->vdd, ios->bus_width);
  823. spin_lock_bh(&host->lock);
  824. /*
  825. * Reset the chip on each power off.
  826. * Should clear out any weird states.
  827. */
  828. if (ios->power_mode == MMC_POWER_OFF)
  829. wbsd_init_device(host);
  830. if (ios->clock >= 24000000)
  831. clk = WBSD_CLK_24M;
  832. else if (ios->clock >= 16000000)
  833. clk = WBSD_CLK_16M;
  834. else if (ios->clock >= 12000000)
  835. clk = WBSD_CLK_12M;
  836. else
  837. clk = WBSD_CLK_375K;
  838. /*
  839. * Only write to the clock register when
  840. * there is an actual change.
  841. */
  842. if (clk != host->clk)
  843. {
  844. wbsd_write_index(host, WBSD_IDX_CLK, clk);
  845. host->clk = clk;
  846. }
  847. /*
  848. * Power up card.
  849. */
  850. if (ios->power_mode != MMC_POWER_OFF)
  851. {
  852. pwr = inb(host->base + WBSD_CSR);
  853. pwr &= ~WBSD_POWER_N;
  854. outb(pwr, host->base + WBSD_CSR);
  855. }
  856. /*
  857. * MMC cards need to have pin 1 high during init.
  858. * It wreaks havoc with the card detection though so
  859. * that needs to be disabled.
  860. */
  861. setup = wbsd_read_index(host, WBSD_IDX_SETUP);
  862. if (ios->chip_select == MMC_CS_HIGH)
  863. {
  864. BUG_ON(ios->bus_width != MMC_BUS_WIDTH_1);
  865. setup |= WBSD_DAT3_H;
  866. host->flags |= WBSD_FIGNORE_DETECT;
  867. }
  868. else
  869. {
  870. setup &= ~WBSD_DAT3_H;
  871. /*
  872. * We cannot resume card detection immediatly
  873. * because of capacitance and delays in the chip.
  874. */
  875. mod_timer(&host->ignore_timer, jiffies + HZ/100);
  876. }
  877. wbsd_write_index(host, WBSD_IDX_SETUP, setup);
  878. /*
  879. * Store bus width for later. Will be used when
  880. * setting up the data transfer.
  881. */
  882. host->bus_width = ios->bus_width;
  883. spin_unlock_bh(&host->lock);
  884. }
  885. static int wbsd_get_ro(struct mmc_host* mmc)
  886. {
  887. struct wbsd_host* host = mmc_priv(mmc);
  888. u8 csr;
  889. spin_lock_bh(&host->lock);
  890. csr = inb(host->base + WBSD_CSR);
  891. csr |= WBSD_MSLED;
  892. outb(csr, host->base + WBSD_CSR);
  893. mdelay(1);
  894. csr = inb(host->base + WBSD_CSR);
  895. csr &= ~WBSD_MSLED;
  896. outb(csr, host->base + WBSD_CSR);
  897. spin_unlock_bh(&host->lock);
  898. return csr & WBSD_WRPT;
  899. }
  900. static struct mmc_host_ops wbsd_ops = {
  901. .request = wbsd_request,
  902. .set_ios = wbsd_set_ios,
  903. .get_ro = wbsd_get_ro,
  904. };
  905. /*****************************************************************************\
  906. * *
  907. * Interrupt handling *
  908. * *
  909. \*****************************************************************************/
  910. /*
  911. * Helper function to reset detection ignore
  912. */
  913. static void wbsd_reset_ignore(unsigned long data)
  914. {
  915. struct wbsd_host *host = (struct wbsd_host*)data;
  916. BUG_ON(host == NULL);
  917. DBG("Resetting card detection ignore\n");
  918. spin_lock_bh(&host->lock);
  919. host->flags &= ~WBSD_FIGNORE_DETECT;
  920. /*
  921. * Card status might have changed during the
  922. * blackout.
  923. */
  924. tasklet_schedule(&host->card_tasklet);
  925. spin_unlock_bh(&host->lock);
  926. }
  927. /*
  928. * Tasklets
  929. */
  930. static inline struct mmc_data* wbsd_get_data(struct wbsd_host* host)
  931. {
  932. WARN_ON(!host->mrq);
  933. if (!host->mrq)
  934. return NULL;
  935. WARN_ON(!host->mrq->cmd);
  936. if (!host->mrq->cmd)
  937. return NULL;
  938. WARN_ON(!host->mrq->cmd->data);
  939. if (!host->mrq->cmd->data)
  940. return NULL;
  941. return host->mrq->cmd->data;
  942. }
  943. static void wbsd_tasklet_card(unsigned long param)
  944. {
  945. struct wbsd_host* host = (struct wbsd_host*)param;
  946. u8 csr;
  947. int delay = -1;
  948. spin_lock(&host->lock);
  949. if (host->flags & WBSD_FIGNORE_DETECT)
  950. {
  951. spin_unlock(&host->lock);
  952. return;
  953. }
  954. csr = inb(host->base + WBSD_CSR);
  955. WARN_ON(csr == 0xff);
  956. if (csr & WBSD_CARDPRESENT)
  957. {
  958. if (!(host->flags & WBSD_FCARD_PRESENT))
  959. {
  960. DBG("Card inserted\n");
  961. host->flags |= WBSD_FCARD_PRESENT;
  962. delay = 500;
  963. }
  964. }
  965. else if (host->flags & WBSD_FCARD_PRESENT)
  966. {
  967. DBG("Card removed\n");
  968. host->flags &= ~WBSD_FCARD_PRESENT;
  969. if (host->mrq)
  970. {
  971. printk(KERN_ERR DRIVER_NAME
  972. ": Card removed during transfer!\n");
  973. wbsd_reset(host);
  974. host->mrq->cmd->error = MMC_ERR_FAILED;
  975. tasklet_schedule(&host->finish_tasklet);
  976. }
  977. delay = 0;
  978. }
  979. /*
  980. * Unlock first since we might get a call back.
  981. */
  982. spin_unlock(&host->lock);
  983. if (delay != -1)
  984. mmc_detect_change(host->mmc, msecs_to_jiffies(delay));
  985. }
  986. static void wbsd_tasklet_fifo(unsigned long param)
  987. {
  988. struct wbsd_host* host = (struct wbsd_host*)param;
  989. struct mmc_data* data;
  990. spin_lock(&host->lock);
  991. if (!host->mrq)
  992. goto end;
  993. data = wbsd_get_data(host);
  994. if (!data)
  995. goto end;
  996. if (data->flags & MMC_DATA_WRITE)
  997. wbsd_fill_fifo(host);
  998. else
  999. wbsd_empty_fifo(host);
  1000. /*
  1001. * Done?
  1002. */
  1003. if (host->size == data->bytes_xfered)
  1004. {
  1005. wbsd_write_index(host, WBSD_IDX_FIFOEN, 0);
  1006. tasklet_schedule(&host->finish_tasklet);
  1007. }
  1008. end:
  1009. spin_unlock(&host->lock);
  1010. }
  1011. static void wbsd_tasklet_crc(unsigned long param)
  1012. {
  1013. struct wbsd_host* host = (struct wbsd_host*)param;
  1014. struct mmc_data* data;
  1015. spin_lock(&host->lock);
  1016. if (!host->mrq)
  1017. goto end;
  1018. data = wbsd_get_data(host);
  1019. if (!data)
  1020. goto end;
  1021. DBGF("CRC error\n");
  1022. data->error = MMC_ERR_BADCRC;
  1023. tasklet_schedule(&host->finish_tasklet);
  1024. end:
  1025. spin_unlock(&host->lock);
  1026. }
  1027. static void wbsd_tasklet_timeout(unsigned long param)
  1028. {
  1029. struct wbsd_host* host = (struct wbsd_host*)param;
  1030. struct mmc_data* data;
  1031. spin_lock(&host->lock);
  1032. if (!host->mrq)
  1033. goto end;
  1034. data = wbsd_get_data(host);
  1035. if (!data)
  1036. goto end;
  1037. DBGF("Timeout\n");
  1038. data->error = MMC_ERR_TIMEOUT;
  1039. tasklet_schedule(&host->finish_tasklet);
  1040. end:
  1041. spin_unlock(&host->lock);
  1042. }
  1043. static void wbsd_tasklet_finish(unsigned long param)
  1044. {
  1045. struct wbsd_host* host = (struct wbsd_host*)param;
  1046. struct mmc_data* data;
  1047. spin_lock(&host->lock);
  1048. WARN_ON(!host->mrq);
  1049. if (!host->mrq)
  1050. goto end;
  1051. data = wbsd_get_data(host);
  1052. if (!data)
  1053. goto end;
  1054. wbsd_finish_data(host, data);
  1055. end:
  1056. spin_unlock(&host->lock);
  1057. }
  1058. static void wbsd_tasklet_block(unsigned long param)
  1059. {
  1060. struct wbsd_host* host = (struct wbsd_host*)param;
  1061. struct mmc_data* data;
  1062. spin_lock(&host->lock);
  1063. if ((wbsd_read_index(host, WBSD_IDX_CRCSTATUS) & WBSD_CRC_MASK) !=
  1064. WBSD_CRC_OK)
  1065. {
  1066. data = wbsd_get_data(host);
  1067. if (!data)
  1068. goto end;
  1069. DBGF("CRC error\n");
  1070. data->error = MMC_ERR_BADCRC;
  1071. tasklet_schedule(&host->finish_tasklet);
  1072. }
  1073. end:
  1074. spin_unlock(&host->lock);
  1075. }
  1076. /*
  1077. * Interrupt handling
  1078. */
  1079. static irqreturn_t wbsd_irq(int irq, void *dev_id, struct pt_regs *regs)
  1080. {
  1081. struct wbsd_host* host = dev_id;
  1082. int isr;
  1083. isr = inb(host->base + WBSD_ISR);
  1084. /*
  1085. * Was it actually our hardware that caused the interrupt?
  1086. */
  1087. if (isr == 0xff || isr == 0x00)
  1088. return IRQ_NONE;
  1089. host->isr |= isr;
  1090. /*
  1091. * Schedule tasklets as needed.
  1092. */
  1093. if (isr & WBSD_INT_CARD)
  1094. tasklet_schedule(&host->card_tasklet);
  1095. if (isr & WBSD_INT_FIFO_THRE)
  1096. tasklet_schedule(&host->fifo_tasklet);
  1097. if (isr & WBSD_INT_CRC)
  1098. tasklet_hi_schedule(&host->crc_tasklet);
  1099. if (isr & WBSD_INT_TIMEOUT)
  1100. tasklet_hi_schedule(&host->timeout_tasklet);
  1101. if (isr & WBSD_INT_BUSYEND)
  1102. tasklet_hi_schedule(&host->block_tasklet);
  1103. if (isr & WBSD_INT_TC)
  1104. tasklet_schedule(&host->finish_tasklet);
  1105. return IRQ_HANDLED;
  1106. }
  1107. /*****************************************************************************\
  1108. * *
  1109. * Device initialisation and shutdown *
  1110. * *
  1111. \*****************************************************************************/
  1112. /*
  1113. * Allocate/free MMC structure.
  1114. */
  1115. static int __devinit wbsd_alloc_mmc(struct device* dev)
  1116. {
  1117. struct mmc_host* mmc;
  1118. struct wbsd_host* host;
  1119. /*
  1120. * Allocate MMC structure.
  1121. */
  1122. mmc = mmc_alloc_host(sizeof(struct wbsd_host), dev);
  1123. if (!mmc)
  1124. return -ENOMEM;
  1125. host = mmc_priv(mmc);
  1126. host->mmc = mmc;
  1127. host->dma = -1;
  1128. /*
  1129. * Set host parameters.
  1130. */
  1131. mmc->ops = &wbsd_ops;
  1132. mmc->f_min = 375000;
  1133. mmc->f_max = 24000000;
  1134. mmc->ocr_avail = MMC_VDD_32_33|MMC_VDD_33_34;
  1135. mmc->caps = MMC_CAP_4_BIT_DATA;
  1136. spin_lock_init(&host->lock);
  1137. /*
  1138. * Set up timers
  1139. */
  1140. init_timer(&host->ignore_timer);
  1141. host->ignore_timer.data = (unsigned long)host;
  1142. host->ignore_timer.function = wbsd_reset_ignore;
  1143. /*
  1144. * Maximum number of segments. Worst case is one sector per segment
  1145. * so this will be 64kB/512.
  1146. */
  1147. mmc->max_hw_segs = 128;
  1148. mmc->max_phys_segs = 128;
  1149. /*
  1150. * Maximum number of sectors in one transfer. Also limited by 64kB
  1151. * buffer.
  1152. */
  1153. mmc->max_sectors = 128;
  1154. /*
  1155. * Maximum segment size. Could be one segment with the maximum number
  1156. * of segments.
  1157. */
  1158. mmc->max_seg_size = mmc->max_sectors * 512;
  1159. dev_set_drvdata(dev, mmc);
  1160. return 0;
  1161. }
  1162. static void __devexit wbsd_free_mmc(struct device* dev)
  1163. {
  1164. struct mmc_host* mmc;
  1165. struct wbsd_host* host;
  1166. mmc = dev_get_drvdata(dev);
  1167. if (!mmc)
  1168. return;
  1169. host = mmc_priv(mmc);
  1170. BUG_ON(host == NULL);
  1171. del_timer_sync(&host->ignore_timer);
  1172. mmc_free_host(mmc);
  1173. dev_set_drvdata(dev, NULL);
  1174. }
  1175. /*
  1176. * Scan for known chip id:s
  1177. */
  1178. static int __devinit wbsd_scan(struct wbsd_host* host)
  1179. {
  1180. int i, j, k;
  1181. int id;
  1182. /*
  1183. * Iterate through all ports, all codes to
  1184. * find hardware that is in our known list.
  1185. */
  1186. for (i = 0;i < sizeof(config_ports)/sizeof(int);i++)
  1187. {
  1188. if (!request_region(config_ports[i], 2, DRIVER_NAME))
  1189. continue;
  1190. for (j = 0;j < sizeof(unlock_codes)/sizeof(int);j++)
  1191. {
  1192. id = 0xFFFF;
  1193. outb(unlock_codes[j], config_ports[i]);
  1194. outb(unlock_codes[j], config_ports[i]);
  1195. outb(WBSD_CONF_ID_HI, config_ports[i]);
  1196. id = inb(config_ports[i] + 1) << 8;
  1197. outb(WBSD_CONF_ID_LO, config_ports[i]);
  1198. id |= inb(config_ports[i] + 1);
  1199. for (k = 0;k < sizeof(valid_ids)/sizeof(int);k++)
  1200. {
  1201. if (id == valid_ids[k])
  1202. {
  1203. host->chip_id = id;
  1204. host->config = config_ports[i];
  1205. host->unlock_code = unlock_codes[i];
  1206. return 0;
  1207. }
  1208. }
  1209. if (id != 0xFFFF)
  1210. {
  1211. DBG("Unknown hardware (id %x) found at %x\n",
  1212. id, config_ports[i]);
  1213. }
  1214. outb(LOCK_CODE, config_ports[i]);
  1215. }
  1216. release_region(config_ports[i], 2);
  1217. }
  1218. return -ENODEV;
  1219. }
  1220. /*
  1221. * Allocate/free io port ranges
  1222. */
  1223. static int __devinit wbsd_request_region(struct wbsd_host* host, int base)
  1224. {
  1225. if (io & 0x7)
  1226. return -EINVAL;
  1227. if (!request_region(base, 8, DRIVER_NAME))
  1228. return -EIO;
  1229. host->base = io;
  1230. return 0;
  1231. }
  1232. static void __devexit wbsd_release_regions(struct wbsd_host* host)
  1233. {
  1234. if (host->base)
  1235. release_region(host->base, 8);
  1236. host->base = 0;
  1237. if (host->config)
  1238. release_region(host->config, 2);
  1239. host->config = 0;
  1240. }
  1241. /*
  1242. * Allocate/free DMA port and buffer
  1243. */
  1244. static void __devinit wbsd_request_dma(struct wbsd_host* host, int dma)
  1245. {
  1246. if (dma < 0)
  1247. return;
  1248. if (request_dma(dma, DRIVER_NAME))
  1249. goto err;
  1250. /*
  1251. * We need to allocate a special buffer in
  1252. * order for ISA to be able to DMA to it.
  1253. */
  1254. host->dma_buffer = kmalloc(WBSD_DMA_SIZE,
  1255. GFP_NOIO | GFP_DMA | __GFP_REPEAT | __GFP_NOWARN);
  1256. if (!host->dma_buffer)
  1257. goto free;
  1258. /*
  1259. * Translate the address to a physical address.
  1260. */
  1261. host->dma_addr = dma_map_single(host->mmc->dev, host->dma_buffer,
  1262. WBSD_DMA_SIZE, DMA_BIDIRECTIONAL);
  1263. /*
  1264. * ISA DMA must be aligned on a 64k basis.
  1265. */
  1266. if ((host->dma_addr & 0xffff) != 0)
  1267. goto kfree;
  1268. /*
  1269. * ISA cannot access memory above 16 MB.
  1270. */
  1271. else if (host->dma_addr >= 0x1000000)
  1272. goto kfree;
  1273. host->dma = dma;
  1274. return;
  1275. kfree:
  1276. /*
  1277. * If we've gotten here then there is some kind of alignment bug
  1278. */
  1279. BUG_ON(1);
  1280. dma_unmap_single(host->mmc->dev, host->dma_addr, WBSD_DMA_SIZE,
  1281. DMA_BIDIRECTIONAL);
  1282. host->dma_addr = (dma_addr_t)NULL;
  1283. kfree(host->dma_buffer);
  1284. host->dma_buffer = NULL;
  1285. free:
  1286. free_dma(dma);
  1287. err:
  1288. printk(KERN_WARNING DRIVER_NAME ": Unable to allocate DMA %d. "
  1289. "Falling back on FIFO.\n", dma);
  1290. }
  1291. static void __devexit wbsd_release_dma(struct wbsd_host* host)
  1292. {
  1293. if (host->dma_addr)
  1294. dma_unmap_single(host->mmc->dev, host->dma_addr, WBSD_DMA_SIZE,
  1295. DMA_BIDIRECTIONAL);
  1296. if (host->dma_buffer)
  1297. kfree(host->dma_buffer);
  1298. if (host->dma >= 0)
  1299. free_dma(host->dma);
  1300. host->dma = -1;
  1301. host->dma_buffer = NULL;
  1302. host->dma_addr = (dma_addr_t)NULL;
  1303. }
  1304. /*
  1305. * Allocate/free IRQ.
  1306. */
  1307. static int __devinit wbsd_request_irq(struct wbsd_host* host, int irq)
  1308. {
  1309. int ret;
  1310. /*
  1311. * Allocate interrupt.
  1312. */
  1313. ret = request_irq(irq, wbsd_irq, SA_SHIRQ, DRIVER_NAME, host);
  1314. if (ret)
  1315. return ret;
  1316. host->irq = irq;
  1317. /*
  1318. * Set up tasklets.
  1319. */
  1320. tasklet_init(&host->card_tasklet, wbsd_tasklet_card, (unsigned long)host);
  1321. tasklet_init(&host->fifo_tasklet, wbsd_tasklet_fifo, (unsigned long)host);
  1322. tasklet_init(&host->crc_tasklet, wbsd_tasklet_crc, (unsigned long)host);
  1323. tasklet_init(&host->timeout_tasklet, wbsd_tasklet_timeout, (unsigned long)host);
  1324. tasklet_init(&host->finish_tasklet, wbsd_tasklet_finish, (unsigned long)host);
  1325. tasklet_init(&host->block_tasklet, wbsd_tasklet_block, (unsigned long)host);
  1326. return 0;
  1327. }
  1328. static void __devexit wbsd_release_irq(struct wbsd_host* host)
  1329. {
  1330. if (!host->irq)
  1331. return;
  1332. free_irq(host->irq, host);
  1333. host->irq = 0;
  1334. tasklet_kill(&host->card_tasklet);
  1335. tasklet_kill(&host->fifo_tasklet);
  1336. tasklet_kill(&host->crc_tasklet);
  1337. tasklet_kill(&host->timeout_tasklet);
  1338. tasklet_kill(&host->finish_tasklet);
  1339. tasklet_kill(&host->block_tasklet);
  1340. }
  1341. /*
  1342. * Allocate all resources for the host.
  1343. */
  1344. static int __devinit wbsd_request_resources(struct wbsd_host* host,
  1345. int base, int irq, int dma)
  1346. {
  1347. int ret;
  1348. /*
  1349. * Allocate I/O ports.
  1350. */
  1351. ret = wbsd_request_region(host, base);
  1352. if (ret)
  1353. return ret;
  1354. /*
  1355. * Allocate interrupt.
  1356. */
  1357. ret = wbsd_request_irq(host, irq);
  1358. if (ret)
  1359. return ret;
  1360. /*
  1361. * Allocate DMA.
  1362. */
  1363. wbsd_request_dma(host, dma);
  1364. return 0;
  1365. }
  1366. /*
  1367. * Release all resources for the host.
  1368. */
  1369. static void __devexit wbsd_release_resources(struct wbsd_host* host)
  1370. {
  1371. wbsd_release_dma(host);
  1372. wbsd_release_irq(host);
  1373. wbsd_release_regions(host);
  1374. }
  1375. /*
  1376. * Configure the resources the chip should use.
  1377. */
  1378. static void __devinit wbsd_chip_config(struct wbsd_host* host)
  1379. {
  1380. /*
  1381. * Reset the chip.
  1382. */
  1383. wbsd_write_config(host, WBSD_CONF_SWRST, 1);
  1384. wbsd_write_config(host, WBSD_CONF_SWRST, 0);
  1385. /*
  1386. * Select SD/MMC function.
  1387. */
  1388. wbsd_write_config(host, WBSD_CONF_DEVICE, DEVICE_SD);
  1389. /*
  1390. * Set up card detection.
  1391. */
  1392. wbsd_write_config(host, WBSD_CONF_PINS, WBSD_PINS_DETECT_GP11);
  1393. /*
  1394. * Configure chip
  1395. */
  1396. wbsd_write_config(host, WBSD_CONF_PORT_HI, host->base >> 8);
  1397. wbsd_write_config(host, WBSD_CONF_PORT_LO, host->base & 0xff);
  1398. wbsd_write_config(host, WBSD_CONF_IRQ, host->irq);
  1399. if (host->dma >= 0)
  1400. wbsd_write_config(host, WBSD_CONF_DRQ, host->dma);
  1401. /*
  1402. * Enable and power up chip.
  1403. */
  1404. wbsd_write_config(host, WBSD_CONF_ENABLE, 1);
  1405. wbsd_write_config(host, WBSD_CONF_POWER, 0x20);
  1406. }
  1407. /*
  1408. * Check that configured resources are correct.
  1409. */
  1410. static int __devinit wbsd_chip_validate(struct wbsd_host* host)
  1411. {
  1412. int base, irq, dma;
  1413. /*
  1414. * Select SD/MMC function.
  1415. */
  1416. wbsd_write_config(host, WBSD_CONF_DEVICE, DEVICE_SD);
  1417. /*
  1418. * Read configuration.
  1419. */
  1420. base = wbsd_read_config(host, WBSD_CONF_PORT_HI) << 8;
  1421. base |= wbsd_read_config(host, WBSD_CONF_PORT_LO);
  1422. irq = wbsd_read_config(host, WBSD_CONF_IRQ);
  1423. dma = wbsd_read_config(host, WBSD_CONF_DRQ);
  1424. /*
  1425. * Validate against given configuration.
  1426. */
  1427. if (base != host->base)
  1428. return 0;
  1429. if (irq != host->irq)
  1430. return 0;
  1431. if ((dma != host->dma) && (host->dma != -1))
  1432. return 0;
  1433. return 1;
  1434. }
  1435. /*****************************************************************************\
  1436. * *
  1437. * Devices setup and shutdown *
  1438. * *
  1439. \*****************************************************************************/
  1440. static int __devinit wbsd_init(struct device* dev, int base, int irq, int dma,
  1441. int pnp)
  1442. {
  1443. struct wbsd_host* host = NULL;
  1444. struct mmc_host* mmc = NULL;
  1445. int ret;
  1446. ret = wbsd_alloc_mmc(dev);
  1447. if (ret)
  1448. return ret;
  1449. mmc = dev_get_drvdata(dev);
  1450. host = mmc_priv(mmc);
  1451. /*
  1452. * Scan for hardware.
  1453. */
  1454. ret = wbsd_scan(host);
  1455. if (ret)
  1456. {
  1457. if (pnp && (ret == -ENODEV))
  1458. {
  1459. printk(KERN_WARNING DRIVER_NAME
  1460. ": Unable to confirm device presence. You may "
  1461. "experience lock-ups.\n");
  1462. }
  1463. else
  1464. {
  1465. wbsd_free_mmc(dev);
  1466. return ret;
  1467. }
  1468. }
  1469. /*
  1470. * Request resources.
  1471. */
  1472. ret = wbsd_request_resources(host, io, irq, dma);
  1473. if (ret)
  1474. {
  1475. wbsd_release_resources(host);
  1476. wbsd_free_mmc(dev);
  1477. return ret;
  1478. }
  1479. /*
  1480. * See if chip needs to be configured.
  1481. */
  1482. if (pnp && (host->config != 0))
  1483. {
  1484. if (!wbsd_chip_validate(host))
  1485. {
  1486. printk(KERN_WARNING DRIVER_NAME
  1487. ": PnP active but chip not configured! "
  1488. "You probably have a buggy BIOS. "
  1489. "Configuring chip manually.\n");
  1490. wbsd_chip_config(host);
  1491. }
  1492. }
  1493. else
  1494. wbsd_chip_config(host);
  1495. /*
  1496. * Power Management stuff. No idea how this works.
  1497. * Not tested.
  1498. */
  1499. #ifdef CONFIG_PM
  1500. if (host->config)
  1501. wbsd_write_config(host, WBSD_CONF_PME, 0xA0);
  1502. #endif
  1503. /*
  1504. * Allow device to initialise itself properly.
  1505. */
  1506. mdelay(5);
  1507. /*
  1508. * Reset the chip into a known state.
  1509. */
  1510. wbsd_init_device(host);
  1511. mmc_add_host(mmc);
  1512. printk(KERN_INFO "%s: W83L51xD", mmc_hostname(mmc));
  1513. if (host->chip_id != 0)
  1514. printk(" id %x", (int)host->chip_id);
  1515. printk(" at 0x%x irq %d", (int)host->base, (int)host->irq);
  1516. if (host->dma >= 0)
  1517. printk(" dma %d", (int)host->dma);
  1518. else
  1519. printk(" FIFO");
  1520. if (pnp)
  1521. printk(" PnP");
  1522. printk("\n");
  1523. return 0;
  1524. }
  1525. static void __devexit wbsd_shutdown(struct device* dev, int pnp)
  1526. {
  1527. struct mmc_host* mmc = dev_get_drvdata(dev);
  1528. struct wbsd_host* host;
  1529. if (!mmc)
  1530. return;
  1531. host = mmc_priv(mmc);
  1532. mmc_remove_host(mmc);
  1533. if (!pnp)
  1534. {
  1535. /*
  1536. * Power down the SD/MMC function.
  1537. */
  1538. wbsd_unlock_config(host);
  1539. wbsd_write_config(host, WBSD_CONF_DEVICE, DEVICE_SD);
  1540. wbsd_write_config(host, WBSD_CONF_ENABLE, 0);
  1541. wbsd_lock_config(host);
  1542. }
  1543. wbsd_release_resources(host);
  1544. wbsd_free_mmc(dev);
  1545. }
  1546. /*
  1547. * Non-PnP
  1548. */
  1549. static int __devinit wbsd_probe(struct device* dev)
  1550. {
  1551. return wbsd_init(dev, io, irq, dma, 0);
  1552. }
  1553. static int __devexit wbsd_remove(struct device* dev)
  1554. {
  1555. wbsd_shutdown(dev, 0);
  1556. return 0;
  1557. }
  1558. /*
  1559. * PnP
  1560. */
  1561. #ifdef CONFIG_PNP
  1562. static int __devinit
  1563. wbsd_pnp_probe(struct pnp_dev * pnpdev, const struct pnp_device_id *dev_id)
  1564. {
  1565. int io, irq, dma;
  1566. /*
  1567. * Get resources from PnP layer.
  1568. */
  1569. io = pnp_port_start(pnpdev, 0);
  1570. irq = pnp_irq(pnpdev, 0);
  1571. if (pnp_dma_valid(pnpdev, 0))
  1572. dma = pnp_dma(pnpdev, 0);
  1573. else
  1574. dma = -1;
  1575. DBGF("PnP resources: port %3x irq %d dma %d\n", io, irq, dma);
  1576. return wbsd_init(&pnpdev->dev, io, irq, dma, 1);
  1577. }
  1578. static void __devexit wbsd_pnp_remove(struct pnp_dev * dev)
  1579. {
  1580. wbsd_shutdown(&dev->dev, 1);
  1581. }
  1582. #endif /* CONFIG_PNP */
  1583. /*
  1584. * Power management
  1585. */
  1586. #ifdef CONFIG_PM
  1587. static int wbsd_suspend(struct device *dev, pm_message_t state, u32 level)
  1588. {
  1589. DBGF("Not yet supported\n");
  1590. return 0;
  1591. }
  1592. static int wbsd_resume(struct device *dev, u32 level)
  1593. {
  1594. DBGF("Not yet supported\n");
  1595. return 0;
  1596. }
  1597. #else
  1598. #define wbsd_suspend NULL
  1599. #define wbsd_resume NULL
  1600. #endif
  1601. static struct platform_device *wbsd_device;
  1602. static struct device_driver wbsd_driver = {
  1603. .name = DRIVER_NAME,
  1604. .bus = &platform_bus_type,
  1605. .probe = wbsd_probe,
  1606. .remove = wbsd_remove,
  1607. .suspend = wbsd_suspend,
  1608. .resume = wbsd_resume,
  1609. };
  1610. #ifdef CONFIG_PNP
  1611. static struct pnp_driver wbsd_pnp_driver = {
  1612. .name = DRIVER_NAME,
  1613. .id_table = pnp_dev_table,
  1614. .probe = wbsd_pnp_probe,
  1615. .remove = wbsd_pnp_remove,
  1616. };
  1617. #endif /* CONFIG_PNP */
  1618. /*
  1619. * Module loading/unloading
  1620. */
  1621. static int __init wbsd_drv_init(void)
  1622. {
  1623. int result;
  1624. printk(KERN_INFO DRIVER_NAME
  1625. ": Winbond W83L51xD SD/MMC card interface driver, "
  1626. DRIVER_VERSION "\n");
  1627. printk(KERN_INFO DRIVER_NAME ": Copyright(c) Pierre Ossman\n");
  1628. #ifdef CONFIG_PNP
  1629. if (!nopnp)
  1630. {
  1631. result = pnp_register_driver(&wbsd_pnp_driver);
  1632. if (result < 0)
  1633. return result;
  1634. }
  1635. #endif /* CONFIG_PNP */
  1636. if (nopnp)
  1637. {
  1638. result = driver_register(&wbsd_driver);
  1639. if (result < 0)
  1640. return result;
  1641. wbsd_device = platform_device_register_simple(DRIVER_NAME, -1,
  1642. NULL, 0);
  1643. if (IS_ERR(wbsd_device))
  1644. return PTR_ERR(wbsd_device);
  1645. }
  1646. return 0;
  1647. }
  1648. static void __exit wbsd_drv_exit(void)
  1649. {
  1650. #ifdef CONFIG_PNP
  1651. if (!nopnp)
  1652. pnp_unregister_driver(&wbsd_pnp_driver);
  1653. #endif /* CONFIG_PNP */
  1654. if (nopnp)
  1655. {
  1656. platform_device_unregister(wbsd_device);
  1657. driver_unregister(&wbsd_driver);
  1658. }
  1659. DBG("unloaded\n");
  1660. }
  1661. module_init(wbsd_drv_init);
  1662. module_exit(wbsd_drv_exit);
  1663. #ifdef CONFIG_PNP
  1664. module_param(nopnp, uint, 0444);
  1665. #endif
  1666. module_param(io, uint, 0444);
  1667. module_param(irq, uint, 0444);
  1668. module_param(dma, int, 0444);
  1669. MODULE_LICENSE("GPL");
  1670. MODULE_DESCRIPTION("Winbond W83L51xD SD/MMC card interface driver");
  1671. MODULE_VERSION(DRIVER_VERSION);
  1672. #ifdef CONFIG_PNP
  1673. MODULE_PARM_DESC(nopnp, "Scan for device instead of relying on PNP. (default 0)");
  1674. #endif
  1675. MODULE_PARM_DESC(io, "I/O base to allocate. Must be 8 byte aligned. (default 0x248)");
  1676. MODULE_PARM_DESC(irq, "IRQ to allocate. (default 6)");
  1677. MODULE_PARM_DESC(dma, "DMA channel to allocate. -1 for no DMA. (default 2)");