Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: XUSTZIP

Package: Kernel

Routine: XUSTZIP


Information

XUSTZIP ;WRJ/DAF,ISF/RWF - Security Twilight Zone, Failed Access Attempts ;03/24/2004 11:12

Source Information

Source file <XUSTZIP.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA FileMan 3 UPDATE^DIE  ^DIK  ^DIR  
Kernel 2 ($$FMDIFF,$$FMTE,$$HADD,$$HTE,$$HTFM,$$NOW)^XLFDT  CLRFAC^XUS3  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 8

Package Total Caller Graph
Kernel 7 XU IP RELEASE  XUESSO4  XUS  XUS3  XUSRB  XUSRB5  XUSTZ  
VistALink Security 1 XOBSRAKJ  

Entry Points

Name Comments DBIA/ICR reference
CLEAN ;CLEAN UP OLD LOCKED IP NODES, ^XUSEC(3,
X6IP ;EXAMINE AND ALLOW RESET OF LOCKED IPS
LKSET(IP) ;Set IP Lock Node
LKTL() ;Lock until
NOW() ;
IP() ;Get a device IP.
LKTME() ;Get lock-out time
LKCHECK(IP) ;Check if IP is LOCKED
LKREC(IP) ;Get the Lock record
LKDEL(ZNUM) ;Delete LOCKED IP
LKWAIT(%) ;How long to wait
TSCHK(IP) ;Check if IP is for a TERMINAL SERVER.
IPCHECK(IP) ;Check if IP should be LOCKED. Called from XUSTZ, and others.
SLACK(TEND) ;SLACK CALCULATOR
ON() ;ON OR OFF
H3(%H) ;Make seconds
H0(%H) ;
DSPTME(%H) ;Convert seconds to display format
WATCH ;Watch the globals
WT2

External References

Name Field # of Occurrence
UPDATE^DIE X6IP+17, LKSET+5
^DIK CLEAN+12, LKDEL+2
^DIR X6IP+8
$$FMDIFF^XLFDT LKWAIT+4
$$FMTE^XLFDT X6IP+6, WT2+7
$$HADD^XLFDT LKTL+1, IPCHECK+14
$$HTE^XLFDT DSPTME+1, WT2WT2+3
$$HTFM^XLFDT LKTL+1, IPCHECK+14
$$NOW^XLFDT CLEAN+2, NOW+2, LKWAIT+4
CLRFAC^XUS3 X6IP+14, LKSET+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"There are no IP's to Clear"
  • Line Location: X6IP+2
Function Call: WRITE
  • Prompt: !,I_". ",ZNM," lock out till: ",$$FMTE^XLFDT($P(^XUSEC(3,ZNUM,0),"^",2))
  • Line Location: X6IP+6
Function Call: WRITE
  • Prompt: !,ZNM," Cleared"
  • Line Location: X6IP+12
Function Call: WRITE
  • Prompt: @IOF,"Failed access attempts count. Current time: ",TIME
  • Line Location: WT2+1
Function Call: WRITE
  • Prompt: !,I,?5,"IP: ",$P(X,U,1),?25,"Count: ",$P(X,U,2),?35,"Until: ",$$HTE^XLFDT($P(X,U,3))
  • Line Location: WT2+3
Function Call: WRITE
  • Prompt: !,?10,"None"
  • Line Location: WT2+4
Function Call: WRITE
  • Prompt: !,"Locked IP's. Current time: ",TIME
  • Line Location: WT2+5
Function Call: WRITE
  • Prompt: !,I,?5,"IP: ",$P(X,U,1),?25,"Until: ",$$FMTE^XLFDT($P(X,U,2))
  • Line Location: WT2+7
Function Call: WRITE
  • Prompt: !,?10,"None"
  • Line Location: WT2+8
Function Call: READ
  • Formatting: !
  • Prompt: "Refresh: Yes// "
  • Variable: X
  • Timeout: 30
  • Line Location: WT2+9
Function Call: WRITE
  • Prompt: !,"Enter 'Yes' or return to refresh, anyother key will exit"
  • Line Location: WT2+10
Routine Call
  • DIE
  • Line Location:
    • X6IP+17
    • LKSET+5
Routine Call
  • DIR
  • Line Location:
    • X6IP+8

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZUA(3.05 - [#3.05] IPCHECK+19, IPCHECK+20
^XTV(8989.3 - [#8989.3] LKTME+2, TSCHK+2, IPCHECK+15, IPCHECK+21, SLACK+10, ON+1
^XUSEC(3 - [#3.083] CLEAN+3, CLEAN+4, CLEAN+5, CLEAN+6, X6IP+2, X6IP+3, X6IP+4!, X6IP+6, LKREC+2, LKREC+3
WT2+7
^XUSEC(4 - [#3.084] CLEAN+6, CLEAN+9, CLEAN+10, CLEAN+13, WT2+3

Label References

Name Line Occurrences
$$H0 DSPTME+1
$$H3 CLEAN+8, CLEAN+10
$$IP LKCHECK+2, LKWAIT+2, IPCHECK+3
$$LKCHECK IPCHECK+6
$$LKREC LKCHECK+3, LKWAIT+3
$$LKTL LKSET+4
$$LKTME LKTL+1
$$NOW X6IP+17, LKCHECK+6
$$ON LKSET+2, LKCHECK+1, IPCHECK+2
$$SLACK IPCHECK+22
$$TSCHK X6IP+16, IPCHECK+8
LKDEL CLEAN+5, X6IP+11
WT2 WT2+9, WT2+10

Naked Globals

Name Field # of Occurrence
^( WT2+3, WT2+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% LKWAIT~, LKWAIT+2
%H H3~, H3+1*, H3+2, H0~, H0+1*, H0+2, DSPTME~, DSPTME+1
C WATCH+1~, WT2+2*, WT2+3*, WT2+4, WT2+6*, WT2+7*, WT2+8
DA CLEAN+11~, CLEAN+12*, LKDEL+1~, LKDEL+2*
DIK CLEAN+11~, CLEAN+12*, LKDEL+1~, LKDEL+2*
DIR X6IP+1~, X6IP+18!
DIR("A" X6IP+8*
DIR(0 X6IP+8*
DIRUT X6IP+8, X6IP+18!
HRMIN SLACK+3~, SLACK+7*, SLACK+10
I X6IP+1~*, X6IP+5*, X6IP+6, X6IP+8, WATCH+1~, WT2+2*, WT2+3*, WT2+6*, WT2+7*
>> IO("IP" IP+1
>> IO("ZIO" IP+1
IOF WT2+1
IP LKSET~, LKSET+3, LKSET+6, IP+1, LKCHECK~, LKCHECK+2*, LKCHECK+3, LKREC~, LKREC+2, LKWAIT+1~
, LKWAIT+2*, LKWAIT+3, TSCHK~, TSCHK+2, IPCHECK~, IPCHECK+3*, IPCHECK+6, IPCHECK+8, IPCHECK+18, IPCHECK+20
LIMIT IPCHECK+4~, IPCHECK+21*, IPCHECK+23
NOW CLEAN+1~, CLEAN+2*, CLEAN+5, CLEAN+8*, CLEAN+10, SLACK+3~
OV CLEAN+7~, CLEAN+10*
SLK IPCHECK+4~, IPCHECK+22*, IPCHECK+23
T1 LKWAIT+1~, LKWAIT+3*, LKWAIT+4
T2 LKWAIT+1~
TEND SLACK~, SLACK+5
TFAC IPCHECK+4~, IPCHECK+18*, IPCHECK+20*, IPCHECK+23
TIME WATCH+1~, WT2*, WT2+1, WT2+5
TS SLACK+3~
TSIEN IPCHECK+4~, IPCHECK+8*, IPCHECK+10, IPCHECK+15
TSREC IPCHECK+4~, IPCHECK+15*, IPCHECK+16, SLACK+4, SLACK+12
U LKTME+1, LKTME+2, LKWAIT+4, WT2+3, WT2+7
X LKCHECK+6*, LKCHECK+7, SLACK+3~, SLACK+4*, SLACK+5, WATCH+1~, WT2+3*, WT2+7*, WT2+9*, WT2+10
>> XOPT LKTME+1
XUFAC CLEAN+7~
XUNOW X6IP+1~, NOW+1, NOW+2*, NOW+3
Y X6IP+1~, X6IP+9, IPCHECK+18*, IPCHECK+20
Z10 IPCHECK+4~, IPCHECK+14*, IPCHECK+17, IPCHECK+22
ZEND IPCHECK+4~, IPCHECK+17*, IPCHECK+19
ZFDA X6IP+1~, LKSET+1~
ZFDA( X6IP+17*, LKSET+3*, LKSET+4*
ZIEN X6IP+16*, X6IP+17, LKSET+1~, LKSET+3*, LKSET+4
ZLST IPCHECK+4~, IPCHECK+16*, IPCHECK+17
ZNM X6IP+1~*, X6IP+3*, X6IP+4, X6IP+5, X6IP+6, X6IP+9*, X6IP+12, X6IP+14, X6IP+16
ZNM( X6IP+5*, X6IP+9
ZNUM CLEAN+1~, CLEAN+2*, CLEAN+4*, CLEAN+5, CLEAN+8*, CLEAN+9*, CLEAN+10, CLEAN+12, X6IP+1~, X6IP+3*
X6IP+4, X6IP+5, X6IP+6, X6IP+9*, X6IP+11, LKSET+1~, LKREC+1~, LKREC+2*, LKREC+3, LKDEL~
, LKDEL+2, TSCHK+2~*, TSCHK+3, IPCHECK+4~, IPCHECK+18*, IPCHECK+19*, IPCHECK+20
ZREC LKCHECK+3~*, LKCHECK+4, LKCHECK+6
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All