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 |