©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
XMKPRD ;ISC-SF/GMB-DNS Interface ;07/11/2002 08:09
Source file <XMKPRD.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| NEXTIPR(XMSITE,XMIP,XMIPLIST) | ; Routine returns next IP address to try
; IN/OUT: ; XMIP - in: Last IP address tried ; out: Next IP address to try ; XMIPLIST - in: (optional) List of IP addresses, separated by ",", ; we haven't yet tried ; out: Same, but with XMIP (out) removed |
|
| TRYIP(XMIP,XMOK) | ; Try the IP address, if it works, set XMOK=1
|
|
| CONNECT(XMSITE,XMIP,XMPORT) | ; Function tries to connect to site.
; Returns the IP address if success; 0 if failure ; XMSITE - Site name to connect to ; XMIP - Site IP address to try first (optional). If none given, ; or if attempt fails, DNS is called to retrieve address(es). ; XMPORT - Port number to use (optional, default=25) |
|
| NEXTIP(XMIP,XMIPLIST) | ;
|
|
| NEXTIPF(XMSITE,XMIPT,XMIPLIST) | ; Function returns next IP address to try.
; IN: ; XMSITE - .01 field of domain in file 4.2 (not a synonym) ; XMIPT - List of IP addresses, separated by ",", already tried ; XMIPLIST - (optional) List of IP addresses, separated by ",", to try |
|
| IPADDR(XMSITE) | ;
|
|
| SHOW(XMDIALOG,XM1) | ;
|
|
| SAMESITE(X,XMSITE) | ;
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^DIC(4.2 - [#4.2] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^XMB("NETNAME" | IPADDR+15 |
| Name | Line Occurrences |
|---|---|
| $$IPADDR | NEXTIPF+7, NEXTIPR+9 |
| NEXTIP | NEXTIPF+14, NEXTIPR+13 |
| NEXTIPR | CONNECT+9, CONNECT+11 |
| SHOW | NEXTIPF+6, NEXTIPF+8, IPADDR+9, IPADDR+16, IPADDR+20, IPADDR+21, CONNECT+8, CONNECT+13, NEXTIPR+8, NEXTIPR+10 , TRYIP+1, TRYIP+4 |
| TRYIP | CONNECT+11 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| D | SAMESITE+1~, SAMESITE+3* |
| DIC | SAMESITE+1~, SAMESITE+3* |
| DIC(0 | SAMESITE+3* |
| >> POP | TRYIP+3 |
| U | IPADDR+6, IPADDR+10 |
| X | SAMESITE~, SAMESITE+2*, SAMESITE+4* |
| XM1 | SHOW~, SHOW+2 |
| >> XMC("PLAY" | SHOW+1 |
| XMDIALOG | SHOW~, SHOW+2, SHOW+3 |
| XMI | IPADDR+1~, IPADDR+3*, IPADDR+4*, IPADDR+5, NEXTIP+1~, NEXTIP+2*, NEXTIP+3, NEXTIP+4, NEXTIP+5, NEXTIP+6 |
| XMIP | NEXTIPF+11~, NEXTIPF+12, NEXTIPF+13*, NEXTIPF+14, NEXTIPF+15, IPADDR+1~, IPADDR+6*, IPADDR+8, IPADDR+19, IPADDR+22 , IPADDR+23, NEXTIP~, NEXTIP+2, NEXTIP+3*, NEXTIP+7*, CONNECT~, CONNECT+8, CONNECT+9, CONNECT+11, CONNECT+12 , NEXTIPR~, NEXTIPR+11*, NEXTIPR+12*, NEXTIPR+13, TRYIP~, TRYIP+1, TRYIP+2 |
| XMIPARY | IPADDR+1~, IPADDR+2 |
| XMIPARY( | IPADDR+4, IPADDR+5 |
| XMIPLIST | NEXTIPF~, NEXTIPF+5, NEXTIPF+7*, NEXTIPF+8, NEXTIPF+9, NEXTIPF+10, NEXTIPF+14, IPADDR+1~, IPADDR+19, IPADDR+22* , IPADDR+23*, IPADDR+24, NEXTIP~, NEXTIP+2, NEXTIP+3*, NEXTIP+4*, NEXTIP+5*, NEXTIP+6*, NEXTIP+7*, CONNECT+6~ , CONNECT+9, CONNECT+11, NEXTIPR~, NEXTIPR+7, NEXTIPR+9*, NEXTIPR+10, NEXTIPR+11, NEXTIPR+12*, NEXTIPR+13 |
| XMIPREC | IPADDR+1~, IPADDR+5*, IPADDR+6, IPADDR+9, IPADDR+10, IPADDR+16, IPADDR+20, IPADDR+21 |
| XMIPSITE | IPADDR+1~, IPADDR+10*, IPADDR+15 |
| XMIPT | NEXTIPF~, NEXTIPF+10, NEXTIPF+12, NEXTIPF+13 |
| XMJ | NEXTIPF+11~, NEXTIPF+12*, NEXTIPF+13 |
| XMOK | CONNECT+6~, CONNECT+10*, CONNECT+11, CONNECT+12, TRYIP~, TRYIP+3*, TRYIP+4 |
| XMPORT | CONNECT~, CONNECT+7*, CONNECT+8, TRYIP+2 |
| XMSITE | NEXTIPF~, NEXTIPF+7, IPADDR~, IPADDR+2, IPADDR+15, SAMESITE~, SAMESITE+5, CONNECT~, CONNECT+8, CONNECT+9 , CONNECT+11, NEXTIPR~, NEXTIPR+9 |
| Y | SAMESITE+1~, SAMESITE+4, SAMESITE+5 |
| Y(0 | SAMESITE+5 |
| >> ZTQUEUED | SHOW+1 |