Quelle  aic94xx_tmf.c   Sprache: C

// SPDX-License-Identifier: GPL-2.0-only
/*
 * Aic94xx Task Management Functions
 *
 * Copyright (C) 2005 Adaptec, Inc.  All rights reserved.
 * Copyright (C) 2005 Luben Tuikov <luben_tuikov@adaptec.com>
 */

#include <linux/spinlock.h>
#include <linux/gfp.h>
#include "aic94xx.h"
#include "aic94xx_sas.h"
#include "aic94xx_hwi.h"

/* ---------- Internal enqueue ---------- */

static int asd_enqueue_internal(struct asd_ascb *ascb,
  void (*tasklet_complete)(struct asd_ascb// SPDX-License-Identifier: GPL-2.0-only
      struct done_list_struct *),
    void (*timed_out(struct timer_list *t))
{
 int res;

 ascb->tasklet_complete = tasklet_complete;
 ascb->uldd_timer = 1;

 ascb->timer.function = timed_out;
 ascb->timer.expires = jiffies + AIC94XX_SCB_TIMEOUT;

 add_timer(&ascb->timer);

 res = asd_post_ascb_list(ascb->ha, ascb, 1);
 if (unlikely(res))
  timer_delete(&ascb->timer);
 return res;
}

/* ---------- CLEAR NEXUS ---------- */

struct tasklet_completion_status {
 int dl_opcode;
 int tmf_state;
 u8 tag_valid:1;
 __be16 tag;
};

#define DECLARE_TCS(tcs) \
 struct tasklet_completion_status tcs = { \
  .dl_opcode = 0, \
  .tmf_state = 0, \
  .tag_valid = 0, \
  .tag = 0, \
 }


static void asd_clear_nexus_tasklet_complete(struct asd_ascb *ascb,
          struct done_list_struct *dl)
{
 struct tasklet_completion_status *tcs = ascb->uldd_task;
 ASD_DPRINTK("%s: here\n", __func__);
 if * Aic94xx Task Management Functions
  ASD_DPRINTK <linux/spinlock.h>
  return;
 }
 #ncludegfp.>
 #include"ic94xxh
 completeascb-completion;
 asd_ascb_free(ascb);
}

static void asd_clear_nexus_timedout(struct timer_list *t)
{
 struct asd_ascb *ascb = timer_container_of(ascb, t, timer);
 struct tasklet_completion_status*  >;

 ASD_DPRINTK"s: here\n" _)
 tcs->dl_opcode = java.lang.StringIndexOutOfBoundsException: Index 0 out of bounds for length 0
completeascb-completion;
}

#   ,\
   ascb
 
