upload tizen1.0 source
[kernel/linux-2.6.36.git] / drivers / scsi / aic7xxx_old / aic7xxx_proc.c
1 /*+M*************************************************************************
2  * Adaptec AIC7xxx device driver proc support for Linux.
3  *
4  * Copyright (c) 1995, 1996 Dean W. Gehnert
5  *
6  * This program is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License as published by
8  * the Free Software Foundation; either version 2, or (at your option)
9  * any later version.
10  *
11  * This program is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program; see the file COPYING.  If not, write to
18  * the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
19  *
20  * ----------------------------------------------------------------
21  *  o Modified from the EATA-DMA /proc support.
22  *  o Additional support for device block statistics provided by
23  *    Matthew Jacob.
24  *  o Correction of overflow by Heinz Mauelshagen
25  *  o Adittional corrections by Doug Ledford
26  *
27  *  Dean W. Gehnert, deang@teleport.com, 05/01/96
28  *
29  *  $Id: aic7xxx_proc.c,v 4.1 1997/06/97 08:23:42 deang Exp $
30  *-M*************************************************************************/
31
32
33 #define BLS     (&aic7xxx_buffer[size])
34 #define HDRB \
35 "               0 - 4K   4 - 16K   16 - 64K  64 - 256K  256K - 1M        1M+"
36
37 #ifdef PROC_DEBUG
38 extern int vsprintf(char *, const char *, va_list);
39
40 static void
41 proc_debug(const char *fmt, ...)
42 {
43   va_list ap;
44   char buf[256];
45
46   va_start(ap, fmt);
47   vsprintf(buf, fmt, ap);
48   printk(buf);
49   va_end(ap);
50 }
51 #else /* PROC_DEBUG */
52 #  define proc_debug(fmt, args...)
53 #endif /* PROC_DEBUG */
54
55 static int aic7xxx_buffer_size = 0;
56 static char *aic7xxx_buffer = NULL;
57
58
59 /*+F*************************************************************************
60  * Function:
61  *   aic7xxx_set_info
62  *
63  * Description:
64  *   Set parameters for the driver from the /proc filesystem.
65  *-F*************************************************************************/
66 static int
67 aic7xxx_set_info(char *buffer, int length, struct Scsi_Host *HBAptr)
68 {
69   proc_debug("aic7xxx_set_info(): %s\n", buffer);
70   return (-ENOSYS);  /* Currently this is a no-op */
71 }
72
73
74 /*+F*************************************************************************
75  * Function:
76  *   aic7xxx_proc_info
77  *
78  * Description:
79  *   Return information to handle /proc support for the driver.
80  *-F*************************************************************************/
81 int
82 aic7xxx_proc_info ( struct Scsi_Host *HBAptr, char *buffer, char **start, off_t offset, int length, 
83                     int inout)
84 {
85   struct aic7xxx_host *p;
86   struct aic_dev_data *aic_dev;
87   struct scsi_device *sdptr;
88   int    size = 0;
89   unsigned char i;
90   unsigned char tindex;
91
92   for(p=first_aic7xxx; p && p->host != HBAptr; p=p->next)
93     ;
94
95   if (!p)
96   {
97     size += sprintf(buffer, "Can't find adapter for host number %d\n", HBAptr->host_no);
98     if (size > length)
99     {
100       return (size);
101     }
102     else
103     {
104       return (length);
105     }
106   }
107
108   if (inout == TRUE) /* Has data been written to the file? */ 
109   {
110     return (aic7xxx_set_info(buffer, length, HBAptr));
111   }
112
113   p = (struct aic7xxx_host *) HBAptr->hostdata;
114
115   /*
116    * It takes roughly 1K of space to hold all relevant card info, not
117    * counting any proc stats, so we start out with a 1.5k buffer size and
118    * if proc_stats is defined, then we sweep the stats structure to see
119    * how many drives we will be printing out for and add 384 bytes per
120    * device with active stats.
121    *
122    * Hmmmm...that 1.5k seems to keep growing as items get added so they
123    * can be easily viewed for debugging purposes.  So, we bumped that
124    * 1.5k to 4k so we can quit having to bump it all the time.
125    */
126
127   size = 4096;
128   list_for_each_entry(aic_dev, &p->aic_devs, list)
129     size += 512;
130   if (aic7xxx_buffer_size != size)
131   {
132     if (aic7xxx_buffer != NULL) 
133     {
134       kfree(aic7xxx_buffer);
135       aic7xxx_buffer_size = 0;
136     }
137     aic7xxx_buffer = kmalloc(size, GFP_KERNEL);
138   }
139   if (aic7xxx_buffer == NULL)
140   {
141     size = sprintf(buffer, "AIC7xxx - kmalloc error at line %d\n",
142         __LINE__);
143     return size;
144   }
145   aic7xxx_buffer_size = size;
146
147   size = 0;
148   size += sprintf(BLS, "Adaptec AIC7xxx driver version: ");
149   size += sprintf(BLS, "%s/", AIC7XXX_C_VERSION);
150   size += sprintf(BLS, "%s", AIC7XXX_H_VERSION);
151   size += sprintf(BLS, "\n");
152   size += sprintf(BLS, "Adapter Configuration:\n");
153   size += sprintf(BLS, "           SCSI Adapter: %s\n",
154       board_names[p->board_name_index]);
155   if (p->flags & AHC_TWIN)
156     size += sprintf(BLS, "                         Twin Channel Controller ");
157   else
158   {
159     char *channel = "";
160     char *ultra = "";
161     char *wide = "Narrow ";
162     if (p->flags & AHC_MULTI_CHANNEL)
163     {
164       channel = " Channel A";
165       if (p->flags & (AHC_CHNLB|AHC_CHNLC))
166         channel = (p->flags & AHC_CHNLB) ? " Channel B" : " Channel C";
167     }
168     if (p->features & AHC_WIDE)
169       wide = "Wide ";
170     if (p->features & AHC_ULTRA3)
171     {
172       switch(p->chip & AHC_CHIPID_MASK)
173       {
174         case AHC_AIC7892:
175         case AHC_AIC7899:
176           ultra = "Ultra-160/m LVD/SE ";
177           break;
178         default:
179           ultra = "Ultra-3 LVD/SE ";
180           break;
181       }
182     }
183     else if (p->features & AHC_ULTRA2)
184       ultra = "Ultra-2 LVD/SE ";
185     else if (p->features & AHC_ULTRA)
186       ultra = "Ultra ";
187     size += sprintf(BLS, "                           %s%sController%s ",
188       ultra, wide, channel);
189   }
190   switch(p->chip & ~AHC_CHIPID_MASK)
191   {
192     case AHC_VL:
193       size += sprintf(BLS, "at VLB slot %d\n", p->pci_device_fn);
194       break;
195     case AHC_EISA:
196       size += sprintf(BLS, "at EISA slot %d\n", p->pci_device_fn);
197       break;
198     default:
199       size += sprintf(BLS, "at PCI %d/%d/%d\n", p->pci_bus,
200         PCI_SLOT(p->pci_device_fn), PCI_FUNC(p->pci_device_fn));
201       break;
202   }
203   if( !(p->maddr) )
204   {
205     size += sprintf(BLS, "    Programmed I/O Base: %lx\n", p->base);
206   }
207   else
208   {
209     size += sprintf(BLS, "    PCI MMAPed I/O Base: 0x%lx\n", p->mbase);
210   }
211   if( (p->chip & (AHC_VL | AHC_EISA)) )
212   {
213     size += sprintf(BLS, "    BIOS Memory Address: 0x%08x\n", p->bios_address);
214   }
215   size += sprintf(BLS, " Adapter SEEPROM Config: %s\n",
216           (p->flags & AHC_SEEPROM_FOUND) ? "SEEPROM found and used." :
217          ((p->flags & AHC_USEDEFAULTS) ? "SEEPROM not found, using defaults." :
218            "SEEPROM not found, using leftover BIOS values.") );
219   size += sprintf(BLS, "      Adaptec SCSI BIOS: %s\n",
220           (p->flags & AHC_BIOS_ENABLED) ? "Enabled" : "Disabled");
221   size += sprintf(BLS, "                    IRQ: %d\n", HBAptr->irq);
222   size += sprintf(BLS, "                   SCBs: Active %d, Max Active %d,\n",
223             p->activescbs, p->max_activescbs);
224   size += sprintf(BLS, "                         Allocated %d, HW %d, "
225             "Page %d\n", p->scb_data->numscbs, p->scb_data->maxhscbs,
226             p->scb_data->maxscbs);
227   if (p->flags & AHC_EXTERNAL_SRAM)
228     size += sprintf(BLS, "                         Using External SCB SRAM\n");
229   size += sprintf(BLS, "             Interrupts: %ld", p->isr_count);
230   if (p->chip & AHC_EISA)
231   {
232     size += sprintf(BLS, " %s\n",
233         (p->pause & IRQMS) ? "(Level Sensitive)" : "(Edge Triggered)");
234   }
235   else
236   {
237     size += sprintf(BLS, "\n");
238   }
239   size += sprintf(BLS, "      BIOS Control Word: 0x%04x\n",
240             p->bios_control);
241   size += sprintf(BLS, "   Adapter Control Word: 0x%04x\n",
242             p->adapter_control);
243   size += sprintf(BLS, "   Extended Translation: %sabled\n",
244       (p->flags & AHC_EXTEND_TRANS_A) ? "En" : "Dis");
245   size += sprintf(BLS, "Disconnect Enable Flags: 0x%04x\n", p->discenable);
246   if (p->features & (AHC_ULTRA | AHC_ULTRA2))
247   {
248     size += sprintf(BLS, "     Ultra Enable Flags: 0x%04x\n", p->ultraenb);
249   }
250   size += sprintf(BLS, "Default Tag Queue Depth: %d\n", aic7xxx_default_queue_depth);
251   size += sprintf(BLS, "    Tagged Queue By Device array for aic7xxx host "
252                        "instance %d:\n", p->instance);
253   size += sprintf(BLS, "      {");
254   for(i=0; i < (MAX_TARGETS - 1); i++)
255     size += sprintf(BLS, "%d,",aic7xxx_tag_info[p->instance].tag_commands[i]);
256   size += sprintf(BLS, "%d}\n",aic7xxx_tag_info[p->instance].tag_commands[i]);
257
258   size += sprintf(BLS, "\n");
259   size += sprintf(BLS, "Statistics:\n\n");
260   list_for_each_entry(aic_dev, &p->aic_devs, list)
261   {
262     sdptr = aic_dev->SDptr;
263     tindex = sdptr->channel << 3 | sdptr->id;
264     size += sprintf(BLS, "(scsi%d:%d:%d:%d)\n",
265         p->host_no, sdptr->channel, sdptr->id, sdptr->lun);
266     size += sprintf(BLS, "  Device using %s/%s",
267           (aic_dev->cur.width == MSG_EXT_WDTR_BUS_16_BIT) ?
268           "Wide" : "Narrow",
269           (aic_dev->cur.offset != 0) ?
270           "Sync transfers at " : "Async transfers.\n" );
271     if (aic_dev->cur.offset != 0)
272     {
273       struct aic7xxx_syncrate *sync_rate;
274       unsigned char options = aic_dev->cur.options;
275       int period = aic_dev->cur.period;
276       int rate = (aic_dev->cur.width ==
277                   MSG_EXT_WDTR_BUS_16_BIT) ? 1 : 0;
278
279       sync_rate = aic7xxx_find_syncrate(p, &period, 0, &options);
280       if (sync_rate != NULL)
281       {
282         size += sprintf(BLS, "%s MByte/sec, offset %d\n",
283                         sync_rate->rate[rate],
284                         aic_dev->cur.offset );
285       }
286       else
287       {
288         size += sprintf(BLS, "3.3 MByte/sec, offset %d\n",
289                         aic_dev->cur.offset );
290       }
291     }
292     size += sprintf(BLS, "  Transinfo settings: ");
293     size += sprintf(BLS, "current(%d/%d/%d/%d), ",
294                     aic_dev->cur.period,
295                     aic_dev->cur.offset,
296                     aic_dev->cur.width,
297                     aic_dev->cur.options);
298     size += sprintf(BLS, "goal(%d/%d/%d/%d), ",
299                     aic_dev->goal.period,
300                     aic_dev->goal.offset,
301                     aic_dev->goal.width,
302                     aic_dev->goal.options);
303     size += sprintf(BLS, "user(%d/%d/%d/%d)\n",
304                     p->user[tindex].period,
305                     p->user[tindex].offset,
306                     p->user[tindex].width,
307                     p->user[tindex].options);
308     if(sdptr->simple_tags)
309     {
310       size += sprintf(BLS, "  Tagged Command Queueing Enabled, Ordered Tags %s, Depth %d/%d\n", sdptr->ordered_tags ? "Enabled" : "Disabled", sdptr->queue_depth, aic_dev->max_q_depth);
311     }
312     if(aic_dev->barrier_total)
313       size += sprintf(BLS, "  Total transfers %ld:\n    (%ld/%ld/%ld/%ld reads/writes/REQ_BARRIER/Ordered Tags)\n",
314         aic_dev->r_total+aic_dev->w_total, aic_dev->r_total, aic_dev->w_total,
315         aic_dev->barrier_total, aic_dev->ordered_total);
316     else
317       size += sprintf(BLS, "  Total transfers %ld:\n    (%ld/%ld reads/writes)\n",
318         aic_dev->r_total+aic_dev->w_total, aic_dev->r_total, aic_dev->w_total);
319     size += sprintf(BLS, "%s\n", HDRB);
320     size += sprintf(BLS, "   Reads:");
321     for (i = 0; i < ARRAY_SIZE(aic_dev->r_bins); i++)
322     {
323       size += sprintf(BLS, " %10ld", aic_dev->r_bins[i]);
324     }
325     size += sprintf(BLS, "\n");
326     size += sprintf(BLS, "  Writes:");
327     for (i = 0; i < ARRAY_SIZE(aic_dev->w_bins); i++)
328     {
329       size += sprintf(BLS, " %10ld", aic_dev->w_bins[i]);
330     }
331     size += sprintf(BLS, "\n");
332     size += sprintf(BLS, "\n\n");
333   }
334   if (size >= aic7xxx_buffer_size)
335   {
336     printk(KERN_WARNING "aic7xxx: Overflow in aic7xxx_proc.c\n");
337   }
338
339   if (offset > size - 1)
340   {
341     kfree(aic7xxx_buffer);
342     aic7xxx_buffer = NULL;
343     aic7xxx_buffer_size = length = 0;
344     *start = NULL;
345   }
346   else
347   {
348     *start = buffer;
349     length = min_t(int, length, size - offset);
350     memcpy(buffer, &aic7xxx_buffer[offset], length);
351   }
352
353   return (length);
354 }
355
356 /*
357  * Overrides for Emacs so that we follow Linus's tabbing style.
358  * Emacs will notice this stuff at the end of the file and automatically
359  * adjust the settings for this buffer only.  This must remain at the end
360  * of the file.
361  * ---------------------------------------------------------------------------
362  * Local variables:
363  * c-indent-level: 2
364  * c-brace-imaginary-offset: 0
365  * c-brace-offset: -2
366  * c-argdecl-indent: 2
367  * c-label-offset: -2
368  * c-continued-statement-offset: 2
369  * c-continued-brace-offset: 0
370  * indent-tabs-mode: nil
371  * tab-width: 8
372  * End:
373  */