Loading...
1#include <linux/types.h>
2#include <linux/init.h>
3#include <linux/interrupt.h>
4#include <linux/mm.h>
5#include <linux/slab.h>
6#include <linux/spinlock.h>
7#include <linux/zorro.h>
8
9#include <asm/page.h>
10#include <asm/pgtable.h>
11#include <asm/amigaints.h>
12#include <asm/amigahw.h>
13
14#include "scsi.h"
15#include "wd33c93.h"
16#include "gvp11.h"
17
18
19#define CHECK_WD33C93
20
21struct gvp11_hostdata {
22 struct WD33C93_hostdata wh;
23 struct gvp11_scsiregs *regs;
24};
25
26static irqreturn_t gvp11_intr(int irq, void *data)
27{
28 struct Scsi_Host *instance = data;
29 struct gvp11_hostdata *hdata = shost_priv(instance);
30 unsigned int status = hdata->regs->CNTR;
31 unsigned long flags;
32
33 if (!(status & GVP11_DMAC_INT_PENDING))
34 return IRQ_NONE;
35
36 spin_lock_irqsave(instance->host_lock, flags);
37 wd33c93_intr(instance);
38 spin_unlock_irqrestore(instance->host_lock, flags);
39 return IRQ_HANDLED;
40}
41
42static int gvp11_xfer_mask = 0;
43
44void gvp11_setup(char *str, int *ints)
45{
46 gvp11_xfer_mask = ints[1];
47}
48
49static int dma_setup(struct scsi_cmnd *cmd, int dir_in)
50{
51 struct Scsi_Host *instance = cmd->device->host;
52 struct gvp11_hostdata *hdata = shost_priv(instance);
53 struct WD33C93_hostdata *wh = &hdata->wh;
54 struct gvp11_scsiregs *regs = hdata->regs;
55 unsigned short cntr = GVP11_DMAC_INT_ENABLE;
56 unsigned long addr = virt_to_bus(cmd->SCp.ptr);
57 int bank_mask;
58 static int scsi_alloc_out_of_range = 0;
59
60 /* use bounce buffer if the physical address is bad */
61 if (addr & wh->dma_xfer_mask) {
62 wh->dma_bounce_len = (cmd->SCp.this_residual + 511) & ~0x1ff;
63
64 if (!scsi_alloc_out_of_range) {
65 wh->dma_bounce_buffer =
66 kmalloc(wh->dma_bounce_len, GFP_KERNEL);
67 wh->dma_buffer_pool = BUF_SCSI_ALLOCED;
68 }
69
70 if (scsi_alloc_out_of_range ||
71 !wh->dma_bounce_buffer) {
72 wh->dma_bounce_buffer =
73 amiga_chip_alloc(wh->dma_bounce_len,
74 "GVP II SCSI Bounce Buffer");
75
76 if (!wh->dma_bounce_buffer) {
77 wh->dma_bounce_len = 0;
78 return 1;
79 }
80
81 wh->dma_buffer_pool = BUF_CHIP_ALLOCED;
82 }
83
84 /* check if the address of the bounce buffer is OK */
85 addr = virt_to_bus(wh->dma_bounce_buffer);
86
87 if (addr & wh->dma_xfer_mask) {
88 /* fall back to Chip RAM if address out of range */
89 if (wh->dma_buffer_pool == BUF_SCSI_ALLOCED) {
90 kfree(wh->dma_bounce_buffer);
91 scsi_alloc_out_of_range = 1;
92 } else {
93 amiga_chip_free(wh->dma_bounce_buffer);
94 }
95
96 wh->dma_bounce_buffer =
97 amiga_chip_alloc(wh->dma_bounce_len,
98 "GVP II SCSI Bounce Buffer");
99
100 if (!wh->dma_bounce_buffer) {
101 wh->dma_bounce_len = 0;
102 return 1;
103 }
104
105 addr = virt_to_bus(wh->dma_bounce_buffer);
106 wh->dma_buffer_pool = BUF_CHIP_ALLOCED;
107 }
108
109 if (!dir_in) {
110 /* copy to bounce buffer for a write */
111 memcpy(wh->dma_bounce_buffer, cmd->SCp.ptr,
112 cmd->SCp.this_residual);
113 }
114 }
115
116 /* setup dma direction */
117 if (!dir_in)
118 cntr |= GVP11_DMAC_DIR_WRITE;
119
120 wh->dma_dir = dir_in;
121 regs->CNTR = cntr;
122
123 /* setup DMA *physical* address */
124 regs->ACR = addr;
125
126 if (dir_in) {
127 /* invalidate any cache */
128 cache_clear(addr, cmd->SCp.this_residual);
129 } else {
130 /* push any dirty cache */
131 cache_push(addr, cmd->SCp.this_residual);
132 }
133
134 bank_mask = (~wh->dma_xfer_mask >> 18) & 0x01c0;
135 if (bank_mask)
136 regs->BANK = bank_mask & (addr >> 18);
137
138 /* start DMA */
139 regs->ST_DMA = 1;
140
141 /* return success */
142 return 0;
143}
144
145static void dma_stop(struct Scsi_Host *instance, struct scsi_cmnd *SCpnt,
146 int status)
147{
148 struct gvp11_hostdata *hdata = shost_priv(instance);
149 struct WD33C93_hostdata *wh = &hdata->wh;
150 struct gvp11_scsiregs *regs = hdata->regs;
151
152 /* stop DMA */
153 regs->SP_DMA = 1;
154 /* remove write bit from CONTROL bits */
155 regs->CNTR = GVP11_DMAC_INT_ENABLE;
156
157 /* copy from a bounce buffer, if necessary */
158 if (status && wh->dma_bounce_buffer) {
159 if (wh->dma_dir && SCpnt)
160 memcpy(SCpnt->SCp.ptr, wh->dma_bounce_buffer,
161 SCpnt->SCp.this_residual);
162
163 if (wh->dma_buffer_pool == BUF_SCSI_ALLOCED)
164 kfree(wh->dma_bounce_buffer);
165 else
166 amiga_chip_free(wh->dma_bounce_buffer);
167
168 wh->dma_bounce_buffer = NULL;
169 wh->dma_bounce_len = 0;
170 }
171}
172
173static int gvp11_bus_reset(struct scsi_cmnd *cmd)
174{
175 struct Scsi_Host *instance = cmd->device->host;
176
177 /* FIXME perform bus-specific reset */
178
179 /* FIXME 2: shouldn't we no-op this function (return
180 FAILED), and fall back to host reset function,
181 wd33c93_host_reset ? */
182
183 spin_lock_irq(instance->host_lock);
184 wd33c93_host_reset(cmd);
185 spin_unlock_irq(instance->host_lock);
186
187 return SUCCESS;
188}
189
190static struct scsi_host_template gvp11_scsi_template = {
191 .module = THIS_MODULE,
192 .name = "GVP Series II SCSI",
193 .proc_info = wd33c93_proc_info,
194 .proc_name = "GVP11",
195 .queuecommand = wd33c93_queuecommand,
196 .eh_abort_handler = wd33c93_abort,
197 .eh_bus_reset_handler = gvp11_bus_reset,
198 .eh_host_reset_handler = wd33c93_host_reset,
199 .can_queue = CAN_QUEUE,
200 .this_id = 7,
201 .sg_tablesize = SG_ALL,
202 .cmd_per_lun = CMD_PER_LUN,
203 .use_clustering = DISABLE_CLUSTERING
204};
205
206static int __devinit check_wd33c93(struct gvp11_scsiregs *regs)
207{
208#ifdef CHECK_WD33C93
209 volatile unsigned char *sasr_3393, *scmd_3393;
210 unsigned char save_sasr;
211 unsigned char q, qq;
212
213 /*
214 * These darn GVP boards are a problem - it can be tough to tell
215 * whether or not they include a SCSI controller. This is the
216 * ultimate Yet-Another-GVP-Detection-Hack in that it actually
217 * probes for a WD33c93 chip: If we find one, it's extremely
218 * likely that this card supports SCSI, regardless of Product_
219 * Code, Board_Size, etc.
220 */
221
222 /* Get pointers to the presumed register locations and save contents */
223
224 sasr_3393 = ®s->SASR;
225 scmd_3393 = ®s->SCMD;
226 save_sasr = *sasr_3393;
227
228 /* First test the AuxStatus Reg */
229
230 q = *sasr_3393; /* read it */
231 if (q & 0x08) /* bit 3 should always be clear */
232 return -ENODEV;
233 *sasr_3393 = WD_AUXILIARY_STATUS; /* setup indirect address */
234 if (*sasr_3393 == WD_AUXILIARY_STATUS) { /* shouldn't retain the write */
235 *sasr_3393 = save_sasr; /* Oops - restore this byte */
236 return -ENODEV;
237 }
238 if (*sasr_3393 != q) { /* should still read the same */
239 *sasr_3393 = save_sasr; /* Oops - restore this byte */
240 return -ENODEV;
241 }
242 if (*scmd_3393 != q) /* and so should the image at 0x1f */
243 return -ENODEV;
244
245 /*
246 * Ok, we probably have a wd33c93, but let's check a few other places
247 * for good measure. Make sure that this works for both 'A and 'B
248 * chip versions.
249 */
250
251 *sasr_3393 = WD_SCSI_STATUS;
252 q = *scmd_3393;
253 *sasr_3393 = WD_SCSI_STATUS;
254 *scmd_3393 = ~q;
255 *sasr_3393 = WD_SCSI_STATUS;
256 qq = *scmd_3393;
257 *sasr_3393 = WD_SCSI_STATUS;
258 *scmd_3393 = q;
259 if (qq != q) /* should be read only */
260 return -ENODEV;
261 *sasr_3393 = 0x1e; /* this register is unimplemented */
262 q = *scmd_3393;
263 *sasr_3393 = 0x1e;
264 *scmd_3393 = ~q;
265 *sasr_3393 = 0x1e;
266 qq = *scmd_3393;
267 *sasr_3393 = 0x1e;
268 *scmd_3393 = q;
269 if (qq != q || qq != 0xff) /* should be read only, all 1's */
270 return -ENODEV;
271 *sasr_3393 = WD_TIMEOUT_PERIOD;
272 q = *scmd_3393;
273 *sasr_3393 = WD_TIMEOUT_PERIOD;
274 *scmd_3393 = ~q;
275 *sasr_3393 = WD_TIMEOUT_PERIOD;
276 qq = *scmd_3393;
277 *sasr_3393 = WD_TIMEOUT_PERIOD;
278 *scmd_3393 = q;
279 if (qq != (~q & 0xff)) /* should be read/write */
280 return -ENODEV;
281#endif /* CHECK_WD33C93 */
282
283 return 0;
284}
285
286static int __devinit gvp11_probe(struct zorro_dev *z,
287 const struct zorro_device_id *ent)
288{
289 struct Scsi_Host *instance;
290 unsigned long address;
291 int error;
292 unsigned int epc;
293 unsigned int default_dma_xfer_mask;
294 struct gvp11_hostdata *hdata;
295 struct gvp11_scsiregs *regs;
296 wd33c93_regs wdregs;
297
298 default_dma_xfer_mask = ent->driver_data;
299
300 /*
301 * Rumors state that some GVP ram boards use the same product
302 * code as the SCSI controllers. Therefore if the board-size
303 * is not 64KB we assume it is a ram board and bail out.
304 */
305 if (zorro_resource_len(z) != 0x10000)
306 return -ENODEV;
307
308 address = z->resource.start;
309 if (!request_mem_region(address, 256, "wd33c93"))
310 return -EBUSY;
311
312 regs = (struct gvp11_scsiregs *)(ZTWO_VADDR(address));
313
314 error = check_wd33c93(regs);
315 if (error)
316 goto fail_check_or_alloc;
317
318 instance = scsi_host_alloc(&gvp11_scsi_template,
319 sizeof(struct gvp11_hostdata));
320 if (!instance) {
321 error = -ENOMEM;
322 goto fail_check_or_alloc;
323 }
324
325 instance->irq = IRQ_AMIGA_PORTS;
326 instance->unique_id = z->slotaddr;
327
328 regs->secret2 = 1;
329 regs->secret1 = 0;
330 regs->secret3 = 15;
331 while (regs->CNTR & GVP11_DMAC_BUSY)
332 ;
333 regs->CNTR = 0;
334 regs->BANK = 0;
335
336 wdregs.SASR = ®s->SASR;
337 wdregs.SCMD = ®s->SCMD;
338
339 hdata = shost_priv(instance);
340 if (gvp11_xfer_mask)
341 hdata->wh.dma_xfer_mask = gvp11_xfer_mask;
342 else
343 hdata->wh.dma_xfer_mask = default_dma_xfer_mask;
344
345 hdata->wh.no_sync = 0xff;
346 hdata->wh.fast = 0;
347 hdata->wh.dma_mode = CTRL_DMA;
348 hdata->regs = regs;
349
350 /*
351 * Check for 14MHz SCSI clock
352 */
353 epc = *(unsigned short *)(ZTWO_VADDR(address) + 0x8000);
354 wd33c93_init(instance, wdregs, dma_setup, dma_stop,
355 (epc & GVP_SCSICLKMASK) ? WD33C93_FS_8_10
356 : WD33C93_FS_12_15);
357
358 error = request_irq(IRQ_AMIGA_PORTS, gvp11_intr, IRQF_SHARED,
359 "GVP11 SCSI", instance);
360 if (error)
361 goto fail_irq;
362
363 regs->CNTR = GVP11_DMAC_INT_ENABLE;
364
365 error = scsi_add_host(instance, NULL);
366 if (error)
367 goto fail_host;
368
369 zorro_set_drvdata(z, instance);
370 scsi_scan_host(instance);
371 return 0;
372
373fail_host:
374 free_irq(IRQ_AMIGA_PORTS, instance);
375fail_irq:
376 scsi_host_put(instance);
377fail_check_or_alloc:
378 release_mem_region(address, 256);
379 return error;
380}
381
382static void __devexit gvp11_remove(struct zorro_dev *z)
383{
384 struct Scsi_Host *instance = zorro_get_drvdata(z);
385 struct gvp11_hostdata *hdata = shost_priv(instance);
386
387 hdata->regs->CNTR = 0;
388 scsi_remove_host(instance);
389 free_irq(IRQ_AMIGA_PORTS, instance);
390 scsi_host_put(instance);
391 release_mem_region(z->resource.start, 256);
392}
393
394 /*
395 * This should (hopefully) be the correct way to identify
396 * all the different GVP SCSI controllers (except for the
397 * SERIES I though).
398 */
399
400static struct zorro_device_id gvp11_zorro_tbl[] __devinitdata = {
401 { ZORRO_PROD_GVP_COMBO_030_R3_SCSI, ~0x00ffffff },
402 { ZORRO_PROD_GVP_SERIES_II, ~0x00ffffff },
403 { ZORRO_PROD_GVP_GFORCE_030_SCSI, ~0x01ffffff },
404 { ZORRO_PROD_GVP_A530_SCSI, ~0x01ffffff },
405 { ZORRO_PROD_GVP_COMBO_030_R4_SCSI, ~0x01ffffff },
406 { ZORRO_PROD_GVP_A1291, ~0x07ffffff },
407 { ZORRO_PROD_GVP_GFORCE_040_SCSI_1, ~0x07ffffff },
408 { 0 }
409};
410MODULE_DEVICE_TABLE(zorro, gvp11_zorro_tbl);
411
412static struct zorro_driver gvp11_driver = {
413 .name = "gvp11",
414 .id_table = gvp11_zorro_tbl,
415 .probe = gvp11_probe,
416 .remove = __devexit_p(gvp11_remove),
417};
418
419static int __init gvp11_init(void)
420{
421 return zorro_register_driver(&gvp11_driver);
422}
423module_init(gvp11_init);
424
425static void __exit gvp11_exit(void)
426{
427 zorro_unregister_driver(&gvp11_driver);
428}
429module_exit(gvp11_exit);
430
431MODULE_DESCRIPTION("GVP Series II SCSI");
432MODULE_LICENSE("GPL");
1// SPDX-License-Identifier: GPL-2.0-only
2#include <linux/types.h>
3#include <linux/init.h>
4#include <linux/interrupt.h>
5#include <linux/mm.h>
6#include <linux/slab.h>
7#include <linux/spinlock.h>
8#include <linux/zorro.h>
9#include <linux/module.h>
10
11#include <asm/page.h>
12#include <asm/pgtable.h>
13#include <asm/amigaints.h>
14#include <asm/amigahw.h>
15
16#include "scsi.h"
17#include "wd33c93.h"
18#include "gvp11.h"
19
20
21#define CHECK_WD33C93
22
23struct gvp11_hostdata {
24 struct WD33C93_hostdata wh;
25 struct gvp11_scsiregs *regs;
26};
27
28static irqreturn_t gvp11_intr(int irq, void *data)
29{
30 struct Scsi_Host *instance = data;
31 struct gvp11_hostdata *hdata = shost_priv(instance);
32 unsigned int status = hdata->regs->CNTR;
33 unsigned long flags;
34
35 if (!(status & GVP11_DMAC_INT_PENDING))
36 return IRQ_NONE;
37
38 spin_lock_irqsave(instance->host_lock, flags);
39 wd33c93_intr(instance);
40 spin_unlock_irqrestore(instance->host_lock, flags);
41 return IRQ_HANDLED;
42}
43
44static int gvp11_xfer_mask = 0;
45
46void gvp11_setup(char *str, int *ints)
47{
48 gvp11_xfer_mask = ints[1];
49}
50
51static int dma_setup(struct scsi_cmnd *cmd, int dir_in)
52{
53 struct Scsi_Host *instance = cmd->device->host;
54 struct gvp11_hostdata *hdata = shost_priv(instance);
55 struct WD33C93_hostdata *wh = &hdata->wh;
56 struct gvp11_scsiregs *regs = hdata->regs;
57 unsigned short cntr = GVP11_DMAC_INT_ENABLE;
58 unsigned long addr = virt_to_bus(cmd->SCp.ptr);
59 int bank_mask;
60 static int scsi_alloc_out_of_range = 0;
61
62 /* use bounce buffer if the physical address is bad */
63 if (addr & wh->dma_xfer_mask) {
64 wh->dma_bounce_len = (cmd->SCp.this_residual + 511) & ~0x1ff;
65
66 if (!scsi_alloc_out_of_range) {
67 wh->dma_bounce_buffer =
68 kmalloc(wh->dma_bounce_len, GFP_KERNEL);
69 wh->dma_buffer_pool = BUF_SCSI_ALLOCED;
70 }
71
72 if (scsi_alloc_out_of_range ||
73 !wh->dma_bounce_buffer) {
74 wh->dma_bounce_buffer =
75 amiga_chip_alloc(wh->dma_bounce_len,
76 "GVP II SCSI Bounce Buffer");
77
78 if (!wh->dma_bounce_buffer) {
79 wh->dma_bounce_len = 0;
80 return 1;
81 }
82
83 wh->dma_buffer_pool = BUF_CHIP_ALLOCED;
84 }
85
86 /* check if the address of the bounce buffer is OK */
87 addr = virt_to_bus(wh->dma_bounce_buffer);
88
89 if (addr & wh->dma_xfer_mask) {
90 /* fall back to Chip RAM if address out of range */
91 if (wh->dma_buffer_pool == BUF_SCSI_ALLOCED) {
92 kfree(wh->dma_bounce_buffer);
93 scsi_alloc_out_of_range = 1;
94 } else {
95 amiga_chip_free(wh->dma_bounce_buffer);
96 }
97
98 wh->dma_bounce_buffer =
99 amiga_chip_alloc(wh->dma_bounce_len,
100 "GVP II SCSI Bounce Buffer");
101
102 if (!wh->dma_bounce_buffer) {
103 wh->dma_bounce_len = 0;
104 return 1;
105 }
106
107 addr = virt_to_bus(wh->dma_bounce_buffer);
108 wh->dma_buffer_pool = BUF_CHIP_ALLOCED;
109 }
110
111 if (!dir_in) {
112 /* copy to bounce buffer for a write */
113 memcpy(wh->dma_bounce_buffer, cmd->SCp.ptr,
114 cmd->SCp.this_residual);
115 }
116 }
117
118 /* setup dma direction */
119 if (!dir_in)
120 cntr |= GVP11_DMAC_DIR_WRITE;
121
122 wh->dma_dir = dir_in;
123 regs->CNTR = cntr;
124
125 /* setup DMA *physical* address */
126 regs->ACR = addr;
127
128 if (dir_in) {
129 /* invalidate any cache */
130 cache_clear(addr, cmd->SCp.this_residual);
131 } else {
132 /* push any dirty cache */
133 cache_push(addr, cmd->SCp.this_residual);
134 }
135
136 bank_mask = (~wh->dma_xfer_mask >> 18) & 0x01c0;
137 if (bank_mask)
138 regs->BANK = bank_mask & (addr >> 18);
139
140 /* start DMA */
141 regs->ST_DMA = 1;
142
143 /* return success */
144 return 0;
145}
146
147static void dma_stop(struct Scsi_Host *instance, struct scsi_cmnd *SCpnt,
148 int status)
149{
150 struct gvp11_hostdata *hdata = shost_priv(instance);
151 struct WD33C93_hostdata *wh = &hdata->wh;
152 struct gvp11_scsiregs *regs = hdata->regs;
153
154 /* stop DMA */
155 regs->SP_DMA = 1;
156 /* remove write bit from CONTROL bits */
157 regs->CNTR = GVP11_DMAC_INT_ENABLE;
158
159 /* copy from a bounce buffer, if necessary */
160 if (status && wh->dma_bounce_buffer) {
161 if (wh->dma_dir && SCpnt)
162 memcpy(SCpnt->SCp.ptr, wh->dma_bounce_buffer,
163 SCpnt->SCp.this_residual);
164
165 if (wh->dma_buffer_pool == BUF_SCSI_ALLOCED)
166 kfree(wh->dma_bounce_buffer);
167 else
168 amiga_chip_free(wh->dma_bounce_buffer);
169
170 wh->dma_bounce_buffer = NULL;
171 wh->dma_bounce_len = 0;
172 }
173}
174
175static struct scsi_host_template gvp11_scsi_template = {
176 .module = THIS_MODULE,
177 .name = "GVP Series II SCSI",
178 .show_info = wd33c93_show_info,
179 .write_info = wd33c93_write_info,
180 .proc_name = "GVP11",
181 .queuecommand = wd33c93_queuecommand,
182 .eh_abort_handler = wd33c93_abort,
183 .eh_host_reset_handler = wd33c93_host_reset,
184 .can_queue = CAN_QUEUE,
185 .this_id = 7,
186 .sg_tablesize = SG_ALL,
187 .cmd_per_lun = CMD_PER_LUN,
188 .dma_boundary = PAGE_SIZE - 1,
189};
190
191static int check_wd33c93(struct gvp11_scsiregs *regs)
192{
193#ifdef CHECK_WD33C93
194 volatile unsigned char *sasr_3393, *scmd_3393;
195 unsigned char save_sasr;
196 unsigned char q, qq;
197
198 /*
199 * These darn GVP boards are a problem - it can be tough to tell
200 * whether or not they include a SCSI controller. This is the
201 * ultimate Yet-Another-GVP-Detection-Hack in that it actually
202 * probes for a WD33c93 chip: If we find one, it's extremely
203 * likely that this card supports SCSI, regardless of Product_
204 * Code, Board_Size, etc.
205 */
206
207 /* Get pointers to the presumed register locations and save contents */
208
209 sasr_3393 = ®s->SASR;
210 scmd_3393 = ®s->SCMD;
211 save_sasr = *sasr_3393;
212
213 /* First test the AuxStatus Reg */
214
215 q = *sasr_3393; /* read it */
216 if (q & 0x08) /* bit 3 should always be clear */
217 return -ENODEV;
218 *sasr_3393 = WD_AUXILIARY_STATUS; /* setup indirect address */
219 if (*sasr_3393 == WD_AUXILIARY_STATUS) { /* shouldn't retain the write */
220 *sasr_3393 = save_sasr; /* Oops - restore this byte */
221 return -ENODEV;
222 }
223 if (*sasr_3393 != q) { /* should still read the same */
224 *sasr_3393 = save_sasr; /* Oops - restore this byte */
225 return -ENODEV;
226 }
227 if (*scmd_3393 != q) /* and so should the image at 0x1f */
228 return -ENODEV;
229
230 /*
231 * Ok, we probably have a wd33c93, but let's check a few other places
232 * for good measure. Make sure that this works for both 'A and 'B
233 * chip versions.
234 */
235
236 *sasr_3393 = WD_SCSI_STATUS;
237 q = *scmd_3393;
238 *sasr_3393 = WD_SCSI_STATUS;
239 *scmd_3393 = ~q;
240 *sasr_3393 = WD_SCSI_STATUS;
241 qq = *scmd_3393;
242 *sasr_3393 = WD_SCSI_STATUS;
243 *scmd_3393 = q;
244 if (qq != q) /* should be read only */
245 return -ENODEV;
246 *sasr_3393 = 0x1e; /* this register is unimplemented */
247 q = *scmd_3393;
248 *sasr_3393 = 0x1e;
249 *scmd_3393 = ~q;
250 *sasr_3393 = 0x1e;
251 qq = *scmd_3393;
252 *sasr_3393 = 0x1e;
253 *scmd_3393 = q;
254 if (qq != q || qq != 0xff) /* should be read only, all 1's */
255 return -ENODEV;
256 *sasr_3393 = WD_TIMEOUT_PERIOD;
257 q = *scmd_3393;
258 *sasr_3393 = WD_TIMEOUT_PERIOD;
259 *scmd_3393 = ~q;
260 *sasr_3393 = WD_TIMEOUT_PERIOD;
261 qq = *scmd_3393;
262 *sasr_3393 = WD_TIMEOUT_PERIOD;
263 *scmd_3393 = q;
264 if (qq != (~q & 0xff)) /* should be read/write */
265 return -ENODEV;
266#endif /* CHECK_WD33C93 */
267
268 return 0;
269}
270
271static int gvp11_probe(struct zorro_dev *z, const struct zorro_device_id *ent)
272{
273 struct Scsi_Host *instance;
274 unsigned long address;
275 int error;
276 unsigned int epc;
277 unsigned int default_dma_xfer_mask;
278 struct gvp11_hostdata *hdata;
279 struct gvp11_scsiregs *regs;
280 wd33c93_regs wdregs;
281
282 default_dma_xfer_mask = ent->driver_data;
283
284 /*
285 * Rumors state that some GVP ram boards use the same product
286 * code as the SCSI controllers. Therefore if the board-size
287 * is not 64KB we assume it is a ram board and bail out.
288 */
289 if (zorro_resource_len(z) != 0x10000)
290 return -ENODEV;
291
292 address = z->resource.start;
293 if (!request_mem_region(address, 256, "wd33c93"))
294 return -EBUSY;
295
296 regs = ZTWO_VADDR(address);
297
298 error = check_wd33c93(regs);
299 if (error)
300 goto fail_check_or_alloc;
301
302 instance = scsi_host_alloc(&gvp11_scsi_template,
303 sizeof(struct gvp11_hostdata));
304 if (!instance) {
305 error = -ENOMEM;
306 goto fail_check_or_alloc;
307 }
308
309 instance->irq = IRQ_AMIGA_PORTS;
310 instance->unique_id = z->slotaddr;
311
312 regs->secret2 = 1;
313 regs->secret1 = 0;
314 regs->secret3 = 15;
315 while (regs->CNTR & GVP11_DMAC_BUSY)
316 ;
317 regs->CNTR = 0;
318 regs->BANK = 0;
319
320 wdregs.SASR = ®s->SASR;
321 wdregs.SCMD = ®s->SCMD;
322
323 hdata = shost_priv(instance);
324 if (gvp11_xfer_mask)
325 hdata->wh.dma_xfer_mask = gvp11_xfer_mask;
326 else
327 hdata->wh.dma_xfer_mask = default_dma_xfer_mask;
328
329 hdata->wh.no_sync = 0xff;
330 hdata->wh.fast = 0;
331 hdata->wh.dma_mode = CTRL_DMA;
332 hdata->regs = regs;
333
334 /*
335 * Check for 14MHz SCSI clock
336 */
337 epc = *(unsigned short *)(ZTWO_VADDR(address) + 0x8000);
338 wd33c93_init(instance, wdregs, dma_setup, dma_stop,
339 (epc & GVP_SCSICLKMASK) ? WD33C93_FS_8_10
340 : WD33C93_FS_12_15);
341
342 error = request_irq(IRQ_AMIGA_PORTS, gvp11_intr, IRQF_SHARED,
343 "GVP11 SCSI", instance);
344 if (error)
345 goto fail_irq;
346
347 regs->CNTR = GVP11_DMAC_INT_ENABLE;
348
349 error = scsi_add_host(instance, NULL);
350 if (error)
351 goto fail_host;
352
353 zorro_set_drvdata(z, instance);
354 scsi_scan_host(instance);
355 return 0;
356
357fail_host:
358 free_irq(IRQ_AMIGA_PORTS, instance);
359fail_irq:
360 scsi_host_put(instance);
361fail_check_or_alloc:
362 release_mem_region(address, 256);
363 return error;
364}
365
366static void gvp11_remove(struct zorro_dev *z)
367{
368 struct Scsi_Host *instance = zorro_get_drvdata(z);
369 struct gvp11_hostdata *hdata = shost_priv(instance);
370
371 hdata->regs->CNTR = 0;
372 scsi_remove_host(instance);
373 free_irq(IRQ_AMIGA_PORTS, instance);
374 scsi_host_put(instance);
375 release_mem_region(z->resource.start, 256);
376}
377
378 /*
379 * This should (hopefully) be the correct way to identify
380 * all the different GVP SCSI controllers (except for the
381 * SERIES I though).
382 */
383
384static struct zorro_device_id gvp11_zorro_tbl[] = {
385 { ZORRO_PROD_GVP_COMBO_030_R3_SCSI, ~0x00ffffff },
386 { ZORRO_PROD_GVP_SERIES_II, ~0x00ffffff },
387 { ZORRO_PROD_GVP_GFORCE_030_SCSI, ~0x01ffffff },
388 { ZORRO_PROD_GVP_A530_SCSI, ~0x01ffffff },
389 { ZORRO_PROD_GVP_COMBO_030_R4_SCSI, ~0x01ffffff },
390 { ZORRO_PROD_GVP_A1291, ~0x07ffffff },
391 { ZORRO_PROD_GVP_GFORCE_040_SCSI_1, ~0x07ffffff },
392 { 0 }
393};
394MODULE_DEVICE_TABLE(zorro, gvp11_zorro_tbl);
395
396static struct zorro_driver gvp11_driver = {
397 .name = "gvp11",
398 .id_table = gvp11_zorro_tbl,
399 .probe = gvp11_probe,
400 .remove = gvp11_remove,
401};
402
403static int __init gvp11_init(void)
404{
405 return zorro_register_driver(&gvp11_driver);
406}
407module_init(gvp11_init);
408
409static void __exit gvp11_exit(void)
410{
411 zorro_unregister_driver(&gvp11_driver);
412}
413module_exit(gvp11_exit);
414
415MODULE_DESCRIPTION("GVP Series II SCSI");
416MODULE_LICENSE("GPL");