1 saw   1.1 /*-----------------------------------------------------------------------------
  2            * Copyright (c) 1993 Southeastern Universities Research Association,
  3            *                    Continuous Electron Beam Accelerator Facility
  4            *
  5            * This software was developed under a United States Government license
  6            * described in the NOTICE file included as part of this distribution.
  7            *
  8            * Stephen A. Wood, 12000 Jefferson Ave., Newport News, VA 23606
  9            * Email: saw@cebaf.gov  Tel: (804) 249-7367  Fax: (804) 249-5800
 10            *-----------------------------------------------------------------------------
 11            * 
 12            * Description:
 13            *  daVar RPCGEN input file
 14            *	
 15            * Author:  Stephen Wood, CEBAF Hall C
 16            *
 17            * Revision History:
 18            *   $Log: daVarRpc.x,v $

 19 saw   1.2  *   Revision 1.4  1999/08/25 13:16:05  saw
 20            *   *** empty log message ***
 21            *
 22            *   Revision 1.3  1994/11/07 14:33:12  saw

 23 saw   1.1  *   Add testnamelist structure and readmultiple_test and family rpc's
 24            *
 25            *   Revision 1.2  1993/11/24  22:01:35  saw
 26            *   Add double variable type
 27            *
 28            *   Revision 1.1  1993/05/10  21:10:37  saw
 29            *   Initial revision
 30            *
 31            */
 32           
 33           %#include <time.h>

 34 saw   1.2 %#define _xdr_result xdr_result
 35           %#define _xdr_argument xdr_argument

 36 saw   1.1 
 37           #if defined(RPC_HDR) || defined(RPC_XDR) || defined(RPC_SVC) || \
 38             defined(RPC_CLNT) || defined(RPC_TBL)
 39           #define RPCGEN
 40           #else
 41           #undef RPCGEN
 42           #endif
 43           
 44           #include "daVar.h"
 45           const DAVARINT_RPC = DAVARINT;
 46           const DAVARFLOAT_RPC = DAVARFLOAT;
 47           const DAVARDOUBLE_RPC = DAVARDOUBLE;
 48           const DAVARSTRING_RPC = DAVARSTRING;
 49           const DAVARERROR_RPC = 999;
 50           
 51           typedef string PNAME<>;
 52           typedef PNAME NAMELIST<>;
 53           
 54           union any switch (int valtype) {
 55            case DAVARINT_RPC:
 56             int i<>;
 57 saw   1.1  case DAVARFLOAT_RPC:
 58             float r<>;
 59            case DAVARDOUBLE_RPC:
 60             double d<>;
 61            case DAVARSTRING_RPC:
 62             string s<>;
 63            case DAVARERROR_RPC:
 64             int error;
 65            default:
 66             void;
 67           };
 68           
 69           struct wany {
 70             PNAME name;
 71             any *val;
 72           };
 73           
 74           typedef any RVALLIST<>;
 75           
 76           typedef wany WVALLIST<>;
 77           
 78 saw   1.1 typedef int ERRLIST<>;
 79           
 80           struct TESTNAMELIST {
 81               /* Can we have a more generic structure fore this? */
 82             string test_condition<>;
 83             int max_time_wait;            /* Seconds before failing */
 84             int max_event_wait;           /* # of events before failing */
 85             int prog;
 86             int vers;
 87             NAMELIST *NAMELISTP;
 88           };
 89           
 90           program DAVARSVR {
 91             version DAVARVERS {
 92               int DAVAR_ACKMESSAGE(string) = 101;
 93               NAMELIST DAVAR_GETLIST(string) = 102;
 94               RVALLIST DAVAR_READMULTIPLE(NAMELIST) = 103;
 95               ERRLIST DAVAR_WRITEMULTIPLE(WVALLIST) = 104;
 96               int DAVAR_READMULTIPLE_TEST(TESTNAMELIST) = 105;
 97           #if defined(RPC_HDR) || defined(RPC_XDR) || defined(RPC_SVC)
 98               int DAVAR_READMULTIPLE_TEST_CB(RVALLIST) = 106; /* Call Back */
 99 saw   1.1 #endif

100 saw   1.2     WVALLIST DAVAR_READPATTERNMATCH(string) = 107;

101 saw   1.1 /*    double HACK(int) = 201;*/
102             } = 1;
103           } = 0x2c0daFF8;
104           
105           /*
106           Local Variables:
107           mode: c
108           End:
109           */