commctrl.c 19.6 KB
Newer Older
Linus Torvalds's avatar
Linus Torvalds committed
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
/*
 *	Adaptec AAC series RAID controller driver
 *	(c) Copyright 2001 Red Hat Inc.	<alan@redhat.com>
 *
 * based on the old aacraid driver that is..
 * Adaptec aacraid device driver for Linux.
 *
 * Copyright (c) 2000 Adaptec, Inc. (aacraid@adaptec.com)
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2, or (at your option)
 * any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; see the file COPYING.  If not, write to
 * the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
 *
 * Module Name:
 *  commctrl.c
 *
 * Abstract: Contains all routines for control of the AFA comm layer
 *
 */

#include <linux/kernel.h>
#include <linux/init.h>
#include <linux/types.h>
#include <linux/sched.h>
#include <linux/pci.h>
#include <linux/spinlock.h>
#include <linux/slab.h>
#include <linux/completion.h>
#include <linux/dma-mapping.h>
#include <linux/blkdev.h>
#include <asm/semaphore.h>
#include <asm/uaccess.h>

#include "aacraid.h"

/**
 *	ioctl_send_fib	-	send a FIB from userspace
 *	@dev:	adapter is being processed
 *	@arg:	arguments to the ioctl call
 *	
 *	This routine sends a fib to the adapter on behalf of a user level
 *	program.
 */
54
55
# define AAC_DEBUG_PREAMBLE	KERN_INFO
# define AAC_DEBUG_POSTAMBLE
Linus Torvalds's avatar
Linus Torvalds committed
56
57
58
59
60
 
static int ioctl_send_fib(struct aac_dev * dev, void __user *arg)
{
	struct hw_fib * kfib;
	struct fib *fibptr;
61
62
63
64
	struct hw_fib * hw_fib = (struct hw_fib *)0;
	dma_addr_t hw_fib_pa = (dma_addr_t)0LL;
	unsigned size;
	int retval;
Linus Torvalds's avatar
Linus Torvalds committed
65
66

	fibptr = fib_alloc(dev);
67
	if(fibptr == NULL) {
Linus Torvalds's avatar
Linus Torvalds committed
68
		return -ENOMEM;
69
	}
Linus Torvalds's avatar
Linus Torvalds committed
70
71
72
73
74
75
76
77
78
79
80
81
82
83
		
	kfib = fibptr->hw_fib;
	/*
	 *	First copy in the header so that we can check the size field.
	 */
	if (copy_from_user((void *)kfib, arg, sizeof(struct aac_fibhdr))) {
		fib_free(fibptr);
		return -EFAULT;
	}
	/*
	 *	Since we copy based on the fib header size, make sure that we
	 *	will not overrun the buffer when we copy the memory. Return
	 *	an error if we would.
	 */
84
85
86
87
	size = le16_to_cpu(kfib->header.Size) + sizeof(struct aac_fibhdr);
	if (size < le16_to_cpu(kfib->header.SenderSize))
		size = le16_to_cpu(kfib->header.SenderSize);
	if (size > dev->max_fib_size) {
88
89
90
91
		if (size > 2048) {
			retval = -EINVAL;
			goto cleanup;
		}
92
93
94
95
96
97
		/* Highjack the hw_fib */
		hw_fib = fibptr->hw_fib;
		hw_fib_pa = fibptr->hw_fib_pa;
		fibptr->hw_fib = kfib = pci_alloc_consistent(dev->pdev, size, &fibptr->hw_fib_pa);
		memset(((char *)kfib) + dev->max_fib_size, 0, size - dev->max_fib_size);
		memcpy(kfib, hw_fib, dev->max_fib_size);
Linus Torvalds's avatar
Linus Torvalds committed
98
99
	}

100
101
102
	if (copy_from_user(kfib, arg, size)) {
		retval = -EFAULT;
		goto cleanup;
Linus Torvalds's avatar
Linus Torvalds committed
103
104
	}

105
	if (kfib->header.Command == cpu_to_le16(TakeABreakPt)) {
Linus Torvalds's avatar
Linus Torvalds committed
106
107
108
109
110
111
112
		aac_adapter_interrupt(dev);
		/*
		 * Since we didn't really send a fib, zero out the state to allow 
		 * cleanup code not to assert.
		 */
		kfib->header.XferState = 0;
	} else {
113
		retval = fib_send(le16_to_cpu(kfib->header.Command), fibptr,
Linus Torvalds's avatar
Linus Torvalds committed
114
115
116
				le16_to_cpu(kfib->header.Size) , FsaNormal,
				1, 1, NULL, NULL);
		if (retval) {
117
			goto cleanup;
Linus Torvalds's avatar
Linus Torvalds committed
118
119
		}
		if (fib_complete(fibptr) != 0) {
120
121
			retval = -EINVAL;
			goto cleanup;
Linus Torvalds's avatar
Linus Torvalds committed
122
123
124
125
126
127
128
129
130
131
		}
	}
	/*
	 *	Make sure that the size returned by the adapter (which includes
	 *	the header) is less than or equal to the size of a fib, so we
	 *	don't corrupt application data. Then copy that size to the user
	 *	buffer. (Don't try to add the header information again, since it
	 *	was already included by the adapter.)
	 */

132
133
134
135
136
137
138
139
	retval = 0;
	if (copy_to_user(arg, (void *)kfib, size))
		retval = -EFAULT;
cleanup:
	if (hw_fib) {
		pci_free_consistent(dev->pdev, size, kfib, fibptr->hw_fib_pa);
		fibptr->hw_fib_pa = hw_fib_pa;
		fibptr->hw_fib = hw_fib;
Linus Torvalds's avatar
Linus Torvalds committed
140
141
	}
	fib_free(fibptr);
142
	return retval;
Linus Torvalds's avatar
Linus Torvalds committed
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
}

