hpwdt.c 21 KB

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