usr/src/cmd/cmd-inet/usr.sbin/snoop/snoop_solarnet.c

   1 /*
   2  * CDDL HEADER START
   3  *
   4  * The contents of this file are subject to the terms of the
   5  * Common Development and Distribution License, Version 1.0 only
   6  * (the "License").  You may not use this file except in compliance
   7  * with the License.
   8  *
   9  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
  10  * or http://www.opensolaris.org/os/licensing.
  11  * See the License for the specific language governing permissions
  12  * and limitations under the License.
  13  *
  14  * When distributing Covered Code, include this CDDL HEADER in each
  15  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
  16  * If applicable, add the following below this CDDL HEADER, with the
  17  * fields enclosed by brackets "[]" replaced with your own identifying
  18  * information: Portions Copyright [yyyy] [name of copyright owner]
  19  *
  20  * CDDL HEADER END
  21  */
  22 /*
  23  * Copyright (c) 1993, 1999 by Sun Microsystems, Inc.
  24  * All rights reserved.
  25  */
  26
  27 #pragma ident   "%W%    %E% SMI"
  28
  29 #include <sys/types.h>
  30 #include <sys/errno.h>
  31 #include <setjmp.h>
  32 #include <limits.h>
  33 #include <netinet/in.h>
  34 #include <string.h>
  35
  36 #include <rpc/types.h>
  37 #include <rpc/rpc.h>
  38 #include <rpc/xdr.h>
  39 #include <rpc/auth.h>
  40 #include <rpc/clnt.h>
  41 #include <rpc/rpc_msg.h>
  42 #include <fw.h>
  43 #include <fw_rpc.h>
  44 #include "snoop.h"
  45
  46 extern char *dlc_header;
  47 extern jmp_buf xdr_err;
  48
  49 static char *procnames_short[] = {
  50         "Null",         /*  0 */
  51         "INVOKE",       /*  1 */
  52         "MORE",         /*  2 */
  53         "KILL",         /*  3 */
  54 };
  55
  56 static char *procnames_long[] = {
  57         "Null procedure",       /*  0 */
  58         "Invoke operation",     /*  1 */
  59         "More data",            /*  2 */
  60         "Kill operation",       /*  3 */
  61 };
  62
  63 #define MAXPROC 3
  64
  65 enum Rec_type {
  66         REC_TYPE_NORM = 0,
  67         REC_TYPE_EOR = 1,
  68         REC_TYPE_EOF = 2
  69 };
  70 typedef enum Rec_type Rec_type;
  71
  72 void
  73 interpret_solarnet_fw(
  74         int flags,
  75         int type,
  76         int xid,
  77         int vers,
  78         int proc,
  79         char *data,
  80         int len)
  81 {
  82         char *line;
  83         char buff[CTXTLEN + 1];
  84         ulong_t thresh;
  85         char op[CTXTLEN + 1];
  86         bool_t b;
  87         Fw_err e;
  88         Rec_type rt;
  89         int new_row = 1, row = 0;
  90
  91         if (proc < 0 || proc > MAXPROC)
  92                 return;
  93
  94         if (flags & F_SUM) {
  95                 if (setjmp(xdr_err)) {
  96                         return;
  97                 }
  98
  99                 line = get_sum_line();
 100
 101                 if (type == CALL) {
 102                         (void) sprintf(line,
 103                                 "SOLARNET C %s",
 104                                 procnames_short[proc]);
 105                         line += strlen(line);
 106
 107                         switch (proc) {
 108                         case FW_INVOKE:
 109                                 (void) sprintf(line, " %s",
 110                                     getxdr_string(buff, CTXTLEN));
 111                                 line += strlen(line);
 112                                 (void) sprintf(line, "/%s",
 113                                     getxdr_string(buff, CTXTLEN));
 114                                 line += strlen(line);
 115                                 getxdr_string(buff, CTXTLEN);
 116                                 if (strlen(buff) != 0) {
 117                                         (void) sprintf(line, ".%s", buff);
 118                                         line += strlen(line);
 119                                 }
 120                                 (void) getxdr_string(buff, CTXTLEN);
 121                                 thresh = getxdr_u_long();
 122                                 if (thresh == ULONG_MAX)
 123                                         (void) sprintf(line, " (all)");
 124                                 else
 125                                         (void) sprintf(line, " %lu", thresh);
 126                                 line += strlen(line);
 127                                 (void) getxdr_context(buff, CTXTLEN);
 128                                 break;
 129                         case FW_MORE:
 130                                 (void) getxdr_context(buff, CTXTLEN);
 131                                 sscanf(buff, "%*s %*s %s.%*s", op);
 132                                 op[strlen(op)-1] = '\0';
 133                                 (void) sprintf(line, " %s", op);
 134                                 line += strlen(line);
 135                                 thresh = getxdr_u_long();
 136                                 if (thresh == ULONG_MAX)
 137                                         (void) sprintf(line, " (all)");
 138                                 else
 139                                         (void) sprintf(line, " %lu", thresh);
 140                                 line += strlen(line);
 141                                 break;
 142                         case FW_KILL:
 143                                 (void) getxdr_context(buff, CTXTLEN);
 144                                 sscanf(buff, "%*s %*s %s.%*s", op);
 145                                 op[strlen(op)-1] = '\0';
 146                                 (void) sprintf(line, " %s", op);
 147                                 line += strlen(line);
 148                                 break;
 149                         default:
 150                                 break;
 151                         }
 152
 153                         check_retransmit(line, xid);
 154                 } else {
 155                         (void) sprintf(line, "SOLARNET R %s",
 156                             procnames_short[proc]);
 157                         line += strlen(line);
 158                         b = getxdr_bool();
 159                         if (b) {
 160                                 e = getxdr_enum();
 161                                 if (e == FW_ERR_FW)
 162                                         sprintf(line, " FW");
 163                                 else if (e == FW_ERR_OP)
 164                                         sprintf(line, " OP");
 165                                 else
 166                                         sprintf(line, " NOERR");
 167                                 line += strlen(line);
 168                                 if (e != FW_ERR_NONE) {
 169                                         sprintf(line, " %lu", getxdr_u_long());
 170                                         line += strlen(line);
 171                                         (void) getxdr_bool();
 172                                         sprintf(line, " %s",
 173                                             getxdr_string(buff, CTXTLEN));
 174                                         line += strlen(line);
 175                                 }
 176                         } else {
 177                                 sprintf(line, " Success");
 178                                 line += strlen(line);
 179                         }
 180                         b = getxdr_bool();
 181                         if (b) {
 182                                 sprintf(line, " %lu rows", getxdr_u_long());
 183                                 line += strlen(line);
 184                         } else {
 185                                 sprintf(line, " (No output)");
 186                                 line += strlen(line);
 187                         }
 188                 }
 189         }
 190
 191         if ((flags & F_DTAIL)) {
 192                 show_header("SOLARNET:  ", "Solarnet Administration Service",
 193                     len);
 194                 show_space();
 195                 if (setjmp(xdr_err)) {
 196                         return;
 197                 }
 198                 (void) sprintf(get_line(0, 0), "Proc = %d (%s)", proc,
 199                     procnames_long[proc]);
 200                 if (type == CALL) {
 201                         switch (proc) {
 202                         case FW_INVOKE:
 203                                 (void) showxdr_string(CTXTLEN, "Category: %s");
 204                                 (void) showxdr_string(CTXTLEN, "Operation: %s");
 205                                 (void) showxdr_string(CTXTLEN, "Version: %s");
 206                                 (void) showxdr_string(CTXTLEN, "Locale: %s");
 207                                 (void) showxdr_u_long("Threshold: %lu rows");
 208                                 (void) showxdr_context("Context: %s");
 209                                 b = getxdr_bool();
 210                                 if (!b) {
 211                                         sprintf(get_line(0, 0),
 212                                             "No input arguments");
 213                                         break;
 214                                 }
 215                                 thresh = showxdr_u_long("Input rows = %lu");
 216                                 (void) getxdr_bool();
 217                                 do {
 218                                         rt = getxdr_enum();
 219                                         if (rt == REC_TYPE_NORM) {
 220                                                 if (new_row) {
 221                                                         sprintf(get_line(0, 0),
 222                                                             "Row %d", ++row);
 223                                                         new_row = 0;
 224                                                 }
 225                                                 (void) getxdr_string(buff,
 226                                                     CTXTLEN);
 227                                                 (void) getxdr_string(op,
 228                                                     CTXTLEN);
 229                                                 sprintf(get_line(0, 0),
 230                                                     "\t%s = %s", buff, op);
 231                                         } else if (rt == REC_TYPE_EOR) {
 232                                                 new_row = 1;
 233                                         }
 234                                 } while (rt != REC_TYPE_EOF);
 235                                 break;
 236                         case FW_MORE:
 237                                 (void) showxdr_context("Context: %s");
 238                                 (void) showxdr_u_long("Threshold: %lu rows");
 239                                 break;
 240                         case FW_KILL:
 241                                 (void) showxdr_context("Context: %s");
 242                                 break;
 243                         default:
 244                                 break;
 245                         }
 246                 } else {
 247                         b = getxdr_bool();
 248                         if (b) {
 249                                 e = getxdr_enum();
 250                                 if (e == FW_ERR_FW) {
 251                                         showxdr_u_long(
 252                                             "Framework error code %lu");
 253                                 } else if (e == FW_ERR_OP) {
 254                                         showxdr_u_long(
 255                                             "Operation error code %lu");
 256                                 } else {
 257                                         showxdr_u_long("No error %*lu");
 258                                 }
 259                                 (void) getxdr_bool();
 260                                 (void) getxdr_string(buff, CTXTLEN);
 261                                 if (e != FW_ERR_NONE) {
 262                                         sprintf(get_line(0, 0),
 263                                             "Error message: %s", buff);
 264                                 } else {
 265                                 }
 266                         } else {
 267                                 sprintf(get_line(0, 0),
 268                                     "Operation was successful");
 269                         }
 270                         b = getxdr_bool();
 271                         if (b) {
 272                                 showxdr_u_long("Output rows: %lu");
 273                                 (void) getxdr_bool();
 274                                 do {
 275                                         rt = getxdr_enum();
 276                                         if (rt == REC_TYPE_NORM) {
 277                                                 if (new_row) {
 278                                                         sprintf(get_line(0, 0),
 279                                                             "Row %d", ++row);
 280                                                         new_row = 0;
 281                                                 }
 282                                                 (void) getxdr_string(buff,
 283                                                     CTXTLEN);
 284                                                 (void) getxdr_string(op,
 285                                                     CTXTLEN);
 286                                                 sprintf(get_line(0, 0),
 287                                                     "\t%s = %s", buff, op);
 288                                         } else if (rt == REC_TYPE_EOR) {
 289                                                 new_row = 1;
 290                                         }
 291                                 } while (rt != REC_TYPE_EOF);
 292                         } else {
 293                                 sprintf(get_line(0, 0), "No output");
 294                         }
 295                 }
 296                 show_trailer();
 297         }
 298
 299 }