/**
 *	open_getadapter_fib	-	Get the next fib
 *
 *	This routine will get the next Fib, if available, from the AdapterFibContext
 *	passed in from the user.
 */

static int open_getadapter_fib(struct aac_dev * dev, void __user *arg)
{
	struct aac_fib_context * fibctx;
	int status;

	fibctx = kmalloc(sizeof(struct aac_fib_context), GFP_KERNEL);
	if (fibctx == NULL) {
		status = -ENOMEM;
	} else {
		unsigned long flags;
		struct list_head * entry;
		struct aac_fib_context * context;

		fibctx->type = FSAFS_NTC_GET_ADAPTER_FIB_CONTEXT;
		fibctx->size = sizeof(struct aac_fib_context);
 		/*
		 *	Yes yes, I know this could be an index, but we have a
		 * better guarantee of uniqueness for the locked loop below.
		 * Without the aid of a persistent history, this also helps
		 * reduce the chance that the opaque context would be reused.
		 */
		fibctx->unique = (u32)((ulong)fibctx & 0xFFFFFFFF);
		/*
		 *	Initialize the mutex used to wait for the next AIF.
		 */
		init_MUTEX_LOCKED(&fibctx->wait_sem);
		fibctx->wait = 0;
		/*
		 *	Initialize the fibs and set the count of fibs on
		 *	the list to 0.
		 */
		fibctx->count = 0;
		INIT_LIST_HEAD(&fibctx->fib_list);
		fibctx->jiffies = jiffies/HZ;
		/*
		 *	Now add this context onto the adapter's 
		 *	AdapterFibContext list.
		 */
		spin_lock_irqsave(&dev->fib_lock, flags);
		/* Ensure that we have a unique identifier */
		entry = dev->fib_list.next;
		while (entry != &dev->fib_list) {
			context = list_entry(entry, struct aac_fib_context, next);
			if (context->unique == fibctx->unique) {
				/* Not unique (32 bits) */
				fibctx->unique++;
				entry = dev->fib_list.next;
			} else {
				entry = entry->next;
			}
		}
		list_add_tail(&fibctx->next, &dev->fib_list);
		spin_unlock_irqrestore(&dev->fib_lock, flags);
		if (copy_to_user(arg,  &fibctx->unique, 
						sizeof(fibctx->unique))) {
			status = -EFAULT;
		} else {
			status = 0;
		}	
	}
	return status;
}

