Warning, /include/hbook/hcpiaf.inc is written in an unsupported language. File is not indexed.
0001 *
0002 * $Id$
0003 *
0004 * $Log$
0005 * Revision 1.1 1996/01/16 17:07:50 mclareni
0006 * Initial revision
0007 *
0008 *
0009 #ifndef CERNLIB_HBOOK_HCPIAF_INC
0010 #define CERNLIB_HBOOK_HCPIAF_INC
0011 *
0012 *
0013 * hcpiaf.inc
0014 *
0015 *CMZ : 4.21/08 01/02/94 11.41.10 by Fons Rademakers
0016 *-- Author : Fons Rademakers 15/04/93
0017 *--- shared between HBOOK and PAW
0018 PARAMETER (MXSLPF = 32)
0019 COMMON/HCPIAF/NTPIAF
0020 + ,CONNPF,SERVPF,MASTPF,SLAVPF,CLINPF,CLUTPF,LOGLPF
0021 + ,NSLAVE,NSLBAD,NSLVPF,SLINPF(MXSLPF),SLUTPF(MXSLPF)
0022 + ,NGSIZE, MYSID, SMASK, SRIN, SROUT, SVMIO, STUSER
0023 + ,STCPU, MASPID
0024 COMMON/HCPIA1/SLHOPF(MXSLPF), SLHBAD(MXSLPF), PIAFRC
0025 *--- flag set by HGETNT if the current Ntuple is on Piaf server
0026 LOGICAL NTPIAF
0027 *--- flag if Piaf server is connected
0028 LOGICAL CONNPF
0029 *--- flag if this is a server (master or slave)
0030 LOGICAL SERVPF
0031 *--- flag if this is the master server
0032 LOGICAL MASTPF
0033 *--- flag if this is a slave server
0034 LOGICAL SLAVPF
0035 *--- sockets between client and master server
0036 INTEGER CLINPF, CLUTPF
0037 *--- log level of diagnostic output
0038 INTEGER LOGLPF
0039 *--- number of active slaves and mask used by the select (PSELCT) function
0040 INTEGER NSLAVE, SMASK
0041 *--- number of running slave servers and sockets between master and slaves
0042 INTEGER NSLVPF, SLINPF, SLUTPF
0043 *--- hosts on which slaves are running
0044 CHARACTER*16 SLHOPF
0045 *--- number hosts on which no slaves can be run
0046 INTEGER NSLBAD
0047 *--- hosts on which no slaves can be run
0048 CHARACTER*16 SLHBAD
0049 *--- current slave group view: group size and unique slave id
0050 INTEGER NGSIZE, MYSID
0051 *--- pid of the master server (used by slave servers)
0052 INTEGER MASPID
0053 *--- authentication record
0054 CHARACTER*64 PIAFRC
0055 *--- IO and CPU usage of all slaves
0056 REAL SRIN, SROUT, SVMIO, STUSER, STCPU
0057 *--- Work space
0058 COMMON/HCPIAC/CHSMPF, CHLMPF
0059 CHARACTER CHSMPF*80, CHLMPF*256
0060 *
0061
0062 #endif
