C C (do not change this include file and expect things to fly on C the first go -- I suggest you consult me first as the include C file is new for VMS V4) C C (c) Zar Ltd. 1985, 1986, 1987 C C First the parameter for dimensions C parameter max_commands = 27 parameter maxdisks = 16 parameter maxig_term = 16 parameter maxig_user = 32 parameter maxpri = 15 parameter maxuser = 128 parameter max_average = 10 parameter max_wake = 25 parameter opcom = 'OPA0:' C C These parameters are for creating the detached processes C with the special Nanny command SPAWN C parameter nan$_astlm = 24 parameter nan$_biolm = 18 parameter nan$_bytlm = 20480 parameter nan$_cp_out = 'NLA0:' parameter nan$_diolm = 18 parameter nan$_enqlm = 30 parameter nan$_fillm = 40 parameter nan$_jtquota = 1024 parameter nan$_pgflquota = 10240 parameter nan$_prclm = 0 parameter nan$_tqelm = 20 parameter nan$_wsdefault = 256 parameter nan$_wsextent = 1024 parameter nan$_wsquota = 512 C C Error codes returned in NANNYS$BOX C parameter nan$_comdis = '1f'x parameter nan$_invcom = '1d'x parameter nan$_nonsys = '21'x parameter nan$_nopriv = '20'x parameter nan$_normal = '01'x parameter nan$_noslot = '1b'x parameter nan$_nosuchcom = '1e'x parameter nan$_retwarn = '1c'x C C Process type definitions within Nanny's tables C parameter nan$v_batch = 0 parameter nan$v_detach = 1 parameter nan$v_inter = 2 parameter nan$v_network = 3 parameter nan$v_subproc = 4 parameter nan$v_unknown = 5 parameter nan$_system = 6 C C Nanny Commands C parameter nan$c_addacc = 1 parameter nan$c_die = 2 parameter nan$c_enter = 3 parameter nan$c_forget = 4 parameter nan$c_free = 5 parameter nan$c_grab = 6 parameter nan$c_idleset = 7 parameter nan$c_ignore = 8 parameter nan$c_ishow = 9 parameter nan$c_kill = 10 parameter nan$c_listen = 11 parameter nan$c_new = 12 parameter nan$c_odis = 13 parameter nan$c_oen = 14 parameter nan$c_pause = 15 parameter nan$c_qstart = 16 parameter nan$c_qstop = 17 parameter nan$c_read = 18 parameter nan$c_requeue = 19 parameter nan$c_resume = 20 parameter nan$c_stop = 21 parameter nan$c_suspend = 22 parameter nan$c_version = 23 parameter nan$c_wake = 24 parameter nan$c_wclr = 25 parameter nan$c_wdump = 26 parameter nan$c_wshow = 27 C C Nanny Functions C parameter nan$f_bdithr = 1 parameter nan$f_ddithr = 2 parameter nan$f_idithr = 3 parameter nan$f_ndithr = 4 parameter nan$f_sdithr = 5 parameter nan$f_dupcpu = 6 parameter nan$f_ressusp = 7 parameter nan$f_bsusp = 8 parameter nan$f_dsusp = 9 parameter nan$f_isusp = 10 parameter nan$f_nsusp = 11 parameter nan$f_ssusp = 12 parameter nan$f_treelo = 13 parameter nan$f_syslo = 14 parameter nan$f_halfidl = 15 parameter nan$f_lastidl = 16 parameter nan$f_clridl = 17 parameter nan$f_cpuwarn = 18 parameter nan$f_pfdithr = 19 parameter nan$f_onewake = 20 parameter nan$f_iocpu = 21 parameter nan$f_sysann = 28 parameter nan$f_upddst = 29 parameter nan$f_nofunc = 31 parameter nan$f_debug = 32 C C Nanny's Version! C parameter version = 'V2.5' C character*80 announce character*64 disks(maxdisks) character*15 nan_prcnam character*12 c_username character*12 ig_user(maxig_user) character*10 consoles(8) character*10 c_phy_term character*10 c_terminal character*10 ig_term(maxig_term) character*8 all_commands(max_commands) character*8 all_functs(32) character*8 c_account character*8 prefacc(maxuser) character*8 sysaccnam integer*4 adv_dstday integer*4 bck_dstday integer*4 cpu_average integer*4 crush(maxuser) integer*4 crush_p integer*4 c_authpriv(2) integer*4 c_bufio integer*4 c_cpulim integer*4 c_cputim integer*4 c_dirio integer*4 c_owner integer*4 c_pageflts integer*4 c_ipid integer*4 c_pid integer*4 c_state integer*4 c_sts integer*4 c_wssize integer*4 defidle integer*4 disable integer*4 functmsk integer*4 idle_val(maxuser) integer*4 ipid(maxuser) integer*4 lasterr(maxdisks) integer*4 loadave(4) integer*4 loop_iosb(2) integer*4 lowdivd integer*4 lowphymem integer*4 low_free integer*4 maxelapsed integer*4 maxidle integer*4 maxphymem integer*4 maxsuspend integer*4 minidle integer*4 minio integer*4 mintim integer*4 pid(maxuser) integer*4 ranjpipid integer*4 susp_ipid(maxuser) integer*4 suspids integer*4 sysgrp integer*4 truewait(2) integer*4 waitim integer*2 authpri(maxuser) integer*2 crpri(maxuser) integer*2 c_prccnt integer*2 c_prib integer*2 c_uic(2) integer*2 die integer*2 mbx2 integer*2 mbx3 integer*2 mbxchan integer*2 prib(maxuser) integer*2 system(maxuser) real*4 prefadd(maxuser) logical*1 debugging logical*1 inbuff(128) logical*1 listen logical*1 purgews logical*1 startup_flg common/diecom/ authpri,crush,crpri,crush_p,prib,debugging common/dsk_com/ disks,low_free,lasterr common/jpicom_i/c_authpriv,c_bufio,c_cpulim,c_cputim,c_dirio, 1 c_owner,c_pageflts,c_ipid,c_pid,c_prccnt, 2 c_prib,c_state,c_sts,c_uic,c_wssize,ranjpipid common/jpicom_s/c_account,c_phy_term,c_terminal,c_username common/nanny/ mbx2,mbx3,die,mbxchan,inbuff,ipid,pid,disable, 1 system,loop_iosb,idle_val common/nanopr/ consoles,listen,loadave,all_commands,all_functs common/param/ sysgrp,waitim,cpu_average,minidle,defidle, 1 maxidle,maxelapsed,mintim,minio,truewait, 2 lowdivd,purgews,maxphymem,lowphymem,maxsuspend, 3 functmsk,prefadd,adv_dstday,bck_dstday common/param1/ sysaccnam,nan_prcnam,ig_user,ig_term,announce, 1 prefacc common/strtup/ startup_flg common/susped/ suspids,susp_ipid