/**
 *	next_getadapter_fib	-	get the next fib
 *	@dev: adapter to use
 *	@arg: ioctl argument
 *	
 * 	This routine will get the next Fib, if available, from the AdapterFibContext
 *	passed in from the user.
 */

static int next_getadapter_fib(struct aac_dev * dev, void __user *arg)
{
	struct fib_ioctl f;
	struct fib *fib;
	struct aac_fib_context *fibctx;
	int status;
	struct list_head * entry;
	unsigned long flags;
	
	if(copy_from_user((void *)&f, arg, sizeof(struct fib_ioctl)))
		return -EFAULT;
	/*
	 *	Verify that the HANDLE passed in was a valid AdapterFibContext
	 *
	 *	Search the list of AdapterFibContext addresses on the adapter
	 *	to be sure this is a valid address
	 */
	entry = dev->fib_list.next;
	fibctx = NULL;

	while (entry != &dev->fib_list) {
		fibctx = list_entry(entry, struct aac_fib_context, next);
		/*
		 *	Extract the AdapterFibContext from the Input parameters.
		 */
		if (fibctx->unique == f.fibctx) {   /* We found a winner */
			break;
		}
		entry = entry->next;
		fibctx = NULL;
	}
	if (!fibctx) {
		dprintk ((KERN_INFO "Fib Context not found\n"));
		return -EINVAL;
	}

	if((fibctx->type != FSAFS_NTC_GET_ADAPTER_FIB_CONTEXT) ||
		 (fibctx->size != sizeof(struct aac_fib_context))) {
		dprintk ((KERN_INFO "Fib Context corrupt?\n"));
		return -EINVAL;
	}
	status = 0;
	spin_lock_irqsave(&dev->fib_lock, flags);
	/*
	 *	If there are no fibs to send back, then either wait or return
	 *	-EAGAIN
	 */
return_fib:
	if (!list_empty(&fibctx->fib_list)) {
		struct list_head * entry;
		/*
		 *	Pull the next fib from the fibs
		 */
		entry = fibctx->fib_list.next;
		list_del(entry);
		
		fib = list_entry(entry, struct fib, fiblink);
		fibctx->count--;
		spin_unlock_irqrestore(&dev->fib_lock, flags);
		if (copy_to_user(f.fib, fib->hw_fib, sizeof(struct hw_fib))) {
			kfree(fib->hw_fib);
			kfree(fib);
			return -EFAULT;
		}	
		/*
		 *	Free the space occupied by this copy of the fib.
		 */
		kfree(fib->hw_fib);
		kfree(fib);
		status = 0;
	} else {
		spin_unlock_irqrestore(&dev->fib_lock, flags);
		if (f.wait) {
			if(down_interruptible(&fibctx->wait_sem) < 0) {
				status = -EINTR;
			} else {
				/* Lock again and retry */
				spin_lock_irqsave(&dev->fib_lock, flags);
				goto return_fib;
			}
		} else {
			status = -EAGAIN;
		}	
	}
308
	fibctx->jiffies = jiffies/HZ;
Linus Torvalds's avatar
Linus Torvalds committed
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
	return status;
}

int aac_close_fib_context(struct aac_dev * dev, struct aac_fib_context * fibctx)
{
	struct fib *fib;

	/*
	 *	First free any FIBs that have not been consumed.
	 */
	while (!list_empty(&fibctx->fib_list)) {
		struct list_head * entry;
		/*
		 *	Pull the next fib from the fibs
		 */
		entry = fibctx->fib_list.next;
		list_del(entry);
		fib = list_entry(entry, struct fib, fiblink);
		fibctx->count--;
		/*
		 *	Free the space occupied by this copy of the fib.
		 */
		kfree(fib->hw_fib);
		kfree(fib);
	}
	/*
	 *	Remove the Context from the AdapterFibContext List
	 */
	list_del(&fibctx->next);
	/*
	 *	Invalidate context
	 */
	fibctx->type = 0;
	/*
	 *	Free the space occupied by the Context
	 */
	kfree(fibctx);
	return 0;
}

