1/*
2 * Copyright (c) 2004 Topspin Communications.  All rights reserved.
3 *
4 * This software is available to you under a choice of one of two
5 * licenses.  You may choose to be licensed under the terms of the GNU
6 * General Public License (GPL) Version 2, available from the file
7 * COPYING in the main directory of this source tree, or the
8 * OpenIB.org BSD license below:
9 *
10 *     Redistribution and use in source and binary forms, with or
11 *     without modification, are permitted provided that the following
12 *     conditions are met:
13 *
14 *      - Redistributions of source code must retain the above
15 *        copyright notice, this list of conditions and the following
16 *        disclaimer.
17 *
18 *      - Redistributions in binary form must reproduce the above
19 *        copyright notice, this list of conditions and the following
20 *        disclaimer in the documentation and/or other materials
21 *        provided with the distribution.
22 *
23 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
24 * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
25 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
26 * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
27 * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
28 * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
29 * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
30 * SOFTWARE.
31 *
32 * $Id: mthca_reset.c,v 1.1.1.1 2007/08/03 18:52:32 Exp $
33 */
34
35#include <linux/init.h>
36#include <linux/errno.h>
37#include <linux/pci.h>
38#include <linux/delay.h>
39#include <linux/slab.h>
40
41#include "mthca_dev.h"
42#include "mthca_cmd.h"
43
44int mthca_reset(struct mthca_dev *mdev)
45{
46	int i;
47	int err = 0;
48	u32 *hca_header    = NULL;
49	u32 *bridge_header = NULL;
50	struct pci_dev *bridge = NULL;
51	int bridge_pcix_cap = 0;
52	int hca_pcie_cap = 0;
53	int hca_pcix_cap = 0;
54
55	u16 devctl;
56	u16 linkctl;
57
58#define MTHCA_RESET_OFFSET 0xf0010
59#define MTHCA_RESET_VALUE  swab32(1)
60
61	/*
62	 * Reset the chip.  This is somewhat ugly because we have to
63	 * save off the PCI header before reset and then restore it
64	 * after the chip reboots.  We skip config space offsets 22
65	 * and 23 since those have a special meaning.
66	 *
67	 * To make matters worse, for Tavor (PCI-X HCA) we have to
68	 * find the associated bridge device and save off its PCI
69	 * header as well.
70	 */
71
72	if (!(mdev->mthca_flags & MTHCA_FLAG_PCIE)) {
73		/* Look for the bridge -- its device ID will be 2 more
74		   than HCA's device ID. */
75		while ((bridge = pci_get_device(mdev->pdev->vendor,
76						mdev->pdev->device + 2,
77						bridge)) != NULL) {
78			if (bridge->hdr_type    == PCI_HEADER_TYPE_BRIDGE &&
79			    bridge->subordinate == mdev->pdev->bus) {
80				mthca_dbg(mdev, "Found bridge: %s\n",
81					  pci_name(bridge));
82				break;
83			}
84		}
85
86		if (!bridge) {
87			/*
88			 * Didn't find a bridge for a Tavor device --
89			 * assume we're in no-bridge mode and hope for
90			 * the best.
91			 */
92			mthca_warn(mdev, "No bridge found for %s\n",
93				  pci_name(mdev->pdev));
94		}
95
96	}
97
98	/* For Arbel do we need to save off the full 4K PCI Express header?? */
99	hca_header = kmalloc(256, GFP_KERNEL);
100	if (!hca_header) {
101		err = -ENOMEM;
102		mthca_err(mdev, "Couldn't allocate memory to save HCA "
103			  "PCI header, aborting.\n");
104		goto out;
105	}
106
107	for (i = 0; i < 64; ++i) {
108		if (i == 22 || i == 23)
109			continue;
110		if (pci_read_config_dword(mdev->pdev, i * 4, hca_header + i)) {
111			err = -ENODEV;
112			mthca_err(mdev, "Couldn't save HCA "
113				  "PCI header, aborting.\n");
114			goto out;
115		}
116	}
117
118	hca_pcix_cap = pci_find_capability(mdev->pdev, PCI_CAP_ID_PCIX);
119	hca_pcie_cap = pci_find_capability(mdev->pdev, PCI_CAP_ID_EXP);
120
121	if (bridge) {
122		bridge_header = kmalloc(256, GFP_KERNEL);
123		if (!bridge_header) {
124			err = -ENOMEM;
125			mthca_err(mdev, "Couldn't allocate memory to save HCA "
126				  "bridge PCI header, aborting.\n");
127			goto out;
128		}
129
130		for (i = 0; i < 64; ++i) {
131			if (i == 22 || i == 23)
132				continue;
133			if (pci_read_config_dword(bridge, i * 4, bridge_header + i)) {
134				err = -ENODEV;
135				mthca_err(mdev, "Couldn't save HCA bridge "
136					  "PCI header, aborting.\n");
137				goto out;
138			}
139		}
140		bridge_pcix_cap = pci_find_capability(bridge, PCI_CAP_ID_PCIX);
141		if (!bridge_pcix_cap) {
142				err = -ENODEV;
143				mthca_err(mdev, "Couldn't locate HCA bridge "
144					  "PCI-X capability, aborting.\n");
145				goto out;
146		}
147	}
148
149	/* actually hit reset */
150	{
151		void __iomem *reset = ioremap(pci_resource_start(mdev->pdev, 0) +
152					      MTHCA_RESET_OFFSET, 4);
153
154		if (!reset) {
155			err = -ENOMEM;
156			mthca_err(mdev, "Couldn't map HCA reset register, "
157				  "aborting.\n");
158			goto out;
159		}
160
161		writel(MTHCA_RESET_VALUE, reset);
162		iounmap(reset);
163	}
164
165	/* Docs say to wait one second before accessing device */
166	msleep(1000);
167
168	/* Now wait for PCI device to start responding again */
169	{
170		u32 v;
171		int c = 0;
172
173		for (c = 0; c < 100; ++c) {
174			if (pci_read_config_dword(bridge ? bridge : mdev->pdev, 0, &v)) {
175				err = -ENODEV;
176				mthca_err(mdev, "Couldn't access HCA after reset, "
177					  "aborting.\n");
178				goto out;
179			}
180
181			if (v != 0xffffffff)
182				goto good;
183
184			msleep(100);
185		}
186
187		err = -ENODEV;
188		mthca_err(mdev, "PCI device did not come back after reset, "
189			  "aborting.\n");
190		goto out;
191	}
192
193good:
194	/* Now restore the PCI headers */
195	if (bridge) {
196		if (pci_write_config_dword(bridge, bridge_pcix_cap + 0x8,
197				 bridge_header[(bridge_pcix_cap + 0x8) / 4])) {
198			err = -ENODEV;
199			mthca_err(mdev, "Couldn't restore HCA bridge Upstream "
200				  "split transaction control, aborting.\n");
201			goto out;
202		}
203		if (pci_write_config_dword(bridge, bridge_pcix_cap + 0xc,
204				 bridge_header[(bridge_pcix_cap + 0xc) / 4])) {
205			err = -ENODEV;
206			mthca_err(mdev, "Couldn't restore HCA bridge Downstream "
207				  "split transaction control, aborting.\n");
208			goto out;
209		}
210		/*
211		 * Bridge control register is at 0x3e, so we'll
212		 * naturally restore it last in this loop.
213		 */
214		for (i = 0; i < 16; ++i) {
215			if (i * 4 == PCI_COMMAND)
216				continue;
217
218			if (pci_write_config_dword(bridge, i * 4, bridge_header[i])) {
219				err = -ENODEV;
220				mthca_err(mdev, "Couldn't restore HCA bridge reg %x, "
221					  "aborting.\n", i);
222				goto out;
223			}
224		}
225
226		if (pci_write_config_dword(bridge, PCI_COMMAND,
227					   bridge_header[PCI_COMMAND / 4])) {
228			err = -ENODEV;
229			mthca_err(mdev, "Couldn't restore HCA bridge COMMAND, "
230				  "aborting.\n");
231			goto out;
232		}
233	}
234
235	if (hca_pcix_cap) {
236		if (pci_write_config_dword(mdev->pdev, hca_pcix_cap,
237				 hca_header[hca_pcix_cap / 4])) {
238			err = -ENODEV;
239			mthca_err(mdev, "Couldn't restore HCA PCI-X "
240				  "command register, aborting.\n");
241			goto out;
242		}
243	}
244
245	if (hca_pcie_cap) {
246		devctl = hca_header[(hca_pcie_cap + PCI_EXP_DEVCTL) / 4];
247		if (pci_write_config_word(mdev->pdev, hca_pcie_cap + PCI_EXP_DEVCTL,
248					   devctl)) {
249			err = -ENODEV;
250			mthca_err(mdev, "Couldn't restore HCA PCI Express "
251				  "Device Control register, aborting.\n");
252			goto out;
253		}
254		linkctl = hca_header[(hca_pcie_cap + PCI_EXP_LNKCTL) / 4];
255		if (pci_write_config_word(mdev->pdev, hca_pcie_cap + PCI_EXP_LNKCTL,
256					   linkctl)) {
257			err = -ENODEV;
258			mthca_err(mdev, "Couldn't restore HCA PCI Express "
259				  "Link control register, aborting.\n");
260			goto out;
261		}
262	}
263
264	for (i = 0; i < 16; ++i) {
265		if (i * 4 == PCI_COMMAND)
266			continue;
267
268		if (pci_write_config_dword(mdev->pdev, i * 4, hca_header[i])) {
269			err = -ENODEV;
270			mthca_err(mdev, "Couldn't restore HCA reg %x, "
271				  "aborting.\n", i);
272			goto out;
273		}
274	}
275
276	if (pci_write_config_dword(mdev->pdev, PCI_COMMAND,
277				   hca_header[PCI_COMMAND / 4])) {
278		err = -ENODEV;
279		mthca_err(mdev, "Couldn't restore HCA COMMAND, "
280			  "aborting.\n");
281		goto out;
282	}
283
284out:
285	if (bridge)
286		pci_dev_put(bridge);
287	kfree(bridge_header);
288	kfree(hca_header);
289
290	return err;
291}
292