Home | History | Annotate | Line # | Download | only in common
      1  1.10    andvar /*	$NetBSD: print.c,v 1.10 2021/08/21 23:00:32 andvar Exp $	*/
      2   1.2   thorpej 
      3   1.1       cjs /*
      4   1.1       cjs  * Copyright (c) 1993-96 Mats O Jansson.  All rights reserved.
      5   1.1       cjs  *
      6   1.1       cjs  * Redistribution and use in source and binary forms, with or without
      7   1.1       cjs  * modification, are permitted provided that the following conditions
      8   1.1       cjs  * are met:
      9   1.1       cjs  * 1. Redistributions of source code must retain the above copyright
     10   1.1       cjs  *    notice, this list of conditions and the following disclaimer.
     11   1.1       cjs  * 2. Redistributions in binary form must reproduce the above copyright
     12   1.1       cjs  *    notice, this list of conditions and the following disclaimer in the
     13   1.1       cjs  *    documentation and/or other materials provided with the distribution.
     14   1.1       cjs  *
     15   1.1       cjs  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     16   1.1       cjs  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     17   1.1       cjs  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     18   1.1       cjs  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     19   1.1       cjs  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     20   1.1       cjs  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     21   1.1       cjs  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     22   1.1       cjs  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     23   1.1       cjs  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
     24   1.1       cjs  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     25   1.1       cjs  */
     26   1.1       cjs 
     27   1.8  christos #include "port.h"
     28   1.3     lukem #ifndef lint
     29  1.10    andvar __RCSID("$NetBSD: print.c,v 1.10 2021/08/21 23:00:32 andvar Exp $");
     30   1.1       cjs #endif
     31   1.1       cjs 
     32   1.1       cjs #include <sys/types.h>
     33   1.1       cjs #include <stdio.h>
     34   1.1       cjs 
     35   1.1       cjs #include "os.h"
     36   1.3     lukem #include "cmp.h"
     37   1.3     lukem #include "get.h"
     38   1.3     lukem #include "mopdef.h"
     39   1.3     lukem #include "nma.h"
     40   1.3     lukem #include "nmadef.h"
     41   1.3     lukem #include "print.h"
     42   1.1       cjs 
     43   1.1       cjs #define SHORT_PRINT
     44   1.1       cjs 
     45   1.1       cjs void
     46   1.6  drochner mopPrintHWA(FILE *fd, const u_char *ap)
     47   1.1       cjs {
     48   1.1       cjs 	(void)fprintf(fd, "%x:%x:%x:%x:%x:%x",
     49   1.1       cjs 		      ap[0],ap[1],ap[2],ap[3],ap[4],ap[5]);
     50   1.1       cjs 	if (ap[0] < 10) (void)fprintf(fd, " ");
     51   1.1       cjs 	if (ap[1] < 10) (void)fprintf(fd, " ");
     52   1.1       cjs 	if (ap[2] < 10) (void)fprintf(fd, " ");
     53   1.1       cjs 	if (ap[3] < 10) (void)fprintf(fd, " ");
     54   1.1       cjs 	if (ap[4] < 10) (void)fprintf(fd, " ");
     55   1.1       cjs 	if (ap[5] < 10) (void)fprintf(fd, " ");
     56   1.1       cjs }
     57   1.1       cjs 
     58   1.1       cjs void
     59   1.6  drochner mopPrintBPTY(FILE *fd, u_char bpty)
     60   1.1       cjs {
     61   1.1       cjs 	switch(bpty) {
     62   1.1       cjs 	case MOP_K_BPTY_SYS:
     63   1.1       cjs 		(void)fprintf(fd, "System Processor");
     64   1.1       cjs 		break;
     65   1.1       cjs 	case MOP_K_BPTY_COM:
     66   1.1       cjs 		(void)fprintf(fd, "Communication Processor");
     67   1.1       cjs 		break;
     68   1.1       cjs 	default:
     69   1.1       cjs 		(void)fprintf(fd, "Unknown");
     70   1.1       cjs 		break;
     71   1.1       cjs 	};
     72   1.1       cjs };
     73   1.1       cjs 
     74   1.1       cjs void
     75   1.6  drochner mopPrintPGTY(FILE *fd, u_char pgty)
     76   1.1       cjs {
     77   1.1       cjs 	switch(pgty) {
     78   1.1       cjs 	case MOP_K_PGTY_SECLDR:
     79   1.1       cjs 		(void)fprintf(fd, "Secondary Loader");
     80   1.1       cjs 		break;
     81   1.1       cjs 	case MOP_K_PGTY_TERLDR:
     82   1.1       cjs 		(void)fprintf(fd, "Tertiary Loader");
     83   1.1       cjs 		break;
     84   1.1       cjs 	case MOP_K_PGTY_OPRSYS:
     85   1.1       cjs 		(void)fprintf(fd, "Operating System");
     86   1.1       cjs 		break;
     87   1.1       cjs 	case MOP_K_PGTY_MGNTFL:
     88   1.1       cjs 		(void)fprintf(fd, "Management File");
     89   1.1       cjs 		break;
     90   1.1       cjs 	default:
     91   1.1       cjs 		(void)fprintf(fd, "Unknown");
     92   1.1       cjs 		break;
     93   1.1       cjs 	};
     94   1.1       cjs }
     95   1.1       cjs 
     96   1.1       cjs void
     97   1.6  drochner mopPrintOneline(FILE *fd, const u_char *pkt, int trans)
     98   1.1       cjs {
     99   1.4     lukem 	int	 idx = 0;
    100   1.6  drochner 	const u_char	*dst, *src;
    101   1.6  drochner 	u_char   code;
    102   1.1       cjs 	u_short	 proto;
    103   1.1       cjs 	int	 len;
    104   1.1       cjs 
    105   1.1       cjs 	trans = mopGetTrans(pkt, trans);
    106   1.4     lukem 	mopGetHeader(pkt, &idx, &dst, &src, &proto, &len, trans);
    107   1.4     lukem 	code = mopGetChar(pkt, &idx);
    108   1.1       cjs 
    109   1.1       cjs 	switch (proto) {
    110   1.1       cjs 	case MOP_K_PROTO_DL:
    111   1.1       cjs 		(void)fprintf(fd, "MOP DL ");
    112   1.1       cjs 		break;
    113   1.1       cjs 	case MOP_K_PROTO_RC:
    114   1.1       cjs 		(void)fprintf(fd, "MOP RC ");
    115   1.1       cjs 		break;
    116   1.1       cjs 	case MOP_K_PROTO_LP:
    117   1.1       cjs 		(void)fprintf(fd, "MOP LP ");
    118   1.1       cjs 		break;
    119   1.1       cjs 	default:
    120   1.1       cjs 		switch((proto % 256)*256 + (proto / 256)) {
    121   1.1       cjs 		case MOP_K_PROTO_DL:
    122   1.1       cjs 			(void)fprintf(fd, "MOP DL ");
    123   1.1       cjs 			proto = MOP_K_PROTO_DL;
    124   1.1       cjs 			break;
    125   1.1       cjs 		case MOP_K_PROTO_RC:
    126   1.1       cjs 			(void)fprintf(fd, "MOP RC ");
    127   1.1       cjs 			proto = MOP_K_PROTO_RC;
    128   1.1       cjs 			break;
    129   1.1       cjs 		case MOP_K_PROTO_LP:
    130   1.1       cjs 			(void)fprintf(fd, "MOP LP ");
    131   1.1       cjs 			proto = MOP_K_PROTO_LP;
    132   1.1       cjs 			break;
    133   1.1       cjs 		default:
    134   1.1       cjs 			(void)fprintf(fd, "MOP ?? ");
    135   1.1       cjs 			break;
    136   1.1       cjs 		}
    137   1.1       cjs 	}
    138   1.1       cjs 
    139   1.1       cjs 	if (trans == TRANS_8023) {
    140   1.1       cjs 		(void)fprintf(fd, "802.3 ");
    141   1.1       cjs 	}
    142   1.1       cjs 
    143   1.1       cjs 	mopPrintHWA(fd, src); (void)fprintf(fd," > ");
    144   1.1       cjs 	mopPrintHWA(fd, dst);
    145   1.1       cjs 	if (len < 1600) {
    146   1.1       cjs         	(void)fprintf(fd, " len %4d code %02x ",len,code);
    147   1.1       cjs 	} else {
    148   1.1       cjs 		(void)fprintf(fd, " len %4d code %02x ",
    149   1.1       cjs 			      (len % 256)*256 + (len /256), code);
    150   1.1       cjs 	}
    151   1.1       cjs 
    152   1.1       cjs 	switch (proto) {
    153   1.1       cjs 	case MOP_K_PROTO_DL:
    154   1.1       cjs         	switch (code) {
    155   1.1       cjs 		case MOP_K_CODE_MLT:
    156   1.1       cjs 			(void)fprintf(fd, "MLT ");
    157   1.1       cjs 			break;
    158   1.1       cjs 		case MOP_K_CODE_DCM:
    159   1.1       cjs 			(void)fprintf(fd, "DCM ");
    160   1.1       cjs 			break;
    161   1.1       cjs 		case MOP_K_CODE_MLD:
    162   1.1       cjs 			(void)fprintf(fd, "MLD ");
    163   1.1       cjs 			break;
    164   1.1       cjs 		case MOP_K_CODE_ASV:
    165   1.1       cjs 			(void)fprintf(fd, "ASV ");
    166   1.1       cjs 			break;
    167   1.1       cjs 		case MOP_K_CODE_RMD:
    168   1.1       cjs 			(void)fprintf(fd, "RMD ");
    169   1.1       cjs 			break;
    170   1.1       cjs 		case MOP_K_CODE_RPR:
    171   1.1       cjs 			(void)fprintf(fd, "RPR ");
    172   1.1       cjs 			break;
    173   1.1       cjs 		case MOP_K_CODE_RML:
    174   1.1       cjs 			(void)fprintf(fd, "RML ");
    175   1.1       cjs 			break;
    176   1.1       cjs 	        case MOP_K_CODE_RDS:
    177   1.1       cjs 			(void)fprintf(fd, "RDS ");
    178   1.1       cjs 			break;
    179   1.1       cjs 		case MOP_K_CODE_MDD:
    180   1.1       cjs 			(void)fprintf(fd, "MDD ");
    181   1.1       cjs 			break;
    182   1.1       cjs 		case MOP_K_CODE_PLT:
    183   1.1       cjs 			(void)fprintf(fd, "PLT ");
    184   1.1       cjs 			break;
    185   1.1       cjs 	        default:
    186   1.1       cjs 			(void)fprintf(fd, "??? ");
    187   1.1       cjs 			break;
    188   1.1       cjs 		}
    189   1.1       cjs 		break;
    190   1.1       cjs 	case MOP_K_PROTO_RC:
    191   1.1       cjs 		switch (code) {
    192   1.1       cjs 		case MOP_K_CODE_RID:
    193   1.1       cjs 			(void)fprintf(fd, "RID ");
    194   1.1       cjs 			break;
    195   1.1       cjs 		case MOP_K_CODE_BOT:
    196   1.1       cjs 			(void)fprintf(fd, "BOT ");
    197   1.1       cjs 			break;
    198   1.1       cjs 		case MOP_K_CODE_SID:
    199   1.1       cjs 			(void)fprintf(fd, "SID ");
    200   1.1       cjs 			break;
    201   1.1       cjs 		case MOP_K_CODE_RQC:
    202   1.1       cjs 			(void)fprintf(fd, "RQC ");
    203   1.1       cjs 			break;
    204   1.1       cjs 		case MOP_K_CODE_CNT:
    205   1.1       cjs 			(void)fprintf(fd, "CNT ");
    206   1.1       cjs 			break;
    207   1.1       cjs 		case MOP_K_CODE_RVC:
    208   1.1       cjs 			(void)fprintf(fd, "RVC ");
    209   1.1       cjs 			break;
    210   1.1       cjs 		case MOP_K_CODE_RLC:
    211   1.1       cjs 			(void)fprintf(fd, "RLC ");
    212   1.1       cjs 			break;
    213   1.1       cjs 		case MOP_K_CODE_CCP:
    214   1.1       cjs 			(void)fprintf(fd, "CCP ");
    215   1.1       cjs 			break;
    216   1.1       cjs 		case MOP_K_CODE_CRA:
    217   1.1       cjs 			(void)fprintf(fd, "CRA ");
    218   1.1       cjs 			break;
    219   1.1       cjs 		default:
    220   1.1       cjs 			(void)fprintf(fd, "??? ");
    221   1.1       cjs 			break;
    222   1.1       cjs 		}
    223   1.1       cjs 		break;
    224   1.1       cjs 	case MOP_K_PROTO_LP:
    225   1.1       cjs 		switch (code) {
    226   1.1       cjs 		case MOP_K_CODE_ALD:
    227   1.1       cjs 			(void)fprintf(fd, "ALD ");
    228   1.1       cjs 			break;
    229   1.1       cjs 		case MOP_K_CODE_PLD:
    230   1.1       cjs 			(void)fprintf(fd, "PLD ");
    231   1.1       cjs 			break;
    232   1.1       cjs 		default:
    233   1.1       cjs 			(void)fprintf(fd, "??? ");
    234   1.1       cjs 			break;
    235   1.1       cjs 		}
    236   1.1       cjs 		break;
    237   1.1       cjs 	default:
    238   1.1       cjs 		(void)fprintf(fd, "??? ");
    239   1.1       cjs 		break;
    240   1.1       cjs 	}
    241   1.1       cjs 	(void)fprintf(fd, "\n");
    242   1.1       cjs }
    243   1.1       cjs 
    244   1.1       cjs void
    245   1.6  drochner mopPrintHeader(FILE *fd, const u_char *pkt, int trans)
    246   1.1       cjs {
    247   1.6  drochner 	const u_char	*dst, *src;
    248   1.1       cjs 	u_short	 proto;
    249   1.4     lukem 	int	 len, idx = 0;
    250   1.1       cjs 
    251   1.1       cjs 	trans = mopGetTrans(pkt, trans);
    252   1.4     lukem 	mopGetHeader(pkt, &idx, &dst, &src, &proto, &len, trans);
    253   1.1       cjs 
    254   1.1       cjs 	(void)fprintf(fd,"\nDst          : ");
    255   1.1       cjs 	mopPrintHWA(fd, dst);
    256   1.1       cjs 	if (mopCmpEAddr(dl_mcst,dst) == 0) {
    257   1.1       cjs 		(void)fprintf(fd," MOP Dump/Load Multicast");
    258   1.1       cjs 	};
    259   1.1       cjs 	if (mopCmpEAddr(rc_mcst,dst) == 0) {
    260   1.1       cjs 		(void)fprintf(fd," MOP Remote Console Multicast");
    261   1.1       cjs 	};
    262   1.1       cjs 	(void)fprintf(fd,"\n");
    263   1.1       cjs 
    264   1.1       cjs 	(void)fprintf(fd,"Src          : ");
    265   1.1       cjs 	mopPrintHWA(fd, src);
    266   1.1       cjs 	(void)fprintf(fd,"\n");
    267   1.1       cjs 	(void)fprintf(fd,"Proto        : %04x ",proto);
    268   1.1       cjs 	switch (proto) {
    269   1.1       cjs 	case MOP_K_PROTO_DL:
    270   1.1       cjs 		switch (trans) {
    271   1.1       cjs 		case TRANS_8023:
    272   1.1       cjs 			(void)fprintf(fd, "MOP Dump/Load (802.3)\n");
    273   1.1       cjs 			break;
    274   1.1       cjs 		default:
    275   1.1       cjs 			(void)fprintf(fd, "MOP Dump/Load\n");
    276   1.1       cjs 		}
    277   1.1       cjs 		break;
    278   1.1       cjs 	case MOP_K_PROTO_RC:
    279   1.1       cjs 		switch (trans) {
    280   1.1       cjs 		case TRANS_8023:
    281   1.1       cjs 			(void)fprintf(fd, "MOP Remote Console (802.3)\n");
    282   1.1       cjs 			break;
    283   1.1       cjs 		default:
    284   1.1       cjs 			(void)fprintf(fd, "MOP Remote Console\n");
    285   1.1       cjs 		}
    286   1.1       cjs 		break;
    287   1.1       cjs 	case MOP_K_PROTO_LP:
    288   1.1       cjs 		switch (trans) {
    289   1.1       cjs 		case TRANS_8023:
    290   1.1       cjs 			(void)fprintf(fd, "MOP Loopback (802.3)\n");
    291   1.1       cjs 			break;
    292   1.1       cjs 		default:
    293   1.1       cjs 			(void)fprintf(fd, "MOP Loopback\n");
    294   1.1       cjs 		}
    295   1.1       cjs 		break;
    296   1.1       cjs 	default:
    297   1.1       cjs 		(void)fprintf(fd, "\n");
    298   1.1       cjs 		break;
    299   1.1       cjs 	}
    300   1.1       cjs 
    301   1.1       cjs 
    302   1.1       cjs         (void)fprintf(fd,"Length       : %04x (%d)\n",len,len);
    303   1.1       cjs }
    304   1.1       cjs 
    305   1.1       cjs void
    306   1.6  drochner mopPrintMopHeader(FILE *fd, const u_char *pkt, int trans)
    307   1.1       cjs {
    308   1.6  drochner 	const u_char	*dst, *src;
    309   1.1       cjs 	u_short	 proto;
    310   1.4     lukem 	int	 len, idx = 0;
    311   1.1       cjs 	u_char   code;
    312   1.1       cjs 
    313   1.1       cjs 	trans = mopGetTrans(pkt, trans);
    314   1.4     lukem 	mopGetHeader(pkt, &idx, &dst, &src, &proto, &len, trans);
    315   1.1       cjs 
    316   1.4     lukem 	code = mopGetChar(pkt, &idx);
    317   1.1       cjs 
    318   1.1       cjs 	(void)fprintf(fd, "Code         :   %02x ",code);
    319   1.1       cjs 
    320   1.1       cjs 	switch (proto) {
    321   1.1       cjs 	case MOP_K_PROTO_DL:
    322   1.1       cjs 		switch (code) {
    323   1.1       cjs 		case MOP_K_CODE_MLT:
    324   1.1       cjs 			(void)fprintf(fd,
    325   1.1       cjs 				      "Memory Load with transfer address\n");
    326   1.1       cjs 			break;
    327   1.1       cjs 		case MOP_K_CODE_DCM:
    328   1.1       cjs 			(void)fprintf(fd, "Dump Complete\n");
    329   1.1       cjs 			break;
    330   1.1       cjs 		case MOP_K_CODE_MLD:
    331   1.1       cjs 			(void)fprintf(fd, "Memory Load\n");
    332   1.1       cjs 			break;
    333   1.1       cjs 		case MOP_K_CODE_ASV:
    334   1.1       cjs 			(void)fprintf(fd, "Assistance volunteer\n");
    335   1.1       cjs 			break;
    336   1.1       cjs 		case MOP_K_CODE_RMD:
    337   1.1       cjs 			(void)fprintf(fd, "Request memory dump\n");
    338   1.1       cjs 			break;
    339   1.1       cjs 		case MOP_K_CODE_RPR:
    340   1.1       cjs 			(void)fprintf(fd, "Request program\n");
    341   1.1       cjs 			break;
    342   1.1       cjs 		case MOP_K_CODE_RML:
    343   1.1       cjs 			(void)fprintf(fd, "Request memory load\n");
    344   1.1       cjs 			break;
    345   1.1       cjs 		case MOP_K_CODE_RDS:
    346   1.1       cjs 			(void)fprintf(fd, "Request Dump Service\n");
    347   1.1       cjs 			break;
    348   1.1       cjs 		case MOP_K_CODE_MDD:
    349   1.1       cjs 			(void)fprintf(fd, "Memory dump data\n");
    350   1.1       cjs 			break;
    351   1.1       cjs 		case MOP_K_CODE_PLT:
    352   1.1       cjs 			(void)fprintf(fd,
    353   1.9    andvar 				      "Parameter load with transfer address\n");
    354   1.1       cjs 			break;
    355   1.1       cjs 		default:
    356   1.1       cjs 			(void)fprintf(fd, "(unknown)\n");
    357   1.1       cjs 			break;
    358   1.1       cjs 		}
    359   1.1       cjs 		break;
    360   1.1       cjs 	case MOP_K_PROTO_RC:
    361   1.1       cjs 		switch (code) {
    362   1.1       cjs 		case MOP_K_CODE_RID:
    363   1.1       cjs 			(void)fprintf(fd, "Request ID\n");
    364   1.1       cjs 			break;
    365   1.1       cjs 		case MOP_K_CODE_BOT:
    366   1.1       cjs 			(void)fprintf(fd, "Boot\n");
    367   1.1       cjs 			break;
    368   1.1       cjs 		case MOP_K_CODE_SID:
    369   1.1       cjs 			(void)fprintf(fd, "System ID\n");
    370   1.1       cjs 			break;
    371   1.1       cjs 		case MOP_K_CODE_RQC:
    372   1.1       cjs 			(void)fprintf(fd, "Request Counters\n");
    373   1.1       cjs 			break;
    374   1.1       cjs 		case MOP_K_CODE_CNT:
    375   1.1       cjs 			(void)fprintf(fd, "Counters\n");
    376   1.1       cjs 			break;
    377   1.1       cjs 		case MOP_K_CODE_RVC:
    378   1.1       cjs 			(void)fprintf(fd, "Reserve Console\n");
    379   1.1       cjs 			break;
    380   1.1       cjs 		case MOP_K_CODE_RLC:
    381   1.1       cjs 			(void)fprintf(fd, "Release Console\n");
    382   1.1       cjs 			break;
    383   1.1       cjs 		case MOP_K_CODE_CCP:
    384   1.1       cjs 			(void)fprintf(fd, "Console Command and Poll\n");
    385   1.1       cjs 			break;
    386   1.1       cjs 		case MOP_K_CODE_CRA:
    387   1.1       cjs 			(void)fprintf(fd,
    388   1.1       cjs 				      "Console Response and Acknnowledge\n");
    389   1.1       cjs 			break;
    390   1.1       cjs 		default:
    391   1.1       cjs 			(void)fprintf(fd, "(unknown)\n");
    392   1.1       cjs 			break;
    393   1.1       cjs 		}
    394   1.1       cjs 		break;
    395   1.1       cjs 	case MOP_K_PROTO_LP:
    396   1.1       cjs 		switch (code) {
    397   1.1       cjs 		case MOP_K_CODE_ALD:
    398   1.1       cjs 			(void)fprintf(fd, "Active loop data\n");
    399   1.1       cjs 			break;
    400   1.1       cjs 		case MOP_K_CODE_PLD:
    401   1.1       cjs 			(void)fprintf(fd, "Passive looped data\n");
    402   1.1       cjs 			break;
    403   1.1       cjs 		default:
    404   1.1       cjs 			(void)fprintf(fd, "(unknown)\n");
    405   1.1       cjs 			break;
    406   1.1       cjs 		}
    407   1.1       cjs 		break;
    408   1.1       cjs 	default:
    409   1.1       cjs 		(void)fprintf(fd, "(unknown)\n");
    410   1.1       cjs 		break;
    411   1.1       cjs 	}
    412   1.1       cjs }
    413   1.1       cjs 
    414   1.1       cjs void
    415   1.6  drochner mopPrintDevice(FILE *fd, u_char device)
    416   1.1       cjs {
    417   1.4     lukem 	const char	*sname, *name;
    418   1.1       cjs 
    419   1.1       cjs 	sname = nmaGetShort((int) device);
    420   1.1       cjs 	name  = nmaGetDevice((int) device);
    421   1.1       cjs 
    422   1.1       cjs         (void)fprintf(fd, "%s '%s'",sname,name);
    423   1.1       cjs }
    424   1.1       cjs 
    425   1.1       cjs void
    426   1.6  drochner mopPrintTime(FILE *fd, const u_char *ap)
    427   1.1       cjs {
    428   1.1       cjs 	(void)fprintf(fd,
    429   1.1       cjs 		      "%04d-%02d-%02d %02d:%02d:%02d.%02d %d:%02d",
    430   1.1       cjs 		      ap[0]*100 + ap[1],
    431   1.1       cjs 		      ap[2],ap[3],ap[4],ap[5],ap[6],ap[7],ap[8],ap[9]);
    432   1.1       cjs }
    433   1.1       cjs 
    434   1.1       cjs void
    435   1.6  drochner mopPrintInfo(FILE *fd, const u_char *pkt, int *idx,
    436   1.6  drochner 	     u_short moplen, u_char mopcode, int trans)
    437   1.1       cjs {
    438   1.1       cjs         u_short itype,tmps;
    439   1.1       cjs 	u_char  ilen ,tmpc,device;
    440   1.6  drochner 	u_char  uc1,uc2,uc3;
    441   1.6  drochner 	const u_char *ucp;
    442   1.1       cjs 	int     i;
    443   1.1       cjs 
    444   1.1       cjs 	device = 0;
    445   1.1       cjs 
    446   1.1       cjs 	switch(trans) {
    447   1.1       cjs 	case TRANS_ETHER:
    448   1.1       cjs 		moplen = moplen + 16;
    449   1.1       cjs 		break;
    450   1.1       cjs 	case TRANS_8023:
    451   1.1       cjs 		moplen = moplen + 14;
    452   1.1       cjs 		break;
    453   1.1       cjs 	}
    454   1.1       cjs 
    455   1.4     lukem 	itype = mopGetShort(pkt,idx);
    456   1.1       cjs 
    457   1.4     lukem 	while (*idx < (int)(moplen + 2)) {
    458   1.4     lukem 		ilen  = mopGetChar(pkt,idx);
    459   1.1       cjs 		switch (itype) {
    460   1.1       cjs 		case 0:
    461   1.4     lukem 			tmpc  = mopGetChar(pkt,idx);
    462   1.4     lukem 			*idx = *idx + tmpc;
    463   1.1       cjs 			break;
    464   1.1       cjs 		case MOP_K_INFO_VER:
    465   1.4     lukem 			uc1 = mopGetChar(pkt,idx);
    466   1.4     lukem 			uc2 = mopGetChar(pkt,idx);
    467   1.4     lukem 			uc3 = mopGetChar(pkt,idx);
    468   1.1       cjs 			(void)fprintf(fd,"Maint Version: %d.%d.%d\n",
    469   1.1       cjs 				      uc1,uc2,uc3);
    470   1.1       cjs 			break;
    471   1.1       cjs 		case MOP_K_INFO_MFCT:
    472   1.4     lukem 			tmps = mopGetShort(pkt,idx);
    473  1.10    andvar 			(void)fprintf(fd,"Maint Function: %04x ( ",tmps);
    474   1.1       cjs 			if (tmps &   1) (void)fprintf(fd, "Loop ");
    475   1.1       cjs 			if (tmps &   2) (void)fprintf(fd, "Dump ");
    476   1.1       cjs 			if (tmps &   4) (void)fprintf(fd, "Pldr ");
    477   1.1       cjs 			if (tmps &   8) (void)fprintf(fd, "MLdr ");
    478   1.1       cjs 			if (tmps &  16) (void)fprintf(fd, "Boot ");
    479   1.1       cjs 			if (tmps &  32) (void)fprintf(fd, "CC ");
    480   1.1       cjs 			if (tmps &  64) (void)fprintf(fd, "DLC ");
    481   1.1       cjs 			if (tmps & 128) (void)fprintf(fd, "CCR ");
    482   1.1       cjs 			(void)fprintf(fd, ")\n");
    483   1.1       cjs 			break;
    484   1.1       cjs 		case MOP_K_INFO_CNU:
    485   1.4     lukem 			ucp = pkt + *idx; *idx = *idx + 6;
    486   1.1       cjs 			(void)fprintf(fd,"Console User : ");
    487   1.1       cjs 			mopPrintHWA(fd, ucp);
    488   1.1       cjs 			(void)fprintf(fd, "\n");
    489   1.1       cjs 			break;
    490   1.1       cjs 		case MOP_K_INFO_RTM:
    491   1.4     lukem 			tmps = mopGetShort(pkt,idx);
    492   1.1       cjs 			(void)fprintf(fd,"Reserv Timer : %04x (%d)\n",
    493   1.1       cjs 				      tmps,tmps);
    494   1.1       cjs 			break;
    495   1.1       cjs 		case MOP_K_INFO_CSZ:
    496   1.4     lukem 			tmps = mopGetShort(pkt,idx);
    497   1.1       cjs 			(void)fprintf(fd,"Cons Cmd Size: %04x (%d)\n",
    498   1.1       cjs 				      tmps,tmps);
    499   1.1       cjs 			break;
    500   1.1       cjs 		case MOP_K_INFO_RSZ:
    501   1.4     lukem 			tmps = mopGetShort(pkt,idx);
    502   1.1       cjs 			(void)fprintf(fd,"Cons Res Size: %04x (%d)\n",
    503   1.1       cjs 				      tmps,tmps);
    504   1.1       cjs 			break;
    505   1.1       cjs 		case MOP_K_INFO_HWA:
    506   1.4     lukem 			ucp = pkt + *idx; *idx = *idx + 6;
    507   1.1       cjs 			(void)fprintf(fd,"Hardware Addr: ");
    508   1.1       cjs 			mopPrintHWA(fd, ucp);
    509   1.1       cjs 			(void)fprintf(fd, "\n");
    510   1.1       cjs 			break;
    511   1.1       cjs 		case MOP_K_INFO_TIME:
    512   1.4     lukem 			ucp = pkt + *idx; *idx = *idx + 10;
    513   1.1       cjs 			(void)fprintf(fd,"System Time: ");
    514   1.1       cjs 			mopPrintTime(fd, ucp);
    515   1.1       cjs 			(void)fprintf(fd,"\n");
    516   1.1       cjs 			break;
    517   1.1       cjs 		case MOP_K_INFO_SOFD:
    518   1.4     lukem 			device = mopGetChar(pkt,idx);
    519   1.1       cjs 			(void)fprintf(fd,"Comm Device  :   %02x ",device);
    520   1.1       cjs 			mopPrintDevice(fd, device);
    521   1.1       cjs 			(void)fprintf(fd, "\n");
    522   1.1       cjs 			break;
    523   1.1       cjs 		case MOP_K_INFO_SFID:
    524   1.4     lukem 			tmpc = mopGetChar(pkt,idx);
    525   1.1       cjs 			(void)fprintf(fd,"Software ID  :   %02x ",tmpc);
    526   1.7     joerg 			if (tmpc == 0) {
    527   1.1       cjs 				(void)fprintf(fd,"No software id");
    528   1.1       cjs 			}
    529   1.7     joerg 			if (tmpc == 254) {
    530   1.1       cjs 				(void)fprintf(fd,"Maintenance system");
    531   1.1       cjs 				tmpc = 0;
    532   1.1       cjs 			}
    533   1.7     joerg 			if (tmpc == 255) {
    534   1.1       cjs 				(void)fprintf(fd,"Standard operating system");
    535   1.1       cjs 				tmpc = 0;
    536   1.1       cjs 			}
    537   1.7     joerg 			if (tmpc > 0) {
    538   1.1       cjs 				(void)fprintf(fd,"'");
    539   1.1       cjs 				for (i = 0; i < ((int) tmpc); i++) {
    540   1.1       cjs 					(void)fprintf(fd,"%c",
    541   1.4     lukem 						     mopGetChar(pkt,idx));
    542   1.1       cjs 				}
    543   1.1       cjs 				(void)fprintf(fd,"'");
    544   1.1       cjs 			}
    545   1.1       cjs 			(void)fprintf(fd,"\n");
    546   1.1       cjs 			break;
    547   1.1       cjs 		case MOP_K_INFO_PRTY:
    548   1.4     lukem 			tmpc = mopGetChar(pkt,idx);
    549   1.1       cjs 			(void)fprintf(fd,"System Proc  :   %02x ",tmpc);
    550   1.1       cjs 			switch (tmpc) {
    551   1.1       cjs 			case MOP_K_PRTY_11:
    552   1.1       cjs 				(void)fprintf(fd, "PDP-11\n");
    553   1.1       cjs 				break;
    554   1.1       cjs 			case MOP_K_PRTY_CMSV:
    555   1.1       cjs 				(void)fprintf(fd,
    556   1.1       cjs 					      "Communication Server\n");
    557   1.1       cjs 				break;
    558   1.1       cjs 			case MOP_K_PRTY_PRO:
    559   1.1       cjs 				(void)fprintf(fd, "Professional\n");
    560   1.1       cjs 				break;
    561   1.1       cjs 			case MOP_K_PRTY_SCO:
    562   1.1       cjs 				(void)fprintf(fd, "Scorpio\n");
    563   1.1       cjs 				break;
    564   1.1       cjs 			case MOP_K_PRTY_AMB:
    565   1.1       cjs 				(void)fprintf(fd, "Amber\n");
    566   1.1       cjs 				break;
    567   1.1       cjs 			case MOP_K_PRTY_BRI:
    568   1.1       cjs 				(void)fprintf(fd, "XLII Bridge\n");
    569   1.1       cjs 				break;
    570   1.1       cjs 			default:
    571   1.1       cjs 				(void)fprintf(fd, "Unknown\n");
    572   1.1       cjs 				break;
    573   1.1       cjs 			};
    574   1.1       cjs 			break;
    575   1.1       cjs 		case MOP_K_INFO_DLTY:
    576   1.4     lukem 			tmpc = mopGetChar(pkt,idx);
    577   1.1       cjs 			(void)fprintf(fd,"Data Link Typ:   %02x ",tmpc);
    578   1.1       cjs 			switch (tmpc) {
    579   1.1       cjs 			case MOP_K_DLTY_NI:
    580   1.1       cjs 				(void)fprintf(fd, "Ethernet\n");
    581   1.1       cjs 				break;
    582   1.1       cjs 			case MOP_K_DLTY_DDCMP:
    583   1.1       cjs 				(void)fprintf(fd, "DDCMP\n");
    584   1.1       cjs 				break;
    585   1.1       cjs 			case MOP_K_DLTY_LAPB:
    586   1.1       cjs 				(void)fprintf(fd, "LAPB (X.25)\n");
    587   1.1       cjs 				break;
    588   1.1       cjs 			default:
    589   1.1       cjs 				(void)fprintf(fd, "Unknown\n");
    590   1.1       cjs 				break;
    591   1.1       cjs 			};
    592   1.1       cjs 			break;
    593   1.1       cjs 		case MOP_K_INFO_DLBSZ:
    594   1.4     lukem 			tmps = mopGetShort(pkt,idx);
    595   1.1       cjs 			(void)fprintf(fd,"DL Buff Size : %04x (%d)\n",
    596   1.1       cjs 				      tmps,tmps);
    597   1.1       cjs 			break;
    598   1.1       cjs 		default:
    599   1.1       cjs 			if (((device = NMA_C_SOFD_LCS) ||   /* DECserver 100 */
    600   1.1       cjs 			     (device = NMA_C_SOFD_DS2) ||   /* DECserver 200 */
    601   1.1       cjs 			     (device = NMA_C_SOFD_DP2) ||   /* DECserver 250 */
    602   1.1       cjs 			     (device = NMA_C_SOFD_DS3)) &&  /* DECserver 300 */
    603   1.1       cjs 			    ((itype > 101) && (itype < 107)))
    604   1.1       cjs 			{
    605   1.1       cjs 		        	switch (itype) {
    606   1.1       cjs 				case 102:
    607   1.4     lukem 					ucp = pkt + *idx;
    608   1.4     lukem 					*idx = *idx + ilen;
    609   1.1       cjs 					(void)fprintf(fd,
    610   1.1       cjs 						     "ROM Sftwr Ver:   %02x '",
    611   1.1       cjs 						      ilen);
    612   1.1       cjs 					for (i = 0; i < ilen; i++) {
    613   1.1       cjs 						(void)fprintf(fd,"%c",ucp[i]);
    614   1.1       cjs 					}
    615   1.1       cjs 					(void)fprintf(fd, "'\n");
    616   1.1       cjs 					break;
    617   1.1       cjs 				case 103:
    618   1.4     lukem 					ucp = pkt + *idx;
    619   1.4     lukem 					*idx = *idx + ilen;
    620   1.1       cjs 					(void)fprintf(fd,
    621   1.1       cjs 						     "Software Ver :   %02x '",
    622   1.1       cjs 						      ilen);
    623   1.1       cjs 					for (i = 0; i < ilen; i++) {
    624   1.1       cjs 						(void)fprintf(fd, "%c",ucp[i]);
    625   1.1       cjs 					}
    626   1.1       cjs 					(void)fprintf(fd, "'\n");
    627   1.1       cjs 					break;
    628   1.1       cjs 				case 104:
    629   1.4     lukem 					tmps = mopGetShort(pkt,idx);
    630   1.1       cjs 					(void)fprintf(fd,
    631   1.1       cjs 						"DECnet Addr  : %d.%d (%d)\n",
    632   1.1       cjs 						      tmps / 1024,
    633   1.1       cjs 						      tmps % 1024,
    634   1.1       cjs 						      tmps);
    635   1.1       cjs 					break;
    636   1.1       cjs 				case 105:
    637   1.4     lukem 					ucp = pkt + *idx;
    638   1.4     lukem 					*idx = *idx + ilen;
    639   1.1       cjs 					(void)fprintf(fd,
    640   1.1       cjs 						     "Node Name    :   %02x '",
    641   1.1       cjs 						      ilen);
    642   1.1       cjs 					for (i = 0; i < ilen; i++) {
    643   1.1       cjs 						(void)fprintf(fd, "%c",ucp[i]);
    644   1.1       cjs 					}
    645   1.1       cjs 					(void)fprintf(fd, "'\n");
    646   1.1       cjs 					break;
    647   1.1       cjs 				case 106:
    648   1.4     lukem 					ucp = pkt + *idx;
    649   1.4     lukem 					*idx = *idx + ilen;
    650   1.1       cjs 					(void)fprintf(fd,
    651   1.1       cjs 						     "Node Ident   :   %02x '",
    652   1.1       cjs 						      ilen);
    653   1.1       cjs 					for (i = 0; i < ilen; i++) {
    654   1.1       cjs 						(void)fprintf(fd, "%c",ucp[i]);
    655   1.1       cjs 					}
    656   1.1       cjs 					(void)fprintf(fd, "'\n");
    657   1.1       cjs 					break;
    658   1.1       cjs 				};
    659   1.1       cjs 			} else {
    660   1.4     lukem 				ucp = pkt + *idx; *idx = *idx + ilen;
    661   1.1       cjs 				(void)fprintf(fd, "Info Type    : %04x (%d)\n",
    662   1.1       cjs 					      itype,
    663   1.1       cjs 					      itype);
    664   1.1       cjs 				(void)fprintf(fd, "Info Data    :   %02x ",
    665   1.1       cjs 					      ilen);
    666   1.1       cjs 				for (i = 0; i < ilen; i++) {
    667   1.1       cjs 					if ((i % 16) == 0) {
    668   1.1       cjs 						if ((i / 16) == 0) {
    669   1.1       cjs 						} else {
    670   1.1       cjs 							(void)fprintf(fd,
    671   1.1       cjs 						     "\n                    ");
    672   1.1       cjs 						};
    673   1.1       cjs 					};
    674   1.1       cjs 					(void)fprintf(fd, "%02x ",ucp[i]);
    675   1.1       cjs 				}
    676   1.1       cjs 				(void)fprintf(fd, "\n");
    677   1.1       cjs 			};
    678   1.1       cjs 		}
    679   1.4     lukem 		itype = mopGetShort(pkt,idx);
    680   1.1       cjs         }
    681   1.1       cjs }
    682   1.1       cjs 
    683