/**
 *	close_getadapter_fib	-	close down user fib context
 *	@dev: adapter
 *	@arg: ioctl arguments
 *
 *	This routine will close down the fibctx passed in from the user.
 */
 
static int close_getadapter_fib(struct aac_dev * dev, void __user *arg)
{
	struct aac_fib_context *fibctx;
	int status;
	unsigned long flags;
	struct list_head * entry;

	/*
	 *	Verify that the HANDLE passed in was a valid AdapterFibContext
	 *
	 *	Search the list of AdapterFibContext addresses on the adapter
	 *	to be sure this is a valid address
	 */

	entry = dev->fib_list.next;
	fibctx = NULL;

	while(entry != &dev->fib_list) {
		fibctx = list_entry(entry, struct aac_fib_context, next);
		/*
		 *	Extract the fibctx from the input parameters
		 */
		if (fibctx->unique == (u32)(unsigned long)arg) {   
			/* We found a winner */
			break;
		}
		entry = entry->next;
		fibctx = NULL;
	}

	if (!fibctx)
		return 0; /* Already gone */

	if((fibctx->type != FSAFS_NTC_GET_ADAPTER_FIB_CONTEXT) ||
		 (fibctx->size != sizeof(struct aac_fib_context)))
		return -EINVAL;
	spin_lock_irqsave(&dev->fib_lock, flags);
	status = aac_close_fib_context(dev, fibctx);
	spin_unlock_irqrestore(&dev->fib_lock, flags);
	return status;
}

/**
 *	check_revision	-	close down user fib context
 *	@dev: adapter
 *	@arg: ioctl arguments
 *
 *	This routine returns the driver version.
 *      Under Linux, there have been no version incompatibilities, so this is 
 *      simple!
 */

static int check_revision(struct aac_dev *dev, void __user *arg)
{
	struct revision response;
412
413
414
	char *driver_version = aac_driver_version;
	u32 version;

415
	response.compat = 1;
416
417
418
419
420
421
422
423
424
425
	version = (simple_strtol(driver_version, 
				&driver_version, 10) << 24) | 0x00000400;
	version += simple_strtol(driver_version + 1, &driver_version, 10) << 16;
	version += simple_strtol(driver_version + 1, NULL, 10);
	response.version = cpu_to_le32(version);
#	if (defined(AAC_DRIVER_BUILD))
		response.build = cpu_to_le32(AAC_DRIVER_BUILD);
#	else
		response.build = cpu_to_le32(9999);
#	endif
Linus Torvalds's avatar
Linus Torvalds committed
426
427
428
429
430
431

	if (copy_to_user(arg, &response, sizeof(response)))
		return -EFAULT;
	return 0;
}

432

Linus Torvalds's avatar
Linus Torvalds committed
433
434
435
436
437
438
/**
 *
 * aac_send_raw_scb
 *
 */

