Merge commit 'v2.6.29-rc1' into core/urgent
[linux-2.6] / drivers / scsi / aic94xx / aic94xx_tmf.c
1 /*
2  * Aic94xx Task Management Functions
3  *
4  * Copyright (C) 2005 Adaptec, Inc.  All rights reserved.
5  * Copyright (C) 2005 Luben Tuikov <luben_tuikov@adaptec.com>
6  *
7  * This file is licensed under GPLv2.
8  *
9  * This file is part of the aic94xx driver.
10  *
11  * The aic94xx driver is free software; you can redistribute it and/or
12  * modify it under the terms of the GNU General Public License as
13  * published by the Free Software Foundation; version 2 of the
14  * License.
15  *
16  * The aic94xx driver is distributed in the hope that it will be useful,
17  * but WITHOUT ANY WARRANTY; without even the implied warranty of
18  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
19  * General Public License for more details.
20  *
21  * You should have received a copy of the GNU General Public License
22  * along with the aic94xx driver; if not, write to the Free Software
23  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
24  *
25  */
26
27 #include <linux/spinlock.h>
28 #include "aic94xx.h"
29 #include "aic94xx_sas.h"
30 #include "aic94xx_hwi.h"
31
32 /* ---------- Internal enqueue ---------- */
33
34 static int asd_enqueue_internal(struct asd_ascb *ascb,
35                 void (*tasklet_complete)(struct asd_ascb *,
36                                          struct done_list_struct *),
37                                 void (*timed_out)(unsigned long))
38 {
39         int res;
40
41         ascb->tasklet_complete = tasklet_complete;
42         ascb->uldd_timer = 1;
43
44         ascb->timer.data = (unsigned long) ascb;
45         ascb->timer.function = timed_out;
46         ascb->timer.expires = jiffies + AIC94XX_SCB_TIMEOUT;
47
48         add_timer(&ascb->timer);
49
50         res = asd_post_ascb_list(ascb->ha, ascb, 1);
51         if (unlikely(res))
52                 del_timer(&ascb->timer);
53         return res;
54 }
55
56 /* ---------- CLEAR NEXUS ---------- */
57
58 struct tasklet_completion_status {
59         int     dl_opcode;
60         int     tmf_state;
61         u8      tag_valid:1;
62         __be16  tag;
63 };
64
65 #define DECLARE_TCS(tcs) \
66         struct tasklet_completion_status tcs = { \
67                 .dl_opcode = 0, \
68                 .tmf_state = 0, \
69                 .tag_valid = 0, \
70                 .tag = 0, \
71         }
72
73
74 static void asd_clear_nexus_tasklet_complete(struct asd_ascb *ascb,
75                                              struct done_list_struct *dl)
76 {
77         struct tasklet_completion_status *tcs = ascb->uldd_task;
78         ASD_DPRINTK("%s: here\n", __func__);
79         if (!del_timer(&ascb->timer)) {
80                 ASD_DPRINTK("%s: couldn't delete timer\n", __func__);
81                 return;
82         }
83         ASD_DPRINTK("%s: opcode: 0x%x\n", __func__, dl->opcode);
84         tcs->dl_opcode = dl->opcode;
85         complete(ascb->completion);
86         asd_ascb_free(ascb);
87 }
88
89 static void asd_clear_nexus_timedout(unsigned long data)
90 {
91         struct asd_ascb *ascb = (void *)data;
92         struct tasklet_completion_status *tcs = ascb->uldd_task;
93
94         ASD_DPRINTK("%s: here\n", __func__);
95         tcs->dl_opcode = TMF_RESP_FUNC_FAILED;
96         complete(ascb->completion);
97 }
98
99 #define CLEAR_NEXUS_PRE         \
100         struct asd_ascb *ascb; \
101         struct scb *scb; \
102         int res; \
103         DECLARE_COMPLETION_ONSTACK(completion); \
104         DECLARE_TCS(tcs); \
105                 \
106         ASD_DPRINTK("%s: PRE\n", __func__); \
107         res = 1;                \
108         ascb = asd_ascb_alloc_list(asd_ha, &res, GFP_KERNEL); \
109         if (!ascb)              \
110                 return -ENOMEM; \
111                                 \
112         ascb->completion = &completion; \
113         ascb->uldd_task = &tcs; \
114         scb = ascb->scb;        \
115         scb->header.opcode = CLEAR_NEXUS
116
117 #define CLEAR_NEXUS_POST        \
118         ASD_DPRINTK("%s: POST\n", __func__); \
119         res = asd_enqueue_internal(ascb, asd_clear_nexus_tasklet_complete, \
120                                    asd_clear_nexus_timedout);              \
121         if (res)                \
122                 goto out_err;   \
123         ASD_DPRINTK("%s: clear nexus posted, waiting...\n", __func__); \
124         wait_for_completion(&completion); \
125         res = tcs.dl_opcode; \
126         if (res == TC_NO_ERROR) \
127                 res = TMF_RESP_FUNC_COMPLETE;   \
128         return res; \
129 out_err:                        \
130         asd_ascb_free(ascb);    \
131         return res
132
133 int asd_clear_nexus_ha(struct sas_ha_struct *sas_ha)
134 {
135         struct asd_ha_struct *asd_ha = sas_ha->lldd_ha;
136
137         CLEAR_NEXUS_PRE;
138         scb->clear_nexus.nexus = NEXUS_ADAPTER;
139         CLEAR_NEXUS_POST;
140 }
141
142 int asd_clear_nexus_port(struct asd_sas_port *port)
143 {
144         struct asd_ha_struct *asd_ha = port->ha->lldd_ha;
145
146         CLEAR_NEXUS_PRE;
147         scb->clear_nexus.nexus = NEXUS_PORT;
148         scb->clear_nexus.conn_mask = port->phy_mask;
149         CLEAR_NEXUS_POST;
150 }
151
152 enum clear_nexus_phase {
153         NEXUS_PHASE_PRE,
154         NEXUS_PHASE_POST,
155         NEXUS_PHASE_RESUME,
156 };
157
158 static int asd_clear_nexus_I_T(struct domain_device *dev,
159                                enum clear_nexus_phase phase)
160 {
161         struct asd_ha_struct *asd_ha = dev->port->ha->lldd_ha;
162
163         CLEAR_NEXUS_PRE;
164         scb->clear_nexus.nexus = NEXUS_I_T;
165         switch (phase) {
166         case NEXUS_PHASE_PRE:
167                 scb->clear_nexus.flags = EXEC_Q | SUSPEND_TX;
168                 break;
169         case NEXUS_PHASE_POST:
170                 scb->clear_nexus.flags = SEND_Q | NOTINQ;
171                 break;
172         case NEXUS_PHASE_RESUME:
173                 scb->clear_nexus.flags = RESUME_TX;
174         }
175         scb->clear_nexus.conn_handle = cpu_to_le16((u16)(unsigned long)
176                                                    dev->lldd_dev);
177         CLEAR_NEXUS_POST;
178 }
179
180 int asd_I_T_nexus_reset(struct domain_device *dev)
181 {
182         int res, tmp_res, i;
183         struct sas_phy *phy = sas_find_local_phy(dev);
184         /* Standard mandates link reset for ATA  (type 0) and
185          * hard reset for SSP (type 1) */
186         int reset_type = (dev->dev_type == SATA_DEV ||
187                           (dev->tproto & SAS_PROTOCOL_STP)) ? 0 : 1;
188
189         asd_clear_nexus_I_T(dev, NEXUS_PHASE_PRE);
190         /* send a hard reset */
191         ASD_DPRINTK("sending %s reset to %s\n",
192                     reset_type ? "hard" : "soft", dev_name(&phy->dev));
193         res = sas_phy_reset(phy, reset_type);
194         if (res == TMF_RESP_FUNC_COMPLETE) {
195                 /* wait for the maximum settle time */
196                 msleep(500);
197                 /* clear all outstanding commands (keep nexus suspended) */
198                 asd_clear_nexus_I_T(dev, NEXUS_PHASE_POST);
199         }
200         for (i = 0 ; i < 3; i++) {
201                 tmp_res = asd_clear_nexus_I_T(dev, NEXUS_PHASE_RESUME);
202                 if (tmp_res == TC_RESUME)
203                         return res;
204                 msleep(500);
205         }
206
207         /* This is a bit of a problem:  the sequencer is still suspended
208          * and is refusing to resume.  Hope it will resume on a bigger hammer
209          * or the disk is lost */
210         dev_printk(KERN_ERR, &phy->dev,
211                    "Failed to resume nexus after reset 0x%x\n", tmp_res);
212
213         return TMF_RESP_FUNC_FAILED;
214 }
215
216 static int asd_clear_nexus_I_T_L(struct domain_device *dev, u8 *lun)
217 {
218         struct asd_ha_struct *asd_ha = dev->port->ha->lldd_ha;
219
220         CLEAR_NEXUS_PRE;
221         scb->clear_nexus.nexus = NEXUS_I_T_L;
222         scb->clear_nexus.flags = SEND_Q | EXEC_Q | NOTINQ;
223         memcpy(scb->clear_nexus.ssp_task.lun, lun, 8);
224         scb->clear_nexus.conn_handle = cpu_to_le16((u16)(unsigned long)
225                                                    dev->lldd_dev);
226         CLEAR_NEXUS_POST;
227 }
228
229 static int asd_clear_nexus_tag(struct sas_task *task)
230 {
231         struct asd_ha_struct *asd_ha = task->dev->port->ha->lldd_ha;
232         struct asd_ascb *tascb = task->lldd_task;
233
234         CLEAR_NEXUS_PRE;
235         scb->clear_nexus.nexus = NEXUS_TAG;
236         memcpy(scb->clear_nexus.ssp_task.lun, task->ssp_task.LUN, 8);
237         scb->clear_nexus.ssp_task.tag = tascb->tag;
238         if (task->dev->tproto)
239                 scb->clear_nexus.conn_handle = cpu_to_le16((u16)(unsigned long)
240                                                           task->dev->lldd_dev);
241         CLEAR_NEXUS_POST;
242 }
243
244 static int asd_clear_nexus_index(struct sas_task *task)
245 {
246         struct asd_ha_struct *asd_ha = task->dev->port->ha->lldd_ha;
247         struct asd_ascb *tascb = task->lldd_task;
248
249         CLEAR_NEXUS_PRE;
250         scb->clear_nexus.nexus = NEXUS_TRANS_CX;
251         if (task->dev->tproto)
252                 scb->clear_nexus.conn_handle = cpu_to_le16((u16)(unsigned long)
253                                                           task->dev->lldd_dev);
254         scb->clear_nexus.index = cpu_to_le16(tascb->tc_index);
255         CLEAR_NEXUS_POST;
256 }
257
258 /* ---------- TMFs ---------- */
259
260 static void asd_tmf_timedout(unsigned long data)
261 {
262         struct asd_ascb *ascb = (void *) data;
263         struct tasklet_completion_status *tcs = ascb->uldd_task;
264
265         ASD_DPRINTK("tmf timed out\n");
266         tcs->tmf_state = TMF_RESP_FUNC_FAILED;
267         complete(ascb->completion);
268 }
269
270 static int asd_get_tmf_resp_tasklet(struct asd_ascb *ascb,
271                                     struct done_list_struct *dl)
272 {
273         struct asd_ha_struct *asd_ha = ascb->ha;
274         unsigned long flags;
275         struct tc_resp_sb_struct {
276                 __le16 index_escb;
277                 u8     len_lsb;
278                 u8     flags;
279         } __attribute__ ((packed)) *resp_sb = (void *) dl->status_block;
280
281         int  edb_id = ((resp_sb->flags & 0x70) >> 4)-1;
282         struct asd_ascb *escb;
283         struct asd_dma_tok *edb;
284         struct ssp_frame_hdr *fh;
285         struct ssp_response_iu   *ru;
286         int res = TMF_RESP_FUNC_FAILED;
287
288         ASD_DPRINTK("tmf resp tasklet\n");
289
290         spin_lock_irqsave(&asd_ha->seq.tc_index_lock, flags);
291         escb = asd_tc_index_find(&asd_ha->seq,
292                                  (int)le16_to_cpu(resp_sb->index_escb));
293         spin_unlock_irqrestore(&asd_ha->seq.tc_index_lock, flags);
294
295         if (!escb) {
296                 ASD_DPRINTK("Uh-oh! No escb for this dl?!\n");
297                 return res;
298         }
299
300         edb = asd_ha->seq.edb_arr[edb_id + escb->edb_index];
301         ascb->tag = *(__be16 *)(edb->vaddr+4);
302         fh = edb->vaddr + 16;
303         ru = edb->vaddr + 16 + sizeof(*fh);
304         res = ru->status;
305         if (ru->datapres == 1)    /* Response data present */
306                 res = ru->resp_data[3];
307 #if 0
308         ascb->tag = fh->tag;
309 #endif
310         ascb->tag_valid = 1;
311
312         asd_invalidate_edb(escb, edb_id);
313         return res;
314 }
315
316 static void asd_tmf_tasklet_complete(struct asd_ascb *ascb,
317                                      struct done_list_struct *dl)
318 {
319         struct tasklet_completion_status *tcs;
320
321         if (!del_timer(&ascb->timer))
322                 return;
323
324         tcs = ascb->uldd_task;
325         ASD_DPRINTK("tmf tasklet complete\n");
326
327         tcs->dl_opcode = dl->opcode;
328
329         if (dl->opcode == TC_SSP_RESP) {
330                 tcs->tmf_state = asd_get_tmf_resp_tasklet(ascb, dl);
331                 tcs->tag_valid = ascb->tag_valid;
332                 tcs->tag = ascb->tag;
333         }
334
335         complete(ascb->completion);
336         asd_ascb_free(ascb);
337 }
338
339 static int asd_clear_nexus(struct sas_task *task)
340 {
341         int res = TMF_RESP_FUNC_FAILED;
342         int leftover;
343         struct asd_ascb *tascb = task->lldd_task;
344         DECLARE_COMPLETION_ONSTACK(completion);
345         unsigned long flags;
346
347         tascb->completion = &completion;
348
349         ASD_DPRINTK("task not done, clearing nexus\n");
350         if (tascb->tag_valid)
351                 res = asd_clear_nexus_tag(task);
352         else
353                 res = asd_clear_nexus_index(task);
354         leftover = wait_for_completion_timeout(&completion,
355                                                AIC94XX_SCB_TIMEOUT);
356         tascb->completion = NULL;
357         ASD_DPRINTK("came back from clear nexus\n");
358         spin_lock_irqsave(&task->task_state_lock, flags);
359         if (leftover < 1)
360                 res = TMF_RESP_FUNC_FAILED;
361         if (task->task_state_flags & SAS_TASK_STATE_DONE)
362                 res = TMF_RESP_FUNC_COMPLETE;
363         spin_unlock_irqrestore(&task->task_state_lock, flags);
364
365         return res;
366 }
367
368 /**
369  * asd_abort_task -- ABORT TASK TMF
370  * @task: the task to be aborted
371  *
372  * Before calling ABORT TASK the task state flags should be ORed with
373  * SAS_TASK_STATE_ABORTED (unless SAS_TASK_STATE_DONE is set) under
374  * the task_state_lock IRQ spinlock, then ABORT TASK *must* be called.
375  *
376  * Implements the ABORT TASK TMF, I_T_L_Q nexus.
377  * Returns: SAS TMF responses (see sas_task.h),
378  *          -ENOMEM,
379  *          -SAS_QUEUE_FULL.
380  *
381  * When ABORT TASK returns, the caller of ABORT TASK checks first the
382  * task->task_state_flags, and then the return value of ABORT TASK.
383  *
384  * If the task has task state bit SAS_TASK_STATE_DONE set, then the
385  * task was completed successfully prior to it being aborted.  The
386  * caller of ABORT TASK has responsibility to call task->task_done()
387  * xor free the task, depending on their framework.  The return code
388  * is TMF_RESP_FUNC_FAILED in this case.
389  *
390  * Else the SAS_TASK_STATE_DONE bit is not set,
391  *      If the return code is TMF_RESP_FUNC_COMPLETE, then
392  *              the task was aborted successfully.  The caller of
393  *              ABORT TASK has responsibility to call task->task_done()
394  *              to finish the task, xor free the task depending on their
395  *              framework.
396  *      else
397  *              the ABORT TASK returned some kind of error. The task
398  *              was _not_ cancelled.  Nothing can be assumed.
399  *              The caller of ABORT TASK may wish to retry.
400  */
401 int asd_abort_task(struct sas_task *task)
402 {
403         struct asd_ascb *tascb = task->lldd_task;
404         struct asd_ha_struct *asd_ha = tascb->ha;
405         int res = 1;
406         unsigned long flags;
407         struct asd_ascb *ascb = NULL;
408         struct scb *scb;
409         int leftover;
410         DECLARE_TCS(tcs);
411         DECLARE_COMPLETION_ONSTACK(completion);
412         DECLARE_COMPLETION_ONSTACK(tascb_completion);
413
414         tascb->completion = &tascb_completion;
415
416         spin_lock_irqsave(&task->task_state_lock, flags);
417         if (task->task_state_flags & SAS_TASK_STATE_DONE) {
418                 spin_unlock_irqrestore(&task->task_state_lock, flags);
419                 res = TMF_RESP_FUNC_COMPLETE;
420                 ASD_DPRINTK("%s: task 0x%p done\n", __func__, task);
421                 goto out_done;
422         }
423         spin_unlock_irqrestore(&task->task_state_lock, flags);
424
425         ascb = asd_ascb_alloc_list(asd_ha, &res, GFP_KERNEL);
426         if (!ascb)
427                 return -ENOMEM;
428
429         ascb->uldd_task = &tcs;
430         ascb->completion = &completion;
431         scb = ascb->scb;
432         scb->header.opcode = SCB_ABORT_TASK;
433
434         switch (task->task_proto) {
435         case SAS_PROTOCOL_SATA:
436         case SAS_PROTOCOL_STP:
437                 scb->abort_task.proto_conn_rate = (1 << 5); /* STP */
438                 break;
439         case SAS_PROTOCOL_SSP:
440                 scb->abort_task.proto_conn_rate  = (1 << 4); /* SSP */
441                 scb->abort_task.proto_conn_rate |= task->dev->linkrate;
442                 break;
443         case SAS_PROTOCOL_SMP:
444                 break;
445         default:
446                 break;
447         }
448
449         if (task->task_proto == SAS_PROTOCOL_SSP) {
450                 scb->abort_task.ssp_frame.frame_type = SSP_TASK;
451                 memcpy(scb->abort_task.ssp_frame.hashed_dest_addr,
452                        task->dev->hashed_sas_addr, HASHED_SAS_ADDR_SIZE);
453                 memcpy(scb->abort_task.ssp_frame.hashed_src_addr,
454                        task->dev->port->ha->hashed_sas_addr,
455                        HASHED_SAS_ADDR_SIZE);
456                 scb->abort_task.ssp_frame.tptt = cpu_to_be16(0xFFFF);
457
458                 memcpy(scb->abort_task.ssp_task.lun, task->ssp_task.LUN, 8);
459                 scb->abort_task.ssp_task.tmf = TMF_ABORT_TASK;
460                 scb->abort_task.ssp_task.tag = cpu_to_be16(0xFFFF);
461         }
462
463         scb->abort_task.sister_scb = cpu_to_le16(0xFFFF);
464         scb->abort_task.conn_handle = cpu_to_le16(
465                 (u16)(unsigned long)task->dev->lldd_dev);
466         scb->abort_task.retry_count = 1;
467         scb->abort_task.index = cpu_to_le16((u16)tascb->tc_index);
468         scb->abort_task.itnl_to = cpu_to_le16(ITNL_TIMEOUT_CONST);
469
470         res = asd_enqueue_internal(ascb, asd_tmf_tasklet_complete,
471                                    asd_tmf_timedout);
472         if (res)
473                 goto out_free;
474         wait_for_completion(&completion);
475         ASD_DPRINTK("tmf came back\n");
476
477         tascb->tag = tcs.tag;
478         tascb->tag_valid = tcs.tag_valid;
479
480         spin_lock_irqsave(&task->task_state_lock, flags);
481         if (task->task_state_flags & SAS_TASK_STATE_DONE) {
482                 spin_unlock_irqrestore(&task->task_state_lock, flags);
483                 res = TMF_RESP_FUNC_COMPLETE;
484                 ASD_DPRINTK("%s: task 0x%p done\n", __func__, task);
485                 goto out_done;
486         }
487         spin_unlock_irqrestore(&task->task_state_lock, flags);
488
489         if (tcs.dl_opcode == TC_SSP_RESP) {
490                 /* The task to be aborted has been sent to the device.
491                  * We got a Response IU for the ABORT TASK TMF. */
492                 if (tcs.tmf_state == TMF_RESP_FUNC_COMPLETE)
493                         res = asd_clear_nexus(task);
494                 else
495                         res = tcs.tmf_state;
496         } else if (tcs.dl_opcode == TC_NO_ERROR &&
497                    tcs.tmf_state == TMF_RESP_FUNC_FAILED) {
498                 /* timeout */
499                 res = TMF_RESP_FUNC_FAILED;
500         } else {
501                 /* In the following we assume that the managing layer
502                  * will _never_ make a mistake, when issuing ABORT
503                  * TASK.
504                  */
505                 switch (tcs.dl_opcode) {
506                 default:
507                         res = asd_clear_nexus(task);
508                         /* fallthrough */
509                 case TC_NO_ERROR:
510                         break;
511                         /* The task hasn't been sent to the device xor
512                          * we never got a (sane) Response IU for the
513                          * ABORT TASK TMF.
514                          */
515                 case TF_NAK_RECV:
516                         res = TMF_RESP_INVALID_FRAME;
517                         break;
518                 case TF_TMF_TASK_DONE:  /* done but not reported yet */
519                         res = TMF_RESP_FUNC_FAILED;
520                         leftover =
521                                 wait_for_completion_timeout(&tascb_completion,
522                                                           AIC94XX_SCB_TIMEOUT);
523                         spin_lock_irqsave(&task->task_state_lock, flags);
524                         if (leftover < 1)
525                                 res = TMF_RESP_FUNC_FAILED;
526                         if (task->task_state_flags & SAS_TASK_STATE_DONE)
527                                 res = TMF_RESP_FUNC_COMPLETE;
528                         spin_unlock_irqrestore(&task->task_state_lock, flags);
529                         break;
530                 case TF_TMF_NO_TAG:
531                 case TF_TMF_TAG_FREE: /* the tag is in the free list */
532                 case TF_TMF_NO_CONN_HANDLE: /* no such device */
533                         res = TMF_RESP_FUNC_COMPLETE;
534                         break;
535                 case TF_TMF_NO_CTX: /* not in seq, or proto != SSP */
536                         res = TMF_RESP_FUNC_ESUPP;
537                         break;
538                 }
539         }
540  out_done:
541         tascb->completion = NULL;
542         if (res == TMF_RESP_FUNC_COMPLETE) {
543                 task->lldd_task = NULL;
544                 mb();
545                 asd_ascb_free(tascb);
546         }
547         ASD_DPRINTK("task 0x%p aborted, res: 0x%x\n", task, res);
548         return res;
549
550  out_free:
551         asd_ascb_free(ascb);
552         ASD_DPRINTK("task 0x%p aborted, res: 0x%x\n", task, res);
553         return res;
554 }
555
556 /**
557  * asd_initiate_ssp_tmf -- send a TMF to an I_T_L or I_T_L_Q nexus
558  * @dev: pointer to struct domain_device of interest
559  * @lun: pointer to u8[8] which is the LUN
560  * @tmf: the TMF to be performed (see sas_task.h or the SAS spec)
561  * @index: the transaction context of the task to be queried if QT TMF
562  *
563  * This function is used to send ABORT TASK SET, CLEAR ACA,
564  * CLEAR TASK SET, LU RESET and QUERY TASK TMFs.
565  *
566  * No SCBs should be queued to the I_T_L nexus when this SCB is
567  * pending.
568  *
569  * Returns: TMF response code (see sas_task.h or the SAS spec)
570  */
571 static int asd_initiate_ssp_tmf(struct domain_device *dev, u8 *lun,
572                                 int tmf, int index)
573 {
574         struct asd_ha_struct *asd_ha = dev->port->ha->lldd_ha;
575         struct asd_ascb *ascb;
576         int res = 1;
577         struct scb *scb;
578         DECLARE_COMPLETION_ONSTACK(completion);
579         DECLARE_TCS(tcs);
580
581         if (!(dev->tproto & SAS_PROTOCOL_SSP))
582                 return TMF_RESP_FUNC_ESUPP;
583
584         ascb = asd_ascb_alloc_list(asd_ha, &res, GFP_KERNEL);
585         if (!ascb)
586                 return -ENOMEM;
587
588         ascb->completion = &completion;
589         ascb->uldd_task = &tcs;
590         scb = ascb->scb;
591
592         if (tmf == TMF_QUERY_TASK)
593                 scb->header.opcode = QUERY_SSP_TASK;
594         else
595                 scb->header.opcode = INITIATE_SSP_TMF;
596
597         scb->ssp_tmf.proto_conn_rate  = (1 << 4); /* SSP */
598         scb->ssp_tmf.proto_conn_rate |= dev->linkrate;
599         /* SSP frame header */
600         scb->ssp_tmf.ssp_frame.frame_type = SSP_TASK;
601         memcpy(scb->ssp_tmf.ssp_frame.hashed_dest_addr,
602                dev->hashed_sas_addr, HASHED_SAS_ADDR_SIZE);
603         memcpy(scb->ssp_tmf.ssp_frame.hashed_src_addr,
604                dev->port->ha->hashed_sas_addr, HASHED_SAS_ADDR_SIZE);
605         scb->ssp_tmf.ssp_frame.tptt = cpu_to_be16(0xFFFF);
606         /* SSP Task IU */
607         memcpy(scb->ssp_tmf.ssp_task.lun, lun, 8);
608         scb->ssp_tmf.ssp_task.tmf = tmf;
609
610         scb->ssp_tmf.sister_scb = cpu_to_le16(0xFFFF);
611         scb->ssp_tmf.conn_handle= cpu_to_le16((u16)(unsigned long)
612                                               dev->lldd_dev);
613         scb->ssp_tmf.retry_count = 1;
614         scb->ssp_tmf.itnl_to = cpu_to_le16(ITNL_TIMEOUT_CONST);
615         if (tmf == TMF_QUERY_TASK)
616                 scb->ssp_tmf.index = cpu_to_le16(index);
617
618         res = asd_enqueue_internal(ascb, asd_tmf_tasklet_complete,
619                                    asd_tmf_timedout);
620         if (res)
621                 goto out_err;
622         wait_for_completion(&completion);
623
624         switch (tcs.dl_opcode) {
625         case TC_NO_ERROR:
626                 res = TMF_RESP_FUNC_COMPLETE;
627                 break;
628         case TF_NAK_RECV:
629                 res = TMF_RESP_INVALID_FRAME;
630                 break;
631         case TF_TMF_TASK_DONE:
632                 res = TMF_RESP_FUNC_FAILED;
633                 break;
634         case TF_TMF_NO_TAG:
635         case TF_TMF_TAG_FREE: /* the tag is in the free list */
636         case TF_TMF_NO_CONN_HANDLE: /* no such device */
637                 res = TMF_RESP_FUNC_COMPLETE;
638                 break;
639         case TF_TMF_NO_CTX: /* not in seq, or proto != SSP */
640                 res = TMF_RESP_FUNC_ESUPP;
641                 break;
642         default:
643                 /* Allow TMF response codes to propagate upwards */
644                 res = tcs.dl_opcode;
645                 break;
646         }
647         return res;
648 out_err:
649         asd_ascb_free(ascb);
650         return res;
651 }
652
653 int asd_abort_task_set(struct domain_device *dev, u8 *lun)
654 {
655         int res = asd_initiate_ssp_tmf(dev, lun, TMF_ABORT_TASK_SET, 0);
656
657         if (res == TMF_RESP_FUNC_COMPLETE)
658                 asd_clear_nexus_I_T_L(dev, lun);
659         return res;
660 }
661
662 int asd_clear_aca(struct domain_device *dev, u8 *lun)
663 {
664         int res = asd_initiate_ssp_tmf(dev, lun, TMF_CLEAR_ACA, 0);
665
666         if (res == TMF_RESP_FUNC_COMPLETE)
667                 asd_clear_nexus_I_T_L(dev, lun);
668         return res;
669 }
670
671 int asd_clear_task_set(struct domain_device *dev, u8 *lun)
672 {
673         int res = asd_initiate_ssp_tmf(dev, lun, TMF_CLEAR_TASK_SET, 0);
674
675         if (res == TMF_RESP_FUNC_COMPLETE)
676                 asd_clear_nexus_I_T_L(dev, lun);
677         return res;
678 }
679
680 int asd_lu_reset(struct domain_device *dev, u8 *lun)
681 {
682         int res = asd_initiate_ssp_tmf(dev, lun, TMF_LU_RESET, 0);
683
684         if (res == TMF_RESP_FUNC_COMPLETE)
685                 asd_clear_nexus_I_T_L(dev, lun);
686         return res;
687 }
688
689 /**
690  * asd_query_task -- send a QUERY TASK TMF to an I_T_L_Q nexus
691  * task: pointer to sas_task struct of interest
692  *
693  * Returns: TMF_RESP_FUNC_COMPLETE if the task is not in the task set,
694  * or TMF_RESP_FUNC_SUCC if the task is in the task set.
695  *
696  * Normally the management layer sets the task to aborted state,
697  * and then calls query task and then abort task.
698  */
699 int asd_query_task(struct sas_task *task)
700 {
701         struct asd_ascb *ascb = task->lldd_task;
702         int index;
703
704         if (ascb) {
705                 index = ascb->tc_index;
706                 return asd_initiate_ssp_tmf(task->dev, task->ssp_task.LUN,
707                                             TMF_QUERY_TASK, index);
708         }
709         return TMF_RESP_FUNC_COMPLETE;
710 }