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