439
static int aac_send_raw_srb(struct aac_dev* dev, void __user * arg)
Linus Torvalds's avatar
Linus Torvalds committed
440
441
442
{
	struct fib* srbfib;
	int status;
443
444
445
	struct aac_srb *srbcmd = NULL;
	struct user_aac_srb *user_srbcmd = NULL;
	struct user_aac_srb __user *user_srb = arg;
Linus Torvalds's avatar
Linus Torvalds committed
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
	struct aac_srb_reply __user *user_reply;
	struct aac_srb_reply* reply;
	u32 fibsize = 0;
	u32 flags = 0;
	s32 rcode = 0;
	u32 data_dir;
	void __user *sg_user[32];
	void *sg_list[32];
	u32   sg_indx = 0;
	u32 byte_count = 0;
	u32 actual_fibsize = 0;
	int i;


	if (!capable(CAP_SYS_ADMIN)){
461
		dprintk((KERN_DEBUG"aacraid: No permission to send raw srb\n")); 
Linus Torvalds's avatar
Linus Torvalds committed
462
463
464
465
466
467
		return -EPERM;
	}
	/*
	 *	Allocate and initialize a Fib then setup a BlockWrite command
	 */
	if (!(srbfib = fib_alloc(dev))) {
468
		return -ENOMEM;
Linus Torvalds's avatar
Linus Torvalds committed
469
470
471
472
473
	}
	fib_init(srbfib);

	srbcmd = (struct aac_srb*) fib_data(srbfib);

474
	memset(sg_list, 0, sizeof(sg_list)); /* cleanup may take issue */
Linus Torvalds's avatar
Linus Torvalds committed
475
	if(copy_from_user(&fibsize, &user_srb->count,sizeof(u32))){
476
		dprintk((KERN_DEBUG"aacraid: Could not copy data size from user\n")); 
Linus Torvalds's avatar
Linus Torvalds committed
477
478
479
480
		rcode = -EFAULT;
		goto cleanup;
	}

481
	if (fibsize > (dev->max_fib_size - sizeof(struct aac_fibhdr))) {
Linus Torvalds's avatar
Linus Torvalds committed
482
483
484
485
		rcode = -EINVAL;
		goto cleanup;
	}

486
	user_srbcmd = kmalloc(fibsize, GFP_KERNEL);
487
488
489
490
491
	if (!user_srbcmd) {
		dprintk((KERN_DEBUG"aacraid: Could not make a copy of the srb\n"));
		rcode = -ENOMEM;
		goto cleanup;
	}
492
	if(copy_from_user(user_srbcmd, user_srb,fibsize)){
493
		dprintk((KERN_DEBUG"aacraid: Could not copy srb from user\n")); 
Linus Torvalds's avatar
Linus Torvalds committed
494
495
496
497
498
499
		rcode = -EFAULT;
		goto cleanup;
	}

	user_reply = arg+fibsize;

500
	flags = user_srbcmd->flags; /* from user in cpu order */
Linus Torvalds's avatar
Linus Torvalds committed
501
	// Fix up srb for endian and force some values
502

Linus Torvalds's avatar
Linus Torvalds committed
503
	srbcmd->function = cpu_to_le32(SRBF_ExecuteScsi);	// Force this
504
505
506
507
	srbcmd->channel  = cpu_to_le32(user_srbcmd->channel);
	srbcmd->id	 = cpu_to_le32(user_srbcmd->id);
	srbcmd->lun      = cpu_to_le32(user_srbcmd->lun);
	srbcmd->timeout  = cpu_to_le32(user_srbcmd->timeout);
508
509
	srbcmd->flags    = cpu_to_le32(flags);
	srbcmd->retry_limit = 0; // Obsolete parameter
510
	srbcmd->cdb_size = cpu_to_le32(user_srbcmd->cdb_size);
511
	memcpy(srbcmd->cdb, user_srbcmd->cdb, sizeof(srbcmd->cdb));
Linus Torvalds's avatar
Linus Torvalds committed
512
	
513
	switch (flags & (SRB_DataIn | SRB_DataOut)) {
Linus Torvalds's avatar
Linus Torvalds committed
514
515
516
517
518
519
520
521
522
523
524
525
	case SRB_DataOut:
		data_dir = DMA_TO_DEVICE;
		break;
	case (SRB_DataIn | SRB_DataOut):
		data_dir = DMA_BIDIRECTIONAL;
		break;
	case SRB_DataIn:
		data_dir = DMA_FROM_DEVICE;
		break;
	default:
		data_dir = DMA_NONE;
	}
526
	if (user_srbcmd->sg.count > (sizeof(sg_list)/sizeof(sg_list[0]))) {
527
528
529
530
531
		dprintk((KERN_DEBUG"aacraid: too many sg entries %d\n",
		  le32_to_cpu(srbcmd->sg.count)));
		rcode = -EINVAL;
		goto cleanup;
	}
Linus Torvalds's avatar
Linus Torvalds committed
532
	if (dev->dac_support == 1) {
533
		struct user_sgmap64* upsg = (struct user_sgmap64*)&user_srbcmd->sg;
534
		struct sgmap64* psg = (struct sgmap64*)&srbcmd->sg;
535
		struct user_sgmap* usg;
Linus Torvalds's avatar
Linus Torvalds committed
536
537
538
539
540
541
		byte_count = 0;

		/*
		 * This should also catch if user used the 32 bit sgmap
		 */
		actual_fibsize = sizeof(struct aac_srb) - 
542
543
544
			sizeof(struct sgentry) +
			((upsg->count & 0xff) * 
		 	sizeof(struct sgentry));
Linus Torvalds's avatar
Linus Torvalds committed
545
		if(actual_fibsize != fibsize){ // User made a mistake - should not continue
546
			dprintk((KERN_DEBUG"aacraid: Bad Size specified in Raw SRB command\n"));
Linus Torvalds's avatar
Linus Torvalds committed
547
548
549
			rcode = -EINVAL;
			goto cleanup;
		}
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
		usg = kmalloc(actual_fibsize - sizeof(struct aac_srb)
		  + sizeof(struct sgmap), GFP_KERNEL);
		if (!usg) {
			dprintk((KERN_DEBUG"aacraid: Allocation error in Raw SRB command\n"));
			rcode = -ENOMEM;
			goto cleanup;
		}
		memcpy (usg, upsg, actual_fibsize - sizeof(struct aac_srb)
		  + sizeof(struct sgmap));
		actual_fibsize = sizeof(struct aac_srb) - 
			sizeof(struct sgentry) + ((usg->count & 0xff) * 
			 	sizeof(struct sgentry64));
		if ((data_dir == DMA_NONE) && upsg->count) {
			kfree (usg);
			dprintk((KERN_DEBUG"aacraid: SG with no direction specified in Raw SRB command\n"));
Linus Torvalds's avatar
Linus Torvalds committed
565
566
567
568
			rcode = -EINVAL;
			goto cleanup;
		}

569
570
		for (i = 0; i < usg->count; i++) {
			u64 addr;
Linus Torvalds's avatar
Linus Torvalds committed
571
			void* p;
572
573
			/* Does this really need to be GFP_DMA? */
			p = kmalloc(usg->sg[i].count,GFP_KERNEL|__GFP_DMA);
Linus Torvalds's avatar
Linus Torvalds committed
574
			if(p == 0) {
575
576
577
				kfree (usg);
				dprintk((KERN_DEBUG"aacraid: Could not allocate SG buffer - size = %d buffer number %d of %d\n",
				  usg->sg[i].count,i,usg->count));
Linus Torvalds's avatar
Linus Torvalds committed
578
579
580
				rcode = -ENOMEM;
				goto cleanup;
			}
581
			sg_user[i] = (void __user *)(long)usg->sg[i].addr;
Linus Torvalds's avatar
Linus Torvalds committed
582
583
584
585
			sg_list[i] = p; // save so we can clean up later
			sg_indx = i;

			if( flags & SRB_DataOut ){
586
				if(copy_from_user(p,sg_user[i],upsg->sg[i].count)){
587
588
					kfree (usg);
					dprintk((KERN_DEBUG"aacraid: Could not copy sg data from user\n")); 
Linus Torvalds's avatar
Linus Torvalds committed
589
590
591
592
					rcode = -EFAULT;
					goto cleanup;
				}
			}
593
			addr = pci_map_single(dev->pdev, p, usg->sg[i].count, data_dir);
Linus Torvalds's avatar
Linus Torvalds committed
594

595
			psg->sg[i].addr[0] = cpu_to_le32(addr & 0xffffffff);
596
597
598
			psg->sg[i].addr[1] = cpu_to_le32(addr>>32);
			psg->sg[i].count = cpu_to_le32(usg->sg[i].count);  
			byte_count += usg->sg[i].count;
Linus Torvalds's avatar
Linus Torvalds committed
599
		}
600
		kfree (usg);
Linus Torvalds's avatar
Linus Torvalds committed
601
602

		srbcmd->count = cpu_to_le32(byte_count);
603
		psg->count = cpu_to_le32(sg_indx+1);
Linus Torvalds's avatar
Linus Torvalds committed
604
605
		status = fib_send(ScsiPortCommand64, srbfib, actual_fibsize, FsaNormal, 1, 1,NULL,NULL);
	} else {
606
		struct user_sgmap* upsg = &user_srbcmd->sg;
Linus Torvalds's avatar
Linus Torvalds committed
607
608
609
		struct sgmap* psg = &srbcmd->sg;
		byte_count = 0;

610
		actual_fibsize = sizeof (struct aac_srb) + (((user_srbcmd->sg.count & 0xff) - 1) * sizeof (struct sgentry));
Linus Torvalds's avatar
Linus Torvalds committed
611
		if(actual_fibsize != fibsize){ // User made a mistake - should not continue
612
			dprintk((KERN_DEBUG"aacraid: Bad Size specified in Raw SRB command\n"));
Linus Torvalds's avatar
Linus Torvalds committed
613
614
615
			rcode = -EINVAL;
			goto cleanup;
		}
616
		if ((data_dir == DMA_NONE) && upsg->count) {
617
			dprintk((KERN_DEBUG"aacraid: SG with no direction specified in Raw SRB command\n"));
Linus Torvalds's avatar
Linus Torvalds committed
618
619
620
			rcode = -EINVAL;
			goto cleanup;
		}
621
		for (i = 0; i < upsg->count; i++) {
Linus Torvalds's avatar
Linus Torvalds committed
622
623
			dma_addr_t addr; 
			void* p;
624
			p = kmalloc(upsg->sg[i].count, GFP_KERNEL);
Linus Torvalds's avatar
Linus Torvalds committed
625
			if(p == 0) {
626
627
				dprintk((KERN_DEBUG"aacraid: Could not allocate SG buffer - size = %d buffer number %d of %d\n",
				  upsg->sg[i].count, i, upsg->count));
Linus Torvalds's avatar
Linus Torvalds committed
628
629
630
				rcode = -ENOMEM;
				goto cleanup;
			}
631
			sg_user[i] = (void __user *)(long)upsg->sg[i].addr;
Linus Torvalds's avatar
Linus Torvalds committed
632
633
634
635
			sg_list[i] = p; // save so we can clean up later
			sg_indx = i;

			if( flags & SRB_DataOut ){
636
637
638
				if(copy_from_user(p, sg_user[i],
						upsg->sg[i].count)) {
					dprintk((KERN_DEBUG"aacraid: Could not copy sg data from user\n")); 
Linus Torvalds's avatar
Linus Torvalds committed
639
640
641
642
					rcode = -EFAULT;
					goto cleanup;
				}
			}
643
644
			addr = pci_map_single(dev->pdev, p,
				upsg->sg[i].count, data_dir);
Linus Torvalds's avatar
Linus Torvalds committed
645
646

			psg->sg[i].addr = cpu_to_le32(addr);
647
648
			psg->sg[i].count = cpu_to_le32(upsg->sg[i].count);  
			byte_count += upsg->sg[i].count;
Linus Torvalds's avatar
Linus Torvalds committed
649
650
		}
		srbcmd->count = cpu_to_le32(byte_count);
651
		psg->count = cpu_to_le32(sg_indx+1);
Linus Torvalds's avatar
Linus Torvalds committed
652
653
654
655
		status = fib_send(ScsiPortCommand, srbfib, actual_fibsize, FsaNormal, 1, 1, NULL, NULL);
	}

	if (status != 0){
656
		dprintk((KERN_DEBUG"aacraid: Could not send raw srb fib to hba\n")); 
657
		rcode = -ENXIO;
Linus Torvalds's avatar
Linus Torvalds committed
658
659
660
661
662
		goto cleanup;
	}

	if( flags & SRB_DataIn ) {
		for(i = 0 ; i <= sg_indx; i++){
663
664
665
666
667
			byte_count = le32_to_cpu((dev->dac_support == 1)
			      ? ((struct sgmap64*)&srbcmd->sg)->sg[i].count
			      : srbcmd->sg.sg[i].count);
			if(copy_to_user(sg_user[i], sg_list[i], byte_count)){
				dprintk((KERN_DEBUG"aacraid: Could not copy sg data to user\n")); 
Linus Torvalds's avatar
Linus Torvalds committed
668
669
670
671
672
673
674
675
676
				rcode = -EFAULT;
				goto cleanup;

			}
		}
	}

	reply = (struct aac_srb_reply *) fib_data(srbfib);
	if(copy_to_user(user_reply,reply,sizeof(struct aac_srb_reply))){
677
		dprintk((KERN_DEBUG"aacraid: Could not copy reply to user\n")); 
Linus Torvalds's avatar
Linus Torvalds committed
678
679
680
681
682
		rcode = -EFAULT;
		goto cleanup;
	}

cleanup:
683
	kfree(user_srbcmd);
Linus Torvalds's avatar
Linus Torvalds committed
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
	for(i=0; i <= sg_indx; i++){
		kfree(sg_list[i]);
	}
	fib_complete(srbfib);
	fib_free(srbfib);

	return rcode;
}

