Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: XMPSEC

Package: MailMan

Routine: XMPSEC


Information

XMPSEC ;ISC-SF/GMB-PackMan Security ;04/17/2002 11:13

Source Information

Source file <XMPSEC.m>

Entry Points

Name Comments DBIA/ICR reference
P0
VAL(XMSTR,XMTVAL) ;
CSCRAM(XMSTR) ;
FAIL ;
CHECK ;FROM XMP2
CNTEG ; Skip processing XXXINTEG program
PSECURE(XMZ,XMABORT) ; Secure the PackMan message
PQSEC(XMOK,XMABORT) ;
PSTORE(XMZ,XMKEY,XMHINT) ;
PSECIT(XMZ) ;
PSCRAM(XMZ,I,XMSTR,XMTVAL) ;
PNTEG(XMZ,I,XMSTR) ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"This message has been secured!"
  • Line Location: XMPSEC+5
Function Call: WRITE
  • Prompt: !,"Checking the package's integrity... (This may take some time.)",!
  • Line Location: XMPSEC+8
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $X>75
  • Line Location: P0+4
Function Call: WRITE
  • Prompt: "."
  • Line Location: P0+4
Function Call: WRITE
  • Prompt: !,"<<< DONE >>>",!
  • Line Location: P0+6
Function Call: WRITE
  • Prompt: "."
  • Line Location: CSCRAM+4
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $X>70
  • Line Location: CSCRAM+6
Function Call: WRITE
  • Prompt: $J($E(XMA0,1,9),10)
  • Line Location: CSCRAM+6
Function Call: WRITE
  • Prompt: !,$P($E(XMSTR,5,99),U)
  • Line Location: CSCRAM+7
Function Call: WRITE
  • Prompt: !!,"******** ",$J(XMA0,10)," has failed !!!!!!!!!!!",!!
  • Line Location: CSCRAM+10
Function Call: WRITE
  • Prompt: !!,"Securing the message now. This may take a while.",!
  • Line Location: PSECURE+5
Function Call: WRITE
  • Prompt: $J($P(XMSTR," ",2),10)
  • Line Location: PSCRAM+4
Info |  Source |  Entry Points |  Interaction Calls