2 * This file is subject to the terms and conditions of the GNU General Public
3 * License. See the file "COPYING" in the main directory of this archive
6 * Copyright (c) 2005 Silicon Graphics, Inc. All rights reserved.
9 #include <linux/module.h>
10 #include <linux/kernel.h>
11 #include <linux/slab.h>
12 #include <linux/spinlock.h>
13 #include <linux/proc_fs.h>
14 #include <linux/capability.h>
15 #include <linux/device.h>
16 #include <linux/delay.h>
17 #include <asm/system.h>
18 #include <asm/uaccess.h>
19 #include <asm/sn/sn_sal.h>
20 #include <asm/sn/addrs.h>
21 #include <asm/sn/io.h>
22 #include <asm/sn/types.h>
23 #include <asm/sn/shubio.h>
24 #include <asm/sn/tiocx.h>
25 #include <asm/sn/l1.h>
26 #include <asm/sn/module.h>
28 #include "xtalk/xwidgetdev.h"
29 #include "xtalk/hubdev.h"
32 #define DEVICE_NAME "tiocx"
37 #define DBG(fmt...) printk(KERN_ALERT fmt)
42 struct device_attribute dev_attr_cxdev_control;
45 * tiocx_match - Try to match driver id list with device.
46 * @dev: device pointer
47 * @drv: driver pointer
49 * Returns 1 if match, 0 otherwise.
51 static int tiocx_match(struct device *dev, struct device_driver *drv)
53 struct cx_dev *cx_dev = to_cx_dev(dev);
54 struct cx_drv *cx_drv = to_cx_driver(drv);
55 const struct cx_device_id *ids = cx_drv->id_table;
60 while (ids->part_num) {
61 if (ids->part_num == cx_dev->cx_id.part_num)
69 static int tiocx_uevent(struct device *dev, struct kobj_uevent_env *env)
74 static void tiocx_bus_release(struct device *dev)
76 kfree(to_cx_dev(dev));
80 * cx_device_match - Find cx_device in the id table.
81 * @ids: id table from driver
82 * @cx_device: part/mfg id for the device
85 static const struct cx_device_id *cx_device_match(const struct cx_device_id
87 struct cx_dev *cx_device)
90 * NOTES: We may want to check for CX_ANY_ID too.
91 * Do we want to match against nasid too?
92 * CX_DEV_NONE == 0, if the driver tries to register for
93 * part/mfg == 0 we should return no-match (NULL) here.
95 while (ids->part_num && ids->mfg_num) {
96 if (ids->part_num == cx_device->cx_id.part_num &&
97 ids->mfg_num == cx_device->cx_id.mfg_num)
106 * cx_device_probe - Look for matching device.
107 * Call driver probe routine if found.
108 * @cx_driver: driver table (cx_drv struct) from driver
109 * @cx_device: part/mfg id for the device
111 static int cx_device_probe(struct device *dev)
113 const struct cx_device_id *id;
114 struct cx_drv *cx_drv = to_cx_driver(dev->driver);
115 struct cx_dev *cx_dev = to_cx_dev(dev);
118 if (!cx_dev->driver && cx_drv->probe) {
119 id = cx_device_match(cx_drv->id_table, cx_dev);
121 if ((error = cx_drv->probe(cx_dev, id)) < 0)
124 cx_dev->driver = cx_drv;
132 * cx_driver_remove - Remove driver from device struct.
135 static int cx_driver_remove(struct device *dev)
137 struct cx_dev *cx_dev = to_cx_dev(dev);
138 struct cx_drv *cx_drv = cx_dev->driver;
140 cx_drv->remove(cx_dev);
141 cx_dev->driver = NULL;
145 struct bus_type tiocx_bus_type = {
147 .match = tiocx_match,
148 .uevent = tiocx_uevent,
149 .probe = cx_device_probe,
150 .remove = cx_driver_remove,
154 * cx_driver_register - Register the driver.
155 * @cx_driver: driver table (cx_drv struct) from driver
157 * Called from the driver init routine to register a driver.
158 * The cx_drv struct contains the driver name, a pointer to
159 * a table of part/mfg numbers and a pointer to the driver's
160 * probe/attach routine.
162 int cx_driver_register(struct cx_drv *cx_driver)
164 cx_driver->driver.name = cx_driver->name;
165 cx_driver->driver.bus = &tiocx_bus_type;
167 return driver_register(&cx_driver->driver);
171 * cx_driver_unregister - Unregister the driver.
172 * @cx_driver: driver table (cx_drv struct) from driver
174 int cx_driver_unregister(struct cx_drv *cx_driver)
176 driver_unregister(&cx_driver->driver);
181 * cx_device_register - Register a device.
182 * @nasid: device's nasid
183 * @part_num: device's part number
184 * @mfg_num: device's manufacturer number
185 * @hubdev: hub info associated with this device
186 * @bt: board type of the device
190 cx_device_register(nasid_t nasid, int part_num, int mfg_num,
191 struct hubdev_info *hubdev, int bt)
193 struct cx_dev *cx_dev;
196 cx_dev = kzalloc(sizeof(struct cx_dev), GFP_KERNEL);
197 DBG("cx_dev= 0x%p\n", cx_dev);
201 cx_dev->cx_id.part_num = part_num;
202 cx_dev->cx_id.mfg_num = mfg_num;
203 cx_dev->cx_id.nasid = nasid;
204 cx_dev->hubdev = hubdev;
207 cx_dev->dev.parent = NULL;
208 cx_dev->dev.bus = &tiocx_bus_type;
209 cx_dev->dev.release = tiocx_bus_release;
210 dev_set_name(&cx_dev->dev, "%d", cx_dev->cx_id.nasid);
211 r = device_register(&cx_dev->dev);
216 get_device(&cx_dev->dev);
218 device_create_file(&cx_dev->dev, &dev_attr_cxdev_control);
224 * cx_device_unregister - Unregister a device.
225 * @cx_dev: part/mfg id for the device
227 int cx_device_unregister(struct cx_dev *cx_dev)
229 put_device(&cx_dev->dev);
230 device_unregister(&cx_dev->dev);
235 * cx_device_reload - Reload the device.
236 * @nasid: device's nasid
237 * @part_num: device's part number
238 * @mfg_num: device's manufacturer number
240 * Remove the device associated with 'nasid' from device list and then
241 * call device-register with the given part/mfg numbers.
243 static int cx_device_reload(struct cx_dev *cx_dev)
245 cx_device_unregister(cx_dev);
246 return cx_device_register(cx_dev->cx_id.nasid, cx_dev->cx_id.part_num,
247 cx_dev->cx_id.mfg_num, cx_dev->hubdev,
251 static inline u64 tiocx_intr_alloc(nasid_t nasid, int widget,
253 int req_irq, nasid_t req_nasid,
256 struct ia64_sal_retval rv;
260 ia64_sal_oemcall_nolock(&rv, SN_SAL_IOIF_INTERRUPT,
261 SAL_INTR_ALLOC, nasid,
262 widget, sn_irq_info, req_irq,
263 req_nasid, req_slice);
267 static inline void tiocx_intr_free(nasid_t nasid, int widget,
268 struct sn_irq_info *sn_irq_info)
270 struct ia64_sal_retval rv;
274 ia64_sal_oemcall_nolock(&rv, SN_SAL_IOIF_INTERRUPT,
275 SAL_INTR_FREE, nasid,
276 widget, sn_irq_info->irq_irq,
277 sn_irq_info->irq_cookie, 0, 0);
280 struct sn_irq_info *tiocx_irq_alloc(nasid_t nasid, int widget, int irq,
281 nasid_t req_nasid, int slice)
283 struct sn_irq_info *sn_irq_info;
285 int sn_irq_size = sizeof(struct sn_irq_info);
287 if ((nasid & 1) == 0)
290 sn_irq_info = kzalloc(sn_irq_size, GFP_KERNEL);
291 if (sn_irq_info == NULL)
294 status = tiocx_intr_alloc(nasid, widget, __pa(sn_irq_info), irq,
304 void tiocx_irq_free(struct sn_irq_info *sn_irq_info)
306 u64 bridge = (u64) sn_irq_info->irq_bridge;
307 nasid_t nasid = NASID_GET(bridge);
311 widget = TIO_SWIN_WIDGETNUM(bridge);
312 tiocx_intr_free(nasid, widget, sn_irq_info);
317 u64 tiocx_dma_addr(u64 addr)
319 return PHYS_TO_TIODMA(addr);
322 u64 tiocx_swin_base(int nasid)
324 return TIO_SWIN_BASE(nasid, TIOCX_CORELET);
327 EXPORT_SYMBOL(cx_driver_register);
328 EXPORT_SYMBOL(cx_driver_unregister);
329 EXPORT_SYMBOL(cx_device_register);
330 EXPORT_SYMBOL(cx_device_unregister);
331 EXPORT_SYMBOL(tiocx_irq_alloc);
332 EXPORT_SYMBOL(tiocx_irq_free);
333 EXPORT_SYMBOL(tiocx_bus_type);
334 EXPORT_SYMBOL(tiocx_dma_addr);
335 EXPORT_SYMBOL(tiocx_swin_base);
337 static void tio_conveyor_set(nasid_t nasid, int enable_flag)
340 u64 disable_cb = (1ull << 61);
345 ice_frz = REMOTE_HUB_L(nasid, TIO_ICE_FRZ_CFG);
347 if (!(ice_frz & disable_cb)) /* already enabled */
349 ice_frz &= ~disable_cb;
351 if (ice_frz & disable_cb) /* already disabled */
353 ice_frz |= disable_cb;
355 DBG(KERN_ALERT "TIO_ICE_FRZ_CFG= 0x%lx\n", ice_frz);
356 REMOTE_HUB_S(nasid, TIO_ICE_FRZ_CFG, ice_frz);
359 #define tio_conveyor_enable(nasid) tio_conveyor_set(nasid, 1)
360 #define tio_conveyor_disable(nasid) tio_conveyor_set(nasid, 0)
362 static void tio_corelet_reset(nasid_t nasid, int corelet)
367 REMOTE_HUB_S(nasid, TIO_ICE_PMI_TX_CFG, 1 << corelet);
369 REMOTE_HUB_S(nasid, TIO_ICE_PMI_TX_CFG, 0);
373 static int is_fpga_tio(int nasid, int *bt)
375 u16 uninitialized_var(ioboard_type); /* GCC be quiet */
378 rc = ia64_sn_sysctl_ioboard_get(nasid, &ioboard_type);
380 printk(KERN_WARNING "ia64_sn_sysctl_ioboard_get failed: %ld\n",
385 switch (ioboard_type) {
386 case L1_BRICKTYPE_SA:
387 case L1_BRICKTYPE_ATHENA:
388 case L1_BOARDTYPE_DAYTONA:
396 static int bitstream_loaded(nasid_t nasid)
400 cx_credits = REMOTE_HUB_L(nasid, TIO_ICE_PMI_TX_DYN_CREDIT_STAT_CB3);
401 cx_credits &= TIO_ICE_PMI_TX_DYN_CREDIT_STAT_CB3_CREDIT_CNT_MASK;
402 DBG("cx_credits= 0x%lx\n", cx_credits);
404 return (cx_credits == 0xf) ? 1 : 0;
407 static int tiocx_reload(struct cx_dev *cx_dev)
409 int part_num = CX_DEV_NONE;
410 int mfg_num = CX_DEV_NONE;
411 nasid_t nasid = cx_dev->cx_id.nasid;
413 if (bitstream_loaded(nasid)) {
417 rv = ia64_sn_sysctl_tio_clock_reset(nasid);
419 printk(KERN_ALERT "CX port JTAG reset failed.\n");
421 cx_id = *(volatile u64 *)
422 (TIO_SWIN_BASE(nasid, TIOCX_CORELET) +
424 part_num = XWIDGET_PART_NUM(cx_id);
425 mfg_num = XWIDGET_MFG_NUM(cx_id);
426 DBG("part= 0x%x, mfg= 0x%x\n", part_num, mfg_num);
427 /* just ignore it if it's a CE */
428 if (part_num == TIO_CE_ASIC_PARTNUM)
433 cx_dev->cx_id.part_num = part_num;
434 cx_dev->cx_id.mfg_num = mfg_num;
437 * Delete old device and register the new one. It's ok if
438 * part_num/mfg_num == CX_DEV_NONE. We want to register
439 * devices in the table even if a bitstream isn't loaded.
440 * That allows use to see that a bitstream isn't loaded via
441 * TIOCX_IOCTL_DEV_LIST.
443 return cx_device_reload(cx_dev);
446 static ssize_t show_cxdev_control(struct device *dev, struct device_attribute *attr, char *buf)
448 struct cx_dev *cx_dev = to_cx_dev(dev);
450 return sprintf(buf, "0x%x 0x%x 0x%x 0x%x\n",
452 cx_dev->cx_id.part_num, cx_dev->cx_id.mfg_num,
456 static ssize_t store_cxdev_control(struct device *dev, struct device_attribute *attr, const char *buf,
460 struct cx_dev *cx_dev = to_cx_dev(dev);
462 if (!capable(CAP_SYS_ADMIN))
468 n = simple_strtoul(buf, NULL, 0);
472 tio_corelet_reset(cx_dev->cx_id.nasid, TIOCX_CORELET);
473 tiocx_reload(cx_dev);
476 tiocx_reload(cx_dev);
479 tio_corelet_reset(cx_dev->cx_id.nasid, TIOCX_CORELET);
488 DEVICE_ATTR(cxdev_control, 0644, show_cxdev_control, store_cxdev_control);
490 static int __init tiocx_init(void)
493 int found_tiocx_device = 0;
495 if (!ia64_platform_is("sn2"))
498 bus_register(&tiocx_bus_type);
500 for (cnodeid = 0; cnodeid < num_cnodes; cnodeid++) {
504 nasid = cnodeid_to_nasid(cnodeid);
506 if ((nasid & 0x1) && is_fpga_tio(nasid, &bt)) {
507 struct hubdev_info *hubdev;
508 struct xwidget_info *widgetp;
510 DBG("Found TIO at nasid 0x%x\n", nasid);
513 (struct hubdev_info *)(NODEPDA(cnodeid)->pdinfo);
515 widgetp = &hubdev->hdi_xwidget_info[TIOCX_CORELET];
517 /* The CE hangs off of the CX port but is not an FPGA */
518 if (widgetp->xwi_hwid.part_num == TIO_CE_ASIC_PARTNUM)
521 tio_corelet_reset(nasid, TIOCX_CORELET);
522 tio_conveyor_enable(nasid);
524 if (cx_device_register
525 (nasid, widgetp->xwi_hwid.part_num,
526 widgetp->xwi_hwid.mfg_num, hubdev, bt) < 0)
529 found_tiocx_device++;
533 /* It's ok if we find zero devices. */
534 DBG("found_tiocx_device= %d\n", found_tiocx_device);
539 static int cx_remove_device(struct device * dev, void * data)
541 struct cx_dev *cx_dev = to_cx_dev(dev);
542 device_remove_file(dev, &dev_attr_cxdev_control);
543 cx_device_unregister(cx_dev);
547 static void __exit tiocx_exit(void)
552 * Unregister devices.
554 bus_for_each_dev(&tiocx_bus_type, NULL, NULL, cx_remove_device);
555 bus_unregister(&tiocx_bus_type);
558 fs_initcall(tiocx_init);
559 module_exit(tiocx_exit);
561 /************************************************************************
562 * Module licensing and description
563 ************************************************************************/
564 MODULE_LICENSE("GPL");
565 MODULE_AUTHOR("Bruce Losure <blosure@sgi.com>");
566 MODULE_DESCRIPTION("TIOCX module");
567 MODULE_SUPPORTED_DEVICE(DEVICE_NAME);