1 // SPDX-License-Identifier: GPL-2.0+
2 /*
3 * IBM Hot Plug Controller Driver
4 *
5 * Written By: Jyoti Shah, IBM Corporation
6 *
7 * Copyright (C) 2001-2003 IBM Corp.
8 *
9 * All rights reserved.
10 *
11 * Send feedback to <gregkh@us.ibm.com>
12 * <jshah@us.ibm.com>
13 *
14 */
15
16 #include <linux/wait.h>
17 #include <linux/time.h>
18 #include <linux/delay.h>
19 #include <linux/module.h>
20 #include <linux/pci.h>
21 #include <linux/init.h>
22 #include <linux/mutex.h>
23 #include <linux/sched.h>
24 #include <linux/semaphore.h>
25 #include <linux/kthread.h>
26 #include "ibmphp.h"
27
28 static int to_debug = 0;
29 #define debug_polling(fmt, arg...) do { if (to_debug) debug(fmt, arg); } while (0)
30
31 //----------------------------------------------------------------------------
32 // timeout values
33 //----------------------------------------------------------------------------
34 #define CMD_COMPLETE_TOUT_SEC 60 // give HPC 60 sec to finish cmd
35 #define HPC_CTLR_WORKING_TOUT 60 // give HPC 60 sec to finish cmd
36 #define HPC_GETACCESS_TIMEOUT 60 // seconds
37 #define POLL_INTERVAL_SEC 2 // poll HPC every 2 seconds
38 #define POLL_LATCH_CNT 5 // poll latch 5 times, then poll slots
39
40 //----------------------------------------------------------------------------
41 // Winnipeg Architected Register Offsets
42 //----------------------------------------------------------------------------
43 #define WPG_I2CMBUFL_OFFSET 0x08 // I2C Message Buffer Low
44 #define WPG_I2CMOSUP_OFFSET 0x10 // I2C Master Operation Setup Reg
45 #define WPG_I2CMCNTL_OFFSET 0x20 // I2C Master Control Register
46 #define WPG_I2CPARM_OFFSET 0x40 // I2C Parameter Register
47 #define WPG_I2CSTAT_OFFSET 0x70 // I2C Status Register
48
49 //----------------------------------------------------------------------------
50 // Winnipeg Store Type commands (Add this commands to the register offset)
51 //----------------------------------------------------------------------------
52 #define WPG_I2C_AND 0x1000 // I2C AND operation
53 #define WPG_I2C_OR 0x2000 // I2C OR operation
54
55 //----------------------------------------------------------------------------
56 // Command set for I2C Master Operation Setup Register
57 //----------------------------------------------------------------------------
58 #define WPG_READATADDR_MASK 0x00010000 // read,bytes,I2C shifted,index
59 #define WPG_WRITEATADDR_MASK 0x40010000 // write,bytes,I2C shifted,index
60 #define WPG_READDIRECT_MASK 0x10010000
61 #define WPG_WRITEDIRECT_MASK 0x60010000
62
63
64 //----------------------------------------------------------------------------
65 // bit masks for I2C Master Control Register
66 //----------------------------------------------------------------------------
67 #define WPG_I2CMCNTL_STARTOP_MASK 0x00000002 // Start the Operation
68
69 //----------------------------------------------------------------------------
70 //
71 //----------------------------------------------------------------------------
72 #define WPG_I2C_IOREMAP_SIZE 0x2044 // size of linear address interval
73
74 //----------------------------------------------------------------------------
75 // command index
76 //----------------------------------------------------------------------------
77 #define WPG_1ST_SLOT_INDEX 0x01 // index - 1st slot for ctlr
78 #define WPG_CTLR_INDEX 0x0F // index - ctlr
79 #define WPG_1ST_EXTSLOT_INDEX 0x10 // index - 1st ext slot for ctlr
80 #define WPG_1ST_BUS_INDEX 0x1F // index - 1st bus for ctlr
81
82 //----------------------------------------------------------------------------
83 // macro utilities
84 //----------------------------------------------------------------------------
85 // if bits 20,22,25,26,27,29,30 are OFF return 1
86 #define HPC_I2CSTATUS_CHECK(s) ((u8)((s & 0x00000A76) ? 0 : 1))
87
88 //----------------------------------------------------------------------------
89 // global variables
90 //----------------------------------------------------------------------------
91 static struct mutex sem_hpcaccess; // lock access to HPC
92 static struct semaphore semOperations; // lock all operations and
93 // access to data structures
94 static struct semaphore sem_exit; // make sure polling thread goes away
95 static struct task_struct *ibmphp_poll_thread;
96 //----------------------------------------------------------------------------
97 // local function prototypes
98 //----------------------------------------------------------------------------
99 static u8 i2c_ctrl_read(struct controller *, void __iomem *, u8);
100 static u8 i2c_ctrl_write(struct controller *, void __iomem *, u8, u8);
101 static u8 hpc_writecmdtoindex(u8, u8);
102 static u8 hpc_readcmdtoindex(u8, u8);
103 static void get_hpc_access(void);
104 static void free_hpc_access(void);
105 static int poll_hpc(void *data);
106 static int process_changeinstatus(struct slot *, struct slot *);
107 static int process_changeinlatch(u8, u8, struct controller *);
108 static int hpc_wait_ctlr_notworking(int, struct controller *, void __iomem *, u8 *);
109 //----------------------------------------------------------------------------
110
111
112 /*----------------------------------------------------------------------
113 * Name: ibmphp_hpc_initvars
114 *
115 * Action: initialize semaphores and variables
116 *---------------------------------------------------------------------*/
ibmphp_hpc_initvars(void)117 void __init ibmphp_hpc_initvars(void)
118 {
119 debug("%s - Entry\n", __func__);
120
121 mutex_init(&sem_hpcaccess);
122 sema_init(&semOperations, 1);
123 sema_init(&sem_exit, 0);
124 to_debug = 0;
125
126 debug("%s - Exit\n", __func__);
127 }
128
129 /*----------------------------------------------------------------------
130 * Name: i2c_ctrl_read
131 *
132 * Action: read from HPC over I2C
133 *
134 *---------------------------------------------------------------------*/
i2c_ctrl_read(struct controller * ctlr_ptr,void __iomem * WPGBbar,u8 index)135 static u8 i2c_ctrl_read(struct controller *ctlr_ptr, void __iomem *WPGBbar, u8 index)
136 {
137 u8 status;
138 int i;
139 void __iomem *wpg_addr; // base addr + offset
140 unsigned long wpg_data; // data to/from WPG LOHI format
141 unsigned long ultemp;
142 unsigned long data; // actual data HILO format
143
144 debug_polling("%s - Entry WPGBbar[%p] index[%x] \n", __func__, WPGBbar, index);
145
146 //--------------------------------------------------------------------
147 // READ - step 1
148 // read at address, byte length, I2C address (shifted), index
149 // or read direct, byte length, index
150 if (ctlr_ptr->ctlr_type == 0x02) {
151 data = WPG_READATADDR_MASK;
152 // fill in I2C address
153 ultemp = (unsigned long)ctlr_ptr->u.wpeg_ctlr.i2c_addr;
154 ultemp = ultemp >> 1;
155 data |= (ultemp << 8);
156
157 // fill in index
158 data |= (unsigned long)index;
159 } else if (ctlr_ptr->ctlr_type == 0x04) {
160 data = WPG_READDIRECT_MASK;
161
162 // fill in index
163 ultemp = (unsigned long)index;
164 ultemp = ultemp << 8;
165 data |= ultemp;
166 } else {
167 err("this controller type is not supported \n");
168 return HPC_ERROR;
169 }
170
171 wpg_data = swab32(data); // swap data before writing
172 wpg_addr = WPGBbar + WPG_I2CMOSUP_OFFSET;
173 writel(wpg_data, wpg_addr);
174
175 //--------------------------------------------------------------------
176 // READ - step 2 : clear the message buffer
177 data = 0x00000000;
178 wpg_data = swab32(data);
179 wpg_addr = WPGBbar + WPG_I2CMBUFL_OFFSET;
180 writel(wpg_data, wpg_addr);
181
182 //--------------------------------------------------------------------
183 // READ - step 3 : issue start operation, I2C master control bit 30:ON
184 // 2020 : [20] OR operation at [20] offset 0x20
185 data = WPG_I2CMCNTL_STARTOP_MASK;
186 wpg_data = swab32(data);
187 wpg_addr = WPGBbar + WPG_I2CMCNTL_OFFSET + WPG_I2C_OR;
188 writel(wpg_data, wpg_addr);
189
190 //--------------------------------------------------------------------
191 // READ - step 4 : wait until start operation bit clears
192 i = CMD_COMPLETE_TOUT_SEC;
193 while (i) {
194 msleep(10);
195 wpg_addr = WPGBbar + WPG_I2CMCNTL_OFFSET;
196 wpg_data = readl(wpg_addr);
197 data = swab32(wpg_data);
198 if (!(data & WPG_I2CMCNTL_STARTOP_MASK))
199 break;
200 i--;
201 }
202 if (i == 0) {
203 debug("%s - Error : WPG timeout\n", __func__);
204 return HPC_ERROR;
205 }
206 //--------------------------------------------------------------------
207 // READ - step 5 : read I2C status register
208 i = CMD_COMPLETE_TOUT_SEC;
209 while (i) {
210 msleep(10);
211 wpg_addr = WPGBbar + WPG_I2CSTAT_OFFSET;
212 wpg_data = readl(wpg_addr);
213 data = swab32(wpg_data);
214 if (HPC_I2CSTATUS_CHECK(data))
215 break;
216 i--;
217 }
218 if (i == 0) {
219 debug("ctrl_read - Exit Error:I2C timeout\n");
220 return HPC_ERROR;
221 }
222
223 //--------------------------------------------------------------------
224 // READ - step 6 : get DATA
225 wpg_addr = WPGBbar + WPG_I2CMBUFL_OFFSET;
226 wpg_data = readl(wpg_addr);
227 data = swab32(wpg_data);
228
229 status = (u8) data;
230
231 debug_polling("%s - Exit index[%x] status[%x]\n", __func__, index, status);
232
233 return (status);
234 }
235
236 /*----------------------------------------------------------------------
237 * Name: i2c_ctrl_write
238 *
239 * Action: write to HPC over I2C
240 *
241 * Return 0 or error codes
242 *---------------------------------------------------------------------*/
i2c_ctrl_write(struct controller * ctlr_ptr,void __iomem * WPGBbar,u8 index,u8 cmd)243 static u8 i2c_ctrl_write(struct controller *ctlr_ptr, void __iomem *WPGBbar, u8 index, u8 cmd)
244 {
245 u8 rc;
246 void __iomem *wpg_addr; // base addr + offset
247 unsigned long wpg_data; // data to/from WPG LOHI format
248 unsigned long ultemp;
249 unsigned long data; // actual data HILO format
250 int i;
251
252 debug_polling("%s - Entry WPGBbar[%p] index[%x] cmd[%x]\n", __func__, WPGBbar, index, cmd);
253
254 rc = 0;
255 //--------------------------------------------------------------------
256 // WRITE - step 1
257 // write at address, byte length, I2C address (shifted), index
258 // or write direct, byte length, index
259 data = 0x00000000;
260
261 if (ctlr_ptr->ctlr_type == 0x02) {
262 data = WPG_WRITEATADDR_MASK;
263 // fill in I2C address
264 ultemp = (unsigned long)ctlr_ptr->u.wpeg_ctlr.i2c_addr;
265 ultemp = ultemp >> 1;
266 data |= (ultemp << 8);
267
268 // fill in index
269 data |= (unsigned long)index;
270 } else if (ctlr_ptr->ctlr_type == 0x04) {
271 data = WPG_WRITEDIRECT_MASK;
272
273 // fill in index
274 ultemp = (unsigned long)index;
275 ultemp = ultemp << 8;
276 data |= ultemp;
277 } else {
278 err("this controller type is not supported \n");
279 return HPC_ERROR;
280 }
281
282 wpg_data = swab32(data); // swap data before writing
283 wpg_addr = WPGBbar + WPG_I2CMOSUP_OFFSET;
284 writel(wpg_data, wpg_addr);
285
286 //--------------------------------------------------------------------
287 // WRITE - step 2 : clear the message buffer
288 data = 0x00000000 | (unsigned long)cmd;
289 wpg_data = swab32(data);
290 wpg_addr = WPGBbar + WPG_I2CMBUFL_OFFSET;
291 writel(wpg_data, wpg_addr);
292
293 //--------------------------------------------------------------------
294 // WRITE - step 3 : issue start operation,I2C master control bit 30:ON
295 // 2020 : [20] OR operation at [20] offset 0x20
296 data = WPG_I2CMCNTL_STARTOP_MASK;
297 wpg_data = swab32(data);
298 wpg_addr = WPGBbar + WPG_I2CMCNTL_OFFSET + WPG_I2C_OR;
299 writel(wpg_data, wpg_addr);
300
301 //--------------------------------------------------------------------
302 // WRITE - step 4 : wait until start operation bit clears
303 i = CMD_COMPLETE_TOUT_SEC;
304 while (i) {
305 msleep(10);
306 wpg_addr = WPGBbar + WPG_I2CMCNTL_OFFSET;
307 wpg_data = readl(wpg_addr);
308 data = swab32(wpg_data);
309 if (!(data & WPG_I2CMCNTL_STARTOP_MASK))
310 break;
311 i--;
312 }
313 if (i == 0) {
314 debug("%s - Exit Error:WPG timeout\n", __func__);
315 rc = HPC_ERROR;
316 }
317
318 //--------------------------------------------------------------------
319 // WRITE - step 5 : read I2C status register
320 i = CMD_COMPLETE_TOUT_SEC;
321 while (i) {
322 msleep(10);
323 wpg_addr = WPGBbar + WPG_I2CSTAT_OFFSET;
324 wpg_data = readl(wpg_addr);
325 data = swab32(wpg_data);
326 if (HPC_I2CSTATUS_CHECK(data))
327 break;
328 i--;
329 }
330 if (i == 0) {
331 debug("ctrl_read - Error : I2C timeout\n");
332 rc = HPC_ERROR;
333 }
334
335 debug_polling("%s Exit rc[%x]\n", __func__, rc);
336 return (rc);
337 }
338
339 //------------------------------------------------------------
340 // Read from ISA type HPC
341 //------------------------------------------------------------
isa_ctrl_read(struct controller * ctlr_ptr,u8 offset)342 static u8 isa_ctrl_read(struct controller *ctlr_ptr, u8 offset)
343 {
344 u16 start_address;
345 u16 end_address;
346 u8 data;
347
348 start_address = ctlr_ptr->u.isa_ctlr.io_start;
349 end_address = ctlr_ptr->u.isa_ctlr.io_end;
350 data = inb(start_address + offset);
351 return data;
352 }
353
354 //--------------------------------------------------------------
355 // Write to ISA type HPC
356 //--------------------------------------------------------------
isa_ctrl_write(struct controller * ctlr_ptr,u8 offset,u8 data)357 static void isa_ctrl_write(struct controller *ctlr_ptr, u8 offset, u8 data)
358 {
359 u16 start_address;
360 u16 port_address;
361
362 start_address = ctlr_ptr->u.isa_ctlr.io_start;
363 port_address = start_address + (u16) offset;
364 outb(data, port_address);
365 }
366
pci_ctrl_read(struct controller * ctrl,u8 offset)367 static u8 pci_ctrl_read(struct controller *ctrl, u8 offset)
368 {
369 u8 data = 0x00;
370 debug("inside pci_ctrl_read\n");
371 if (ctrl->ctrl_dev)
372 pci_read_config_byte(ctrl->ctrl_dev, HPC_PCI_OFFSET + offset, &data);
373 return data;
374 }
375
pci_ctrl_write(struct controller * ctrl,u8 offset,u8 data)376 static u8 pci_ctrl_write(struct controller *ctrl, u8 offset, u8 data)
377 {
378 u8 rc = -ENODEV;
379 debug("inside pci_ctrl_write\n");
380 if (ctrl->ctrl_dev) {
381 pci_write_config_byte(ctrl->ctrl_dev, HPC_PCI_OFFSET + offset, data);
382 rc = 0;
383 }
384 return rc;
385 }
386
ctrl_read(struct controller * ctlr,void __iomem * base,u8 offset)387 static u8 ctrl_read(struct controller *ctlr, void __iomem *base, u8 offset)
388 {
389 u8 rc;
390 switch (ctlr->ctlr_type) {
391 case 0:
392 rc = isa_ctrl_read(ctlr, offset);
393 break;
394 case 1:
395 rc = pci_ctrl_read(ctlr, offset);
396 break;
397 case 2:
398 case 4:
399 rc = i2c_ctrl_read(ctlr, base, offset);
400 break;
401 default:
402 return -ENODEV;
403 }
404 return rc;
405 }
406
ctrl_write(struct controller * ctlr,void __iomem * base,u8 offset,u8 data)407 static u8 ctrl_write(struct controller *ctlr, void __iomem *base, u8 offset, u8 data)
408 {
409 u8 rc = 0;
410 switch (ctlr->ctlr_type) {
411 case 0:
412 isa_ctrl_write(ctlr, offset, data);
413 break;
414 case 1:
415 rc = pci_ctrl_write(ctlr, offset, data);
416 break;
417 case 2:
418 case 4:
419 rc = i2c_ctrl_write(ctlr, base, offset, data);
420 break;
421 default:
422 return -ENODEV;
423 }
424 return rc;
425 }
426 /*----------------------------------------------------------------------
427 * Name: hpc_writecmdtoindex()
428 *
429 * Action: convert a write command to proper index within a controller
430 *
431 * Return index, HPC_ERROR
432 *---------------------------------------------------------------------*/
hpc_writecmdtoindex(u8 cmd,u8 index)433 static u8 hpc_writecmdtoindex(u8 cmd, u8 index)
434 {
435 u8 rc;
436
437 switch (cmd) {
438 case HPC_CTLR_ENABLEIRQ: // 0x00.N.15
439 case HPC_CTLR_CLEARIRQ: // 0x06.N.15
440 case HPC_CTLR_RESET: // 0x07.N.15
441 case HPC_CTLR_IRQSTEER: // 0x08.N.15
442 case HPC_CTLR_DISABLEIRQ: // 0x01.N.15
443 case HPC_ALLSLOT_ON: // 0x11.N.15
444 case HPC_ALLSLOT_OFF: // 0x12.N.15
445 rc = 0x0F;
446 break;
447
448 case HPC_SLOT_OFF: // 0x02.Y.0-14
449 case HPC_SLOT_ON: // 0x03.Y.0-14
450 case HPC_SLOT_ATTNOFF: // 0x04.N.0-14
451 case HPC_SLOT_ATTNON: // 0x05.N.0-14
452 case HPC_SLOT_BLINKLED: // 0x13.N.0-14
453 rc = index;
454 break;
455
456 case HPC_BUS_33CONVMODE:
457 case HPC_BUS_66CONVMODE:
458 case HPC_BUS_66PCIXMODE:
459 case HPC_BUS_100PCIXMODE:
460 case HPC_BUS_133PCIXMODE:
461 rc = index + WPG_1ST_BUS_INDEX - 1;
462 break;
463
464 default:
465 err("hpc_writecmdtoindex - Error invalid cmd[%x]\n", cmd);
466 rc = HPC_ERROR;
467 }
468
469 return rc;
470 }
471
472 /*----------------------------------------------------------------------
473 * Name: hpc_readcmdtoindex()
474 *
475 * Action: convert a read command to proper index within a controller
476 *
477 * Return index, HPC_ERROR
478 *---------------------------------------------------------------------*/
hpc_readcmdtoindex(u8 cmd,u8 index)479 static u8 hpc_readcmdtoindex(u8 cmd, u8 index)
480 {
481 u8 rc;
482
483 switch (cmd) {
484 case READ_CTLRSTATUS:
485 rc = 0x0F;
486 break;
487 case READ_SLOTSTATUS:
488 case READ_ALLSTAT:
489 rc = index;
490 break;
491 case READ_EXTSLOTSTATUS:
492 rc = index + WPG_1ST_EXTSLOT_INDEX;
493 break;
494 case READ_BUSSTATUS:
495 rc = index + WPG_1ST_BUS_INDEX - 1;
496 break;
497 case READ_SLOTLATCHLOWREG:
498 rc = 0x28;
499 break;
500 case READ_REVLEVEL:
501 rc = 0x25;
502 break;
503 case READ_HPCOPTIONS:
504 rc = 0x27;
505 break;
506 default:
507 rc = HPC_ERROR;
508 }
509 return rc;
510 }
511
512 /*----------------------------------------------------------------------
513 * Name: HPCreadslot()
514 *
515 * Action: issue a READ command to HPC
516 *
517 * Input: pslot - cannot be NULL for READ_ALLSTAT
518 * pstatus - can be NULL for READ_ALLSTAT
519 *
520 * Return 0 or error codes
521 *---------------------------------------------------------------------*/
ibmphp_hpc_readslot(struct slot * pslot,u8 cmd,u8 * pstatus)522 int ibmphp_hpc_readslot(struct slot *pslot, u8 cmd, u8 *pstatus)
523 {
524 void __iomem *wpg_bbar = NULL;
525 struct controller *ctlr_ptr;
526 u8 index, status;
527 int rc = 0;
528 int busindex;
529
530 debug_polling("%s - Entry pslot[%p] cmd[%x] pstatus[%p]\n", __func__, pslot, cmd, pstatus);
531
532 if ((pslot == NULL)
533 || ((pstatus == NULL) && (cmd != READ_ALLSTAT) && (cmd != READ_BUSSTATUS))) {
534 rc = -EINVAL;
535 err("%s - Error invalid pointer, rc[%d]\n", __func__, rc);
536 return rc;
537 }
538
539 if (cmd == READ_BUSSTATUS) {
540 busindex = ibmphp_get_bus_index(pslot->bus);
541 if (busindex < 0) {
542 rc = -EINVAL;
543 err("%s - Exit Error:invalid bus, rc[%d]\n", __func__, rc);
544 return rc;
545 } else
546 index = (u8) busindex;
547 } else
548 index = pslot->ctlr_index;
549
550 index = hpc_readcmdtoindex(cmd, index);
551
552 if (index == HPC_ERROR) {
553 rc = -EINVAL;
554 err("%s - Exit Error:invalid index, rc[%d]\n", __func__, rc);
555 return rc;
556 }
557
558 ctlr_ptr = pslot->ctrl;
559
560 get_hpc_access();
561
562 //--------------------------------------------------------------------
563 // map physical address to logical address
564 //--------------------------------------------------------------------
565 if ((ctlr_ptr->ctlr_type == 2) || (ctlr_ptr->ctlr_type == 4))
566 wpg_bbar = ioremap(ctlr_ptr->u.wpeg_ctlr.wpegbbar, WPG_I2C_IOREMAP_SIZE);
567
568 //--------------------------------------------------------------------
569 // check controller status before reading
570 //--------------------------------------------------------------------
571 rc = hpc_wait_ctlr_notworking(HPC_CTLR_WORKING_TOUT, ctlr_ptr, wpg_bbar, &status);
572 if (!rc) {
573 switch (cmd) {
574 case READ_ALLSTAT:
575 // update the slot structure
576 pslot->ctrl->status = status;
577 pslot->status = ctrl_read(ctlr_ptr, wpg_bbar, index);
578 rc = hpc_wait_ctlr_notworking(HPC_CTLR_WORKING_TOUT, ctlr_ptr, wpg_bbar,
579 &status);
580 if (!rc)
581 pslot->ext_status = ctrl_read(ctlr_ptr, wpg_bbar, index + WPG_1ST_EXTSLOT_INDEX);
582
583 break;
584
585 case READ_SLOTSTATUS:
586 // DO NOT update the slot structure
587 *pstatus = ctrl_read(ctlr_ptr, wpg_bbar, index);
588 break;
589
590 case READ_EXTSLOTSTATUS:
591 // DO NOT update the slot structure
592 *pstatus = ctrl_read(ctlr_ptr, wpg_bbar, index);
593 break;
594
595 case READ_CTLRSTATUS:
596 // DO NOT update the slot structure
597 *pstatus = status;
598 break;
599
600 case READ_BUSSTATUS:
601 pslot->busstatus = ctrl_read(ctlr_ptr, wpg_bbar, index);
602 break;
603 case READ_REVLEVEL:
604 *pstatus = ctrl_read(ctlr_ptr, wpg_bbar, index);
605 break;
606 case READ_HPCOPTIONS:
607 *pstatus = ctrl_read(ctlr_ptr, wpg_bbar, index);
608 break;
609 case READ_SLOTLATCHLOWREG:
610 // DO NOT update the slot structure
611 *pstatus = ctrl_read(ctlr_ptr, wpg_bbar, index);
612 break;
613
614 // Not used
615 case READ_ALLSLOT:
616 list_for_each_entry(pslot, &ibmphp_slot_head,
617 ibm_slot_list) {
618 index = pslot->ctlr_index;
619 rc = hpc_wait_ctlr_notworking(HPC_CTLR_WORKING_TOUT, ctlr_ptr,
620 wpg_bbar, &status);
621 if (!rc) {
622 pslot->status = ctrl_read(ctlr_ptr, wpg_bbar, index);
623 rc = hpc_wait_ctlr_notworking(HPC_CTLR_WORKING_TOUT,
624 ctlr_ptr, wpg_bbar, &status);
625 if (!rc)
626 pslot->ext_status =
627 ctrl_read(ctlr_ptr, wpg_bbar,
628 index + WPG_1ST_EXTSLOT_INDEX);
629 } else {
630 err("%s - Error ctrl_read failed\n", __func__);
631 rc = -EINVAL;
632 break;
633 }
634 }
635 break;
636 default:
637 rc = -EINVAL;
638 break;
639 }
640 }
641 //--------------------------------------------------------------------
642 // cleanup
643 //--------------------------------------------------------------------
644
645 // remove physical to logical address mapping
646 if ((ctlr_ptr->ctlr_type == 2) || (ctlr_ptr->ctlr_type == 4))
647 iounmap(wpg_bbar);
648
649 free_hpc_access();
650
651 debug_polling("%s - Exit rc[%d]\n", __func__, rc);
652 return rc;
653 }
654
655 /*----------------------------------------------------------------------
656 * Name: ibmphp_hpc_writeslot()
657 *
658 * Action: issue a WRITE command to HPC
659 *---------------------------------------------------------------------*/
ibmphp_hpc_writeslot(struct slot * pslot,u8 cmd)660 int ibmphp_hpc_writeslot(struct slot *pslot, u8 cmd)
661 {
662 void __iomem *wpg_bbar = NULL;
663 struct controller *ctlr_ptr;
664 u8 index, status;
665 int busindex;
666 u8 done;
667 int rc = 0;
668 int timeout;
669
670 debug_polling("%s - Entry pslot[%p] cmd[%x]\n", __func__, pslot, cmd);
671 if (pslot == NULL) {
672 rc = -EINVAL;
673 err("%s - Error Exit rc[%d]\n", __func__, rc);
674 return rc;
675 }
676
677 if ((cmd == HPC_BUS_33CONVMODE) || (cmd == HPC_BUS_66CONVMODE) ||
678 (cmd == HPC_BUS_66PCIXMODE) || (cmd == HPC_BUS_100PCIXMODE) ||
679 (cmd == HPC_BUS_133PCIXMODE)) {
680 busindex = ibmphp_get_bus_index(pslot->bus);
681 if (busindex < 0) {
682 rc = -EINVAL;
683 err("%s - Exit Error:invalid bus, rc[%d]\n", __func__, rc);
684 return rc;
685 } else
686 index = (u8) busindex;
687 } else
688 index = pslot->ctlr_index;
689
690 index = hpc_writecmdtoindex(cmd, index);
691
692 if (index == HPC_ERROR) {
693 rc = -EINVAL;
694 err("%s - Error Exit rc[%d]\n", __func__, rc);
695 return rc;
696 }
697
698 ctlr_ptr = pslot->ctrl;
699
700 get_hpc_access();
701
702 //--------------------------------------------------------------------
703 // map physical address to logical address
704 //--------------------------------------------------------------------
705 if ((ctlr_ptr->ctlr_type == 2) || (ctlr_ptr->ctlr_type == 4)) {
706 wpg_bbar = ioremap(ctlr_ptr->u.wpeg_ctlr.wpegbbar, WPG_I2C_IOREMAP_SIZE);
707
708 debug("%s - ctlr id[%x] physical[%lx] logical[%lx] i2c[%x]\n", __func__,
709 ctlr_ptr->ctlr_id, (ulong) (ctlr_ptr->u.wpeg_ctlr.wpegbbar), (ulong) wpg_bbar,
710 ctlr_ptr->u.wpeg_ctlr.i2c_addr);
711 }
712 //--------------------------------------------------------------------
713 // check controller status before writing
714 //--------------------------------------------------------------------
715 rc = hpc_wait_ctlr_notworking(HPC_CTLR_WORKING_TOUT, ctlr_ptr, wpg_bbar, &status);
716 if (!rc) {
717
718 ctrl_write(ctlr_ptr, wpg_bbar, index, cmd);
719
720 //--------------------------------------------------------------------
721 // check controller is still not working on the command
722 //--------------------------------------------------------------------
723 timeout = CMD_COMPLETE_TOUT_SEC;
724 done = 0;
725 while (!done) {
726 rc = hpc_wait_ctlr_notworking(HPC_CTLR_WORKING_TOUT, ctlr_ptr, wpg_bbar,
727 &status);
728 if (!rc) {
729 if (NEEDTOCHECK_CMDSTATUS(cmd)) {
730 if (CTLR_FINISHED(status) == HPC_CTLR_FINISHED_YES)
731 done = 1;
732 } else
733 done = 1;
734 }
735 if (!done) {
736 msleep(1000);
737 if (timeout < 1) {
738 done = 1;
739 err("%s - Error command complete timeout\n", __func__);
740 rc = -EFAULT;
741 } else
742 timeout--;
743 }
744 }
745 ctlr_ptr->status = status;
746 }
747 // cleanup
748
749 // remove physical to logical address mapping
750 if ((ctlr_ptr->ctlr_type == 2) || (ctlr_ptr->ctlr_type == 4))
751 iounmap(wpg_bbar);
752 free_hpc_access();
753
754 debug_polling("%s - Exit rc[%d]\n", __func__, rc);
755 return rc;
756 }
757
758 /*----------------------------------------------------------------------
759 * Name: get_hpc_access()
760 *
761 * Action: make sure only one process can access HPC at one time
762 *---------------------------------------------------------------------*/
get_hpc_access(void)763 static void get_hpc_access(void)
764 {
765 mutex_lock(&sem_hpcaccess);
766 }
767
768 /*----------------------------------------------------------------------
769 * Name: free_hpc_access()
770 *---------------------------------------------------------------------*/
free_hpc_access(void)771 void free_hpc_access(void)
772 {
773 mutex_unlock(&sem_hpcaccess);
774 }
775
776 /*----------------------------------------------------------------------
777 * Name: ibmphp_lock_operations()
778 *
779 * Action: make sure only one process can change the data structure
780 *---------------------------------------------------------------------*/
ibmphp_lock_operations(void)781 void ibmphp_lock_operations(void)
782 {
783 down(&semOperations);
784 to_debug = 1;
785 }
786
787 /*----------------------------------------------------------------------
788 * Name: ibmphp_unlock_operations()
789 *---------------------------------------------------------------------*/
ibmphp_unlock_operations(void)790 void ibmphp_unlock_operations(void)
791 {
792 debug("%s - Entry\n", __func__);
793 up(&semOperations);
794 to_debug = 0;
795 debug("%s - Exit\n", __func__);
796 }
797
798 /*----------------------------------------------------------------------
799 * Name: poll_hpc()
800 *---------------------------------------------------------------------*/
801 #define POLL_LATCH_REGISTER 0
802 #define POLL_SLOTS 1
803 #define POLL_SLEEP 2
poll_hpc(void * data)804 static int poll_hpc(void *data)
805 {
806 struct slot myslot;
807 struct slot *pslot = NULL;
808 int rc;
809 int poll_state = POLL_LATCH_REGISTER;
810 u8 oldlatchlow = 0x00;
811 u8 curlatchlow = 0x00;
812 int poll_count = 0;
813 u8 ctrl_count = 0x00;
814
815 debug("%s - Entry\n", __func__);
816
817 while (!kthread_should_stop()) {
818 /* try to get the lock to do some kind of hardware access */
819 down(&semOperations);
820
821 switch (poll_state) {
822 case POLL_LATCH_REGISTER:
823 oldlatchlow = curlatchlow;
824 ctrl_count = 0x00;
825 list_for_each_entry(pslot, &ibmphp_slot_head,
826 ibm_slot_list) {
827 if (ctrl_count >= ibmphp_get_total_controllers())
828 break;
829 if (pslot->ctrl->ctlr_relative_id == ctrl_count) {
830 ctrl_count++;
831 if (READ_SLOT_LATCH(pslot->ctrl)) {
832 rc = ibmphp_hpc_readslot(pslot,
833 READ_SLOTLATCHLOWREG,
834 &curlatchlow);
835 if (oldlatchlow != curlatchlow)
836 process_changeinlatch(oldlatchlow,
837 curlatchlow,
838 pslot->ctrl);
839 }
840 }
841 }
842 ++poll_count;
843 poll_state = POLL_SLEEP;
844 break;
845 case POLL_SLOTS:
846 list_for_each_entry(pslot, &ibmphp_slot_head,
847 ibm_slot_list) {
848 // make a copy of the old status
849 memcpy((void *) &myslot, (void *) pslot,
850 sizeof(struct slot));
851 rc = ibmphp_hpc_readslot(pslot, READ_ALLSTAT, NULL);
852 if ((myslot.status != pslot->status)
853 || (myslot.ext_status != pslot->ext_status))
854 process_changeinstatus(pslot, &myslot);
855 }
856 ctrl_count = 0x00;
857 list_for_each_entry(pslot, &ibmphp_slot_head,
858 ibm_slot_list) {
859 if (ctrl_count >= ibmphp_get_total_controllers())
860 break;
861 if (pslot->ctrl->ctlr_relative_id == ctrl_count) {
862 ctrl_count++;
863 if (READ_SLOT_LATCH(pslot->ctrl))
864 rc = ibmphp_hpc_readslot(pslot,
865 READ_SLOTLATCHLOWREG,
866 &curlatchlow);
867 }
868 }
869 ++poll_count;
870 poll_state = POLL_SLEEP;
871 break;
872 case POLL_SLEEP:
873 /* don't sleep with a lock on the hardware */
874 up(&semOperations);
875 msleep(POLL_INTERVAL_SEC * 1000);
876
877 if (kthread_should_stop())
878 goto out_sleep;
879
880 down(&semOperations);
881
882 if (poll_count >= POLL_LATCH_CNT) {
883 poll_count = 0;
884 poll_state = POLL_SLOTS;
885 } else
886 poll_state = POLL_LATCH_REGISTER;
887 break;
888 }
889 /* give up the hardware semaphore */
890 up(&semOperations);
891 /* sleep for a short time just for good measure */
892 out_sleep:
893 msleep(100);
894 }
895 up(&sem_exit);
896 debug("%s - Exit\n", __func__);
897 return 0;
898 }
899
900
901 /*----------------------------------------------------------------------
902 * Name: process_changeinstatus
903 *
904 * Action: compare old and new slot status, process the change in status
905 *
906 * Input: pointer to slot struct, old slot struct
907 *
908 * Return 0 or error codes
909 * Value:
910 *
911 * Side
912 * Effects: None.
913 *
914 * Notes:
915 *---------------------------------------------------------------------*/
process_changeinstatus(struct slot * pslot,struct slot * poldslot)916 static int process_changeinstatus(struct slot *pslot, struct slot *poldslot)
917 {
918 u8 status;
919 int rc = 0;
920 u8 disable = 0;
921 u8 update = 0;
922
923 debug("process_changeinstatus - Entry pslot[%p], poldslot[%p]\n", pslot, poldslot);
924
925 // bit 0 - HPC_SLOT_POWER
926 if ((pslot->status & 0x01) != (poldslot->status & 0x01))
927 update = 1;
928
929 // bit 1 - HPC_SLOT_CONNECT
930 // ignore
931
932 // bit 2 - HPC_SLOT_ATTN
933 if ((pslot->status & 0x04) != (poldslot->status & 0x04))
934 update = 1;
935
936 // bit 3 - HPC_SLOT_PRSNT2
937 // bit 4 - HPC_SLOT_PRSNT1
938 if (((pslot->status & 0x08) != (poldslot->status & 0x08))
939 || ((pslot->status & 0x10) != (poldslot->status & 0x10)))
940 update = 1;
941
942 // bit 5 - HPC_SLOT_PWRGD
943 if ((pslot->status & 0x20) != (poldslot->status & 0x20))
944 // OFF -> ON: ignore, ON -> OFF: disable slot
945 if ((poldslot->status & 0x20) && (SLOT_CONNECT(poldslot->status) == HPC_SLOT_CONNECTED) && (SLOT_PRESENT(poldslot->status)))
946 disable = 1;
947
948 // bit 6 - HPC_SLOT_BUS_SPEED
949 // ignore
950
951 // bit 7 - HPC_SLOT_LATCH
952 if ((pslot->status & 0x80) != (poldslot->status & 0x80)) {
953 update = 1;
954 // OPEN -> CLOSE
955 if (pslot->status & 0x80) {
956 if (SLOT_PWRGD(pslot->status)) {
957 // power goes on and off after closing latch
958 // check again to make sure power is still ON
959 msleep(1000);
960 rc = ibmphp_hpc_readslot(pslot, READ_SLOTSTATUS, &status);
961 if (SLOT_PWRGD(status))
962 update = 1;
963 else // overwrite power in pslot to OFF
964 pslot->status &= ~HPC_SLOT_POWER;
965 }
966 }
967 // CLOSE -> OPEN
968 else if ((SLOT_PWRGD(poldslot->status) == HPC_SLOT_PWRGD_GOOD)
969 && (SLOT_CONNECT(poldslot->status) == HPC_SLOT_CONNECTED) && (SLOT_PRESENT(poldslot->status))) {
970 disable = 1;
971 }
972 // else - ignore
973 }
974 // bit 4 - HPC_SLOT_BLINK_ATTN
975 if ((pslot->ext_status & 0x08) != (poldslot->ext_status & 0x08))
976 update = 1;
977
978 if (disable) {
979 debug("process_changeinstatus - disable slot\n");
980 pslot->flag = 0;
981 rc = ibmphp_do_disable_slot(pslot);
982 }
983
984 if (update || disable)
985 ibmphp_update_slot_info(pslot);
986
987 debug("%s - Exit rc[%d] disable[%x] update[%x]\n", __func__, rc, disable, update);
988
989 return rc;
990 }
991
992 /*----------------------------------------------------------------------
993 * Name: process_changeinlatch
994 *
995 * Action: compare old and new latch reg status, process the change
996 *
997 * Input: old and current latch register status
998 *
999 * Return 0 or error codes
1000 * Value:
1001 *---------------------------------------------------------------------*/
process_changeinlatch(u8 old,u8 new,struct controller * ctrl)1002 static int process_changeinlatch(u8 old, u8 new, struct controller *ctrl)
1003 {
1004 struct slot myslot, *pslot;
1005 u8 i;
1006 u8 mask;
1007 int rc = 0;
1008
1009 debug("%s - Entry old[%x], new[%x]\n", __func__, old, new);
1010 // bit 0 reserved, 0 is LSB, check bit 1-6 for 6 slots
1011
1012 for (i = ctrl->starting_slot_num; i <= ctrl->ending_slot_num; i++) {
1013 mask = 0x01 << i;
1014 if ((mask & old) != (mask & new)) {
1015 pslot = ibmphp_get_slot_from_physical_num(i);
1016 if (pslot) {
1017 memcpy((void *) &myslot, (void *) pslot, sizeof(struct slot));
1018 rc = ibmphp_hpc_readslot(pslot, READ_ALLSTAT, NULL);
1019 debug("%s - call process_changeinstatus for slot[%d]\n", __func__, i);
1020 process_changeinstatus(pslot, &myslot);
1021 } else {
1022 rc = -EINVAL;
1023 err("%s - Error bad pointer for slot[%d]\n", __func__, i);
1024 }
1025 }
1026 }
1027 debug("%s - Exit rc[%d]\n", __func__, rc);
1028 return rc;
1029 }
1030
1031 /*----------------------------------------------------------------------
1032 * Name: ibmphp_hpc_start_poll_thread
1033 *
1034 * Action: start polling thread
1035 *---------------------------------------------------------------------*/
ibmphp_hpc_start_poll_thread(void)1036 int __init ibmphp_hpc_start_poll_thread(void)
1037 {
1038 debug("%s - Entry\n", __func__);
1039
1040 ibmphp_poll_thread = kthread_run(poll_hpc, NULL, "hpc_poll");
1041 if (IS_ERR(ibmphp_poll_thread)) {
1042 err("%s - Error, thread not started\n", __func__);
1043 return PTR_ERR(ibmphp_poll_thread);
1044 }
1045 return 0;
1046 }
1047
1048 /*----------------------------------------------------------------------
1049 * Name: ibmphp_hpc_stop_poll_thread
1050 *
1051 * Action: stop polling thread and cleanup
1052 *---------------------------------------------------------------------*/
ibmphp_hpc_stop_poll_thread(void)1053 void __exit ibmphp_hpc_stop_poll_thread(void)
1054 {
1055 debug("%s - Entry\n", __func__);
1056
1057 kthread_stop(ibmphp_poll_thread);
1058 debug("before locking operations\n");
1059 ibmphp_lock_operations();
1060 debug("after locking operations\n");
1061
1062 // wait for poll thread to exit
1063 debug("before sem_exit down\n");
1064 down(&sem_exit);
1065 debug("after sem_exit down\n");
1066
1067 // cleanup
1068 debug("before free_hpc_access\n");
1069 free_hpc_access();
1070 debug("after free_hpc_access\n");
1071 ibmphp_unlock_operations();
1072 debug("after unlock operations\n");
1073 up(&sem_exit);
1074 debug("after sem exit up\n");
1075
1076 debug("%s - Exit\n", __func__);
1077 }
1078
1079 /*----------------------------------------------------------------------
1080 * Name: hpc_wait_ctlr_notworking
1081 *
1082 * Action: wait until the controller is in a not working state
1083 *
1084 * Return 0, HPC_ERROR
1085 * Value:
1086 *---------------------------------------------------------------------*/
hpc_wait_ctlr_notworking(int timeout,struct controller * ctlr_ptr,void __iomem * wpg_bbar,u8 * pstatus)1087 static int hpc_wait_ctlr_notworking(int timeout, struct controller *ctlr_ptr, void __iomem *wpg_bbar,
1088 u8 *pstatus)
1089 {
1090 int rc = 0;
1091 u8 done = 0;
1092
1093 debug_polling("hpc_wait_ctlr_notworking - Entry timeout[%d]\n", timeout);
1094
1095 while (!done) {
1096 *pstatus = ctrl_read(ctlr_ptr, wpg_bbar, WPG_CTLR_INDEX);
1097 if (*pstatus == HPC_ERROR) {
1098 rc = HPC_ERROR;
1099 done = 1;
1100 }
1101 if (CTLR_WORKING(*pstatus) == HPC_CTLR_WORKING_NO)
1102 done = 1;
1103 if (!done) {
1104 msleep(1000);
1105 if (timeout < 1) {
1106 done = 1;
1107 err("HPCreadslot - Error ctlr timeout\n");
1108 rc = HPC_ERROR;
1109 } else
1110 timeout--;
1111 }
1112 }
1113 debug_polling("hpc_wait_ctlr_notworking - Exit rc[%x] status[%x]\n", rc, *pstatus);
1114 return rc;
1115 }
1116