hpwdt.c 21 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894
  1. /*
  2. * HP WatchDog Driver
  3. * based on
  4. *
  5. * SoftDog 0.05: A Software Watchdog Device
  6. *
  7. * (c) Copyright 2007 Hewlett-Packard Development Company, L.P.
  8. * Thomas Mingarelli <thomas.mingarelli@hp.com>
  9. *
  10. * This program is free software; you can redistribute it and/or
  11. * modify it under the terms of the GNU General Public License
  12. * version 2 as published by the Free Software Foundation
  13. *
  14. */
  15. #include <linux/device.h>
  16. #include <linux/fs.h>
  17. #include <linux/init.h>
  18. #include <linux/io.h>
  19. #include <linux/bitops.h>
  20. #include <linux/kernel.h>
  21. #include <linux/miscdevice.h>
  22. #include <linux/module.h>
  23. #include <linux/moduleparam.h>
  24. #include <linux/pci.h>
  25. #include <linux/pci_ids.h>
  26. #include <linux/types.h>
  27. #include <linux/uaccess.h>
  28. #include <linux/watchdog.h>
  29. #ifdef CONFIG_HPWDT_NMI_DECODING
  30. #include <linux/dmi.h>
  31. #include <linux/spinlock.h>
  32. #include <linux/nmi.h>
  33. #include <linux/kdebug.h>
  34. #include <linux/notifier.h>
  35. #include <asm/cacheflush.h>
  36. #endif /* CONFIG_HPWDT_NMI_DECODING */
  37. #include <asm/nmi.h>
  38. #define HPWDT_VERSION "1.3.0"
  39. #define SECS_TO_TICKS(secs) ((secs) * 1000 / 128)
  40. #define TICKS_TO_SECS(ticks) ((ticks) * 128 / 1000)
  41. #define HPWDT_MAX_TIMER TICKS_TO_SECS(65535)
  42. #define DEFAULT_MARGIN 30
  43. static unsigned int soft_margin = DEFAULT_MARGIN; /* in seconds */
  44. static unsigned int reload; /* the computed soft_margin */
  45. static int nowayout = WATCHDOG_NOWAYOUT;
  46. static char expect_release;
  47. static unsigned long hpwdt_is_open;
  48. static void __iomem *pci_mem_addr; /* the PCI-memory address */
  49. static unsigned long __iomem *hpwdt_timer_reg;
  50. static unsigned long __iomem *hpwdt_timer_con;
  51. static DEFINE_PCI_DEVICE_TABLE(hpwdt_devices) = {
  52. { PCI_DEVICE(PCI_VENDOR_ID_COMPAQ, 0xB203) }, /* iLO2 */
  53. { PCI_DEVICE(PCI_VENDOR_ID_HP, 0x3306) }, /* iLO3 */
  54. {0}, /* terminate list */
  55. };
  56. MODULE_DEVICE_TABLE(pci, hpwdt_devices);
  57. #ifdef CONFIG_HPWDT_NMI_DECODING
  58. #define PCI_BIOS32_SD_VALUE 0x5F32335F /* "_32_" */
  59. #define CRU_BIOS_SIGNATURE_VALUE 0x55524324
  60. #define PCI_BIOS32_PARAGRAPH_LEN 16
  61. #define PCI_ROM_BASE1 0x000F0000
  62. #define ROM_SIZE 0x10000
  63. struct bios32_service_dir {
  64. u32 signature;
  65. u32 entry_point;
  66. u8 revision;
  67. u8 length;
  68. u8 checksum;
  69. u8 reserved[5];
  70. };
  71. /* type 212 */
  72. struct smbios_cru64_info {
  73. u8 type;
  74. u8 byte_length;
  75. u16 handle;
  76. u32 signature;
  77. u64 physical_address;
  78. u32 double_length;
  79. u32 double_offset;
  80. };
  81. #define SMBIOS_CRU64_INFORMATION 212
  82. /* type 219 */
  83. struct smbios_proliant_info {
  84. u8 type;
  85. u8 byte_length;
  86. u16 handle;
  87. u32 power_features;
  88. u32 omega_features;
  89. u32 reserved;
  90. u32 misc_features;
  91. };
  92. #define SMBIOS_ICRU_INFORMATION 219
  93. struct cmn_registers {
  94. union {
  95. struct {
  96. u8 ral;
  97. u8 rah;
  98. u16 rea2;
  99. };
  100. u32 reax;
  101. } u1;
  102. union {
  103. struct {
  104. u8 rbl;
  105. u8 rbh;
  106. u8 reb2l;
  107. u8 reb2h;
  108. };
  109. u32 rebx;
  110. } u2;
  111. union {
  112. struct {
  113. u8 rcl;
  114. u8 rch;
  115. u16 rec2;
  116. };
  117. u32 recx;
  118. } u3;
  119. union {
  120. struct {
  121. u8 rdl;
  122. u8 rdh;
  123. u16 red2;
  124. };
  125. u32 redx;
  126. } u4;
  127. u32 resi;
  128. u32 redi;
  129. u16 rds;
  130. u16 res;
  131. u32 reflags;
  132. } __attribute__((packed));
  133. static unsigned int hpwdt_nmi_decoding;
  134. static unsigned int allow_kdump;
  135. static unsigned int priority; /* hpwdt at end of die_notify list */
  136. static unsigned int is_icru;
  137. static DEFINE_SPINLOCK(rom_lock);
  138. static void *cru_rom_addr;
  139. static struct cmn_registers cmn_regs;
  140. extern asmlinkage void asminline_call(struct cmn_registers *pi86Regs,
  141. unsigned long *pRomEntry);
  142. #ifdef CONFIG_X86_32
  143. /* --32 Bit Bios------------------------------------------------------------ */
  144. #define HPWDT_ARCH 32
  145. asm(".text \n\t"
  146. ".align 4 \n"
  147. "asminline_call: \n\t"
  148. "pushl %ebp \n\t"
  149. "movl %esp, %ebp \n\t"
  150. "pusha \n\t"
  151. "pushf \n\t"
  152. "push %es \n\t"
  153. "push %ds \n\t"
  154. "pop %es \n\t"
  155. "movl 8(%ebp),%eax \n\t"
  156. "movl 4(%eax),%ebx \n\t"
  157. "movl 8(%eax),%ecx \n\t"
  158. "movl 12(%eax),%edx \n\t"
  159. "movl 16(%eax),%esi \n\t"
  160. "movl 20(%eax),%edi \n\t"
  161. "movl (%eax),%eax \n\t"
  162. "push %cs \n\t"
  163. "call *12(%ebp) \n\t"
  164. "pushf \n\t"
  165. "pushl %eax \n\t"
  166. "movl 8(%ebp),%eax \n\t"
  167. "movl %ebx,4(%eax) \n\t"
  168. "movl %ecx,8(%eax) \n\t"
  169. "movl %edx,12(%eax) \n\t"
  170. "movl %esi,16(%eax) \n\t"
  171. "movl %edi,20(%eax) \n\t"
  172. "movw %ds,24(%eax) \n\t"
  173. "movw %es,26(%eax) \n\t"
  174. "popl %ebx \n\t"
  175. "movl %ebx,(%eax) \n\t"
  176. "popl %ebx \n\t"
  177. "movl %ebx,28(%eax) \n\t"
  178. "pop %es \n\t"
  179. "popf \n\t"
  180. "popa \n\t"
  181. "leave \n\t"
  182. "ret \n\t"
  183. ".previous");
  184. /*
  185. * cru_detect
  186. *
  187. * Routine Description:
  188. * This function uses the 32-bit BIOS Service Directory record to
  189. * search for a $CRU record.
  190. *
  191. * Return Value:
  192. * 0 : SUCCESS
  193. * <0 : FAILURE
  194. */
  195. static int __devinit cru_detect(unsigned long map_entry,
  196. unsigned long map_offset)
  197. {
  198. void *bios32_map;
  199. unsigned long *bios32_entrypoint;
  200. unsigned long cru_physical_address;
  201. unsigned long cru_length;
  202. unsigned long physical_bios_base = 0;
  203. unsigned long physical_bios_offset = 0;
  204. int retval = -ENODEV;
  205. bios32_map = ioremap(map_entry, (2 * PAGE_SIZE));
  206. if (bios32_map == NULL)
  207. return -ENODEV;
  208. bios32_entrypoint = bios32_map + map_offset;
  209. cmn_regs.u1.reax = CRU_BIOS_SIGNATURE_VALUE;
  210. asminline_call(&cmn_regs, bios32_entrypoint);
  211. if (cmn_regs.u1.ral != 0) {
  212. printk(KERN_WARNING
  213. "hpwdt: Call succeeded but with an error: 0x%x\n",
  214. cmn_regs.u1.ral);
  215. } else {
  216. physical_bios_base = cmn_regs.u2.rebx;
  217. physical_bios_offset = cmn_regs.u4.redx;
  218. cru_length = cmn_regs.u3.recx;
  219. cru_physical_address =
  220. physical_bios_base + physical_bios_offset;
  221. /* If the values look OK, then map it in. */
  222. if ((physical_bios_base + physical_bios_offset)) {
  223. cru_rom_addr =
  224. ioremap(cru_physical_address, cru_length);
  225. if (cru_rom_addr)
  226. retval = 0;
  227. }
  228. printk(KERN_DEBUG "hpwdt: CRU Base Address: 0x%lx\n",
  229. physical_bios_base);
  230. printk(KERN_DEBUG "hpwdt: CRU Offset Address: 0x%lx\n",
  231. physical_bios_offset);
  232. printk(KERN_DEBUG "hpwdt: CRU Length: 0x%lx\n",
  233. cru_length);
  234. printk(KERN_DEBUG "hpwdt: CRU Mapped Address: %p\n",
  235. &cru_rom_addr);
  236. }
  237. iounmap(bios32_map);
  238. return retval;
  239. }
  240. /*
  241. * bios_checksum
  242. */
  243. static int __devinit bios_checksum(const char __iomem *ptr, int len)
  244. {
  245. char sum = 0;
  246. int i;
  247. /*
  248. * calculate checksum of size bytes. This should add up
  249. * to zero if we have a valid header.
  250. */
  251. for (i = 0; i < len; i++)
  252. sum += ptr[i];
  253. return ((sum == 0) && (len > 0));
  254. }
  255. /*
  256. * bios32_present
  257. *
  258. * Routine Description:
  259. * This function finds the 32-bit BIOS Service Directory
  260. *
  261. * Return Value:
  262. * 0 : SUCCESS
  263. * <0 : FAILURE
  264. */
  265. static int __devinit bios32_present(const char __iomem *p)
  266. {
  267. struct bios32_service_dir *bios_32_ptr;
  268. int length;
  269. unsigned long map_entry, map_offset;
  270. bios_32_ptr = (struct bios32_service_dir *) p;
  271. /*
  272. * Search for signature by checking equal to the swizzled value
  273. * instead of calling another routine to perform a strcmp.
  274. */
  275. if (bios_32_ptr->signature == PCI_BIOS32_SD_VALUE) {
  276. length = bios_32_ptr->length * PCI_BIOS32_PARAGRAPH_LEN;
  277. if (bios_checksum(p, length)) {
  278. /*
  279. * According to the spec, we're looking for the
  280. * first 4KB-aligned address below the entrypoint
  281. * listed in the header. The Service Directory code
  282. * is guaranteed to occupy no more than 2 4KB pages.
  283. */
  284. map_entry = bios_32_ptr->entry_point & ~(PAGE_SIZE - 1);
  285. map_offset = bios_32_ptr->entry_point - map_entry;
  286. return cru_detect(map_entry, map_offset);
  287. }
  288. }
  289. return -ENODEV;
  290. }
  291. static int __devinit detect_cru_service(void)
  292. {
  293. char __iomem *p, *q;
  294. int rc = -1;
  295. /*
  296. * Search from 0x0f0000 through 0x0fffff, inclusive.
  297. */
  298. p = ioremap(PCI_ROM_BASE1, ROM_SIZE);
  299. if (p == NULL)
  300. return -ENOMEM;
  301. for (q = p; q < p + ROM_SIZE; q += 16) {
  302. rc = bios32_present(q);
  303. if (!rc)
  304. break;
  305. }
  306. iounmap(p);
  307. return rc;
  308. }
  309. /* ------------------------------------------------------------------------- */
  310. #endif /* CONFIG_X86_32 */
  311. #ifdef CONFIG_X86_64
  312. /* --64 Bit Bios------------------------------------------------------------ */
  313. #define HPWDT_ARCH 64
  314. asm(".text \n\t"
  315. ".align 4 \n"
  316. "asminline_call: \n\t"
  317. "pushq %rbp \n\t"
  318. "movq %rsp, %rbp \n\t"
  319. "pushq %rax \n\t"
  320. "pushq %rbx \n\t"
  321. "pushq %rdx \n\t"
  322. "pushq %r12 \n\t"
  323. "pushq %r9 \n\t"
  324. "movq %rsi, %r12 \n\t"
  325. "movq %rdi, %r9 \n\t"
  326. "movl 4(%r9),%ebx \n\t"
  327. "movl 8(%r9),%ecx \n\t"
  328. "movl 12(%r9),%edx \n\t"
  329. "movl 16(%r9),%esi \n\t"
  330. "movl 20(%r9),%edi \n\t"
  331. "movl (%r9),%eax \n\t"
  332. "call *%r12 \n\t"
  333. "pushfq \n\t"
  334. "popq %r12 \n\t"
  335. "movl %eax, (%r9) \n\t"
  336. "movl %ebx, 4(%r9) \n\t"
  337. "movl %ecx, 8(%r9) \n\t"
  338. "movl %edx, 12(%r9) \n\t"
  339. "movl %esi, 16(%r9) \n\t"
  340. "movl %edi, 20(%r9) \n\t"
  341. "movq %r12, %rax \n\t"
  342. "movl %eax, 28(%r9) \n\t"
  343. "popq %r9 \n\t"
  344. "popq %r12 \n\t"
  345. "popq %rdx \n\t"
  346. "popq %rbx \n\t"
  347. "popq %rax \n\t"
  348. "leave \n\t"
  349. "ret \n\t"
  350. ".previous");
  351. /*
  352. * dmi_find_cru
  353. *
  354. * Routine Description:
  355. * This function checks whether or not a SMBIOS/DMI record is
  356. * the 64bit CRU info or not
  357. */
  358. static void __devinit dmi_find_cru(const struct dmi_header *dm, void *dummy)
  359. {
  360. struct smbios_cru64_info *smbios_cru64_ptr;
  361. unsigned long cru_physical_address;
  362. if (dm->type == SMBIOS_CRU64_INFORMATION) {
  363. smbios_cru64_ptr = (struct smbios_cru64_info *) dm;
  364. if (smbios_cru64_ptr->signature == CRU_BIOS_SIGNATURE_VALUE) {
  365. cru_physical_address =
  366. smbios_cru64_ptr->physical_address +
  367. smbios_cru64_ptr->double_offset;
  368. cru_rom_addr = ioremap(cru_physical_address,
  369. smbios_cru64_ptr->double_length);
  370. set_memory_x((unsigned long)cru_rom_addr & PAGE_MASK,
  371. smbios_cru64_ptr->double_length >> PAGE_SHIFT);
  372. }
  373. }
  374. }
  375. static int __devinit detect_cru_service(void)
  376. {
  377. cru_rom_addr = NULL;
  378. dmi_walk(dmi_find_cru, NULL);
  379. /* if cru_rom_addr has been set then we found a CRU service */
  380. return ((cru_rom_addr != NULL) ? 0 : -ENODEV);
  381. }
  382. /* ------------------------------------------------------------------------- */
  383. #endif /* CONFIG_X86_64 */
  384. #endif /* CONFIG_HPWDT_NMI_DECODING */
  385. /*
  386. * Watchdog operations
  387. */
  388. static void hpwdt_start(void)
  389. {
  390. reload = SECS_TO_TICKS(soft_margin);
  391. iowrite16(reload, hpwdt_timer_reg);
  392. iowrite16(0x85, hpwdt_timer_con);
  393. }
  394. static void hpwdt_stop(void)
  395. {
  396. unsigned long data;
  397. data = ioread16(hpwdt_timer_con);
  398. data &= 0xFE;
  399. iowrite16(data, hpwdt_timer_con);
  400. }
  401. static void hpwdt_ping(void)
  402. {
  403. iowrite16(reload, hpwdt_timer_reg);
  404. }
  405. static int hpwdt_change_timer(int new_margin)
  406. {
  407. if (new_margin < 1 || new_margin > HPWDT_MAX_TIMER) {
  408. printk(KERN_WARNING
  409. "hpwdt: New value passed in is invalid: %d seconds.\n",
  410. new_margin);
  411. return -EINVAL;
  412. }
  413. soft_margin = new_margin;
  414. printk(KERN_DEBUG
  415. "hpwdt: New timer passed in is %d seconds.\n",
  416. new_margin);
  417. reload = SECS_TO_TICKS(soft_margin);
  418. return 0;
  419. }
  420. static int hpwdt_time_left(void)
  421. {
  422. return TICKS_TO_SECS(ioread16(hpwdt_timer_reg));
  423. }
  424. #ifdef CONFIG_HPWDT_NMI_DECODING
  425. /*
  426. * NMI Handler
  427. */
  428. static int hpwdt_pretimeout(unsigned int ulReason, struct pt_regs *regs)
  429. {
  430. unsigned long rom_pl;
  431. static int die_nmi_called;
  432. if (!hpwdt_nmi_decoding)
  433. goto out;
  434. spin_lock_irqsave(&rom_lock, rom_pl);
  435. if (!die_nmi_called && !is_icru)
  436. asminline_call(&cmn_regs, cru_rom_addr);
  437. die_nmi_called = 1;
  438. spin_unlock_irqrestore(&rom_lock, rom_pl);
  439. if (allow_kdump)
  440. hpwdt_stop();
  441. if (!is_icru) {
  442. if (cmn_regs.u1.ral == 0) {
  443. panic("An NMI occurred, "
  444. "but unable to determine source.\n");
  445. }
  446. }
  447. panic("An NMI occurred, please see the Integrated "
  448. "Management Log for details.\n");
  449. out:
  450. return NMI_DONE;
  451. }
  452. #endif /* CONFIG_HPWDT_NMI_DECODING */
  453. /*
  454. * /dev/watchdog handling
  455. */
  456. static int hpwdt_open(struct inode *inode, struct file *file)
  457. {
  458. /* /dev/watchdog can only be opened once */
  459. if (test_and_set_bit(0, &hpwdt_is_open))
  460. return -EBUSY;
  461. /* Start the watchdog */
  462. hpwdt_start();
  463. hpwdt_ping();
  464. return nonseekable_open(inode, file);
  465. }
  466. static int hpwdt_release(struct inode *inode, struct file *file)
  467. {
  468. /* Stop the watchdog */
  469. if (expect_release == 42) {
  470. hpwdt_stop();
  471. } else {
  472. printk(KERN_CRIT
  473. "hpwdt: Unexpected close, not stopping watchdog!\n");
  474. hpwdt_ping();
  475. }
  476. expect_release = 0;
  477. /* /dev/watchdog is being closed, make sure it can be re-opened */
  478. clear_bit(0, &hpwdt_is_open);
  479. return 0;
  480. }
  481. static ssize_t hpwdt_write(struct file *file, const char __user *data,
  482. size_t len, loff_t *ppos)
  483. {
  484. /* See if we got the magic character 'V' and reload the timer */
  485. if (len) {
  486. if (!nowayout) {
  487. size_t i;
  488. /* note: just in case someone wrote the magic character
  489. * five months ago... */
  490. expect_release = 0;
  491. /* scan to see whether or not we got the magic char. */
  492. for (i = 0; i != len; i++) {
  493. char c;
  494. if (get_user(c, data + i))
  495. return -EFAULT;
  496. if (c == 'V')
  497. expect_release = 42;
  498. }
  499. }
  500. /* someone wrote to us, we should reload the timer */
  501. hpwdt_ping();
  502. }
  503. return len;
  504. }
  505. static const struct watchdog_info ident = {
  506. .options = WDIOF_SETTIMEOUT |
  507. WDIOF_KEEPALIVEPING |
  508. WDIOF_MAGICCLOSE,
  509. .identity = "HP iLO2+ HW Watchdog Timer",
  510. };
  511. static long hpwdt_ioctl(struct file *file, unsigned int cmd,
  512. unsigned long arg)
  513. {
  514. void __user *argp = (void __user *)arg;
  515. int __user *p = argp;
  516. int new_margin;
  517. int ret = -ENOTTY;
  518. switch (cmd) {
  519. case WDIOC_GETSUPPORT:
  520. ret = 0;
  521. if (copy_to_user(argp, &ident, sizeof(ident)))
  522. ret = -EFAULT;
  523. break;
  524. case WDIOC_GETSTATUS:
  525. case WDIOC_GETBOOTSTATUS:
  526. ret = put_user(0, p);
  527. break;
  528. case WDIOC_KEEPALIVE:
  529. hpwdt_ping();
  530. ret = 0;
  531. break;
  532. case WDIOC_SETTIMEOUT:
  533. ret = get_user(new_margin, p);
  534. if (ret)
  535. break;
  536. ret = hpwdt_change_timer(new_margin);
  537. if (ret)
  538. break;
  539. hpwdt_ping();
  540. /* Fall */
  541. case WDIOC_GETTIMEOUT:
  542. ret = put_user(soft_margin, p);
  543. break;
  544. case WDIOC_GETTIMELEFT:
  545. ret = put_user(hpwdt_time_left(), p);
  546. break;
  547. }
  548. return ret;
  549. }
  550. /*
  551. * Kernel interfaces
  552. */
  553. static const struct file_operations hpwdt_fops = {
  554. .owner = THIS_MODULE,
  555. .llseek = no_llseek,
  556. .write = hpwdt_write,
  557. .unlocked_ioctl = hpwdt_ioctl,
  558. .open = hpwdt_open,
  559. .release = hpwdt_release,
  560. };
  561. static struct miscdevice hpwdt_miscdev = {
  562. .minor = WATCHDOG_MINOR,
  563. .name = "watchdog",
  564. .fops = &hpwdt_fops,
  565. };
  566. /*
  567. * Init & Exit
  568. */
  569. #ifdef CONFIG_HPWDT_NMI_DECODING
  570. #ifdef CONFIG_X86_LOCAL_APIC
  571. static void __devinit hpwdt_check_nmi_decoding(struct pci_dev *dev)
  572. {
  573. /*
  574. * If nmi_watchdog is turned off then we can turn on
  575. * our nmi decoding capability.
  576. */
  577. hpwdt_nmi_decoding = 1;
  578. }
  579. #else
  580. static void __devinit hpwdt_check_nmi_decoding(struct pci_dev *dev)
  581. {
  582. dev_warn(&dev->dev, "NMI decoding is disabled. "
  583. "Your kernel does not support a NMI Watchdog.\n");
  584. }
  585. #endif /* CONFIG_X86_LOCAL_APIC */
  586. /*
  587. * dmi_find_icru
  588. *
  589. * Routine Description:
  590. * This function checks whether or not we are on an iCRU-based server.
  591. * This check is independent of architecture and needs to be made for
  592. * any ProLiant system.
  593. */
  594. static void __devinit dmi_find_icru(const struct dmi_header *dm, void *dummy)
  595. {
  596. struct smbios_proliant_info *smbios_proliant_ptr;
  597. if (dm->type == SMBIOS_ICRU_INFORMATION) {
  598. smbios_proliant_ptr = (struct smbios_proliant_info *) dm;
  599. if (smbios_proliant_ptr->misc_features & 0x01)
  600. is_icru = 1;
  601. }
  602. }
  603. static int __devinit hpwdt_init_nmi_decoding(struct pci_dev *dev)
  604. {
  605. int retval;
  606. /*
  607. * On typical CRU-based systems we need to map that service in
  608. * the BIOS. For 32 bit Operating Systems we need to go through
  609. * the 32 Bit BIOS Service Directory. For 64 bit Operating
  610. * Systems we get that service through SMBIOS.
  611. *
  612. * On systems that support the new iCRU service all we need to
  613. * do is call dmi_walk to get the supported flag value and skip
  614. * the old cru detect code.
  615. */
  616. dmi_walk(dmi_find_icru, NULL);
  617. if (!is_icru) {
  618. /*
  619. * We need to map the ROM to get the CRU service.
  620. * For 32 bit Operating Systems we need to go through the 32 Bit
  621. * BIOS Service Directory
  622. * For 64 bit Operating Systems we get that service through SMBIOS.
  623. */
  624. retval = detect_cru_service();
  625. if (retval < 0) {
  626. dev_warn(&dev->dev,
  627. "Unable to detect the %d Bit CRU Service.\n",
  628. HPWDT_ARCH);
  629. return retval;
  630. }
  631. /*
  632. * We know this is the only CRU call we need to make so lets keep as
  633. * few instructions as possible once the NMI comes in.
  634. */
  635. cmn_regs.u1.rah = 0x0D;
  636. cmn_regs.u1.ral = 0x02;
  637. }
  638. /*
  639. * If the priority is set to 1, then we will be put first on the
  640. * die notify list to handle a critical NMI. The default is to
  641. * be last so other users of the NMI signal can function.
  642. */
  643. retval = register_nmi_handler(NMI_UNKNOWN, hpwdt_pretimeout,
  644. (priority) ? NMI_FLAG_FIRST : 0,
  645. "hpwdt");
  646. if (retval != 0) {
  647. dev_warn(&dev->dev,
  648. "Unable to register a die notifier (err=%d).\n",
  649. retval);
  650. if (cru_rom_addr)
  651. iounmap(cru_rom_addr);
  652. }
  653. dev_info(&dev->dev,
  654. "HP Watchdog Timer Driver: NMI decoding initialized"
  655. ", allow kernel dump: %s (default = 0/OFF)"
  656. ", priority: %s (default = 0/LAST).\n",
  657. (allow_kdump == 0) ? "OFF" : "ON",
  658. (priority == 0) ? "LAST" : "FIRST");
  659. return 0;
  660. }
  661. static void hpwdt_exit_nmi_decoding(void)
  662. {
  663. unregister_nmi_handler(NMI_UNKNOWN, "hpwdt");
  664. if (cru_rom_addr)
  665. iounmap(cru_rom_addr);
  666. }
  667. #else /* !CONFIG_HPWDT_NMI_DECODING */
  668. static void __devinit hpwdt_check_nmi_decoding(struct pci_dev *dev)
  669. {
  670. }
  671. static int __devinit hpwdt_init_nmi_decoding(struct pci_dev *dev)
  672. {
  673. return 0;
  674. }
  675. static void hpwdt_exit_nmi_decoding(void)
  676. {
  677. }
  678. #endif /* CONFIG_HPWDT_NMI_DECODING */
  679. static int __devinit hpwdt_init_one(struct pci_dev *dev,
  680. const struct pci_device_id *ent)
  681. {
  682. int retval;
  683. /*
  684. * Check if we can do NMI decoding or not
  685. */
  686. hpwdt_check_nmi_decoding(dev);
  687. /*
  688. * First let's find out if we are on an iLO2+ server. We will
  689. * not run on a legacy ASM box.
  690. * So we only support the G5 ProLiant servers and higher.
  691. */
  692. if (dev->subsystem_vendor != PCI_VENDOR_ID_HP) {
  693. dev_warn(&dev->dev,
  694. "This server does not have an iLO2+ ASIC.\n");
  695. return -ENODEV;
  696. }
  697. if (pci_enable_device(dev)) {
  698. dev_warn(&dev->dev,
  699. "Not possible to enable PCI Device: 0x%x:0x%x.\n",
  700. ent->vendor, ent->device);
  701. return -ENODEV;
  702. }
  703. pci_mem_addr = pci_iomap(dev, 1, 0x80);
  704. if (!pci_mem_addr) {
  705. dev_warn(&dev->dev,
  706. "Unable to detect the iLO2+ server memory.\n");
  707. retval = -ENOMEM;
  708. goto error_pci_iomap;
  709. }
  710. hpwdt_timer_reg = pci_mem_addr + 0x70;
  711. hpwdt_timer_con = pci_mem_addr + 0x72;
  712. /* Make sure that we have a valid soft_margin */
  713. if (hpwdt_change_timer(soft_margin))
  714. hpwdt_change_timer(DEFAULT_MARGIN);
  715. /* Initialize NMI Decoding functionality */
  716. retval = hpwdt_init_nmi_decoding(dev);
  717. if (retval != 0)
  718. goto error_init_nmi_decoding;
  719. retval = misc_register(&hpwdt_miscdev);
  720. if (retval < 0) {
  721. dev_warn(&dev->dev,
  722. "Unable to register miscdev on minor=%d (err=%d).\n",
  723. WATCHDOG_MINOR, retval);
  724. goto error_misc_register;
  725. }
  726. dev_info(&dev->dev, "HP Watchdog Timer Driver: %s"
  727. ", timer margin: %d seconds (nowayout=%d).\n",
  728. HPWDT_VERSION, soft_margin, nowayout);
  729. return 0;
  730. error_misc_register:
  731. hpwdt_exit_nmi_decoding();
  732. error_init_nmi_decoding:
  733. pci_iounmap(dev, pci_mem_addr);
  734. error_pci_iomap:
  735. pci_disable_device(dev);
  736. return retval;
  737. }
  738. static void __devexit hpwdt_exit(struct pci_dev *dev)
  739. {
  740. if (!nowayout)
  741. hpwdt_stop();
  742. misc_deregister(&hpwdt_miscdev);
  743. hpwdt_exit_nmi_decoding();
  744. pci_iounmap(dev, pci_mem_addr);
  745. pci_disable_device(dev);
  746. }
  747. static struct pci_driver hpwdt_driver = {
  748. .name = "hpwdt",
  749. .id_table = hpwdt_devices,
  750. .probe = hpwdt_init_one,
  751. .remove = __devexit_p(hpwdt_exit),
  752. };
  753. static void __exit hpwdt_cleanup(void)
  754. {
  755. pci_unregister_driver(&hpwdt_driver);
  756. }
  757. static int __init hpwdt_init(void)
  758. {
  759. return pci_register_driver(&hpwdt_driver);
  760. }
  761. MODULE_AUTHOR("Tom Mingarelli");
  762. MODULE_DESCRIPTION("hp watchdog driver");
  763. MODULE_LICENSE("GPL");
  764. MODULE_VERSION(HPWDT_VERSION);
  765. MODULE_ALIAS_MISCDEV(WATCHDOG_MINOR);
  766. module_param(soft_margin, int, 0);
  767. MODULE_PARM_DESC(soft_margin, "Watchdog timeout in seconds");
  768. module_param(nowayout, int, 0);
  769. MODULE_PARM_DESC(nowayout, "Watchdog cannot be stopped once started (default="
  770. __MODULE_STRING(WATCHDOG_NOWAYOUT) ")");
  771. #ifdef CONFIG_HPWDT_NMI_DECODING
  772. module_param(allow_kdump, int, 0);
  773. MODULE_PARM_DESC(allow_kdump, "Start a kernel dump after NMI occurs");
  774. module_param(priority, int, 0);
  775. MODULE_PARM_DESC(priority, "The hpwdt driver handles NMIs first or last"
  776. " (default = 0/Last)\n");
  777. #endif /* !CONFIG_HPWDT_NMI_DECODING */
  778. module_init(hpwdt_init);
  779. module_exit(hpwdt_cleanup);