drivers/scsi/gdth_proc.c

   1 /* gdth_proc.c
   2  * $Id: gdth_proc.c,v 1.43 2006/01/11 16:15:00 achim Exp $
   3  */
   4
   5 #include <linux/completion.h>
   6
   7 #if LINUX_VERSION_CODE >= KERNEL_VERSION(2,6,0)
   8 int gdth_proc_info(struct Scsi_Host *host, char *buffer,char **start,off_t offset,int length,
   9                    int inout)
  10 {
  11     int hanum,busnum;
  12
  13     TRACE2(("gdth_proc_info() length %d offs %d inout %d\n",
  14             length,(int)offset,inout));
  15
  16     hanum = NUMDATA(host)->hanum;
  17     busnum= NUMDATA(host)->busnum;
  18
  19     if (inout)
  20         return(gdth_set_info(buffer,length,host,hanum,busnum));
  21     else
  22         return(gdth_get_info(buffer,start,offset,length,host,hanum,busnum));
  23 }
  24 #else
  25 int gdth_proc_info(char *buffer,char **start,off_t offset,int length,int hostno,
  26                    int inout)
  27 {
  28     int hanum,busnum,i;
  29
  30     TRACE2(("gdth_proc_info() length %d offs %d inout %d\n",
  31             length,(int)offset,inout));
  32
  33     for (i = 0; i < gdth_ctr_vcount; ++i) {
  34         if (gdth_ctr_vtab[i]->host_no == hostno)
  35             break;
  36     }
  37     if (i == gdth_ctr_vcount)
  38         return(-EINVAL);
  39
  40     hanum = NUMDATA(gdth_ctr_vtab[i])->hanum;
  41     busnum= NUMDATA(gdth_ctr_vtab[i])->busnum;
  42
  43     if (inout)
  44         return(gdth_set_info(buffer,length,gdth_ctr_vtab[i],hanum,busnum));
  45     else
  46         return(gdth_get_info(buffer,start,offset,length,
  47                              gdth_ctr_vtab[i],hanum,busnum));
  48 }
  49 #endif
  50
  51 static int gdth_set_info(char *buffer,int length,struct Scsi_Host *host,
  52                          int hanum,int busnum)
  53 {
  54     int ret_val = -EINVAL;
  55
  56     TRACE2(("gdth_set_info() ha %d bus %d\n",hanum,busnum));
  57
  58     if (length >= 4) {
  59         if (strncmp(buffer,"gdth",4) == 0) {
  60             buffer += 5;
  61             length -= 5;
  62             ret_val = gdth_set_asc_info(host, buffer, length, hanum);
  63         }
  64     }
  65
  66     return ret_val;
  67 }
  68
  69 static int gdth_set_asc_info(struct Scsi_Host *host, char *buffer,
  70                         int length,int hanum)
  71 {
  72     int orig_length, drive, wb_mode;
  73     int i, found;
  74     gdth_ha_str     *ha;
  75     gdth_cmd_str    gdtcmd;
  76     gdth_cpar_str   *pcpar;
  77     ulong64         paddr;
  78
  79     char            cmnd[MAX_COMMAND_SIZE];
  80     memset(cmnd, 0xff, 12);
  81     memset(&gdtcmd, 0, sizeof(gdth_cmd_str));
  82
  83     TRACE2(("gdth_set_asc_info() ha %d\n",hanum));
  84     ha = HADATA(gdth_ctr_tab[hanum]);
  85     orig_length = length + 5;
  86     drive = -1;
  87     wb_mode = 0;
  88     found = FALSE;
  89
  90     if (length >= 5 && strncmp(buffer,"flush",5)==0) {
  91         buffer += 6;
  92         length -= 6;
  93         if (length && *buffer>='0' && *buffer<='9') {
  94             drive = (int)(*buffer-'0');
  95             ++buffer; --length;
  96             if (length && *buffer>='0' && *buffer<='9') {
  97                 drive = drive*10 + (int)(*buffer-'0');
  98                 ++buffer; --length;
  99             }
 100             printk("GDT: Flushing host drive %d .. ",drive);
 101         } else {
 102             printk("GDT: Flushing all host drives .. ");
 103         }
 104         for (i = 0; i < MAX_HDRIVES; ++i) {
 105             if (ha->hdr[i].present) {
 106                 if (drive != -1 && i != drive)
 107                     continue;
 108                 found = TRUE;
 109                 gdtcmd.Service = CACHESERVICE;
 110                 gdtcmd.OpCode = GDT_FLUSH;
 111                 if (ha->cache_feat & GDT_64BIT) {
 112                     gdtcmd.u.cache64.DeviceNo = i;
 113                     gdtcmd.u.cache64.BlockNo = 1;
 114                 } else {
 115                     gdtcmd.u.cache.DeviceNo = i;
 116                     gdtcmd.u.cache.BlockNo = 1;
 117                 }
 118
 119                 gdth_execute(host, &gdtcmd, cmnd, 30, NULL);
 120             }
 121         }
 122         if (!found)
 123             printk("\nNo host drive found !\n");
 124         else
 125             printk("Done.\n");
 126         return(orig_length);
 127     }
 128
 129     if (length >= 7 && strncmp(buffer,"wbp_off",7)==0) {
 130         buffer += 8;
 131         length -= 8;
 132         printk("GDT: Disabling write back permanently .. ");
 133         wb_mode = 1;
 134     } else if (length >= 6 && strncmp(buffer,"wbp_on",6)==0) {
 135         buffer += 7;
 136         length -= 7;
 137         printk("GDT: Enabling write back permanently .. ");
 138         wb_mode = 2;
 139     } else if (length >= 6 && strncmp(buffer,"wb_off",6)==0) {
 140         buffer += 7;
 141         length -= 7;
 142         printk("GDT: Disabling write back commands .. ");
 143         if (ha->cache_feat & GDT_WR_THROUGH) {
 144             gdth_write_through = TRUE;
 145             printk("Done.\n");
 146         } else {
 147             printk("Not supported !\n");
 148         }
 149         return(orig_length);
 150     } else if (length >= 5 && strncmp(buffer,"wb_on",5)==0) {
 151         buffer += 6;
 152         length -= 6;
 153         printk("GDT: Enabling write back commands .. ");
 154         gdth_write_through = FALSE;
 155         printk("Done.\n");
 156         return(orig_length);
 157     }
 158
 159     if (wb_mode) {
 160         if (!gdth_ioctl_alloc(hanum, sizeof(gdth_cpar_str), TRUE, &paddr))
 161             return(-EBUSY);
 162         pcpar = (gdth_cpar_str *)ha->pscratch;
 163         memcpy( pcpar, &ha->cpar, sizeof(gdth_cpar_str) );
 164         gdtcmd.Service = CACHESERVICE;
 165         gdtcmd.OpCode = GDT_IOCTL;
 166         gdtcmd.u.ioctl.p_param = paddr;
 167         gdtcmd.u.ioctl.param_size = sizeof(gdth_cpar_str);
 168         gdtcmd.u.ioctl.subfunc = CACHE_CONFIG;
 169         gdtcmd.u.ioctl.channel = INVALID_CHANNEL;
 170         pcpar->write_back = wb_mode==1 ? 0:1;
 171
 172         gdth_execute(host, &gdtcmd, cmnd, 30, NULL);
 173
 174         gdth_ioctl_free(hanum, GDTH_SCRATCH, ha->pscratch, paddr);
 175         printk("Done.\n");
 176         return(orig_length);
 177     }
 178
 179     printk("GDT: Unknown command: %s  Length: %d\n",buffer,length);
 180     return(-EINVAL);
 181 }
 182
 183 static int gdth_get_info(char *buffer,char **start,off_t offset,int length,
 184                          struct Scsi_Host *host,int hanum,int busnum)
 185 {
 186     int size = 0,len = 0;
 187     off_t begin = 0,pos = 0;
 188     gdth_ha_str *ha;
 189     int id, i, j, k, sec, flag;
 190     int no_mdrv = 0, drv_no, is_mirr;
 191     ulong32 cnt;
 192     ulong64 paddr;
 193     int rc = -ENOMEM;
 194
 195     gdth_cmd_str *gdtcmd;
 196     gdth_evt_str *estr;
 197     char hrec[161];
 198     struct timeval tv;
 199
 200     char *buf;
 201     gdth_dskstat_str *pds;
 202     gdth_diskinfo_str *pdi;
 203     gdth_arrayinf_str *pai;
 204     gdth_defcnt_str *pdef;
 205     gdth_cdrinfo_str *pcdi;
 206     gdth_hget_str *phg;
 207     char cmnd[MAX_COMMAND_SIZE];
 208
 209     gdtcmd = kmalloc(sizeof(*gdtcmd), GFP_KERNEL);
 210     estr = kmalloc(sizeof(*estr), GFP_KERNEL);
 211     if (!gdtcmd || !estr)
 212         goto free_fail;
 213
 214     memset(cmnd, 0xff, 12);
 215     memset(gdtcmd, 0, sizeof(gdth_cmd_str));
 216
 217     TRACE2(("gdth_get_info() ha %d bus %d\n",hanum,busnum));
 218     ha = HADATA(gdth_ctr_tab[hanum]);
 219
 220
 221     /* request is i.e. "cat /proc/scsi/gdth/0" */
 222     /* format: %-15s\t%-10s\t%-15s\t%s */
 223     /* driver parameters */
 224     size = sprintf(buffer+len,"Driver Parameters:\n");
 225     len += size;  pos = begin + len;
 226     if (reserve_list[0] == 0xff)
 227         strcpy(hrec, "--");
 228     else {
 229         sprintf(hrec, "%d", reserve_list[0]);
 230         for (i = 1;  i < MAX_RES_ARGS; i++) {
 231             if (reserve_list[i] == 0xff)
 232                 break;
 233             sprintf(hrec,"%s,%d", hrec, reserve_list[i]);
 234         }
 235     }
 236     size = sprintf(buffer+len,
 237                    " reserve_mode: \t%d         \treserve_list:  \t%s\n",
 238                    reserve_mode, hrec);
 239     len += size;  pos = begin + len;
 240     size = sprintf(buffer+len,
 241                    " max_ids:      \t%-3d       \thdr_channel:   \t%d\n",
 242                    max_ids, hdr_channel);
 243     len += size;  pos = begin + len;
 244
 245     /* controller information */
 246     size = sprintf(buffer+len,"\nDisk Array Controller Information:\n");
 247     len += size;  pos = begin + len;
 248     if (virt_ctr)
 249         sprintf(hrec, "%s (Bus %d)", ha->binfo.type_string, busnum);
 250     else
 251         strcpy(hrec, ha->binfo.type_string);
 252     size = sprintf(buffer+len,
 253                    " Number:       \t%d         \tName:          \t%s\n",
 254                    hanum, hrec);
 255     len += size;  pos = begin + len;
 256
 257     if (ha->more_proc)
 258         sprintf(hrec, "%d.%02d.%02d-%c%03X",
 259                 (unchar)(ha->binfo.upd_fw_ver>>24),
 260                 (unchar)(ha->binfo.upd_fw_ver>>16),
 261                 (unchar)(ha->binfo.upd_fw_ver),
 262                 ha->bfeat.raid ? 'R':'N',
 263                 ha->binfo.upd_revision);
 264     else
 265         sprintf(hrec, "%d.%02d", (unchar)(ha->cpar.version>>8),
 266                 (unchar)(ha->cpar.version));
 267
 268     size = sprintf(buffer+len,
 269                    " Driver Ver.:  \t%-10s\tFirmware Ver.: \t%s\n",
 270                    GDTH_VERSION_STR, hrec);
 271     len += size;  pos = begin + len;
 272
 273     if (ha->more_proc) {
 274         /* more information: 1. about controller */
 275         size = sprintf(buffer+len,
 276                        " Serial No.:   \t0x%8X\tCache RAM size:\t%d KB\n",
 277                        ha->binfo.ser_no, ha->binfo.memsize / 1024);
 278         len += size;  pos = begin + len;
 279     }
 280
 281 #ifdef GDTH_DMA_STATISTICS
 282     /* controller statistics */
 283     size = sprintf(buffer+len,"\nController Statistics:\n");
 284     len += size;  pos = begin + len;
 285     size = sprintf(buffer+len,
 286                    " 32-bit DMA buffer:\t%lu\t64-bit DMA buffer:\t%lu\n",
 287                    ha->dma32_cnt, ha->dma64_cnt);
 288     len += size;  pos = begin + len;
 289 #endif
 290
 291     if (pos < offset) {
 292         len = 0;
 293         begin = pos;
 294     }
 295     if (pos > offset + length)
 296         goto stop_output;
 297
 298     if (ha->more_proc) {
 299         /* more information: 2. about physical devices */
 300         size = sprintf(buffer+len,"\nPhysical Devices:");
 301         len += size;  pos = begin + len;
 302         flag = FALSE;
 303
 304         buf = gdth_ioctl_alloc(hanum, GDTH_SCRATCH, FALSE, &paddr);
 305         if (!buf)
 306             goto stop_output;
 307         for (i = 0; i < ha->bus_cnt; ++i) {
 308             /* 2.a statistics (and retries/reassigns) */
 309             TRACE2(("pdr_statistics() chn %d\n",i));
 310             pds = (gdth_dskstat_str *)(buf + GDTH_SCRATCH/4);
 311             gdtcmd->Service = CACHESERVICE;
 312             gdtcmd->OpCode = GDT_IOCTL;
 313             gdtcmd->u.ioctl.p_param = paddr + GDTH_SCRATCH/4;
 314             gdtcmd->u.ioctl.param_size = 3*GDTH_SCRATCH/4;
 315             gdtcmd->u.ioctl.subfunc = DSK_STATISTICS | L_CTRL_PATTERN;
 316             gdtcmd->u.ioctl.channel = ha->raw[i].address | INVALID_CHANNEL;
 317             pds->bid = ha->raw[i].local_no;
 318             pds->first = 0;
 319             pds->entries = ha->raw[i].pdev_cnt;
 320             cnt = (3*GDTH_SCRATCH/4 - 5 * sizeof(ulong32)) /
 321                 sizeof(pds->list[0]);
 322             if (pds->entries > cnt)
 323                 pds->entries = cnt;
 324
 325             if (gdth_execute(host, gdtcmd, cmnd, 30, NULL) != S_OK)
 326                 pds->count = 0;
 327
 328             /* other IOCTLs must fit into area GDTH_SCRATCH/4 */
 329             for (j = 0; j < ha->raw[i].pdev_cnt; ++j) {
 330                 /* 2.b drive info */
 331                 TRACE2(("scsi_drv_info() chn %d dev %d\n",
 332                     i, ha->raw[i].id_list[j]));
 333                 pdi = (gdth_diskinfo_str *)buf;
 334                 gdtcmd->Service = CACHESERVICE;
 335                 gdtcmd->OpCode = GDT_IOCTL;
 336                 gdtcmd->u.ioctl.p_param = paddr;
 337                 gdtcmd->u.ioctl.param_size = sizeof(gdth_diskinfo_str);
 338                 gdtcmd->u.ioctl.subfunc = SCSI_DR_INFO | L_CTRL_PATTERN;
 339                 gdtcmd->u.ioctl.channel =
 340                     ha->raw[i].address | ha->raw[i].id_list[j];
 341
 342                 if (gdth_execute(host, gdtcmd, cmnd, 30, NULL) == S_OK) {
 343                     strncpy(hrec,pdi->vendor,8);
 344                     strncpy(hrec+8,pdi->product,16);
 345                     strncpy(hrec+24,pdi->revision,4);
 346                     hrec[28] = 0;
 347                     size = sprintf(buffer+len,
 348                                    "\n Chn/ID/LUN:   \t%c/%02d/%d    \tName:          \t%s\n",
 349                                    'A'+i,pdi->target_id,pdi->lun,hrec);
 350                     len += size;  pos = begin + len;
 351                     flag = TRUE;
 352                     pdi->no_ldrive &= 0xffff;
 353                     if (pdi->no_ldrive == 0xffff)
 354                         strcpy(hrec,"--");
 355                     else
 356                         sprintf(hrec,"%d",pdi->no_ldrive);
 357                     size = sprintf(buffer+len,
 358                                    " Capacity [MB]:\t%-6d    \tTo Log. Drive: \t%s\n",
 359                                    pdi->blkcnt/(1024*1024/pdi->blksize),
 360                                    hrec);
 361                     len += size;  pos = begin + len;
 362                 } else {
 363                     pdi->devtype = 0xff;
 364                 }
 365
 366                 if (pdi->devtype == 0) {
 367                     /* search retries/reassigns */
 368                     for (k = 0; k < pds->count; ++k) {
 369                         if (pds->list[k].tid == pdi->target_id &&
 370                             pds->list[k].lun == pdi->lun) {
 371                             size = sprintf(buffer+len,
 372                                            " Retries:      \t%-6d    \tReassigns:     \t%d\n",
 373                                            pds->list[k].retries,
 374                                            pds->list[k].reassigns);
 375                             len += size;  pos = begin + len;
 376                             break;
 377                         }
 378                     }
 379                     /* 2.c grown defects */
 380                     TRACE2(("scsi_drv_defcnt() chn %d dev %d\n",
 381                             i, ha->raw[i].id_list[j]));
 382                     pdef = (gdth_defcnt_str *)buf;
 383                     gdtcmd->Service = CACHESERVICE;
 384                     gdtcmd->OpCode = GDT_IOCTL;
 385                     gdtcmd->u.ioctl.p_param = paddr;
 386                     gdtcmd->u.ioctl.param_size = sizeof(gdth_defcnt_str);
 387                     gdtcmd->u.ioctl.subfunc = SCSI_DEF_CNT | L_CTRL_PATTERN;
 388                     gdtcmd->u.ioctl.channel =
 389                         ha->raw[i].address | ha->raw[i].id_list[j];
 390                     pdef->sddc_type = 0x08;
 391
 392                     if (gdth_execute(host, gdtcmd, cmnd, 30, NULL) == S_OK) {
 393                         size = sprintf(buffer+len,
 394                                        " Grown Defects:\t%d\n",
 395                                        pdef->sddc_cnt);
 396                         len += size;  pos = begin + len;
 397                     }
 398                 }
 399                 if (pos < offset) {
 400                     len = 0;
 401                     begin = pos;
 402                 }
 403                 if (pos > offset + length)
 404                     goto stop_output;
 405             }
 406         }
 407         gdth_ioctl_free(hanum, GDTH_SCRATCH, buf, paddr);
 408
 409         if (!flag) {
 410             size = sprintf(buffer+len, "\n --\n");
 411             len += size;  pos = begin + len;
 412         }
 413
 414         /* 3. about logical drives */
 415         size = sprintf(buffer+len,"\nLogical Drives:");
 416         len += size;  pos = begin + len;
 417         flag = FALSE;
 418
 419         buf = gdth_ioctl_alloc(hanum, GDTH_SCRATCH, FALSE, &paddr);
 420         if (!buf)
 421             goto stop_output;
 422         for (i = 0; i < MAX_LDRIVES; ++i) {
 423             if (!ha->hdr[i].is_logdrv)
 424                 continue;
 425             drv_no = i;
 426             j = k = 0;
 427             is_mirr = FALSE;
 428             do {
 429                 /* 3.a log. drive info */
 430                 TRACE2(("cache_drv_info() drive no %d\n",drv_no));
 431                 pcdi = (gdth_cdrinfo_str *)buf;
 432                 gdtcmd->Service = CACHESERVICE;
 433                 gdtcmd->OpCode = GDT_IOCTL;
 434                 gdtcmd->u.ioctl.p_param = paddr;
 435                 gdtcmd->u.ioctl.param_size = sizeof(gdth_cdrinfo_str);
 436                 gdtcmd->u.ioctl.subfunc = CACHE_DRV_INFO;
 437                 gdtcmd->u.ioctl.channel = drv_no;
 438                 if (gdth_execute(host, gdtcmd, cmnd, 30, NULL) != S_OK)
 439                     break;
 440                 pcdi->ld_dtype >>= 16;
 441                 j++;
 442                 if (pcdi->ld_dtype > 2) {
 443                     strcpy(hrec, "missing");
 444                 } else if (pcdi->ld_error & 1) {
 445                     strcpy(hrec, "fault");
 446                 } else if (pcdi->ld_error & 2) {
 447                     strcpy(hrec, "invalid");
 448                     k++; j--;
 449                 } else {
 450                     strcpy(hrec, "ok");
 451                 }
 452
 453                 if (drv_no == i) {
 454                     size = sprintf(buffer+len,
 455                                    "\n Number:       \t%-2d        \tStatus:        \t%s\n",
 456                                    drv_no, hrec);
 457                     len += size;  pos = begin + len;
 458                     flag = TRUE;
 459                     no_mdrv = pcdi->cd_ldcnt;
 460                     if (no_mdrv > 1 || pcdi->ld_slave != -1) {
 461                         is_mirr = TRUE;
 462                         strcpy(hrec, "RAID-1");
 463                     } else if (pcdi->ld_dtype == 0) {
 464                         strcpy(hrec, "Disk");
 465                     } else if (pcdi->ld_dtype == 1) {
 466                         strcpy(hrec, "RAID-0");
 467                     } else if (pcdi->ld_dtype == 2) {
 468                         strcpy(hrec, "Chain");
 469                     } else {
 470                         strcpy(hrec, "???");
 471                     }
 472                     size = sprintf(buffer+len,
 473                                    " Capacity [MB]:\t%-6d    \tType:          \t%s\n",
 474                                    pcdi->ld_blkcnt/(1024*1024/pcdi->ld_blksize),
 475                                    hrec);
 476                     len += size;  pos = begin + len;
 477                 } else {
 478                     size = sprintf(buffer+len,
 479                                    " Slave Number: \t%-2d        \tStatus:        \t%s\n",
 480                                    drv_no & 0x7fff, hrec);
 481                     len += size;  pos = begin + len;
 482                 }
 483                 drv_no = pcdi->ld_slave;
 484                 if (pos < offset) {
 485                     len = 0;
 486                     begin = pos;
 487                 }
 488                 if (pos > offset + length)
 489                     goto stop_output;
 490             } while (drv_no != -1);
 491
 492             if (is_mirr) {
 493                 size = sprintf(buffer+len,
 494                                " Missing Drv.: \t%-2d        \tInvalid Drv.:  \t%d\n",
 495                                no_mdrv - j - k, k);
 496                 len += size;  pos = begin + len;
 497             }
 498
 499             if (!ha->hdr[i].is_arraydrv)
 500                 strcpy(hrec, "--");
 501             else
 502                 sprintf(hrec, "%d", ha->hdr[i].master_no);
 503             size = sprintf(buffer+len,
 504                            " To Array Drv.:\t%s\n", hrec);
 505             len += size;  pos = begin + len;
 506             if (pos < offset) {
 507                 len = 0;
 508                 begin = pos;
 509             }
 510             if (pos > offset + length)
 511                 goto stop_output;
 512         }
 513         gdth_ioctl_free(hanum, GDTH_SCRATCH, buf, paddr);
 514
 515         if (!flag) {
 516             size = sprintf(buffer+len, "\n --\n");
 517             len += size;  pos = begin + len;
 518         }
 519
 520         /* 4. about array drives */
 521         size = sprintf(buffer+len,"\nArray Drives:");
 522         len += size;  pos = begin + len;
 523         flag = FALSE;
 524
 525         buf = gdth_ioctl_alloc(hanum, GDTH_SCRATCH, FALSE, &paddr);
 526         if (!buf)
 527             goto stop_output;
 528         for (i = 0; i < MAX_LDRIVES; ++i) {
 529             if (!(ha->hdr[i].is_arraydrv && ha->hdr[i].is_master))
 530                 continue;
 531             /* 4.a array drive info */
 532             TRACE2(("array_info() drive no %d\n",i));
 533             pai = (gdth_arrayinf_str *)buf;
 534             gdtcmd->Service = CACHESERVICE;
 535             gdtcmd->OpCode = GDT_IOCTL;
 536             gdtcmd->u.ioctl.p_param = paddr;
 537             gdtcmd->u.ioctl.param_size = sizeof(gdth_arrayinf_str);
 538             gdtcmd->u.ioctl.subfunc = ARRAY_INFO | LA_CTRL_PATTERN;
 539             gdtcmd->u.ioctl.channel = i;
 540             if (gdth_execute(host, gdtcmd, cmnd, 30, NULL) == S_OK) {
 541                 if (pai->ai_state == 0)
 542                     strcpy(hrec, "idle");
 543                 else if (pai->ai_state == 2)
 544                     strcpy(hrec, "build");
 545                 else if (pai->ai_state == 4)
 546                     strcpy(hrec, "ready");
 547                 else if (pai->ai_state == 6)
 548                     strcpy(hrec, "fail");
 549                 else if (pai->ai_state == 8 || pai->ai_state == 10)
 550                     strcpy(hrec, "rebuild");
 551                 else
 552                     strcpy(hrec, "error");
 553                 if (pai->ai_ext_state & 0x10)
 554                     strcat(hrec, "/expand");
 555                 else if (pai->ai_ext_state & 0x1)
 556                     strcat(hrec, "/patch");
 557                 size = sprintf(buffer+len,
 558                                "\n Number:       \t%-2d        \tStatus:        \t%s\n",
 559                                i,hrec);
 560                 len += size;  pos = begin + len;
 561                 flag = TRUE;
 562
 563                 if (pai->ai_type == 0)
 564                     strcpy(hrec, "RAID-0");
 565                 else if (pai->ai_type == 4)
 566                     strcpy(hrec, "RAID-4");
 567                 else if (pai->ai_type == 5)
 568                     strcpy(hrec, "RAID-5");
 569                 else
 570                     strcpy(hrec, "RAID-10");
 571                 size = sprintf(buffer+len,
 572                                " Capacity [MB]:\t%-6d    \tType:          \t%s\n",
 573                                pai->ai_size/(1024*1024/pai->ai_secsize),
 574                                hrec);
 575                 len += size;  pos = begin + len;
 576                 if (pos < offset) {
 577                     len = 0;
 578                     begin = pos;
 579                 }
 580                 if (pos > offset + length)
 581                     goto stop_output;
 582             }
 583         }
 584         gdth_ioctl_free(hanum, GDTH_SCRATCH, buf, paddr);
 585
 586         if (!flag) {
 587             size = sprintf(buffer+len, "\n --\n");
 588             len += size;  pos = begin + len;
 589         }
 590
 591         /* 5. about host drives */
 592         size = sprintf(buffer+len,"\nHost Drives:");
 593         len += size;  pos = begin + len;
 594         flag = FALSE;
 595
 596         buf = gdth_ioctl_alloc(hanum, sizeof(gdth_hget_str), FALSE, &paddr);
 597         if (!buf)
 598             goto stop_output;
 599         for (i = 0; i < MAX_LDRIVES; ++i) {
 600             if (!ha->hdr[i].is_logdrv ||
 601                 (ha->hdr[i].is_arraydrv && !ha->hdr[i].is_master))
 602                 continue;
 603             /* 5.a get host drive list */
 604             TRACE2(("host_get() drv_no %d\n",i));
 605             phg = (gdth_hget_str *)buf;
 606             gdtcmd->Service = CACHESERVICE;
 607             gdtcmd->OpCode = GDT_IOCTL;
 608             gdtcmd->u.ioctl.p_param = paddr;
 609             gdtcmd->u.ioctl.param_size = sizeof(gdth_hget_str);
 610             gdtcmd->u.ioctl.subfunc = HOST_GET | LA_CTRL_PATTERN;
 611             gdtcmd->u.ioctl.channel = i;
 612             phg->entries = MAX_HDRIVES;
 613             phg->offset = GDTOFFSOF(gdth_hget_str, entry[0]);
 614             if (gdth_execute(host, gdtcmd, cmnd, 30, NULL) == S_OK) {
 615                 ha->hdr[i].ldr_no = i;
 616                 ha->hdr[i].rw_attribs = 0;
 617                 ha->hdr[i].start_sec = 0;
 618             } else {
 619                 for (j = 0; j < phg->entries; ++j) {
 620                     k = phg->entry[j].host_drive;
 621                     if (k >= MAX_LDRIVES)
 622                         continue;
 623                     ha->hdr[k].ldr_no = phg->entry[j].log_drive;
 624                     ha->hdr[k].rw_attribs = phg->entry[j].rw_attribs;
 625                     ha->hdr[k].start_sec = phg->entry[j].start_sec;
 626                 }
 627             }
 628         }
 629         gdth_ioctl_free(hanum, sizeof(gdth_hget_str), buf, paddr);
 630
 631         for (i = 0; i < MAX_HDRIVES; ++i) {
 632             if (!(ha->hdr[i].present))
 633                 continue;
 634
 635             size = sprintf(buffer+len,
 636                            "\n Number:       \t%-2d        \tArr/Log. Drive:\t%d\n",
 637                            i, ha->hdr[i].ldr_no);
 638             len += size;  pos = begin + len;
 639             flag = TRUE;
 640
 641             size = sprintf(buffer+len,
 642                            " Capacity [MB]:\t%-6d    \tStart Sector:  \t%d\n",
 643                            (ulong32)(ha->hdr[i].size/2048), ha->hdr[i].start_sec);
 644             len += size;  pos = begin + len;
 645             if (pos < offset) {
 646                 len = 0;
 647                 begin = pos;
 648             }
 649             if (pos > offset + length)
 650                 goto stop_output;
 651         }
 652
 653         if (!flag) {
 654             size = sprintf(buffer+len, "\n --\n");
 655             len += size;  pos = begin + len;
 656         }
 657     }
 658
 659     /* controller events */
 660     size = sprintf(buffer+len,"\nController Events:\n");
 661     len += size;  pos = begin + len;
 662
 663     for (id = -1;;) {
 664         id = gdth_read_event(ha, id, estr);
 665         if (estr->event_source == 0)
 666             break;
 667         if (estr->event_data.eu.driver.ionode == hanum &&
 668             estr->event_source == ES_ASYNC) {
 669             gdth_log_event(&estr->event_data, hrec);
 670             do_gettimeofday(&tv);
 671             sec = (int)(tv.tv_sec - estr->first_stamp);
 672             if (sec < 0) sec = 0;
 673             size = sprintf(buffer+len," date- %02d:%02d:%02d\t%s\n",
 674                            sec/3600, sec%3600/60, sec%60, hrec);
 675             len += size;  pos = begin + len;
 676             if (pos < offset) {
 677                 len = 0;
 678                 begin = pos;
 679             }
 680             if (pos > offset + length)
 681                 goto stop_output;
 682         }
 683         if (id == -1)
 684             break;
 685     }
 686
 687 stop_output:
 688     *start = buffer +(offset-begin);
 689     len -= (offset-begin);
 690     if (len > length)
 691         len = length;
 692     TRACE2(("get_info() len %d pos %d begin %d offset %d length %d size %d\n",
 693             len,(int)pos,(int)begin,(int)offset,length,size));
 694     rc = len;
 695
 696 free_fail:
 697     kfree(gdtcmd);
 698     kfree(estr);
 699     return rc;
 700 }
 701
 702 static char *gdth_ioctl_alloc(int hanum, int size, int scratch,
 703                               ulong64 *paddr)
 704 {
 705     gdth_ha_str *ha;
 706     ulong flags;
 707     char *ret_val;
 708
 709     if (size == 0)
 710         return NULL;
 711
 712     ha = HADATA(gdth_ctr_tab[hanum]);
 713     spin_lock_irqsave(&ha->smp_lock, flags);
 714
 715     if (!ha->scratch_busy && size <= GDTH_SCRATCH) {
 716         ha->scratch_busy = TRUE;
 717         ret_val = ha->pscratch;
 718         *paddr = ha->scratch_phys;
 719     } else if (scratch) {
 720         ret_val = NULL;
 721     } else {
 722         dma_addr_t dma_addr;
 723
 724         ret_val = pci_alloc_consistent(ha->pdev, size, &dma_addr);
 725         *paddr = dma_addr;
 726     }
 727
 728     spin_unlock_irqrestore(&ha->smp_lock, flags);
 729     return ret_val;
 730 }
 731
 732 static void gdth_ioctl_free(int hanum, int size, char *buf, ulong64 paddr)
 733 {
 734     gdth_ha_str *ha;
 735     ulong flags;
 736
 737     ha = HADATA(gdth_ctr_tab[hanum]);
 738     spin_lock_irqsave(&ha->smp_lock, flags);
 739
 740     if (buf == ha->pscratch) {
 741         ha->scratch_busy = FALSE;
 742     } else {
 743         pci_free_consistent(ha->pdev, size, buf, paddr);
 744     }
 745
 746     spin_unlock_irqrestore(&ha->smp_lock, flags);
 747 }
 748
 749 #ifdef GDTH_IOCTL_PROC
 750 static int gdth_ioctl_check_bin(int hanum, ushort size)
 751 {
 752     gdth_ha_str *ha;
 753     ulong flags;
 754     int ret_val;
 755
 756     ha = HADATA(gdth_ctr_tab[hanum]);
 757     spin_lock_irqsave(&ha->smp_lock, flags);
 758
 759     ret_val = FALSE;
 760     if (ha->scratch_busy) {
 761         if (((gdth_iord_str *)ha->pscratch)->size == (ulong32)size)
 762             ret_val = TRUE;
 763     }
 764     spin_unlock_irqrestore(&ha->smp_lock, flags);
 765     return ret_val;
 766 }
 767 #endif
 768
 769 static void gdth_wait_completion(int hanum, int busnum, int id)
 770 {
 771     gdth_ha_str *ha;
 772     ulong flags;
 773     int i;
 774     Scsi_Cmnd *scp;
 775     unchar b, t;
 776
 777     ha = HADATA(gdth_ctr_tab[hanum]);
 778     spin_lock_irqsave(&ha->smp_lock, flags);
 779
 780     for (i = 0; i < GDTH_MAXCMDS; ++i) {
 781         scp = ha->cmd_tab[i].cmnd;
 782
 783         b = virt_ctr ? NUMDATA(scp->device->host)->busnum : scp->device->channel;
 784         t = scp->device->id;
 785         if (!SPECIAL_SCP(scp) && t == (unchar)id &&
 786             b == (unchar)busnum) {
 787             scp->SCp.have_data_in = 0;
 788             spin_unlock_irqrestore(&ha->smp_lock, flags);
 789             while (!scp->SCp.have_data_in)
 790                 barrier();
 791             spin_lock_irqsave(&ha->smp_lock, flags);
 792         }
 793     }
 794     spin_unlock_irqrestore(&ha->smp_lock, flags);
 795 }
 796
 797 static void gdth_stop_timeout(int hanum, int busnum, int id)
 798 {
 799     gdth_ha_str *ha;
 800     ulong flags;
 801     Scsi_Cmnd *scp;
 802     unchar b, t;
 803
 804     ha = HADATA(gdth_ctr_tab[hanum]);
 805     spin_lock_irqsave(&ha->smp_lock, flags);
 806
 807     for (scp = ha->req_first; scp; scp = (Scsi_Cmnd *)scp->SCp.ptr) {
 808         if (scp->done != gdth_scsi_done) {
 809             b = virt_ctr ?
 810                 NUMDATA(scp->device->host)->busnum : scp->device->channel;
 811             t = scp->device->id;
 812             if (t == (unchar)id && b == (unchar)busnum) {
 813                 TRACE2(("gdth_stop_timeout(): update_timeout()\n"));
 814                 scp->SCp.buffers_residual = gdth_update_timeout(hanum, scp, 0);
 815             }
 816         }
 817     }
 818     spin_unlock_irqrestore(&ha->smp_lock, flags);
 819 }
 820
 821 static void gdth_start_timeout(int hanum, int busnum, int id)
 822 {
 823     gdth_ha_str *ha;
 824     ulong flags;
 825     Scsi_Cmnd *scp;
 826     unchar b, t;
 827
 828     ha = HADATA(gdth_ctr_tab[hanum]);
 829     spin_lock_irqsave(&ha->smp_lock, flags);
 830
 831     for (scp = ha->req_first; scp; scp = (Scsi_Cmnd *)scp->SCp.ptr) {
 832         if (scp->done != gdth_scsi_done) {
 833             b = virt_ctr ?
 834                 NUMDATA(scp->device->host)->busnum : scp->device->channel;
 835             t = scp->device->id;
 836             if (t == (unchar)id && b == (unchar)busnum) {
 837                 TRACE2(("gdth_start_timeout(): update_timeout()\n"));
 838                 gdth_update_timeout(hanum, scp, scp->SCp.buffers_residual);
 839             }
 840         }
 841     }
 842     spin_unlock_irqrestore(&ha->smp_lock, flags);
 843 }
 844
 845 static int gdth_update_timeout(int hanum, Scsi_Cmnd *scp, int timeout)
 846 {
 847     int oldto;
 848
 849     oldto = scp->timeout_per_command;
 850     scp->timeout_per_command = timeout;
 851
 852     if (timeout == 0) {
 853         del_timer(&scp->eh_timeout);
 854         scp->eh_timeout.data = (unsigned long) NULL;
 855         scp->eh_timeout.expires = 0;
 856     } else {
 857         if (scp->eh_timeout.data != (unsigned long) NULL)
 858             del_timer(&scp->eh_timeout);
 859         scp->eh_timeout.data = (unsigned long) scp;
 860         scp->eh_timeout.expires = jiffies + timeout;
 861         add_timer(&scp->eh_timeout);
 862     }
 863
 864     return oldto;
 865 }