Do case insensitive search for lua scripts to load.
[obnox/wireshark/wip.git] / gtk / rpc_progs.c
1 /* rpc_progs.c
2  * rpc_progs   2002 Ronnie Sahlberg
3  *
4  * $Id$
5  *
6  * Wireshark - Network traffic analyzer
7  * By Gerald Combs <gerald@wireshark.org>
8  * Copyright 1998 Gerald Combs
9  *
10  * This program is free software; you can redistribute it and/or
11  * modify it under the terms of the GNU General Public License
12  * as published by the Free Software Foundation; either version 2
13  * of the License, or (at your option) any later version.
14  *
15  * This program is distributed in the hope that it will be useful,
16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18  * GNU General Public License for more details.
19  *
20  * You should have received a copy of the GNU General Public License
21  * along with this program; if not, write to the Free Software
22  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
23  */
24
25 /* This module provides rpc call/reply SRT statistics to Wireshark.
26  * It is only used by Wireshark and not TShark
27  *
28  * It serves as an example on how to use the tap api.
29  */
30
31 #ifdef HAVE_CONFIG_H
32 # include "config.h"
33 #endif
34
35 #include <stdio.h>
36
37 #include <gtk/gtk.h>
38
39 #include <epan/packet_info.h>
40 #include <epan/epan.h>
41 #include <epan/stat_cmd_args.h>
42 #include <epan/tap.h>
43 #include <epan/dissectors/packet-rpc.h>
44
45 #include "../stat_menu.h"
46 #include "../globals.h"
47
48 #include "gtk/gui_stat_menu.h"
49 #include "gtk/gui_utils.h"
50 #include "gtk/dlg_utils.h"
51 #include "gtk/main.h"
52
53 #include "gtk/old-gtk-compat.h"
54
55 #define NANOSECS_PER_SEC 1000000000
56
57 static GtkWidget *win=NULL;
58 static GtkWidget *table=NULL;
59 static int num_progs=0;
60
61 /* used to keep track of statistics for a specific program/version */
62 typedef struct _rpc_program_t {
63         struct _rpc_program_t *next;
64         guint32 program;
65         GtkWidget *wprogram;
66         gchar sprogram[24];
67
68         guint32 version;
69         GtkWidget *wversion;
70         gchar sversion[16];
71
72         int num;
73         GtkWidget *wnum;
74         gchar snum[16];
75
76         nstime_t min;
77         GtkWidget *wmin;
78         gchar smin[16];
79
80         nstime_t max;
81         GtkWidget *wmax;
82         gchar smax[16];
83
84         nstime_t tot;
85         GtkWidget *wavg;
86         gchar savg[16];
87 } rpc_program_t;
88
89 static rpc_program_t *prog_list=NULL;
90
91
92 static char *
93 rpcprogs_gen_title(void)
94 {
95         char *title;
96
97         title = g_strdup_printf("ONC-RPC Program Statistics: %s",
98             cf_get_display_name(&cfile));
99         return title;
100 }
101
102 static void
103 rpcprogs_reset(void *dummy _U_)
104 {
105         rpc_program_t *rp;
106
107         while(prog_list){
108                 rp=prog_list;
109                 prog_list=prog_list->next;
110
111                 gtk_widget_destroy(rp->wprogram);
112                 rp->wprogram=NULL;
113                 gtk_widget_destroy(rp->wversion);
114                 rp->wversion=NULL;
115                 gtk_widget_destroy(rp->wnum);
116                 rp->wnum=NULL;
117                 gtk_widget_destroy(rp->wmin);
118                 rp->wmin=NULL;
119                 gtk_widget_destroy(rp->wmax);
120                 rp->wmax=NULL;
121                 gtk_widget_destroy(rp->wavg);
122                 rp->wavg=NULL;
123                 g_free(rp);
124         }
125         gtk_table_resize(GTK_TABLE(table), 1, 6);
126         num_progs=0;
127 }
128
129 static void
130 add_new_program(rpc_program_t *rp)
131 {
132         num_progs++;
133         gtk_table_resize(GTK_TABLE(table), num_progs+1, 6);
134         rp->wprogram=gtk_label_new("0");
135         gtk_table_attach_defaults(GTK_TABLE(table), rp->wprogram, 0,1,num_progs,num_progs+1);
136         gtk_widget_show(rp->wprogram);
137         rp->wversion=gtk_label_new("0");
138         gtk_table_attach_defaults(GTK_TABLE(table), rp->wversion, 1,2,num_progs,num_progs+1);
139         gtk_widget_show(rp->wversion);
140         rp->wnum=gtk_label_new("0");
141         gtk_table_attach_defaults(GTK_TABLE(table), rp->wnum, 2,3,num_progs,num_progs+1);
142         gtk_widget_show(rp->wnum);
143         rp->wmin=gtk_label_new("0");
144         gtk_table_attach_defaults(GTK_TABLE(table), rp->wmin, 3,4,num_progs,num_progs+1);
145         gtk_widget_show(rp->wmin);
146         rp->wmax=gtk_label_new("0");
147         gtk_table_attach_defaults(GTK_TABLE(table), rp->wmax, 4,5,num_progs,num_progs+1);
148         gtk_widget_show(rp->wmax);
149         rp->wavg=gtk_label_new("0");
150         gtk_table_attach_defaults(GTK_TABLE(table), rp->wavg, 5,6,num_progs,num_progs+1);
151         gtk_widget_show(rp->wavg);
152
153         rp->num=0;
154         rp->min.secs=0;
155         rp->min.nsecs=0;
156         rp->max.secs=0;
157         rp->max.nsecs=0;
158         rp->tot.secs=0;
159         rp->tot.nsecs=0;
160 }
161
162
163
164 static gboolean
165 rpcprogs_packet(void *dummy _U_, packet_info *pinfo, epan_dissect_t *edt _U_, const void *arg)
166 {
167         const rpc_call_info_value *ri = arg;
168         nstime_t delta;
169         rpc_program_t *rp;
170
171         if(!prog_list){
172                 /* the list was empty */
173                 rp=g_malloc(sizeof(rpc_program_t));
174                 add_new_program(rp);
175                 rp->next=NULL;
176                 rp->program=ri->prog;
177                 rp->version=ri->vers;
178                 prog_list=rp;
179         } else if((ri->prog==prog_list->program)
180                 &&(ri->vers==prog_list->version)){
181                 rp=prog_list;
182         } else if( (ri->prog<prog_list->program)
183                 ||((ri->prog==prog_list->program)&&(ri->vers<prog_list->version))){
184                 /* we should be first entry in list */
185                 rp=g_malloc(sizeof(rpc_program_t));
186                 add_new_program(rp);
187                 rp->next=prog_list;
188                 rp->program=ri->prog;
189                 rp->version=ri->vers;
190                 prog_list=rp;
191         } else {
192                 /* we go somewhere else in the list */
193                 for(rp=prog_list;rp;rp=rp->next){
194                         if((rp->next)
195                         && (rp->next->program==ri->prog)
196                         && (rp->next->version==ri->vers)){
197                                 rp=rp->next;
198                                 break;
199                         }
200                         if((!rp->next)
201                         || (rp->next->program>ri->prog)
202                         || (  (rp->next->program==ri->prog)
203                             &&(rp->next->version>ri->vers))){
204                                 rpc_program_t *trp;
205                                 trp=g_malloc(sizeof(rpc_program_t));
206                                 add_new_program(trp);
207                                 trp->next=rp->next;
208                                 trp->program=ri->prog;
209                                 trp->version=ri->vers;
210                                 rp->next=trp;
211                                 rp=trp;
212                                 break;
213                         }
214                 }
215         }
216
217
218         /* we are only interested in reply packets */
219         if(ri->request || !rp){
220                 return FALSE;
221         }
222
223         /* calculate time delta between request and reply */
224         nstime_delta(&delta, &pinfo->fd->abs_ts, &ri->req_time);
225
226         if((rp->max.secs==0)
227         && (rp->max.nsecs==0) ){
228                 rp->max.secs=delta.secs;
229                 rp->max.nsecs=delta.nsecs;
230         }
231
232         if((rp->min.secs==0)
233         && (rp->min.nsecs==0) ){
234                 rp->min.secs=delta.secs;
235                 rp->min.nsecs=delta.nsecs;
236         }
237
238         if( (delta.secs<rp->min.secs)
239         ||( (delta.secs==rp->min.secs)
240           &&(delta.nsecs<rp->min.nsecs) ) ){
241                 rp->min.secs=delta.secs;
242                 rp->min.nsecs=delta.nsecs;
243         }
244
245         if( (delta.secs>rp->max.secs)
246         ||( (delta.secs==rp->max.secs)
247           &&(delta.nsecs>rp->max.nsecs) ) ){
248                 rp->max.secs=delta.secs;
249                 rp->max.nsecs=delta.nsecs;
250         }
251
252         rp->tot.secs += delta.secs;
253         rp->tot.nsecs += delta.nsecs;
254         if(rp->tot.nsecs>NANOSECS_PER_SEC){
255                 rp->tot.nsecs-=NANOSECS_PER_SEC;
256                 rp->tot.secs++;
257         }
258         rp->num++;
259
260         return TRUE;
261 }
262
263
264 static void
265 rpcprogs_draw(void *dummy _U_)
266 {
267         rpc_program_t *rp;
268         int i;
269         guint64 td;
270
271         for(rp=prog_list,i=1;rp;rp=rp->next,i++){
272                 /* Ignore procedures with no calls */
273                 if(rp->num==0){
274                         td=0;
275                         continue;
276                 }
277                 /* Scale the average SRT in units of 1us and round to the nearest us.
278                    tot.secs is a time_t which may be 32 or 64 bits (or even floating)
279                    depending on the platform.  After casting tot.secs to a 64 bits int, it
280                    would take a capture with a duration of over 136 *years* to
281                    overflow the secs portion of td. */
282                 td = ((guint64)(rp->tot.secs))*NANOSECS_PER_SEC + rp->tot.nsecs;
283                 td = ((td / rp->num) + 500) / 1000;
284
285                 g_snprintf(rp->sprogram, sizeof(rp->sprogram), "%s",rpc_prog_name(rp->program));
286                 gtk_label_set_text(GTK_LABEL(rp->wprogram), rp->sprogram);
287
288                 g_snprintf(rp->sversion, sizeof(rp->sversion), "%d",rp->version);
289                 gtk_label_set_text(GTK_LABEL(rp->wversion), rp->sversion);
290
291                 g_snprintf(rp->snum, sizeof(rp->snum), "%d",rp->num);
292                 gtk_label_set_text(GTK_LABEL(rp->wnum), rp->snum);
293
294                 g_snprintf(rp->smin, sizeof(rp->smin), "%3d.%06d",(int)rp->min.secs, (rp->min.nsecs+500)/1000);
295                 gtk_label_set_text(GTK_LABEL(rp->wmin), rp->smin);
296
297                 g_snprintf(rp->smax, sizeof(rp->smax), "%3d.%06d",(int)rp->max.secs, (rp->max.nsecs+500)/1000);
298                 gtk_label_set_text(GTK_LABEL(rp->wmax), rp->smax);
299
300                 g_snprintf(rp->savg, sizeof(rp->savg), "%3d.%06d",(int)(td/1000000),(int)(td%1000000));
301                 gtk_label_set_text(GTK_LABEL(rp->wavg), rp->savg);
302
303         }
304 }
305
306 /* since the gtk2 implementation of tap is multithreaded we must protect
307  * remove_tap_listener() from modifying the list while draw_tap_listener()
308  * is running.  the other protected block is in main.c
309  *
310  * there should not be any other critical regions in gtk2
311  */
312 static void
313 win_destroy_cb(void *dummy _U_, gpointer data _U_)
314 {
315         rpc_program_t *rp, *rp2;
316
317         protect_thread_critical_region();
318         remove_tap_listener(win);
319         unprotect_thread_critical_region();
320
321         win=NULL;
322         for(rp=prog_list;rp;){
323                 rp2=rp->next;
324                 g_free(rp);
325                 rp=rp2;
326         }
327         prog_list=NULL;
328 }
329
330
331 /* When called, this function will start rpcprogs
332  */
333 static void
334 gtk_rpcprogs_init(const char *optarg _U_, void* userdata _U_)
335 {
336         char *title_string;
337         GtkWidget *vbox;
338         GtkWidget *stat_label;
339         GtkWidget *tmp;
340         GString *error_string;
341         GtkWidget *bt_close;
342         GtkWidget *bbox;
343
344         if(win){
345                 gdk_window_raise(gtk_widget_get_window(win));
346                 return;
347         }
348
349         title_string = rpcprogs_gen_title();
350         win = dlg_window_new(title_string);  /* transient_for top_level */
351         gtk_window_set_destroy_with_parent (GTK_WINDOW(win), TRUE);
352
353         vbox=gtk_vbox_new(FALSE, 3);
354         gtk_container_add(GTK_CONTAINER(win), vbox);
355         gtk_container_set_border_width(GTK_CONTAINER(vbox), 12);
356
357         stat_label=gtk_label_new(title_string);
358         g_free(title_string);
359         gtk_box_pack_start(GTK_BOX(vbox), stat_label, FALSE, FALSE, 0);
360
361
362         table=gtk_table_new(1, 5, TRUE);
363         gtk_container_add(GTK_CONTAINER(vbox), table);
364
365         tmp=gtk_label_new("Program");
366         gtk_table_attach_defaults(GTK_TABLE(table), tmp, 0,1,0,1);
367         gtk_label_set_justify(GTK_LABEL(tmp), GTK_JUSTIFY_LEFT);
368
369         tmp=gtk_label_new("Version");
370         gtk_table_attach_defaults(GTK_TABLE(table), tmp, 1,2,0,1);
371         gtk_label_set_justify(GTK_LABEL(tmp), GTK_JUSTIFY_RIGHT);
372
373         tmp=gtk_label_new("Calls");
374         gtk_table_attach_defaults(GTK_TABLE(table), tmp, 2,3,0,1);
375         gtk_label_set_justify(GTK_LABEL(tmp), GTK_JUSTIFY_RIGHT);
376
377         tmp=gtk_label_new("Min SRT");
378         gtk_table_attach_defaults(GTK_TABLE(table), tmp, 3,4,0,1);
379         gtk_label_set_justify(GTK_LABEL(tmp), GTK_JUSTIFY_RIGHT);
380
381         tmp=gtk_label_new("Max SRT");
382         gtk_table_attach_defaults(GTK_TABLE(table), tmp, 4,5,0,1);
383         gtk_label_set_justify(GTK_LABEL(tmp), GTK_JUSTIFY_RIGHT);
384
385         tmp=gtk_label_new("Avg SRT");
386         gtk_table_attach_defaults(GTK_TABLE(table), tmp, 5,6,0,1);
387         gtk_label_set_justify(GTK_LABEL(tmp), GTK_JUSTIFY_RIGHT);
388
389         error_string=register_tap_listener("rpc", win, NULL, 0, rpcprogs_reset, rpcprogs_packet, rpcprogs_draw);
390         if(error_string){
391                 fprintf(stderr, "wireshark: Couldn't register rpc,programs tap: %s\n",
392                     error_string->str);
393                 g_string_free(error_string, TRUE);
394                 exit(1);
395         }
396
397         /* Button row. */
398         bbox = dlg_button_row_new(GTK_STOCK_CLOSE, NULL);
399         gtk_box_pack_start(GTK_BOX(vbox), bbox, FALSE, FALSE, 0);
400
401         bt_close = g_object_get_data(G_OBJECT(bbox), GTK_STOCK_CLOSE);
402         window_set_cancel_button(win, bt_close, window_cancel_button_cb);
403
404         g_signal_connect(win, "delete_event", G_CALLBACK(window_delete_event_cb), NULL);
405         g_signal_connect(win, "destroy", G_CALLBACK(win_destroy_cb), NULL);
406
407         gtk_widget_show_all(win);
408         window_present(win);
409
410         cf_retap_packets(&cfile);
411         gdk_window_raise(gtk_widget_get_window(win));
412 }
413
414 #ifdef MAIN_MENU_USE_UIMANAGER
415 void
416 gtk_rpcprogs_cb(GtkWidget *w _U_, gpointer data _U_)
417 #else
418 static void
419 gtk_rpcprogs_cb(GtkWidget *w _U_, gpointer d _U_)
420 #endif
421 {
422         gtk_rpcprogs_init("",NULL);
423 }
424
425 void
426 register_tap_listener_gtkrpcprogs(void)
427 {
428         register_stat_cmd_arg("rpc,programs", gtk_rpcprogs_init,NULL);
429
430 #ifdef MAIN_MENU_USE_UIMANAGER
431 #else
432         register_stat_menu_item("ONC-RPC Programs", REGISTER_STAT_GROUP_UNSORTED,
433         gtk_rpcprogs_cb, NULL, NULL, NULL);
434 #endif
435 }