struct aac_pci_info {
        u32 bus;
        u32 slot;
};


699
static int aac_get_pci_info(struct aac_dev* dev, void __user *arg)
Linus Torvalds's avatar
Linus Torvalds committed
700
701
702
703
704
705
706
{
        struct aac_pci_info pci_info;

	pci_info.bus = dev->pdev->bus->number;
	pci_info.slot = PCI_SLOT(dev->pdev->devfn);

       if (copy_to_user(arg, &pci_info, sizeof(struct aac_pci_info))) {
707
               dprintk((KERN_DEBUG "aacraid: Could not copy pci info\n"));
Linus Torvalds's avatar
Linus Torvalds committed
708
709
710
               return -EFAULT;
	}
        return 0;
711
}
Linus Torvalds's avatar
Linus Torvalds committed
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
 

int aac_do_ioctl(struct aac_dev * dev, int cmd, void __user *arg)
{
	int status;
	
	/*
	 *	HBA gets first crack
	 */
	 
	status = aac_dev_ioctl(dev, cmd, arg);
	if(status != -ENOTTY)
		return status;

	switch (cmd) {
	case FSACTL_MINIPORT_REV_CHECK:
		status = check_revision(dev, arg);
		break;
730
	case FSACTL_SEND_LARGE_FIB:
Linus Torvalds's avatar
Linus Torvalds committed
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
	case FSACTL_SENDFIB:
		status = ioctl_send_fib(dev, arg);
		break;
	case FSACTL_OPEN_GET_ADAPTER_FIB:
		status = open_getadapter_fib(dev, arg);
		break;
	case FSACTL_GET_NEXT_ADAPTER_FIB:
		status = next_getadapter_fib(dev, arg);
		break;
	case FSACTL_CLOSE_GET_ADAPTER_FIB:
		status = close_getadapter_fib(dev, arg);
		break;
	case FSACTL_SEND_RAW_SRB:
		status = aac_send_raw_srb(dev,arg);
		break;
	case FSACTL_GET_PCI_INFO:
		status = aac_get_pci_info(dev,arg);
		break;
	default:
		status = -ENOTTY;
	  	break;	
	}
	return status;
}