C************************************************************************
C Common definitions for UAF
C************************************************************************

	Character*23 exprdate, pwd_lifetime
	Character*20 u, orig_uname
	Character*12 username, password
	Character*10 cpu_string
	Character*9  uic, account
        Character*6  maxjobs_string, fillm_string, bytlm_string,
     .		     maxacctjobs_string, shrfillm_string,
     .		     pbytlm_string, maxdetach_string, biolm_string,
     .		     jtquota_string, prclm_string, diolm_string,
     .		     wsdef_string, prio_string, astlm_string,
     .		     wsquo_string, queprio_string, tqelm_string,
     .		     wsextent_string, enqlm_string, pgflquo_string,
     .		     pwd_length_string
	Integer*4    smg$read_string, smg$create_virtual_keyboard,
     .		     smg$create_pasteboard, smg$paste_virtual_display,
     .		     smg$create_virtual_display, smg$set_cursor_abs,
     .		     smg$begin_pasteboard_update, smg$put_chars_wide,
     .		     smg$end_pasteboard_update, smg$put_chars, 
     .		     smg$change_rendition, smg$erase_display,
     .		     ots$cvt_l_ti, ots$cvt_ti_l, ots$cvt_to_l, 
     .		     sys$asctim, sys$bintim, sys$getuai, sys$setprv, 
     .		     sys$setuai, lib$create_dir, lib$getdvi,
     .		     lib$bbssi, lib$bbcci, lib$get_foreign,
     .		     lib$sys_fao, lib$getjpi
	Integer*4    flags, bytlm, prime, jtquota, prio, queprio,
     .		     cpu, end_list, days, hours, minutes, 
     .		     seconds, astlm, biolm, wsdef, diolm, enqlm, 
     . 		     maxacctjobs, maxdetach, maxjobs, pbytlm, fillm,
     .		     mem,grp, pgflquo, prclm, shrfillm, tqelm,
     .		     wsextent, wsquo, batch_p, batch_s, dialup_p, 
     .		     dialup_s, local_p, local_s, network_p, network_s, 
     .		     remote_p, remote_s
       	Integer*4    keyboard, main, message, priv_board, flags_board,
     .		     access_board, days_board, pasteboard, instruct,
     .		     error_message, term
	Integer*4    account_len, defdev_len, defdir_len,
     .		     owner_len, username_len, password_len, uname_len,
     .		     tables_len, lgicmd_len, defcli_len
        Integer*4    mem_len, grp_len, pwd_life_len, auth_priv_len, 
     .		     prime_len, def_priv_len, flags_len, pwd_length, 
     .		     pwd_length_len, expir_len, maxjobs_len, fillm_len, 
     .		     bytlm_len, maxacctjobs_len, shrfillm_len, 
     .		     pbytlm_len, maxdetach_len, biolm_len,
     .		     jtquota_len, prclm_len, diolm_len, wsdef_len, 
     .		     prio_len, astlm_len, wsquo_len, queprio_len, 
     .		     tqelm_len, wsextent_len, cpu_len, enqlm_len,
     .		     pgflquo_len, batch_p_len, batch_s_len, u_len,
     .		     dialup_p_len, dialup_s_len, local_p_len, 
     .		     local_s_len, network_p_len, network_s_len, 
     .		     remote_p_len, remote_s_len
	Integer*4    auth_priv(2), def_priv(2)
	Integer*2    pwd_life(4), expir(4)
	Logical      user_exists, bogus_key, change, 
     .		     pwd_change, rename, success

 	Common /board_stuff/
     .		     keyboard, main, message, priv_board, flags_board,
     .		     instruct, access_board, days_board, term,
     .		     pasteboard, error_message

	Common /uai_strings/
     .		     exprdate, u, username, orig_uname, password,
     .		     pwd_lifetime, uic, u_len, account, cpu_string,
     .		     pwd_length_string, maxjobs_string, enqlm_string,
     .		     fillm_string, maxacctjobs_string, shrfillm_string, 
     .		     pbytlm_string, maxdetach_string, jtquota_string, 
     .		     biolm_string, prclm_string, diolm_string, 
     .		     wsdef_string, astlm_string, prio_string, 
     .		     wsquo_string, queprio_string, tqelm_string, 
     .		     wsextent_string, pgflquo_string, bytlm_string

	Common /uai_lengths/
     .		     account_len, defdev_len, defdir_len, owner_len, 
     .		     username_len, mem_len, grp_len, pwd_life_len, 
     .		     pwd_length_len, lgicmd_len, defcli_len, tables_len, 
     .		     expir_len, maxjobs_len, bytlm_len, flags_len,
     .		     fillm_len, maxacctjobs_len, shrfillm_len,
     .		     prime_len, pbytlm_len, maxdetach_len, uname_len,
     .		     biolm_len, jtquota_len, prclm_len, diolm_len, 
     .		     wsdef_len, prio_len, astlm_len, wsquo_len,
     .		     queprio_len, tqelm_len, cpu_len, wsextent_len, 
     .		     enqlm_len, pgflquo_len, password_len

	Common /uai_int/
     .		     pwd_life, expir, mem, grp, prime, auth_priv,
     .		     pwd_length, bytlm, maxjobs, fillm, maxacctjobs, 
     .	             shrfillm, pbytlm, maxdetach, biolm, jtquota, prclm, 
     .		     diolm, wsdef, prio, astlm, wsquo, queprio, tqelm, 
     .		     wsextent, cpu, enqlm, pgflquo, flags, days, hours, 
     .		     minutes, seconds, def_priv

	Common /access_lens/
     .		     batch_p, batch_p_len, batch_s, batch_s_len, 
     .		     dialup_p, dialup_p_len, dialup_s, dialup_s_len, 
     .		     local_p, local_s, local_p_len, local_s_len, 
     .		     network_p, network_p_len, network_s, network_s_len,
     .		     remote_p, remote_p_len, remote_s, remote_s_len

	Common /misc_logicals/
     .		     rename, change, user_exists, pwd_change, 
     .		     success