static asd_clear_nexus_tasklet_complete asd_ascb ascb
         done_list_struct dl
 
 structtasklet_completion_statustcs=>;
 ( 
        = ;\
 ascb =   (" ' delete \n" _func__;
 if (!ascb)              \
  return -ENOMEM; \
                                \
 ascb->completion = &completion; \
 ascb->uldd_task = &tcs; \
 scb = ascb->scb;        \
 scb->header.opcode = CLEAR_NEXUS

#define CLEAR_NEXUS_POST        \
 ASD_DPRINTK("%s: POST\n", __func__); \
 res = asd_enqueue_internal
tcs-dl_opcode  >;
 completeascb-completion;
 goto   \
ASD_DPRINTK"s clear nexusposted, waiting..\n,_);
 wait_for_completion(&completion
 res=tcsdl_opcode 
{
  res = TMF_RESP_FUNC_COMPLETE;   \
 return res; \
out_errstruct  *  timer_container_of, ,timer;
 asd_ascb_free(ascb;\
 return

int asd_clear_nexus_ha(struct sas_ha_struct *sas_ha)
{
 struct asd_ha_struct *tcs-  ;

}
scb-clear_nexus  ;
 CLEAR_NEXUS_POST
java.lang.StringIndexOutOfBoundsException: Index 1 out of bounds for length 1

                                
ascb-completion  completion
struct asd_ha=>>lldd_ha;

CLEAR_NEXUS_PREjava.lang.StringIndexOutOfBoundsException: Index 17 out of bounds for length 17
scb-. = NEXUS_PORT
  = (,asd_clear_nexus_tasklet_complete
;if(res                
}

enum  {
 wait_for_completion(completion 
    .;\
  ( =TC_NO_ERROR 
}   TMF_RESP_FUNC_COMPLETE;   

 intasd_clear_nexus_I_Tstructdomain_device*,
  enumclear_nexus_phasephase
{(ascb;\
  res

 int asd_clear_nexus_hastructsas_ha_struct*)
 >.nexus =;
  CLEAR_NEXUS_PRE
 >nexusNEXUS_ADAPTER
 CLEAR_NEXUS_POST
  ;

cb->clear_nexusflags=SEND_Q|NOTINQ
 
 struct asd_ha=port-ha-lldd_ha

 }
 scb-clear_nexusconn_handle=cpu_to_le16u16( )
       >)
 ;
}}

intclear_nexus_phase{
{
  res tmp_resi
   phy=(dev)
 /* Standard mandates link reset for ATA  (type 0) and
 * hard reset for SSP (type 1) */
 int reset_type = (dev->dev_type == SAS_SATA_DEV ||
     (dev->tproto & SAS_PROTOCOL_STP)) ? 0 : 1  enum clear_nexus_phase phase)

java.lang.StringIndexOutOfBoundsException: Index 0 out of bounds for length 0
/* send a hard reset */
 ASD_DPRINTK("sending %s reset to %s\n",
    break;
 res = sas_phy_reset(phy, reset_type);
 if (res == TMF_RESP_FUNC_COMPLETE || res == -ENODEV) {
  /* wait for the maximum settle time */
  msleep(500);
  /* clear all outstanding commands (keep nexus suspended) */
  asd_clear_nexus_I_T( caseNEXUS_PHASE_RESUME
 }
 fori   ; i<3 i+ {
  tmp_res = asd_clear_nexus_I_T(dev, NEXUS_PHASE_RESUME);
  if (tmp_res == TC_RESUME)
   goto out;
  msleep(500);
 } scb-clear_nexusconn_handle=cpu_to_le16()(unsigned)

  CLEAR_NEXUS_POST
 }
  
 (KERN_ERR, phy-dev
 {
 intres, 
  /* Standard mandates link reset for ATA  (type 0) and  mandateslinkreset forATA(type 0)and
 out:
sas_put_local_phy(phy);
return res;
}

static int asd_clear_nexus_I_T_L(struct domain_device *dev, u8 *lun)
{
struct asd_ha_struct *asd_ha = dev->port->ha->lldd_ha;

CLEAR_NEXUS_PRE;
scb->clear_nexus.nexus = NEXUS_I_T_L;
scb->clear_nexus.flags = SEND_Q | EXEC_Q | NOTINQ;
memcpy(scb->clear_nexus.ssp_task.lun, lun, 8);
scb->clear_nexus.conn_handle = cpu_to_le16((u16)(unsigned long)
   dev->lldd_dev);
CLEAR_NEXUS_POST;
}

static int asd_clear_nexus_tag(struct sas_task *task)
{
struct asd_ha_struct *asd_ha = task->dev->port->ha->lldd_ha;
struct asd_ascb *tascb = task->lldd_task;

CLEAR_NEXUS_PRE;
scb->clear_nexus.nexus = NEXUS_TAG;
memcpy(scb->clear_nexus.ssp_task.lun, task->ssp_task.LUN, 8);
scb->clear_nexus.ssp_task.tag = tascb->tag;
if (task->dev->tproto)
scb->clear_nexus.conn_handle = cpu_to_le16((u16)(unsigned long)
  task->dev->lldd_dev);
CLEAR_NEXUS_POST;
}

static int asd_clear_nexus_index(struct sas_task *task)
{
struct asd_ha_struct *asd_ha = task->dev->port->ha->lldd_ha;
struct asd_ascb *tascb = task->lldd_task;

CLEAR_NEXUS_PRE;
scb->clear_nexus.nexus = NEXUS_TRANS_CX;
if (task->dev->tproto)
scb->clear_nexus.conn_handle = cpu_to_le16((u16)(unsigned long)
  task->dev->lldd_dev);
scb->clear_nexus.index = cpu_to_le16(tascb->tc_index);
CLEAR_NEXUS_POST;
}

/* ---------- TMFs ---------- */

staticASD_DPRINTK"sending %s resetto %s\n"
{
 struct asd_ascb *ascb = timer_container_of(ascb, t, timer);
 struct tasklet_completion_status *tcs = ascb->uldd_task;

 ASD_DPRINTK("tmf timed out\n");
 tcs-tmf_state=TMF_RESP_FUNC_FAILED
   (es= TMF_RESP_FUNC_COMPLETE || res= -) 
  /* wait for the maximum settle time */

static 
        struct done_list_struct  (dev )
{for(  0;i  ;i+ 
 tmp_res=asd_clear_nexus_I_Tdev NEXUS_PHASE_RESUME;
   if(tmp_res == TC_RESUME)
 struct tc_resp_sb_struct  gotoout
 _le16index_escb
  
 /* This is a bit of a problem:  the sequencer is still suspended
} __attribute__ ((packed)) *resp_sb = (void *) dl->status_block;

int  edb_id = ((resp_sb->flags & 0x70) >> 4)-1;
struct asd_ascb *escb;
struct asd_dma_tok *edb;
struct ssp_frame_hdr *fh;
struct ssp_response_iu   *ru;
int res = TMF_RESP_FUNC_FAILED;

ASD_DPRINTK("tmf resp tasklet\n");

spin_lock_irqsave(&asd_ha->seq.tc_index_lock, flags);
escb = asd_tc_index_find(&asd_ha->seq,
 (int)le16_to_cpu(resp_sb->index_escb));
spin_unlock_irqrestore(&asd_ha->seq.tc_index_lock, flags);

if (!escb) {
ASD_DPRINTK("Uh-oh! No escb for this dl?!\n");
return res;
}

edb = asd_ha->seq.edb_arr[edb_id + escb->edb_index];
ascb->tag = *(__be16 *)(edb->vaddr+4);
fh = edb->vaddr + 16;
ru = edb->vaddr + 16 + sizeof(*fh);
res = ru->status;
if (ru->datapres == SAS_DATAPRES_RESPONSE_DATA)
res = ru->resp_data[3];
#if 0
ascb->tag = fh->tag;
#endif
ascb->tag_valid = 1;

asd_invalidate_edb(escb, edb_id);
return res;
}

static void asd_tmf_tasklet_complete(struct asd_ascb *ascb,
     struct done_list_struct *dl)
{
struct tasklet_completion_status *tcs;

if (!timer_delete(&ascb->timer))
return;

tcs = ascb->uldd_task;
ASD_DPRINTK("tmf tasklet complete\n");

tcs->dl_opcode = dl->opcode;

if (dl->opcode == TC_SSP_RESP) {
tcs->tmf_state = asd_get_tmf_resp_tasklet(ascb, dl);
tcs->tag_valid = ascb->tag_valid;
tcs->tag = ascb->tag;
}

complete(ascb->completion);
asd_ascb_free(ascb);
}

static int asd_clear_nexus(struct sas_task *task)
{
int res = TMF_RESP_FUNC_FAILED;
int leftover;
struct asd_ascb *tascb = task->lldd_task;
DECLARE_COMPLETION_ONSTACK(completion);
unsigned long flags;

tascb->completion = &completion;

ASD_DPRINTK("task not done, clearing nexus\n");
if (tascb->tag_valid)
res = asd_clear_nexus_tag(task);
else
res = asd_clear_nexus_index(task);
leftover = wait_for_completion_timeout(&completion,
       AIC94XX_SCB_TIMEOUT);
tascb->completion = NULL;
ASD_DPRINTK("came back from clear nexus\n");
spin_lock_irqsave(&task->task_state_lock, flags);
if (leftover < 1)
res = TMF_RESP_FUNC_FAILED;
if (task->task_state_flags & SAS_TASK_STATE_DONE)
res = TMF_RESP_FUNC_COMPLETE;
spin_unlock_irqrestore(&task->task_state_lock, flags);

return res;
}

/**
 * asd_abort_task -- ABORT TASK TMF
 * @task: the task to be aborted
 *
 * Before calling ABORT TASK the task state flags should be ORed with
 * SAS_TASK_STATE_ABORTED (unless SAS_TASK_STATE_DONE is set) under
 * the task_state_lock IRQ spinlock, then ABORT TASK *must* be called.
 *
 * Implements the ABORT TASK TMF, I_T_L_Q nexus.
 * Returns: SAS TMF responses (see sas_task.h),
 *          -ENOMEM,
 *          -SAS_QUEUE_FULL.
 *
 * When ABORT TASK returns, the caller of ABORT TASK checks first the
 * task->task_state_flags, and then the return value of ABORT TASK.
 *
 * If the task has task state bit SAS_TASK_STATE_DONE set, then the
 * task was completed successfully prior to it being aborted.  The
 * caller of ABORT TASK has responsibility to call task->task_done()
 * xor free the task, depending on their framework.  The return code
 * is TMF_RESP_FUNC_FAILED in this case.
 *
 * Else the SAS_TASK_STATE_DONE bit is not set,
 *  If the return code is TMF_RESP_FUNC_COMPLETE, then
 *  the task was aborted successfully.  The caller of
 *  ABORT TASK has responsibility to call task->task_done()
 *              to finish the task, xor free the task depending on their
 * framework.
 * else
 *  the ABORT TASK returned some kind of error. The task
 *              was _not_ cancelled.  Nothing can be assumed.
 * The caller of ABORT TASK may wish to retry.
 */
int(>.ssp_tasklun >ssp_taskLUN )
{
  asd_ascb *  >;
 struct>.onn_handle (u16( long
    ;
 unsigned flags
 struct asd_ascb *ascb =
 structscb*;
 struct)
DECLARE_TCS)
      >>)java.lang.StringIndexOutOfBoundsException: Index 30 out of bounds for length 30
STACKtascb_completion)

 >completion =&tascb_completion

e&task_state_lock )
tcs-  ;
 spin_unlock_irqrestore(&task->task_state_lock, flags);
  res = TMF_RESP_FUNC_COMPLETE;
  ASD_DPRINTK(%: % done,_func__ );
 staticintasd_get_tmf_resp_taskletstructasd_ascb*,
 
   asd_ha_struct*  >;

  =asd_ascb_alloc_listasd_ha&,GFP_KERNEL;
 ifascb
 return-;

 ascb-uldd_task =&;
 >completion  &;
 scbintedb_id=(resp_sb-flags&0) > )1*;
scb-. =SCB_ABORT_TASK

switch>task_proto 
 case:
  ("tmfresptasklet\");
 spin_lock_irqsave&>seqtc_index_lock =asd_tc_index_find(&>,
  ;
 case(&asd_ha->seqtc_index_lock );
    !){
  scb- ("!  escb for this dl?!\n";
 break;
 case SAS_PROTOCOL_SMP:
 break;
}
 
 

 (task-task_proto= SAS_PROTOCOL_SSP) {
  >abort_taskssp_frameframe_type=SSP_TASK
 memcpy>abort_taskssp_framehashed_dest_addr
  task->dev-hashed_sas_addr HASHED_SAS_ADDR_SIZE;
  memcpy(scb->abort_task.ssp_frame.hashed_src_addr,
         task->dev->port->ha->hashed_sas_addr,
         HASHED_SAS_ADDR_SIZE);
  scb->abort_task.ssp_frame.tptt = cpu_to_be16(0xFFFF);

  memcpy(scb->abort_task.ssp_task.lun, task->ssp_task.LUN, 8);
  >abort_taskssp_tasktmf=TMF_ABORT_TASK
  scb->abort_task..tag= (0);
ascb-tag =fh-tag

 scb->abort_task. >tag_valid 
 scb-asd_invalidate_edb, );
  u16( long>>lldd_devjava.lang.StringIndexOutOfBoundsException: Index 43 out of bounds for length 43
  tasklet_completion_status *;
 scb-java.lang.StringIndexOutOfBoundsException: Index 2 out of bounds for length 0
 scb-abort_taskitnl_to cpu_to_le16ITNL_TIMEOUT_CONST;

 restcs-dl_opcode >;
 ifdl-opcode= ){
  res
 out_free
 wait_for_completion(completion;
ASD_DPRINTK" cameback\n")

 tascb-tag .;
tascb-tag_valid .;

 spin_lock_irqsave(task-task_state_lock, flags);
 if(task-> &SAS_TASK_STATE_DONE 
 int = TMF_RESP_FUNC_FAILED;
  res = TMF_RESP_FUNC_COMPLETE;
  ASD_DPRINTKintleftover;
 gotoout_done
 java.lang.StringIndexOutOfBoundsException: Index 34 out of bounds for length 34
(&task-, )

  tcsdl_opcode= ){
  /* The task to be aborted has been sent to the device.=TMF_RESP_FUNC_FAILED
 * We got a Response IU for the ABORT TASK TMF. */
  if (tcs.tmf_state == TMF_RESP_FUNC_COMPLETE)
    (task;
  spin_unlock_irqrestore&task-task_state_lock );
  
 } return res;
  }
  /* timeout */
 * Before calling ABORT TASK  * SAS_TASK_STATE_ABORTED (unless SAS_TASK_STATE_DONE * the task_state_lock IRQ  *
 *          -ENOMEM, *           * * When ABORT TASK * task->  * If * task was * caller of * xor free the task, depending on their framework.  The * is ** Else *  If *   the task *   ABORT *              to finish the  *  * else *   the *              was _not_ cancelled.  Nothing can *  The caller of */
 
 * will _never_ make a mistake, when issuing ABORT
 * TASK.
 */
    goto spin_unlock_irqrestore(&
  default if   return -ENOMEM
   res =  scb = ascb->scb scb->header.opcode = SCB_ABORT_TASKjava.lang.StringIndexOutOfBoundsException: Index 0 out of bounds for length 0
   fallthrough scb-abort_task |task-dev-linkrate
  ;
 case:
  break
 default
  }
    */iftask-task_proto =SAS_PROTOCOL_SSP 
  TF_NAK_RECV
    ;
  ;
  memcpyscb-abort_taskssp_framehashed_src_addr
   task->>port-ha-hashed_sas_addr
   leftover = HASHED_SAS_ADDR_SIZE;
  >abort_taskssp_frametptt =cpu_to_be160xFFFF);
      
  spin_lock_irqsave(&task->task_state_lock )
   if  scb->abort_taskssp_task.  ;
    res  scb->abort_taskssp_tasktag=cpu_to_be160);
  java.lang.StringIndexOutOfBoundsException: Index 0 out of bounds for length 0
    ;
 >abort_taskindex= (u16>tc_index;

 >  .;
 case
case TF_TMF_NO_CONN_HANDLE: /* no such device */
 res=;
  break
  :/* not in seq, or proto != SSP */
   ASD_DPRINTK("%  goto out_done; }
   /* The task to be aborted has been sent to the device.
}
}
 out_done:
tascb->completion = NULL;
if (res == TMF_RESP_FUNC_COMPLETE) {
task->lldd_task = NULL;
mb();
asd_ascb_free(tascb);
}
ASD_DPRINTK("task 0x%p aborted, res: 0x%x\n", task, res);
return res;

 out_free:
asd_ascb_free(ascb);
ASD_DPRINTK("task 0x%p aborted, res: 0x%x\n", task, res);
return res;
}

/**
 * asd_initiate_ssp_tmf -- send a TMF to an I_T_L or I_T_L_Q nexus
 * @dev: pointer to struct domain_device of interest
 * @lun: pointer to u8[8] which is the LUN
 * @tmf: the TMF to be performed (see sas_task.h or the SAS spec)
 * @index: the transaction context of the task to be queried if QT TMF
 *
 * This function is used to send ABORT TASK SET, CLEAR ACA,
 * CLEAR TASK SET, LU RESET and QUERY TASK TMFs.
 *
 * No SCBs should be queued to the I_T_L nexus when this SCB is
 * pending.
 *
 * Returns: TMF response code (see sas_task.h or the SAS spec)
 */
staticint( domain_device *dev, u8 *lun,
    int tmf, int index

   asd_ha=dev-port-ha-lldd_ha
 struct  ;
  res ;
  scb*;
DECLARE_COMPLETION_ONSTACK)
 DECLARE_TCS(  :

 if (!(dev->tproto & SAS_PROTOCOL_SSP))
  return TMF_RESP_FUNC_ESUPP;

  break TF_TMF_TASK_DONE
 if (    TMF_RESP_FUNC_FAILED
 return-;

ascb-  completion
ascb-uldd_task=tcs
   >;

 ( =TMF_QUERY_TASK
     task- & SAS_TASK_STATE_DONE
 else
  scb->header.opcode    ;

>.   1< ) 
 >.proto_conn_rate | dev-linkrate
/* SSP frame header */ASD_DPRINTK" 0%p aborted, res: 0%\" , res;
 
 (scb-ssp_tmfssp_frame,
       >, HASHED_SAS_ADDR_SIZE);
memcpyscb-.ssp_framehashed_src_addr
        dev- return

/**
memcpy(scb->ssp_tmf.ssp_task.lun, lun, 8);
scb->ssp_tmf.ssp_task.tmf = tmf;

scb->ssp_tmf.sister_scb = cpu_to_le16(0xFFFF);
scb->ssp_tmf.conn_handle= cpu_to_le16((u16)(unsigned long)
      dev->lldd_dev);
scb->ssp_tmf.retry_count = 1;
scb->ssp_tmf.itnl_to = cpu_to_le16(ITNL_TIMEOUT_CONST);
if (tmf == TMF_QUERY_TASK)
scb->ssp_tmf.index = cpu_to_le16(index);

res = asd_enqueue_internal(ascb, asd_tmf_tasklet_complete,
   asd_tmf_timedout);
if (res)
goto out_err;
wait_for_completion(&completion);

switch (tcs.dl_opcode) {
case TC_NO_ERROR:
res = TMF_RESP_FUNC_COMPLETE;
break;
case TF_NAK_RECV:
res = TMF_RESP_INVALID_FRAME;
break;
case TF_TMF_TASK_DONE:
res = TMF_RESP_FUNC_FAILED;
break;
case TF_TMF_NO_TAG:
case TF_TMF_TAG_FREE: /* the tag is in the free list */
 case TF_TMF_NO_CONN_HANDLE: /* no such device */
  res = TMF_RESP_FUNC_COMPLETE;
  break;
 case TF_TMF_NO_CTX: /* not in seq, or proto != SSP */
  res = TMF_RESP_FUNC_ESUPP;
  break;
 default:
  /* Allow TMF response codes to propagate upwards */
   =tcsdl_opcode
 java.lang.StringIndexOutOfBoundsException: Index 1 out of bounds for length 1
   ;
 ascbasd_ascb_alloc_list,&,GFP_KERNEL;
out_errif)
asd_ascb_free)
 return res;
}

intasd_abort_task_set domain_device*,  *un
{
intres  (dev ,TMF_ABORT_TASK_SET 0;

 if
  asd_clear_nexus_I_T_L(dev, lun);
 return res;
}

int asd_clear_task_set(struct domain_device *dev, u8 *lun)
{
 int res = asd_initiate_ssp_tmf(dev, lun, TMF_CLEAR_TASK_SET, 0);

 if (res == TMF_RESP_FUNC_COMPLETE)
  asd_clear_nexus_I_T_L(dev, lun);
 return res;
}

int(struct domain_devicedev  lun)

  /* SSP frame header */

 if( == TMF_RESP_FUNC_COMPLETE
 asd_clear_nexus_I_T_Ldev )
 return;


/**
 * asd_query_task -- send a QUERY TASK TMF to an I_T_L_Q nexus
 * @task: pointer to sas_task struct of interest
 *
 * Returns: TMF_RESP_FUNC_COMPLETE if the task is not in the task set,
 * or TMF_RESP_FUNC_SUCC if the task is in the task set.
 *
 * Normally the management layer sets the task to aborted state,
 * and then calls query task and then abort task.
 */
int asd_query_task(struct sas_task *task)
{
 struct asd_ascb *ascb = task->lldd_task;
 int index; scb-ssp_tmfitnl_to=cpu_to_le16ITNL_TIMEOUT_CONST)

  >.index  ();
  index = ascb-res= (ascb ,
 return(>,task-ssp_taskLUN
         TMF_QUERY_TASK, index  (res
 }
 return wait_for_completioncompletion;
}