From Alejandro Vaquero.
[obnox/wireshark/wip.git] / gtk / rpc_stat.c
1 /* rpc_stat.c
2  * rpc_stat   2002 Ronnie Sahlberg
3  *
4  * $Id$
5  *
6  * Ethereal - Network traffic analyzer
7  * By Gerald Combs <gerald@ethereal.com>
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 (Server Response Time) statistics 
26  * to ethereal.
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 <gtk/gtk.h>
36
37 #include <epan/packet_info.h>
38 #include <epan/epan.h>
39
40 #include <epan/stat_cmd_args.h>
41 #include "../stat_menu.h"
42 #include "gui_stat_menu.h"
43 #include "simple_dialog.h"
44 #include "gui_utils.h"
45 #include "dlg_utils.h"
46 #include <epan/tap.h>
47 #include "../register.h"
48 #include <epan/dissectors/packet-rpc.h>
49 #include "../globals.h"
50 #include "filter_dlg.h"
51 #include "compat_macros.h"
52 #include "service_response_time_table.h"
53 #include "gtkglobals.h"
54
55
56 /* used to keep track of the statistics for an entire program interface */
57 typedef struct _rpcstat_t {
58         GtkWidget *win;
59         srt_stat_table srt_table;
60         const char *prog;
61         guint32 program;
62         guint32 version;
63         guint32 num_procedures;
64 } rpcstat_t;
65
66 static char *
67 rpcstat_gen_title(rpcstat_t *rs)
68 {
69         char *title;
70
71         title = g_strdup_printf("ONC-RPC Service Response Time statistics for %s version %d: %s",
72             rs->prog, rs->version, cf_get_display_name(&cfile));
73         return title;
74 }
75
76 static void
77 rpcstat_set_title(rpcstat_t *rs)
78 {
79         char *title;
80
81         title = rpcstat_gen_title(rs);
82         gtk_window_set_title(GTK_WINDOW(rs->win), title);
83         g_free(title);
84 }
85
86 static void
87 rpcstat_reset(void *arg)
88 {
89         rpcstat_t *rs = arg;
90
91         reset_srt_table_data(&rs->srt_table);
92         rpcstat_set_title(rs);
93 }
94
95
96 static int
97 rpcstat_packet(void *arg, packet_info *pinfo, epan_dissect_t *edt _U_, const void *arg2)
98 {
99         rpcstat_t *rs = arg;
100         const rpc_call_info_value *ri = arg2;
101
102         /* we are only interested in reply packets */
103         if(ri->request){
104                 return 0;
105         }
106         /* we are only interested in certain program/versions */
107         if( (ri->prog!=rs->program) || (ri->vers!=rs->version) ){
108                 return 0;
109         }
110         /* maybe we have discovered a new procedure? 
111          * then we might need to extend our tables 
112          */
113         if(ri->proc>=rs->num_procedures){
114                 guint32 i;
115                 if(ri->proc>256){
116                         /* no program have probably ever more than this many 
117                          * procedures anyway and it prevent us from allocating
118                          * infinite memory if passed a garbage procedure id 
119                          */
120                         return 0;
121                 }
122                 for(i=rs->num_procedures;i<=ri->proc;i++){
123                         init_srt_table_row(&rs->srt_table, i, rpc_proc_name(rs->program, rs->version, i));
124                 }
125                 rs->num_procedures=ri->proc+1;
126         }
127         add_srt_table_data(&rs->srt_table, ri->proc, &ri->req_time, pinfo);
128
129         return 1;
130 }
131
132 static void
133 rpcstat_draw(void *arg)
134 {
135         rpcstat_t *rs = arg;
136
137         draw_srt_table_data(&rs->srt_table);
138 }
139
140
141
142 static guint32 rpc_program=0;
143 static guint32 rpc_version=0;
144 static gint32 rpc_min_vers=-1;
145 static gint32 rpc_max_vers=-1;
146 static gint32 rpc_min_proc=-1;
147 static gint32 rpc_max_proc=-1;
148
149 static void *
150 rpcstat_find_procs(gpointer *key, gpointer *value _U_, gpointer *user_data _U_)
151 {
152         rpc_proc_info_key *k=(rpc_proc_info_key *)key;
153
154         if(k->prog!=rpc_program){
155                 return NULL;
156         }
157         if(k->vers!=rpc_version){
158                 return NULL;
159         }
160         if(rpc_min_proc==-1){
161                 rpc_min_proc=k->proc;
162                 rpc_max_proc=k->proc;
163         }
164         if((gint32)k->proc<rpc_min_proc){
165                 rpc_min_proc=k->proc;
166         }
167         if((gint32)k->proc>rpc_max_proc){
168                 rpc_max_proc=k->proc;
169         }
170
171         return NULL;
172 }
173
174 static void *
175 rpcstat_find_vers(gpointer *key, gpointer *value _U_, gpointer *user_data _U_)
176 {
177         rpc_proc_info_key *k=(rpc_proc_info_key *)key;
178
179         if(k->prog!=rpc_program){
180                 return NULL;
181         }
182         if(rpc_min_vers==-1){
183                 rpc_min_vers=k->vers;
184                 rpc_max_vers=k->vers;
185         }
186         if((gint32)k->vers<rpc_min_vers){
187                 rpc_min_vers=k->vers;
188         }
189         if((gint32)k->vers>rpc_max_vers){
190                 rpc_max_vers=k->vers;
191         }
192
193         return NULL;
194 }
195
196 /* since the gtk2 implementation of tap is multithreaded we must protect
197  * remove_tap_listener() from modifying the list while draw_tap_listener()
198  * is running.  the other protected block is in main.c
199  *
200  * there should not be any other critical regions in gtk2
201  */
202 void protect_thread_critical_region(void);
203 void unprotect_thread_critical_region(void);
204 static void
205 win_destroy_cb(GtkWindow *win _U_, gpointer data)
206 {
207         rpcstat_t *rs=(rpcstat_t *)data;
208
209         protect_thread_critical_region();
210         remove_tap_listener(rs);
211         unprotect_thread_critical_region();
212
213         free_srt_table_data(&rs->srt_table);
214         g_free(rs);
215 }
216
217 /* When called, this function will create a new instance of gtk2-rpcstat.
218  */
219 static void
220 gtk_rpcstat_init(const char *optarg)
221 {
222         rpcstat_t *rs;
223         guint32 i;
224         char *title_string;
225         char filter_string[256];
226         GtkWidget *vbox;
227         GtkWidget *stat_label;
228         GtkWidget *filter_label;
229         GtkWidget *bbox;
230         GtkWidget *close_bt;
231         int program, version, pos;
232         const char *filter=NULL;
233         GString *error_string;
234         int hf_index;
235         header_field_info *hfi;
236
237         pos=0;
238         if(sscanf(optarg,"rpc,srt,%d,%d,%n",&program,&version,&pos)==2){
239                 if(pos){
240                         filter=optarg+pos;
241                 } else {
242                         filter=NULL;
243                 }
244         } else {
245                 fprintf(stderr, "ethereal: invalid \"-z rpc,srt,<program>,<version>[,<filter>]\" argument\n");
246                 exit(1);
247         }
248
249         rpc_program=program;
250         rpc_version=version;
251         rs=g_malloc(sizeof(rpcstat_t));
252         rs->prog=rpc_prog_name(rpc_program);
253         rs->program=rpc_program;
254         rs->version=rpc_version;
255         hf_index=rpc_prog_hf(rpc_program, rpc_version);
256         hfi=proto_registrar_get_nth(hf_index);
257
258         rs->win=window_new(GTK_WINDOW_TOPLEVEL, "rpc-stat");
259         gtk_window_set_default_size(GTK_WINDOW(rs->win), 550, 400);
260         rpcstat_set_title(rs);
261
262         vbox=gtk_vbox_new(FALSE, 3);
263         gtk_container_add(GTK_CONTAINER(rs->win), vbox);
264         gtk_container_set_border_width(GTK_CONTAINER(vbox), 12);
265         
266         title_string = rpcstat_gen_title(rs);
267         stat_label=gtk_label_new(title_string);
268         g_free(title_string);
269         gtk_box_pack_start(GTK_BOX(vbox), stat_label, FALSE, FALSE, 0);
270
271         g_snprintf(filter_string,255,"Filter:%s",filter?filter:"");
272         filter_label=gtk_label_new(filter_string);
273         gtk_box_pack_start(GTK_BOX(vbox), filter_label, FALSE, FALSE, 0);
274
275         rpc_min_proc=-1;
276         rpc_max_proc=-1;
277         g_hash_table_foreach(rpc_procs, (GHFunc)rpcstat_find_procs, NULL);
278         rs->num_procedures=rpc_max_proc+1;
279
280         /* We must display TOP LEVEL Widget before calling init_srt_table() */
281         gtk_widget_show_all(rs->win);
282
283         init_srt_table(&rs->srt_table, rpc_max_proc+1, vbox, hfi->abbrev);
284
285         for(i=0;i<rs->num_procedures;i++){
286                 init_srt_table_row(&rs->srt_table, i, rpc_proc_name(rpc_program, rpc_version, i));
287         }
288
289
290         error_string=register_tap_listener("rpc", rs, filter, rpcstat_reset, rpcstat_packet, rpcstat_draw);
291         if(error_string){
292                 simple_dialog(ESD_TYPE_ERROR, ESD_BTN_OK, error_string->str);
293                 g_string_free(error_string, TRUE);
294                 free_srt_table_data(&rs->srt_table);
295                 g_free(rs);
296                 return;
297         }
298
299         /* Button row. */
300         bbox = dlg_button_row_new(GTK_STOCK_CLOSE, NULL);
301         gtk_box_pack_end(GTK_BOX(vbox), bbox, FALSE, FALSE, 0);
302
303         close_bt = OBJECT_GET_DATA(bbox, GTK_STOCK_CLOSE);
304         window_set_cancel_button(rs->win, close_bt, window_cancel_button_cb);
305
306         SIGNAL_CONNECT(rs->win, "delete_event", window_delete_event_cb, NULL);
307         SIGNAL_CONNECT(rs->win, "destroy", win_destroy_cb, rs);
308
309         gtk_widget_show_all(rs->win);
310         window_present(rs->win);
311
312         cf_retap_packets(&cfile);
313 }
314
315
316
317
318 static GtkWidget *dlg=NULL;
319 static GtkWidget *prog_menu;
320 static GtkWidget *vers_opt, *vers_menu;
321 static GtkWidget *filter_entry;
322
323
324 static void
325 rpcstat_start_button_clicked(GtkWidget *item _U_, gpointer data _U_)
326 {
327         GString *str;
328         const char *filter;
329
330         str = g_string_new("rpc,srt");
331         g_string_sprintfa(str, ",%d,%d", rpc_program, rpc_version);
332         filter=gtk_entry_get_text(GTK_ENTRY(filter_entry));
333         if(filter[0]!=0){
334                 g_string_sprintfa(str, ",%s", filter);
335         }
336
337         gtk_rpcstat_init(str->str);
338         g_string_free(str, TRUE);
339 }
340
341
342 static void
343 rpcstat_version_select(GtkWidget *item _U_, gpointer key)
344 {
345         int vers=(int)key;
346
347         rpc_version=vers;
348 }
349
350
351
352 static void
353 rpcstat_program_select(GtkWidget *item _U_, gpointer key)
354 {
355         rpc_prog_info_key *k=(rpc_prog_info_key *)key;
356         int i;
357
358         rpc_program=k->prog;
359
360         /* change version menu */
361         rpc_version=0;
362         gtk_object_destroy(GTK_OBJECT(vers_menu));
363         vers_menu=gtk_menu_new();
364         rpc_min_vers=-1;
365         rpc_max_vers=-1;
366         g_hash_table_foreach(rpc_procs, (GHFunc)rpcstat_find_vers, NULL);
367         rpc_version=rpc_min_vers;
368         for(i=rpc_min_vers;i<=rpc_max_vers;i++){
369                 GtkWidget *menu_item;
370                 char vs[5];
371                 g_snprintf(vs, 5, "%d",i);
372                 menu_item=gtk_menu_item_new_with_label(vs);
373                 SIGNAL_CONNECT(menu_item, "activate", rpcstat_version_select,
374                                i);
375
376                 gtk_widget_show(menu_item);
377                 gtk_menu_append(GTK_MENU(vers_menu), menu_item);
378         }
379         gtk_option_menu_set_menu(GTK_OPTION_MENU(vers_opt), vers_menu);
380 }
381
382 static void *
383 rpcstat_list_programs(gpointer *key, gpointer *value, gpointer *user_data _U_)
384 {
385         rpc_prog_info_key *k=(rpc_prog_info_key *)key;
386         rpc_prog_info_value *v=(rpc_prog_info_value *)value;
387         GtkWidget *menu_item;
388
389         menu_item=gtk_menu_item_new_with_label(v->progname);
390         SIGNAL_CONNECT(menu_item, "activate", rpcstat_program_select, k);
391
392         gtk_widget_show(menu_item);
393         gtk_menu_append(GTK_MENU(prog_menu), menu_item);
394
395         if(!rpc_program){
396                 rpc_program=k->prog;
397         }
398
399         return NULL;
400 }
401
402 static void
403 dlg_destroy_cb(void)
404 {
405         dlg=NULL;
406 }
407
408 static void
409 gtk_rpcstat_cb(GtkWidget *w _U_, gpointer d _U_)
410 {
411         GtkWidget *dlg_box;
412         GtkWidget *prog_box, *prog_label, *prog_opt;
413         GtkWidget *vers_label;
414         GtkWidget *filter_box, *filter_bt;
415         GtkWidget *bbox, *start_button, *cancel_button;
416         int i;
417         const char *filter;
418         static construct_args_t args = {
419           "Service Response Time Statistics Filter",
420           TRUE,
421           FALSE
422         };
423
424         /* if the window is already open, bring it to front */
425         if(dlg){
426                 gdk_window_raise(dlg->window);
427                 return;
428         }
429
430         dlg=dlg_window_new("Ethereal: Compute ONC-RPC SRT statistics");
431         gtk_window_set_default_size(GTK_WINDOW(dlg), 300, -1);
432
433         dlg_box=gtk_vbox_new(FALSE, 10);
434         gtk_container_border_width(GTK_CONTAINER(dlg_box), 10);
435         gtk_container_add(GTK_CONTAINER(dlg), dlg_box);
436         gtk_widget_show(dlg_box);
437
438         /* Program box */
439         prog_box=gtk_hbox_new(FALSE, 10);
440
441         /* Program label */
442         gtk_container_set_border_width(GTK_CONTAINER(prog_box), 10);
443         prog_label=gtk_label_new("Program:");
444         gtk_box_pack_start(GTK_BOX(prog_box), prog_label, FALSE, FALSE, 0);
445         gtk_widget_show(prog_label);
446
447         /* Program menu */
448         prog_opt=gtk_option_menu_new();
449         prog_menu=gtk_menu_new();
450         g_hash_table_foreach(rpc_progs, (GHFunc)rpcstat_list_programs, NULL);
451         gtk_option_menu_set_menu(GTK_OPTION_MENU(prog_opt), prog_menu);
452         gtk_box_pack_start(GTK_BOX(prog_box), prog_opt, TRUE, TRUE, 0);
453         gtk_widget_show(prog_opt);
454
455         /* Version label */
456         gtk_container_set_border_width(GTK_CONTAINER(prog_box), 10);
457         vers_label=gtk_label_new("Version:");
458         gtk_box_pack_start(GTK_BOX(prog_box), vers_label, FALSE, FALSE, 0);
459         gtk_widget_show(vers_label);
460
461         /* Version menu */
462         vers_opt=gtk_option_menu_new();
463         vers_menu=gtk_menu_new();
464         rpc_min_vers=-1;
465         rpc_max_vers=-1;
466         g_hash_table_foreach(rpc_procs, (GHFunc)rpcstat_find_vers, NULL);
467         rpc_version=rpc_min_vers;
468         for(i=rpc_min_vers;i<=rpc_max_vers;i++){
469                 GtkWidget *menu_item;
470                 char vs[5];
471                 g_snprintf(vs, 5, "%d",i);
472                 menu_item=gtk_menu_item_new_with_label(vs);
473                 SIGNAL_CONNECT(menu_item, "activate", rpcstat_version_select,
474                                i);
475
476                 gtk_widget_show(menu_item);
477                 gtk_menu_append(GTK_MENU(vers_menu), menu_item);
478         }
479         gtk_option_menu_set_menu(GTK_OPTION_MENU(vers_opt), vers_menu);
480         gtk_box_pack_start(GTK_BOX(prog_box), vers_opt, TRUE, TRUE, 0);
481         gtk_widget_show(vers_opt);
482
483         gtk_box_pack_start(GTK_BOX(dlg_box), prog_box, TRUE, TRUE, 0);
484         gtk_widget_show(prog_box);
485
486         /* Filter box */
487         filter_box=gtk_hbox_new(FALSE, 3);
488
489         /* Filter label */
490         filter_bt=BUTTON_NEW_FROM_STOCK(ETHEREAL_STOCK_DISPLAY_FILTER_ENTRY);
491         SIGNAL_CONNECT(filter_bt, "clicked", display_filter_construct_cb, &args);
492         gtk_box_pack_start(GTK_BOX(filter_box), filter_bt, FALSE, FALSE, 0);
493         gtk_widget_show(filter_bt);
494
495         /* Filter entry */
496         filter_entry=gtk_entry_new();
497     SIGNAL_CONNECT(filter_entry, "changed", filter_te_syntax_check_cb, NULL);
498
499         /* filter prefs dialog */
500         OBJECT_SET_DATA(filter_bt, E_FILT_TE_PTR_KEY, filter_entry);
501         /* filter prefs dialog */
502
503         gtk_box_pack_start(GTK_BOX(filter_box), filter_entry, TRUE, TRUE, 0);
504         filter=gtk_entry_get_text(GTK_ENTRY(main_display_filter_widget));
505         if(filter){
506                 gtk_entry_set_text(GTK_ENTRY(filter_entry), filter);
507         }
508         gtk_widget_show(filter_entry);
509
510         gtk_box_pack_start(GTK_BOX(dlg_box), filter_box, TRUE, TRUE, 0);
511         gtk_widget_show(filter_box);
512
513         /* button box */
514     bbox = dlg_button_row_new(ETHEREAL_STOCK_CREATE_STAT, GTK_STOCK_CANCEL, NULL);
515         gtk_box_pack_start(GTK_BOX(dlg_box), bbox, FALSE, FALSE, 0);
516     gtk_widget_show(bbox);
517
518     start_button = OBJECT_GET_DATA(bbox, ETHEREAL_STOCK_CREATE_STAT);
519     SIGNAL_CONNECT_OBJECT(start_button, "clicked",
520                               rpcstat_start_button_clicked, NULL);
521
522     cancel_button = OBJECT_GET_DATA(bbox, GTK_STOCK_CANCEL);
523     window_set_cancel_button(dlg, cancel_button, window_cancel_button_cb);
524
525         /* Give the initial focus to the "Filter" entry box. */
526         gtk_widget_grab_focus(filter_entry);
527
528     gtk_widget_grab_default(start_button );
529
530     SIGNAL_CONNECT(dlg, "delete_event", window_delete_event_cb, NULL);
531         SIGNAL_CONNECT(dlg, "destroy", dlg_destroy_cb, NULL);
532
533     gtk_widget_show_all(dlg);
534     window_present(dlg);
535 }
536
537
538 void
539 register_tap_listener_gtkrpcstat(void)
540 {
541         register_stat_cmd_arg("rpc,srt,", gtk_rpcstat_init);
542
543         register_stat_menu_item("ONC-RPC...", REGISTER_STAT_GROUP_RESPONSE_TIME,
544             gtk_rpcstat_cb, NULL, NULL, NULL);
545 }