1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20#include <byteswap.h>
21#include <endian.h>
22#include <fcntl.h>
23#include <linux/firewire-constants.h>
24#include <poll.h>
25#include <popt.h>
26#include <signal.h>
27#include <stdio.h>
28#include <stdlib.h>
29#include <string.h>
30#include <sys/ioctl.h>
31#include <sys/time.h>
32#include <termios.h>
33#include <unistd.h>
34
35#include "list.h"
36#include "nosy-dump.h"
37#include "nosy-user.h"
38
39enum {
40 PACKET_FIELD_DETAIL = 0x01,
41 PACKET_FIELD_DATA_LENGTH = 0x02,
42
43 PACKET_FIELD_TRANSACTION = 0x04,
44};
45
46static void print_packet(uint32_t *data, size_t length);
47static void decode_link_packet(struct link_packet *packet, size_t length,
48 int include_flags, int exclude_flags);
49static int run = 1;
50sig_t sys_sigint_handler;
51
52static char *option_nosy_device = "/dev/nosy";
53static char *option_view = "packet";
54static char *option_output;
55static char *option_input;
56static int option_hex;
57static int option_iso;
58static int option_cycle_start;
59static int option_version;
60static int option_verbose;
61
62enum {
63 VIEW_TRANSACTION,
64 VIEW_PACKET,
65 VIEW_STATS,
66};
67
68static const struct poptOption options[] = {
69 {
70 .longName = "device",
71 .shortName = 'd',
72 .argInfo = POPT_ARG_STRING,
73 .arg = &option_nosy_device,
74 .descrip = "Path to nosy device.",
75 .argDescrip = "DEVICE"
76 },
77 {
78 .longName = "view",
79 .argInfo = POPT_ARG_STRING,
80 .arg = &option_view,
81 .descrip = "Specify view of bus traffic: packet, transaction or stats.",
82 .argDescrip = "VIEW"
83 },
84 {
85 .longName = "hex",
86 .shortName = 'x',
87 .argInfo = POPT_ARG_NONE,
88 .arg = &option_hex,
89 .descrip = "Print each packet in hex.",
90 },
91 {
92 .longName = "iso",
93 .argInfo = POPT_ARG_NONE,
94 .arg = &option_iso,
95 .descrip = "Print iso packets.",
96 },
97 {
98 .longName = "cycle-start",
99 .argInfo = POPT_ARG_NONE,
100 .arg = &option_cycle_start,
101 .descrip = "Print cycle start packets.",
102 },
103 {
104 .longName = "verbose",
105 .shortName = 'v',
106 .argInfo = POPT_ARG_NONE,
107 .arg = &option_verbose,
108 .descrip = "Verbose packet view.",
109 },
110 {
111 .longName = "output",
112 .shortName = 'o',
113 .argInfo = POPT_ARG_STRING,
114 .arg = &option_output,
115 .descrip = "Log to output file.",
116 .argDescrip = "FILENAME"
117 },
118 {
119 .longName = "input",
120 .shortName = 'i',
121 .argInfo = POPT_ARG_STRING,
122 .arg = &option_input,
123 .descrip = "Decode log from file.",
124 .argDescrip = "FILENAME"
125 },
126 {
127 .longName = "version",
128 .argInfo = POPT_ARG_NONE,
129 .arg = &option_version,
130 .descrip = "Specify print version info.",
131 },
132 POPT_AUTOHELP
133 POPT_TABLEEND
134};
135
136
137static void
138sigint_handler(int signal_num)
139{
140 if (run == 1) {
141 run = 0;
142 signal(SIGINT, SIG_DFL);
143 }
144}
145
146static struct subaction *
147subaction_create(uint32_t *data, size_t length)
148{
149 struct subaction *sa;
150
151
152 sa = malloc(sizeof *sa - sizeof sa->packet + length);
153 if (!sa)
154 exit(EXIT_FAILURE);
155 sa->ack = data[length / 4 - 1];
156 sa->length = length;
157 memcpy(&sa->packet, data, length);
158
159 return sa;
160}
161
162static void
163subaction_destroy(struct subaction *sa)
164{
165 free(sa);
166}
167
168static struct list pending_transaction_list = {
169 &pending_transaction_list, &pending_transaction_list
170};
171
172static struct link_transaction *
173link_transaction_lookup(int request_node, int response_node, int tlabel)
174{
175 struct link_transaction *t;
176
177 list_for_each_entry(t, &pending_transaction_list, link) {
178 if (t->request_node == request_node &&
179 t->response_node == response_node &&
180 t->tlabel == tlabel)
181 return t;
182 }
183
184 t = malloc(sizeof *t);
185 if (!t)
186 exit(EXIT_FAILURE);
187 t->request_node = request_node;
188 t->response_node = response_node;
189 t->tlabel = tlabel;
190 list_init(&t->request_list);
191 list_init(&t->response_list);
192
193 list_append(&pending_transaction_list, &t->link);
194
195 return t;
196}
197
198static void
199link_transaction_destroy(struct link_transaction *t)
200{
201 struct subaction *sa;
202
203 while (!list_empty(&t->request_list)) {
204 sa = list_head(&t->request_list, struct subaction, link);
205 list_remove(&sa->link);
206 subaction_destroy(sa);
207 }
208 while (!list_empty(&t->response_list)) {
209 sa = list_head(&t->response_list, struct subaction, link);
210 list_remove(&sa->link);
211 subaction_destroy(sa);
212 }
213 free(t);
214}
215
216struct protocol_decoder {
217 const char *name;
218 int (*decode)(struct link_transaction *t);
219};
220
221static const struct protocol_decoder protocol_decoders[] = {
222 { "FCP", decode_fcp }
223};
224
225static void
226handle_transaction(struct link_transaction *t)
227{
228 struct subaction *sa;
229 int i;
230
231 if (!t->request) {
232 printf("BUG in handle_transaction\n");
233 return;
234 }
235
236 for (i = 0; i < array_length(protocol_decoders); i++)
237 if (protocol_decoders[i].decode(t))
238 break;
239
240
241 return;
242
243 decode_link_packet(&t->request->packet, t->request->length,
244 PACKET_FIELD_TRANSACTION, 0);
245 if (t->response)
246 decode_link_packet(&t->response->packet, t->request->length,
247 PACKET_FIELD_TRANSACTION, 0);
248 else
249 printf("[no response]");
250
251 if (option_verbose) {
252 list_for_each_entry(sa, &t->request_list, link)
253 print_packet((uint32_t *) &sa->packet, sa->length);
254 list_for_each_entry(sa, &t->response_list, link)
255 print_packet((uint32_t *) &sa->packet, sa->length);
256 }
257 printf("\r\n");
258
259 link_transaction_destroy(t);
260}
261
262static void
263clear_pending_transaction_list(void)
264{
265 struct link_transaction *t;
266
267 while (!list_empty(&pending_transaction_list)) {
268 t = list_head(&pending_transaction_list,
269 struct link_transaction, link);
270 list_remove(&t->link);
271 link_transaction_destroy(t);
272
273 }
274}
275
276static const char * const tcode_names[] = {
277 [0x0] = "write_quadlet_request", [0x6] = "read_quadlet_response",
278 [0x1] = "write_block_request", [0x7] = "read_block_response",
279 [0x2] = "write_response", [0x8] = "cycle_start",
280 [0x3] = "reserved", [0x9] = "lock_request",
281 [0x4] = "read_quadlet_request", [0xa] = "iso_data",
282 [0x5] = "read_block_request", [0xb] = "lock_response",
283};
284
285static const char * const ack_names[] = {
286 [0x0] = "no ack", [0x8] = "reserved (0x08)",
287 [0x1] = "ack_complete", [0x9] = "reserved (0x09)",
288 [0x2] = "ack_pending", [0xa] = "reserved (0x0a)",
289 [0x3] = "reserved (0x03)", [0xb] = "reserved (0x0b)",
290 [0x4] = "ack_busy_x", [0xc] = "reserved (0x0c)",
291 [0x5] = "ack_busy_a", [0xd] = "ack_data_error",
292 [0x6] = "ack_busy_b", [0xe] = "ack_type_error",
293 [0x7] = "reserved (0x07)", [0xf] = "reserved (0x0f)",
294};
295
296static const char * const rcode_names[] = {
297 [0x0] = "complete", [0x4] = "conflict_error",
298 [0x1] = "reserved (0x01)", [0x5] = "data_error",
299 [0x2] = "reserved (0x02)", [0x6] = "type_error",
300 [0x3] = "reserved (0x03)", [0x7] = "address_error",
301};
302
303static const char * const retry_names[] = {
304 [0x0] = "retry_1",
305 [0x1] = "retry_x",
306 [0x2] = "retry_a",
307 [0x3] = "retry_b",
308};
309
310enum {
311 PACKET_RESERVED,
312 PACKET_REQUEST,
313 PACKET_RESPONSE,
314 PACKET_OTHER,
315};
316
317struct packet_info {
318 const char *name;
319 int type;
320 int response_tcode;
321 const struct packet_field *fields;
322 int field_count;
323};
324
325struct packet_field {
326 const char *name;
327 int offset;
328
329 int width;
330 int flags;
331 const char * const *value_names;
332};
333
334#define COMMON_REQUEST_FIELDS \
335 { "dest", 0, 16, PACKET_FIELD_TRANSACTION }, \
336 { "tl", 16, 6 }, \
337 { "rt", 22, 2, PACKET_FIELD_DETAIL, retry_names }, \
338 { "tcode", 24, 4, PACKET_FIELD_TRANSACTION, tcode_names }, \
339 { "pri", 28, 4, PACKET_FIELD_DETAIL }, \
340 { "src", 32, 16, PACKET_FIELD_TRANSACTION }, \
341 { "offs", 48, 48, PACKET_FIELD_TRANSACTION }
342
343#define COMMON_RESPONSE_FIELDS \
344 { "dest", 0, 16 }, \
345 { "tl", 16, 6 }, \
346 { "rt", 22, 2, PACKET_FIELD_DETAIL, retry_names }, \
347 { "tcode", 24, 4, 0, tcode_names }, \
348 { "pri", 28, 4, PACKET_FIELD_DETAIL }, \
349 { "src", 32, 16 }, \
350 { "rcode", 48, 4, PACKET_FIELD_TRANSACTION, rcode_names }
351
352static const struct packet_field read_quadlet_request_fields[] = {
353 COMMON_REQUEST_FIELDS,
354 { "crc", 96, 32, PACKET_FIELD_DETAIL },
355 { "ack", 156, 4, 0, ack_names },
356};
357
358static const struct packet_field read_quadlet_response_fields[] = {
359 COMMON_RESPONSE_FIELDS,
360 { "data", 96, 32, PACKET_FIELD_TRANSACTION },
361 { "crc", 128, 32, PACKET_FIELD_DETAIL },
362 { "ack", 188, 4, 0, ack_names },
363};
364
365static const struct packet_field read_block_request_fields[] = {
366 COMMON_REQUEST_FIELDS,
367 { "data_length", 96, 16, PACKET_FIELD_TRANSACTION },
368 { "extended_tcode", 112, 16 },
369 { "crc", 128, 32, PACKET_FIELD_DETAIL },
370 { "ack", 188, 4, 0, ack_names },
371};
372
373static const struct packet_field block_response_fields[] = {
374 COMMON_RESPONSE_FIELDS,
375 { "data_length", 96, 16, PACKET_FIELD_DATA_LENGTH },
376 { "extended_tcode", 112, 16 },
377 { "crc", 128, 32, PACKET_FIELD_DETAIL },
378 { "data", 160, 0, PACKET_FIELD_TRANSACTION },
379 { "crc", -64, 32, PACKET_FIELD_DETAIL },
380 { "ack", -4, 4, 0, ack_names },
381};
382
383static const struct packet_field write_quadlet_request_fields[] = {
384 COMMON_REQUEST_FIELDS,
385 { "data", 96, 32, PACKET_FIELD_TRANSACTION },
386 { "ack", -4, 4, 0, ack_names },
387};
388
389static const struct packet_field block_request_fields[] = {
390 COMMON_REQUEST_FIELDS,
391 { "data_length", 96, 16, PACKET_FIELD_DATA_LENGTH | PACKET_FIELD_TRANSACTION },
392 { "extended_tcode", 112, 16, PACKET_FIELD_TRANSACTION },
393 { "crc", 128, 32, PACKET_FIELD_DETAIL },
394 { "data", 160, 0, PACKET_FIELD_TRANSACTION },
395 { "crc", -64, 32, PACKET_FIELD_DETAIL },
396 { "ack", -4, 4, 0, ack_names },
397};
398
399static const struct packet_field write_response_fields[] = {
400 COMMON_RESPONSE_FIELDS,
401 { "reserved", 64, 32, PACKET_FIELD_DETAIL },
402 { "ack", -4, 4, 0, ack_names },
403};
404
405static const struct packet_field iso_data_fields[] = {
406 { "data_length", 0, 16, PACKET_FIELD_DATA_LENGTH },
407 { "tag", 16, 2 },
408 { "channel", 18, 6 },
409 { "tcode", 24, 4, 0, tcode_names },
410 { "sy", 28, 4 },
411 { "crc", 32, 32, PACKET_FIELD_DETAIL },
412 { "data", 64, 0 },
413 { "crc", -64, 32, PACKET_FIELD_DETAIL },
414 { "ack", -4, 4, 0, ack_names },
415};
416
417static const struct packet_info packet_info[] = {
418 {
419 .name = "write_quadlet_request",
420 .type = PACKET_REQUEST,
421 .response_tcode = TCODE_WRITE_RESPONSE,
422 .fields = write_quadlet_request_fields,
423 .field_count = array_length(write_quadlet_request_fields)
424 },
425 {
426 .name = "write_block_request",
427 .type = PACKET_REQUEST,
428 .response_tcode = TCODE_WRITE_RESPONSE,
429 .fields = block_request_fields,
430 .field_count = array_length(block_request_fields)
431 },
432 {
433 .name = "write_response",
434 .type = PACKET_RESPONSE,
435 .fields = write_response_fields,
436 .field_count = array_length(write_response_fields)
437 },
438 {
439 .name = "reserved",
440 .type = PACKET_RESERVED,
441 },
442 {
443 .name = "read_quadlet_request",
444 .type = PACKET_REQUEST,
445 .response_tcode = TCODE_READ_QUADLET_RESPONSE,
446 .fields = read_quadlet_request_fields,
447 .field_count = array_length(read_quadlet_request_fields)
448 },
449 {
450 .name = "read_block_request",
451 .type = PACKET_REQUEST,
452 .response_tcode = TCODE_READ_BLOCK_RESPONSE,
453 .fields = read_block_request_fields,
454 .field_count = array_length(read_block_request_fields)
455 },
456 {
457 .name = "read_quadlet_response",
458 .type = PACKET_RESPONSE,
459 .fields = read_quadlet_response_fields,
460 .field_count = array_length(read_quadlet_response_fields)
461 },
462 {
463 .name = "read_block_response",
464 .type = PACKET_RESPONSE,
465 .fields = block_response_fields,
466 .field_count = array_length(block_response_fields)
467 },
468 {
469 .name = "cycle_start",
470 .type = PACKET_OTHER,
471 .fields = write_quadlet_request_fields,
472 .field_count = array_length(write_quadlet_request_fields)
473 },
474 {
475 .name = "lock_request",
476 .type = PACKET_REQUEST,
477 .fields = block_request_fields,
478 .field_count = array_length(block_request_fields)
479 },
480 {
481 .name = "iso_data",
482 .type = PACKET_OTHER,
483 .fields = iso_data_fields,
484 .field_count = array_length(iso_data_fields)
485 },
486 {
487 .name = "lock_response",
488 .type = PACKET_RESPONSE,
489 .fields = block_response_fields,
490 .field_count = array_length(block_response_fields)
491 },
492};
493
494static int
495handle_request_packet(uint32_t *data, size_t length)
496{
497 struct link_packet *p = (struct link_packet *) data;
498 struct subaction *sa, *prev;
499 struct link_transaction *t;
500
501 t = link_transaction_lookup(p->common.source, p->common.destination,
502 p->common.tlabel);
503 sa = subaction_create(data, length);
504 t->request = sa;
505
506 if (!list_empty(&t->request_list)) {
507 prev = list_tail(&t->request_list,
508 struct subaction, link);
509
510 if (!ACK_BUSY(prev->ack)) {
511
512
513
514
515
516
517 }
518
519 if (prev->packet.common.tcode != sa->packet.common.tcode ||
520 prev->packet.common.tlabel != sa->packet.common.tlabel) {
521
522
523 }
524 }
525
526 list_append(&t->request_list, &sa->link);
527
528 switch (sa->ack) {
529 case ACK_COMPLETE:
530 if (p->common.tcode != TCODE_WRITE_QUADLET_REQUEST &&
531 p->common.tcode != TCODE_WRITE_BLOCK_REQUEST)
532 ;
533 list_remove(&t->link);
534 handle_transaction(t);
535 break;
536
537 case ACK_NO_ACK:
538 case ACK_DATA_ERROR:
539 case ACK_TYPE_ERROR:
540 list_remove(&t->link);
541 handle_transaction(t);
542 break;
543
544 case ACK_PENDING:
545
546 break;
547
548 case ACK_BUSY_X:
549 case ACK_BUSY_A:
550 case ACK_BUSY_B:
551
552
553 break;
554 }
555
556 return 1;
557}
558
559static int
560handle_response_packet(uint32_t *data, size_t length)
561{
562 struct link_packet *p = (struct link_packet *) data;
563 struct subaction *sa, *prev;
564 struct link_transaction *t;
565
566 t = link_transaction_lookup(p->common.destination, p->common.source,
567 p->common.tlabel);
568 if (list_empty(&t->request_list)) {
569
570 }
571
572 sa = subaction_create(data, length);
573 t->response = sa;
574
575 if (!list_empty(&t->response_list)) {
576 prev = list_tail(&t->response_list, struct subaction, link);
577
578 if (!ACK_BUSY(prev->ack)) {
579
580
581
582
583 }
584
585 if (prev->packet.common.tcode != sa->packet.common.tcode ||
586 prev->packet.common.tlabel != sa->packet.common.tlabel) {
587
588
589 }
590 } else {
591 prev = list_tail(&t->request_list, struct subaction, link);
592 if (prev->ack != ACK_PENDING) {
593
594
595
596
597 }
598
599 if (packet_info[prev->packet.common.tcode].response_tcode !=
600 sa->packet.common.tcode) {
601
602 }
603 }
604
605 list_append(&t->response_list, &sa->link);
606
607 switch (sa->ack) {
608 case ACK_COMPLETE:
609 case ACK_NO_ACK:
610 case ACK_DATA_ERROR:
611 case ACK_TYPE_ERROR:
612 list_remove(&t->link);
613 handle_transaction(t);
614
615 break;
616
617 case ACK_PENDING:
618
619 break;
620
621 case ACK_BUSY_X:
622 case ACK_BUSY_A:
623 case ACK_BUSY_B:
624
625 break;
626 }
627
628 return 1;
629}
630
631static int
632handle_packet(uint32_t *data, size_t length)
633{
634 if (length == 0) {
635 printf("bus reset\r\n");
636 clear_pending_transaction_list();
637 } else if (length > sizeof(struct phy_packet)) {
638 struct link_packet *p = (struct link_packet *) data;
639
640 switch (packet_info[p->common.tcode].type) {
641 case PACKET_REQUEST:
642 return handle_request_packet(data, length);
643
644 case PACKET_RESPONSE:
645 return handle_response_packet(data, length);
646
647 case PACKET_OTHER:
648 case PACKET_RESERVED:
649 return 0;
650 }
651 }
652
653 return 1;
654}
655
656static unsigned int
657get_bits(struct link_packet *packet, int offset, int width)
658{
659 uint32_t *data = (uint32_t *) packet;
660 uint32_t index, shift, mask;
661
662 index = offset / 32 + 1;
663 shift = 32 - (offset & 31) - width;
664 mask = width == 32 ? ~0 : (1 << width) - 1;
665
666 return (data[index] >> shift) & mask;
667}
668
669#if __BYTE_ORDER == __LITTLE_ENDIAN
670#define byte_index(i) ((i) ^ 3)
671#elif __BYTE_ORDER == __BIG_ENDIAN
672#define byte_index(i) (i)
673#else
674#error unsupported byte order.
675#endif
676
677static void
678dump_data(unsigned char *data, int length)
679{
680 int i, print_length;
681
682 if (length > 128)
683 print_length = 128;
684 else
685 print_length = length;
686
687 for (i = 0; i < print_length; i++)
688 printf("%s%02hhx",
689 (i % 4 == 0 && i != 0) ? " " : "",
690 data[byte_index(i)]);
691
692 if (print_length < length)
693 printf(" (%d more bytes)", length - print_length);
694}
695
696static void
697decode_link_packet(struct link_packet *packet, size_t length,
698 int include_flags, int exclude_flags)
699{
700 const struct packet_info *pi;
701 int data_length = 0;
702 int i;
703
704 pi = &packet_info[packet->common.tcode];
705
706 for (i = 0; i < pi->field_count; i++) {
707 const struct packet_field *f = &pi->fields[i];
708 int offset;
709
710 if (f->flags & exclude_flags)
711 continue;
712 if (include_flags && !(f->flags & include_flags))
713 continue;
714
715 if (f->offset < 0)
716 offset = length * 8 + f->offset - 32;
717 else
718 offset = f->offset;
719
720 if (f->value_names != NULL) {
721 uint32_t bits;
722
723 bits = get_bits(packet, offset, f->width);
724 printf("%s", f->value_names[bits]);
725 } else if (f->width == 0) {
726 printf("%s=[", f->name);
727 dump_data((unsigned char *) packet + (offset / 8 + 4), data_length);
728 printf("]");
729 } else {
730 unsigned long long bits;
731 int high_width, low_width;
732
733 if ((offset & ~31) != ((offset + f->width - 1) & ~31)) {
734
735 high_width = ((offset + 31) & ~31) - offset;
736 low_width = f->width - high_width;
737
738 bits = get_bits(packet, offset, high_width);
739 bits = (bits << low_width) |
740 get_bits(packet, offset + high_width, low_width);
741 } else {
742 bits = get_bits(packet, offset, f->width);
743 }
744
745 printf("%s=0x%0*llx", f->name, (f->width + 3) / 4, bits);
746
747 if (f->flags & PACKET_FIELD_DATA_LENGTH)
748 data_length = bits;
749 }
750
751 if (i < pi->field_count - 1)
752 printf(", ");
753 }
754}
755
756static void
757print_packet(uint32_t *data, size_t length)
758{
759 int i;
760
761 printf("%6u ", data[0]);
762
763 if (length == 4) {
764 printf("bus reset");
765 } else if (length < sizeof(struct phy_packet)) {
766 printf("short packet: ");
767 for (i = 1; i < length / 4; i++)
768 printf("%s%08x", i == 0 ? "[" : " ", data[i]);
769 printf("]");
770
771 } else if (length == sizeof(struct phy_packet) && data[1] == ~data[2]) {
772 struct phy_packet *pp = (struct phy_packet *) data;
773
774
775
776
777
778 switch (pp->common.identifier) {
779 case PHY_PACKET_CONFIGURATION:
780 if (!pp->phy_config.set_root && !pp->phy_config.set_gap_count) {
781 printf("ext phy config: phy_id=%02x", pp->phy_config.root_id);
782 } else {
783 printf("phy config:");
784 if (pp->phy_config.set_root)
785 printf(" set_root_id=%02x", pp->phy_config.root_id);
786 if (pp->phy_config.set_gap_count)
787 printf(" set_gap_count=%d", pp->phy_config.gap_count);
788 }
789 break;
790
791 case PHY_PACKET_LINK_ON:
792 printf("link-on packet, phy_id=%02x", pp->link_on.phy_id);
793 break;
794
795 case PHY_PACKET_SELF_ID:
796 if (pp->self_id.extended) {
797 printf("extended self id: phy_id=%02x, seq=%d",
798 pp->ext_self_id.phy_id, pp->ext_self_id.sequence);
799 } else {
800 static const char * const speed_names[] = {
801 "S100", "S200", "S400", "BETA"
802 };
803 printf("self id: phy_id=%02x, link %s, gap_count=%d, speed=%s%s%s",
804 pp->self_id.phy_id,
805 (pp->self_id.link_active ? "active" : "not active"),
806 pp->self_id.gap_count,
807 speed_names[pp->self_id.phy_speed],
808 (pp->self_id.contender ? ", irm contender" : ""),
809 (pp->self_id.initiated_reset ? ", initiator" : ""));
810 }
811 break;
812 default:
813 printf("unknown phy packet: ");
814 for (i = 1; i < length / 4; i++)
815 printf("%s%08x", i == 0 ? "[" : " ", data[i]);
816 printf("]");
817 break;
818 }
819 } else {
820 struct link_packet *packet = (struct link_packet *) data;
821
822 decode_link_packet(packet, length, 0,
823 option_verbose ? 0 : PACKET_FIELD_DETAIL);
824 }
825
826 if (option_hex) {
827 printf(" [");
828 dump_data((unsigned char *) data + 4, length - 4);
829 printf("]");
830 }
831
832 printf("\r\n");
833}
834
835#define HIDE_CURSOR "\033[?25l"
836#define SHOW_CURSOR "\033[?25h"
837#define CLEAR "\033[H\033[2J"
838
839static void
840print_stats(uint32_t *data, size_t length)
841{
842 static int bus_reset_count, short_packet_count, phy_packet_count;
843 static int tcode_count[16];
844 static struct timeval last_update;
845 struct timeval now;
846 int i;
847
848 if (length == 0)
849 bus_reset_count++;
850 else if (length < sizeof(struct phy_packet))
851 short_packet_count++;
852 else if (length == sizeof(struct phy_packet) && data[1] == ~data[2])
853 phy_packet_count++;
854 else {
855 struct link_packet *packet = (struct link_packet *) data;
856 tcode_count[packet->common.tcode]++;
857 }
858
859 gettimeofday(&now, NULL);
860 if (now.tv_sec <= last_update.tv_sec &&
861 now.tv_usec < last_update.tv_usec + 500000)
862 return;
863
864 last_update = now;
865 printf(CLEAR HIDE_CURSOR
866 " bus resets : %8d\n"
867 " short packets : %8d\n"
868 " phy packets : %8d\n",
869 bus_reset_count, short_packet_count, phy_packet_count);
870
871 for (i = 0; i < array_length(packet_info); i++)
872 if (packet_info[i].type != PACKET_RESERVED)
873 printf(" %-24s: %8d\n", packet_info[i].name, tcode_count[i]);
874 printf(SHOW_CURSOR "\n");
875}
876
877static struct termios saved_attributes;
878
879static void
880reset_input_mode(void)
881{
882 tcsetattr(STDIN_FILENO, TCSANOW, &saved_attributes);
883}
884
885static void
886set_input_mode(void)
887{
888 struct termios tattr;
889
890
891 if (!isatty(STDIN_FILENO)) {
892 fprintf(stderr, "Not a terminal.\n");
893 exit(EXIT_FAILURE);
894 }
895
896
897 tcgetattr(STDIN_FILENO, &saved_attributes);
898 atexit(reset_input_mode);
899
900
901 tcgetattr(STDIN_FILENO, &tattr);
902 tattr.c_lflag &= ~(ICANON|ECHO);
903 tattr.c_cc[VMIN] = 1;
904 tattr.c_cc[VTIME] = 0;
905 tcsetattr(STDIN_FILENO, TCSAFLUSH, &tattr);
906}
907
908int main(int argc, const char *argv[])
909{
910 uint32_t buf[128 * 1024];
911 uint32_t filter;
912 int length, retval, view;
913 int fd = -1;
914 FILE *output = NULL, *input = NULL;
915 poptContext con;
916 char c;
917 struct pollfd pollfds[2];
918
919 sys_sigint_handler = signal(SIGINT, sigint_handler);
920
921 con = poptGetContext(NULL, argc, argv, options, 0);
922 retval = poptGetNextOpt(con);
923 if (retval < -1) {
924 poptPrintUsage(con, stdout, 0);
925 return -1;
926 }
927
928 if (option_version) {
929 printf("dump tool for nosy sniffer, version %s\n", VERSION);
930 return 0;
931 }
932
933 if (__BYTE_ORDER != __LITTLE_ENDIAN)
934 fprintf(stderr, "warning: nosy has only been tested on little "
935 "endian machines\n");
936
937 if (option_input != NULL) {
938 input = fopen(option_input, "r");
939 if (input == NULL) {
940 fprintf(stderr, "Could not open %s, %m\n", option_input);
941 return -1;
942 }
943 } else {
944 fd = open(option_nosy_device, O_RDWR);
945 if (fd < 0) {
946 fprintf(stderr, "Could not open %s, %m\n", option_nosy_device);
947 return -1;
948 }
949 set_input_mode();
950 }
951
952 if (strcmp(option_view, "transaction") == 0)
953 view = VIEW_TRANSACTION;
954 else if (strcmp(option_view, "stats") == 0)
955 view = VIEW_STATS;
956 else
957 view = VIEW_PACKET;
958
959 if (option_output) {
960 output = fopen(option_output, "w");
961 if (output == NULL) {
962 fprintf(stderr, "Could not open %s, %m\n", option_output);
963 return -1;
964 }
965 }
966
967 setvbuf(stdout, NULL, _IOLBF, BUFSIZ);
968
969 filter = ~0;
970 if (!option_iso)
971 filter &= ~(1 << TCODE_STREAM_DATA);
972 if (!option_cycle_start)
973 filter &= ~(1 << TCODE_CYCLE_START);
974 if (view == VIEW_STATS)
975 filter = ~(1 << TCODE_CYCLE_START);
976
977 ioctl(fd, NOSY_IOC_FILTER, filter);
978
979 ioctl(fd, NOSY_IOC_START);
980
981 pollfds[0].fd = fd;
982 pollfds[0].events = POLLIN;
983 pollfds[1].fd = STDIN_FILENO;
984 pollfds[1].events = POLLIN;
985
986 while (run) {
987 if (input != NULL) {
988 if (fread(&length, sizeof length, 1, input) != 1)
989 return 0;
990 fread(buf, 1, length, input);
991 } else {
992 poll(pollfds, 2, -1);
993 if (pollfds[1].revents) {
994 read(STDIN_FILENO, &c, sizeof c);
995 switch (c) {
996 case 'q':
997 if (output != NULL)
998 fclose(output);
999 return 0;
1000 }
1001 }
1002
1003 if (pollfds[0].revents)
1004 length = read(fd, buf, sizeof buf);
1005 else
1006 continue;
1007 }
1008
1009 if (output != NULL) {
1010 fwrite(&length, sizeof length, 1, output);
1011 fwrite(buf, 1, length, output);
1012 }
1013
1014 switch (view) {
1015 case VIEW_TRANSACTION:
1016 handle_packet(buf, length);
1017 break;
1018 case VIEW_PACKET:
1019 print_packet(buf, length);
1020 break;
1021 case VIEW_STATS:
1022 print_stats(buf, length);
1023 break;
1024 }
1025 }
1026
1027 if (output != NULL)
1028 fclose(output);
1029
1030 close(fd);
1031
1032 poptFreeContext(con);
1033
1034 return 0;
1035}
1036
