1/* $OpenBSD: rc.c,v 1.9 2017/07/29 07:18:03 florian Exp $ */ 2 3/* 4 * Copyright (c) 1993-95 Mats O Jansson. All rights reserved. 5 * 6 * Redistribution and use in source and binary forms, with or without 7 * modification, are permitted provided that the following conditions 8 * are met: 9 * 1. Redistributions of source code must retain the above copyright 10 * notice, this list of conditions and the following disclaimer. 11 * 2. Redistributions in binary form must reproduce the above copyright 12 * notice, this list of conditions and the following disclaimer in the 13 * documentation and/or other materials provided with the distribution. 14 * 15 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 16 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 17 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 18 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 19 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 20 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 21 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 22 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 23 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 24 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 25 */ 26 27#include "os.h" 28#include "common/get.h" 29#include "common/print.h" 30#include "common/mopdef.h" 31 32void 33mopDumpRC(FILE *fd, u_char *pkt, int trans) 34{ 35 int i, idx = 0; 36 long tmpl; 37 u_char tmpc, code, control; 38 u_short len, tmps, moplen; 39 40 len = mopGetLength(pkt, trans); 41 42 switch (trans) { 43 case TRANS_8023: 44 idx = 22; 45 moplen = len - 8; 46 break; 47 default: 48 idx = 16; 49 moplen = len; 50 } 51 code = mopGetChar(pkt, &idx); 52 53 switch (code) { 54 case MOP_K_CODE_RID: 55 56 tmpc = mopGetChar(pkt, &idx); 57 fprintf(fd, "Reserved : %02x\n", tmpc); 58 59 tmps = mopGetShort(pkt, &idx); 60 fprintf(fd, "Receipt Nbr : %04x\n", tmps); 61 62 break; 63 case MOP_K_CODE_BOT: 64 65 if (moplen == 5) { 66 tmps = mopGetShort(pkt, &idx); 67 fprintf(fd, "Verification : %04x\n", tmps); 68 } else { 69 70 tmpl = mopGetLong(pkt, &idx); 71 fprintf(fd, "Verification : %08lx\n", tmpl); 72 73 tmpc = mopGetChar(pkt, &idx); /* Processor */ 74 fprintf(fd, "Processor : %02x ", tmpc); 75 mopPrintBPTY(fd, tmpc); fprintf(fd, "\n"); 76 77 control = mopGetChar(pkt, &idx); /* Control */ 78 fprintf(fd, "Control : %02x ", control); 79 if ((control & (1<<MOP_K_BOT_CNTL_SERVER))) 80 fprintf(fd, "Bootserver Requesting system "); 81 else 82 fprintf(fd, "Bootserver System default "); 83 if ((control & (1<<MOP_K_BOT_CNTL_DEVICE))) 84 fprintf(fd, "Bootdevice Specified device"); 85 else 86 fprintf(fd, "Bootdevice System default"); 87 fprintf(fd, "\n"); 88 89 if ((control & (1<<MOP_K_BOT_CNTL_DEVICE))) { 90 tmpc = mopGetChar(pkt, &idx);/* Device ID */ 91 fprintf(fd, "Device ID : %02x '", tmpc); 92 for (i = 0; i < ((int) tmpc); i++) 93 fprintf(fd, "%c", 94 mopGetChar(pkt, &idx)); 95 fprintf(fd, "'\n"); 96 } 97 98 tmpc = mopGetChar(pkt, &idx); /* Software ID */ 99 fprintf(fd, "Software ID : %02x ", tmpc); 100 if (tmpc == 0) 101 fprintf(fd, "No software id"); 102 if (tmpc == 254) { 103 fprintf(fd, "Maintenance system"); 104 tmpc = 0; 105 } 106 if (tmpc == 255) { 107 fprintf(fd, "Standard operating system"); 108 tmpc = 0; 109 } 110 if (tmpc > 0) { 111 fprintf(fd, "'"); 112 for (i = 0; i < ((int) tmpc); i++) 113 fprintf(fd, "%c", 114 mopGetChar(pkt, &idx)); 115 fprintf(fd, "'"); 116 } 117 fprintf(fd, "'\n"); 118 119 } 120 break; 121 case MOP_K_CODE_SID: 122 123 tmpc = mopGetChar(pkt, &idx); /* Reserved */ 124 fprintf(fd, "Reserved : %02x\n", tmpc); 125 126 tmps = mopGetShort(pkt, &idx); /* Receipt # */ 127 fprintf(fd, "Receipt Nbr : %04x\n", tmpc); 128 129 mopPrintInfo(fd, pkt, &idx, moplen, code, trans); 130 131 break; 132 case MOP_K_CODE_RQC: 133 134 tmps = mopGetShort(pkt, &idx); 135 fprintf(fd, "Receipt Nbr : %04x\n", tmps); 136 137 break; 138 case MOP_K_CODE_CNT: 139 140 tmps = mopGetShort(pkt, &idx); 141 fprintf(fd, "Receipt Nbr : %04x %d\n", tmps, tmps); 142 143 tmps = mopGetShort(pkt, &idx); 144 fprintf(fd, "Last Zeroed : %04x %d\n", tmps, tmps); 145 146 tmpl = mopGetLong(pkt, &idx); 147 fprintf(fd, "Bytes rec : %08lx %ld\n", tmpl, tmpl); 148 149 tmpl = mopGetLong(pkt, &idx); 150 fprintf(fd, "Bytes snd : %08lx %ld\n", tmpl, tmpl); 151 152 tmpl = mopGetLong(pkt, &idx); 153 fprintf(fd, "Frames rec : %08lx %ld\n", tmpl, tmpl); 154 155 tmpl = mopGetLong(pkt, &idx); 156 fprintf(fd, "Frames snd : %08lx %ld\n", tmpl, tmpl); 157 158 tmpl = mopGetLong(pkt, &idx); 159 fprintf(fd, "Mcst Bytes re: %08lx %ld\n", tmpl, tmpl); 160 161 tmpl = mopGetLong(pkt, &idx); 162 fprintf(fd, "Mcst Frame re: %08lx %ld\n", tmpl, tmpl); 163 164 tmpl = mopGetLong(pkt, &idx); 165 fprintf(fd, "Frame snd, def: %08lx %ld\n", tmpl, tmpl); 166 167 tmpl = mopGetLong(pkt, &idx); 168 fprintf(fd, "Frame snd, col: %08lx %ld\n", tmpl, tmpl); 169 170 tmpl = mopGetLong(pkt, &idx); 171 fprintf(fd, "Frame snd, mcl: %08lx %ld\n", tmpl, tmpl); 172 173 tmps = mopGetShort(pkt, &idx); 174 fprintf(fd, "Snd failure : %04x %d\n", tmps, tmps); 175 176 tmps = mopGetShort(pkt, &idx); 177 fprintf(fd, "Snd fail reas: %04x ", tmps); 178 if (tmps & 1) 179 fprintf(fd, "Excess col "); 180 if (tmps & 2) 181 fprintf(fd, "Carrier chk fail "); 182 if (tmps & 4) 183 fprintf(fd, "Short circ "); 184 if (tmps & 8) 185 fprintf(fd, "Open circ "); 186 if (tmps & 16) 187 fprintf(fd, "Frm to long "); 188 if (tmps & 32) 189 fprintf(fd, "Rem fail to defer "); 190 fprintf(fd, "\n"); 191 192 tmps = mopGetShort(pkt, &idx); 193 fprintf(fd, "Rec failure : %04x %d\n", tmps, tmps); 194 195 tmps = mopGetShort(pkt, &idx); 196 fprintf(fd, "Rec fail reas: %04x ", tmps); 197 if (tmps & 1) 198 fprintf(fd, "Block chk err "); 199 if (tmps & 2) 200 fprintf(fd, "Framing err "); 201 if (tmps & 4) 202 fprintf(fd, "Frm to long "); 203 fprintf(fd, "\n"); 204 205 tmps = mopGetShort(pkt, &idx); 206 fprintf(fd, "Unrec frm dst: %04x %d\n", tmps, tmps); 207 208 tmps = mopGetShort(pkt, &idx); 209 fprintf(fd, "Data overrun : %04x %d\n", tmps, tmps); 210 211 tmps = mopGetShort(pkt, &idx); 212 fprintf(fd, "Sys Buf Unava: %04x %d\n", tmps, tmps); 213 214 tmps = mopGetShort(pkt, &idx); 215 fprintf(fd, "Usr Buf Unava: %04x %d\n", tmps, tmps); 216 217 break; 218 case MOP_K_CODE_RVC: 219 220 tmpl = mopGetLong(pkt, &idx); 221 fprintf(fd, "Verification : %08lx\n", tmpl); 222 223 break; 224 case MOP_K_CODE_RLC: 225 226 /* Empty message */ 227 228 break; 229 case MOP_K_CODE_CCP: 230 tmpc = mopGetChar(pkt, &idx); 231 fprintf(fd, "Control Flags: %02x Message %d ", tmpc, tmpc & 1); 232 if (tmpc & 2) 233 fprintf(fd, "Break"); 234 fprintf(fd, "\n"); 235 236 if (moplen > 2) { 237 for (i = 0; i < (moplen - 2); i++) { 238 if ((i % 16) == 0) { 239 if ((i / 16) == 0) 240 fprintf(fd, 241 "Image Data : %04x ", 242 moplen-2); 243 else 244 fprintf(fd, 245 " "); 246 } 247 fprintf(fd, "%02x ", mopGetChar(pkt, &idx)); 248 if ((i % 16) == 15) 249 fprintf(fd, "\n"); 250 } 251 if ((i % 16) != 15) 252 fprintf(fd, "\n"); 253 } 254 255 break; 256 case MOP_K_CODE_CRA: 257 258 tmpc = mopGetChar(pkt, &idx); 259 fprintf(fd, "Control Flags: %02x Message %d ", tmpc, tmpc & 1); 260 if (tmpc & 2) 261 fprintf(fd, "Cmd Data Lost "); 262 if (tmpc & 4) 263 fprintf(fd, "Resp Data Lost "); 264 fprintf(fd, "\n"); 265 266 if (moplen > 2) { 267 for (i = 0; i < (moplen - 2); i++) { 268 if ((i % 16) == 0) { 269 if ((i / 16) == 0) 270 fprintf(fd, 271 "Image Data : %04x ", 272 moplen-2); 273 else 274 fprintf(fd, 275 " "); 276 } 277 fprintf(fd, "%02x ", mopGetChar(pkt, &idx)); 278 if ((i % 16) == 15) 279 fprintf(fd, "\n"); 280 } 281 if ((i % 16) != 15) 282 fprintf(fd, "\n"); 283 } 284 285 break; 286 default: 287 break; 288 } 289} 290