INTSUT ;JPD; 1 Feb 96 09:26; Generic receiver, enhanced functions
Source file <INTSUT.m>
Package | Total | Caller Graph |
---|---|---|
IHS Generic Interface System | 2 | INTSEND INTSREC |
Name | Comments | DBIA/ICR reference |
---|---|---|
EVAL(INIP,ING,INDEST,ACKUIF,INERR,INXDST,ER,INMSG,INRONLY) | ;Evaluate incoming msg
|
|
CLOSE(INCHNL,INTP) | ;Close channel
; Input: ; INCHNL - Cannel of Socket ; INTP - Client or Server |
|
INIT1(INDA,INBPN,INIP,CLISRV,INXDST,INDEST,INPOP) | ;Init
|
|
OPEN(CLISRV,INIP,INMEM,INCHNL,INPOP,INNM) | ;Open connection
; Input: ; CLISRV - 0 Client, 1 Server ; INIP - Process parameters ; INNM - Name of what is being opened ; Output: ; INMEM - memory location ; INCHNL - chanel of tcp/ip socket ; INPOP - 0 stop 1 continue |
|
ERROR(ER,INERR,INRCVE,INPOP) | ;receive error check
; Input: ; ER - error ; INERR - Error description ; Input/Output: ; INRCVE - Receive count ; INPOP - 0 stop 1 continue |
|
SRVOPN(INIP,INCHNL,INMEM) | ;Open Server
; Input: ; INIP - Parameters ; INCHNL - Port channel ; INMEM - Memory location |
|
INIT(INDA,INIP) | ;Initialize IP variables
; Input: INDA - ien of test case ; Output: INIP - IP variables |
|
SRVINIT(INIP,INCHNL,INMEM,INPOP) | ;--If opening as server, receive initialization string
; Input: ; INIP - Input paramters ; INCHNL - TCP/IP socket channel ; INMEM - MEMORY LOCATION FOR TCP/IP ; INPOP - 0 Stop processing, 1 continue |
|
CLINIT(INIP,INCHNL,INMEM,INPOP) | ;Init as a client send init string
; Input: ; INIP - Input paramters ; INCHNL - TCP/IP socket channel ; INMEM - MEMORY LOCATION FOR TCP/IP ; INPOP - 0 Stop processing, 1 continue |
|
CLIOPN(INIP,INCHNL,INMEM) | ;open client
; Input: ; INIP - Parameters ; INCHNL - Port channel ; INMEM - Memory location |
|
EXIT(INCHNL,INBPN,INIP,CLISRV) | ;Main exit module
|
Name | Field # of Occurrence |
---|---|
CLOSE^%INET | CLOSE+4 |
OPEN^%INET | SRVOPN+6, CLIOPN+6 |
$$VAL^DWRA | INIT1+17, INIT1+25 |
$$DTIME^INHULOG | INIT+20 |
PARSEDCT^INHUT9 | CLINIT+25, SRVINIT+23 |
$$ASCII^INHUVUT | INIT+13, INIT+14, INIT+15 |
SENDSTR^INHUVUT | CLINIT+10, SRVINIT+28 |
^INHVTAPR | INIT1+28 |
RECSTR^INTSREC | CLINIT+18, SRVINIT+13 |
$$IN^INTSUSN | EVAL+13 |
DISPLAY^INTSUT1 | INIT1+15, INIT1+22, INIT1+27, INIT1+30, OPEN+13, OPEN+17, OPEN+23, OPEN+25, OPEN+28, OPEN+30 , SRVOPN+5, CLIOPN+5, CLIOPN+7, EXIT+16, CLOSE+4, CLINIT+7, CLINIT+11, CLINIT+14, CLINIT+20, CLINIT+26 , CLINIT+31, SRVINIT+9, SRVINIT+12, SRVINIT+16, SRVINIT+19, SRVINIT+21, SRVINIT+24, SRVINIT+29, ERROR+10, ERROR+14 , EVAL+21 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZOSF("TRAP" | INIT1+12 |
^DIZ(4001.1 - [#4001.1] | INIT+4 |
^INRHB("RUN" | INIT1+20, INIT1+23*, EXIT+8, EXIT+10!, EXIT+14, EXIT+15! |
^INRHSITE(1 | CLINIT+15 |
Name | Line Occurrences |
---|---|
CLIOPN | OPEN+21 |
CLOSE | EXIT+9, EXIT+13 |
INIT | INIT1+14 |
SRVOPN | OPEN+19 |
Name | Field # of Occurrence |
---|---|
^(0 | CLINIT+15 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ACKUIF | EVAL~, EVAL+13, EVAL+21 |
APREC | CLINIT+6~ |
CLISRV | INIT1~, INIT1+17*, INIT1+19, INIT1+23, OPEN~, OPEN+12, OPEN+19, OPEN+21, EXIT~, EXIT+7 , EXIT+12 |
>> DIE | INIT1+17, INIT1+25 |
DUZ | INIT+20 |
ER | INIT1+11~, CLINIT+6~, ERROR~, ERROR+10, ERROR+14, EVAL~, EVAL+11~, EVAL+13*, EVAL+19, EVAL+20 |
>> ERNO | EVAL+21* |
I | INIT1+11~, INIT1+28*, CLINIT+6~, CLINIT+17* |
INACKID | EVAL+11~ |
INBPN | INIT1~, INIT1+20, INIT1+23, EXIT~, EXIT+8, EXIT+10, EXIT+14, EXIT+15 |
INCHNL | OPEN~, OPEN+10!, OPEN+15, OPEN+19, OPEN+21, OPEN+22, OPEN+23*, OPEN+27, OPEN+30, SRVOPN~ , SRVOPN+6, CLIOPN~, CLIOPN+6, CLIOPN+7, EXIT~, EXIT+9, EXIT+13, CLOSE~, CLOSE+4, CLINIT~ , CLINIT+10, CLINIT+18, SRVINIT~, SRVINIT+13, SRVINIT+28 |
INDA | INIT1~, INIT1+14, INIT1+17, INIT1+25, INIT~, INIT+4 |
INDATA | CLINIT+6~ |
>> INDEBUG | OPEN+12* |
INDEST | INIT1~, EVAL~, EVAL+13 |
INDEST( | INIT1+29* |
>> INDONE | OPEN+12* |
INERR | INIT1+11~, ERROR~, ERROR+10, EVAL~, EVAL+13, EVAL+19, EVAL+20! |
INERR( | EVAL+21 |
>> INEXPAND | CLINIT+26, SRVINIT+24 |
ING | INIT1+11~, CLINIT+6~, CLINIT+16*, CLINIT+17, CLINIT+18, CLINIT+19, CLINIT+22, CLINIT+25, CLINIT+29, CLINIT+31 , SRVINIT+10*, SRVINIT+11, SRVINIT+13, SRVINIT+14, SRVINIT+17, SRVINIT+19, SRVINIT+23, EVAL~, EVAL+13, EVAL+22 |
INIP | INIT1~, INIT1+14, OPEN~, OPEN+19, OPEN+21, SRVOPN~, CLIOPN~, EXIT~, CLINIT~, CLINIT+18 , SRVINIT~, SRVINIT+13, EVAL~, EVAL+13, INIT~ |
INIP("AAC" | INIT+6* |
INIP("AATT" | INIT+5* |
INIP("ACK" | CLINIT+13, CLINIT+29, SRVINIT+27, SRVINIT+28, INIT+15* |
INIP("ADDR" | OPEN+28, CLIOPN+5, CLIOPN+6, CLIOPN+7, INIT+21* |
INIP("EOL" | INIT+13* |
INIP("INIT" | CLINIT+9, CLINIT+10, SRVINIT+8, SRVINIT+17, INIT+14* |
INIP("NOSOM" | INIT+19* |
INIP("OHNG" | OPEN+15, OPEN+25, INIT+8* |
INIP("OTRY" | OPEN+15, INIT+7* |
INIP("PORT" | INIT1+15, INIT1+20, INIT1+23, OPEN+28, SRVOPN+5, SRVOPN+6, CLIOPN+5, CLIOPN+6, CLIOPN+7, EXIT+8 , EXIT+10, EXIT+14, EXIT+15, INIT+22* |
INIP("POST" | INIT+4* |
INIP("PRE" | INIT+4* |
INIP("RHNG" | CLINIT+17, SRVINIT+11, ERROR+11, INIT+12* |
INIP("RTO" | INIT+9* |
INIP("RTRY" | CLINIT+17, SRVINIT+11, ERROR+11, INIT+11* |
INIP("SHNG" | INIT+18* |
INIP("STO" | INIT+10* |
INIP("STRY" | CLINIT+9, INIT+17* |
INIP("THNG" | INIT+16* |
INIP("TMAX" | INIT+20* |
INLOOP | OPEN+9~, OPEN+15*, OPEN+16, SRVINIT+7~, SRVINIT+11* |
INMEM | INIT1+11~, OPEN~, OPEN+19, OPEN+21, SRVOPN~, SRVOPN+6, CLIOPN~, CLIOPN+6, CLINIT~, SRVINIT~ |
INMS | CLINIT+6~, CLINIT+27!, SRVINIT+25! |
INMS( | CLINIT+26, SRVINIT+24 |
>> INMSASTA | EVAL+13 |
INMSG | EVAL~, EVAL+13 |
INNM | OPEN~, OPEN+11*, OPEN+28 |
INOUT | CLINIT+6~, CLINIT+8*, CLINIT+9, CLINIT+13*, CLINIT+21* |
INPOP | INIT1~, INIT1+12*, INIT1+15*, INIT1+19, INIT1+21*, OPEN~, OPEN+13, OPEN+15, OPEN+29*, CLINIT~ , CLINIT+9, CLINIT+22*, CLINIT+23, CLINIT+30*, SRVINIT~, SRVINIT+15*, SRVINIT+18*, ERROR~, ERROR+11*, ERROR+14* |
INQP | INIT1+11~ |
INQT | INIT1+11~ |
INRCVE | ERROR~, ERROR+11* |
INRONLY | EVAL~, EVAL+13 |
INSMIN | CLINIT+6~, CLINIT+15* |
INSND | CLINIT+6~, CLINIT+9* |
INTP | CLOSE~, CLOSE+4 |
INUIF | INIT1+11~ |
INX | OPEN+9~, OPEN+12*, OPEN+13 |
INXDST | INIT1~, INIT1+25*, EVAL~, EVAL+13 |
IOM | CLINIT+25, SRVINIT+23 |
J | CLINIT+6~, CLINIT+26*, SRVINIT+24* |
MS | CLINIT+6~, CLINIT+26*, CLINIT+27!, SRVINIT+24*, SRVINIT+25! |
MSG | OPEN+9~, OPEN+16*, OPEN+17 |
OPENED | OPEN+9~ |
RUN | ERROR+7~ |
STR | INIT+3~, INIT+4*, INIT+7, INIT+8, INIT+9, INIT+10, INIT+11, INIT+12, INIT+13, INIT+16 , INIT+17, INIT+18, INIT+21, INIT+22 |
STR13 | INIT+3~, INIT+4*, INIT+5, INIT+6 |
STR17 | INIT+3~, INIT+4*, INIT+14, INIT+15 |
U | CLINIT+15, INIT+5, INIT+6, INIT+7, INIT+8, INIT+9, INIT+10, INIT+11, INIT+12, INIT+13 , INIT+14, INIT+15, INIT+16, INIT+17, INIT+18, INIT+21, INIT+22 |
X | INIT1+11~, INIT1+12*, INIT1+28*, INIT1+29 |
Y | INIT1+11~, INIT1+29* |
Name | Field # of Occurrence |
---|---|
$T(DEST+I^INHVTAPR | INIT1+28 |