XMXADDRD ;ISC-SF/GMB-Lookup Domain Name ;04/24/2002 10:36
Source file <XMXADDRD.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
VIA(XMVIA,XMVIAREC,XMVIAN,XMDCIRCL) | ;
|
|
FINDDOMN | ; Look up domain
|
|
CHKNAME | ; Input transform for .01 field of DOMAIN file 4.2
|
|
FORUM() | ; Is this FORUM or GATEWAY?
|
|
CHKDOM(XMDOM,XMMAXDOM,XMMAXDOT) | ;
|
|
DNS(XMDUZ,XMDOMAIN,XMVIA,XMVIAN) | ;
; XMDOMAIN - (in/out) Domain name. May be mixed case. Must already be ; in xxx.xxx.xxx format. ; XMVIA - (out) IEN of (relay) domain (in ^DIC(4.2)) ; XMVIAN - (out) Name of (relay) domain |
|
CHKPRMIT(XMDUZ,XMVIAREC) | ;
|
|
NEEDSUB(X) | ;
|
|
LOOKSFX | ; Look for top level domain in internet suffix file
; Instead of looking in the file, we could call the COTS DNS, if it exists. |
Name | Field # of Occurrence |
---|---|
EN^DDIOL | VIA+5, CHKDOM+17, LOOKSFX+4, CHKNAME+11 |
$$EZBLD^DIALOG | DNS+16, DNS+17, VIA+5, CHKDOM+17, LOOKSFX+4, CHKNAME+11 |
BLD^DIALOG | NEEDSUB+6 |
MSG^DIALOG | NEEDSUB+7 |
^DIC | LOOKSFX+9 |
$$FIND1^DIC | FINDDOMN+15, FINDDOMN+24, FINDDOMN+27, VIA+19, LOOKSFX+12 |
IX^DIC | FINDDOMN+9 |
MIX^DIC1 | FINDDOMN+6 |
$$UP^XLFSTR | DNS+7, CHKNAME+3 |
SETERR^XMXADDR4 | DNS+14, FINDDOMN+14, FINDDOMN+28, FINDDOMN+31, FINDDOMN+37, NEEDSUB+1, VIA+7, CHKDOM+4, CHKDOM+8, CHKDOM+15 , LOOKSFX+15, CHKPRMIT+3, CHKPRMIT+7 |
WRIERR^XMXADDR4 | CHKNAME+6 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^DIC(4.2 - [#4.2] | Classic Fileman Calls, FIND1^DIC |
^DIC(4.2996 - [#4.2996] | Classic Fileman Calls, FIND1^DIC |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(4.2 - [#4.2] | VIA+10, VIA+13, VIA+16, VIA+26, VIA+28, LOOKSFX+13 |
^DIC(4.2996 - [#4.2996] | CHKNAME+10 |
^XMB("NETNAME" | DNS+6, FORUM+1 |
^XMB("NUM" | DNS+9, VIA+24, VIA+25 |
^XMB("PARENT" | VIA+23, VIA+25, VIA+26, VIA+27, LOOKSFX+11 |
^XUSEC( | CHKPRMIT+5 |
Name | Line Occurrences |
---|---|
$$FORUM | DNS+13, LOOKSFX+12 |
CHKDOM | FINDDOMN+12, FINDDOMN+35, CHKNAME+4 |
CHKPRMIT | VIA+3 |
FINDDOMN | DNS+11 |
LOOKSFX | FINDDOMN+33 |
NEEDSUB | FINDDOMN+15, FINDDOMN+34 |
VIA | FINDDOMN+20, VIA+11 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> D | FINDDOMN+6*, FINDDOMN+9* |
DIC | FINDDOMN+1~, FINDDOMN+5*, LOOKSFX+2~, LOOKSFX+7* |
DIC("W" | LOOKSFX+8* |
DIC(0 | FINDDOMN+5*, FINDDOMN+9*, LOOKSFX+5*, LOOKSFX+6* |
>> DIERR | FINDDOMN+24, FINDDOMN+26 |
>> DIFROM | CHKNAME+8 |
>> DTOUT | FINDDOMN+6, FINDDOMN+29 |
>> DUOUT | FINDDOMN+6, FINDDOMN+29, FINDDOMN+31 |
I | CHKDOM+1~, CHKDOM+10*, CHKDOM+11, CHKDOM+15, CHKNAME+1~, CHKNAME+9*, CHKNAME+10 |
U | DNS+17, VIA+1, VIA+8, VIA+10, VIA+12, VIA+16, VIA+29, LOOKSFX+14, CHKPRMIT+2, CHKPRMIT+3 , CHKPRMIT+5, CHKPRMIT+7 |
X | FINDDOMN+1~, FINDDOMN+2*, FINDDOMN+6, FINDDOMN+7, FINDDOMN+8*, FINDDOMN+9, FINDDOMN+14, FINDDOMN+15, FINDDOMN+16, FINDDOMN+21 , FINDDOMN+22~, FINDDOMN+23*, FINDDOMN+24, FINDDOMN+25*, FINDDOMN+27, FINDDOMN+28, FINDDOMN+32, FINDDOMN+34, FINDDOMN+36, FINDDOMN+37 , NEEDSUB~, NEEDSUB+1, NEEDSUB+6, VIA+17~, VIA+18*, VIA+19, VIA+20*, LOOKSFX+15, CHKNAME+3*, CHKNAME+4 , CHKNAME+7!, CHKNAME+9, CHKNAME+10, CHKNAME+12! |
XMDCIRCL | FINDDOMN+1~, FINDDOMN+20, VIA~, VIA+11 |
XMDCIRCL( | VIA+4, VIA+9* |
XMDOM | CHKDOM~, CHKDOM+2, CHKDOM+6, CHKDOM+10, CHKDOM+11 |
XMDOMAIN | DNS~, DNS+7*, DNS+8, DNS+14, DNS+16, FINDDOMN+2, FINDDOMN+16*, FINDDOMN+23, FINDDOMN+34 |
XMDUZ | DNS~, VIA+3, CHKPRMIT~, CHKPRMIT+5 |
XMERROR | DNS+12, FINDDOMN+11, FINDDOMN+12, FINDDOMN+21, FINDDOMN+33, VIA+3, CHKDOM+10, CHKNAME+1~, CHKNAME+5 |
XMFLAGS | FINDDOMN+1~, FINDDOMN+4*, FINDDOMN+5, LOOKSFX+5 |
>> XMGCIRCL | FINDDOMN+4 |
XMIA | DNS+14, DNS+15, FINDDOMN+4, FINDDOMN+9, FINDDOMN+14, FINDDOMN+21, FINDDOMN+37, NEEDSUB+2, VIA+5, VIA+7 , CHKDOM+4, CHKDOM+8, CHKDOM+15, CHKDOM+16, LOOKSFX+3, LOOKSFX+8, LOOKSFX+15, CHKPRMIT+3, CHKPRMIT+7, CHKNAME+1~ , CHKNAME+2* |
>> XMINSTR("ADDR | FLAGS" , CHKPRMIT+1, CHKPRMIT+4 |
>> XMINSTR("EXACT" | FINDDOMN+4 |
XMMAXDOM | CHKDOM~, CHKDOM+5*, CHKDOM+6, CHKDOM+8 |
XMMAXDOT | CHKDOM~, CHKDOM+9*, CHKDOM+12, CHKDOM+15 |
XMNETNAM | DNS+5~, DNS+6*, DNS+8, DNS+10, DNS+17, FORUM+1, FINDDOMN+6, FINDDOMN+13, FINDDOMN+21, FINDDOMN+36 , VIA+2, VIA+14, VIA+16 |
>> XMRESTR("NET | RECEIVE" , CHKPRMIT+1 |
XMSUBDOM | FINDDOMN+1~, FINDDOMN+2*, FINDDOMN+7*, FINDDOMN+11, FINDDOMN+12, FINDDOMN+14, FINDDOMN+15, FINDDOMN+16, FINDDOMN+35, FINDDOMN+37 , CHKDOM+1~, CHKDOM+11*, CHKDOM+12, CHKDOM+15, CHKDOM+17 |
XMTEXT | NEEDSUB+5~ |
XMVIA | DNS~, DNS+9*, FINDDOMN+18*, FINDDOMN+20, VIA~, VIA+4, VIA+9, VIA+10*, VIA+11, VIA+13 , VIA+27*, VIA+28, LOOKSFX+10, LOOKSFX+11*, LOOKSFX+12*, LOOKSFX+13 |
XMVIAN | DNS~, DNS+10*, DNS+13, DNS+16, DNS+17, FINDDOMN+20, VIA~, VIA+1*, VIA+2, VIA+7 , VIA+11, VIA+14, VIA+16, VIA+18, VIA+29*, LOOKSFX+14* |
XMVIAREC | DNS+5~, DNS+17, FINDDOMN+19*, FINDDOMN+20, VIA~, VIA+1, VIA+3, VIA+8, VIA+10*, VIA+11 , VIA+12, VIA+28*, VIA+29, LOOKSFX+13*, LOOKSFX+14, CHKPRMIT~, CHKPRMIT+2, CHKPRMIT+3, CHKPRMIT+5, CHKPRMIT+7 |
Y | FINDDOMN+1~, FINDDOMN+6, FINDDOMN+9, FINDDOMN+10, FINDDOMN+18, FINDDOMN+22~, FINDDOMN+24*, FINDDOMN+26, VIA+15~, VIA+16 , VIA+19*, LOOKSFX+2~, LOOKSFX+10 |
Y(0 | FINDDOMN+13, FINDDOMN+16, FINDDOMN+19 |