HostNameLookupError.st
author Claus Gittinger <cg@exept.de>
Sat, 02 May 2020 21:40:13 +0200
changeset 5476 7355a4b11cb6
parent 4624 ec2e3e034b79
permissions -rw-r--r--
#FEATURE by cg class: Socket class added: #newTCPclientToHost:port:domain:domainOrder:withTimeout: changed: #newTCPclientToHost:port:domain:withTimeout:
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
4624
ec2e3e034b79 #FEATURE by cg
Claus Gittinger <cg@exept.de>
parents: 3073
diff changeset
     1
"{ Encoding: utf8 }"
ec2e3e034b79 #FEATURE by cg
Claus Gittinger <cg@exept.de>
parents: 3073
diff changeset
     2
1522
7a569eca4d68 copyright
Claus Gittinger <cg@exept.de>
parents: 1472
diff changeset
     3
"
7a569eca4d68 copyright
Claus Gittinger <cg@exept.de>
parents: 1472
diff changeset
     4
 COPYRIGHT (c) 2004 by eXept Software AG
7a569eca4d68 copyright
Claus Gittinger <cg@exept.de>
parents: 1472
diff changeset
     5
              All Rights Reserved
7a569eca4d68 copyright
Claus Gittinger <cg@exept.de>
parents: 1472
diff changeset
     6
7a569eca4d68 copyright
Claus Gittinger <cg@exept.de>
parents: 1472
diff changeset
     7
 This software is furnished under a license and may be used
7a569eca4d68 copyright
Claus Gittinger <cg@exept.de>
parents: 1472
diff changeset
     8
 only in accordance with the terms of that license and with the
7a569eca4d68 copyright
Claus Gittinger <cg@exept.de>
parents: 1472
diff changeset
     9
 inclusion of the above copyright notice.   This software may not
7a569eca4d68 copyright
Claus Gittinger <cg@exept.de>
parents: 1472
diff changeset
    10
 be provided or otherwise made available to, or used by, any
7a569eca4d68 copyright
Claus Gittinger <cg@exept.de>
parents: 1472
diff changeset
    11
 other person.  No title to or ownership of the software is
7a569eca4d68 copyright
Claus Gittinger <cg@exept.de>
parents: 1472
diff changeset
    12
 hereby transferred.
7a569eca4d68 copyright
Claus Gittinger <cg@exept.de>
parents: 1472
diff changeset
    13
"
1472
133213bfc075 *** empty log message ***
Stefan Vogel <sv@exept.de>
parents: 1471
diff changeset
    14
"{ Package: 'stx:libbasic2' }"
1471
124fe8636686 initial checkin
Stefan Vogel <sv@exept.de>
parents:
diff changeset
    15
4624
ec2e3e034b79 #FEATURE by cg
Claus Gittinger <cg@exept.de>
parents: 3073
diff changeset
    16
"{ NameSpace: Smalltalk }"
ec2e3e034b79 #FEATURE by cg
Claus Gittinger <cg@exept.de>
parents: 3073
diff changeset
    17
1471
124fe8636686 initial checkin
Stefan Vogel <sv@exept.de>
parents:
diff changeset
    18
NameLookupError subclass:#HostNameLookupError
124fe8636686 initial checkin
Stefan Vogel <sv@exept.de>
parents:
diff changeset
    19
	instanceVariableNames:''
124fe8636686 initial checkin
Stefan Vogel <sv@exept.de>
parents:
diff changeset
    20
	classVariableNames:''
124fe8636686 initial checkin
Stefan Vogel <sv@exept.de>
parents:
diff changeset
    21
	poolDictionaries:''
124fe8636686 initial checkin
Stefan Vogel <sv@exept.de>
parents:
diff changeset
    22
	category:'Kernel-Exceptions-Errors'
124fe8636686 initial checkin
Stefan Vogel <sv@exept.de>
parents:
diff changeset
    23
!
124fe8636686 initial checkin
Stefan Vogel <sv@exept.de>
parents:
diff changeset
    24
1522
7a569eca4d68 copyright
Claus Gittinger <cg@exept.de>
parents: 1472
diff changeset
    25
!HostNameLookupError class methodsFor:'documentation'!
7a569eca4d68 copyright
Claus Gittinger <cg@exept.de>
parents: 1472
diff changeset
    26
7a569eca4d68 copyright
Claus Gittinger <cg@exept.de>
parents: 1472
diff changeset
    27
copyright
7a569eca4d68 copyright
Claus Gittinger <cg@exept.de>
parents: 1472
diff changeset
    28
"
7a569eca4d68 copyright
Claus Gittinger <cg@exept.de>
parents: 1472
diff changeset
    29
 COPYRIGHT (c) 2004 by eXept Software AG
7a569eca4d68 copyright
Claus Gittinger <cg@exept.de>
parents: 1472
diff changeset
    30
              All Rights Reserved
7a569eca4d68 copyright
Claus Gittinger <cg@exept.de>
parents: 1472
diff changeset
    31
7a569eca4d68 copyright
Claus Gittinger <cg@exept.de>
parents: 1472
diff changeset
    32
 This software is furnished under a license and may be used
7a569eca4d68 copyright
Claus Gittinger <cg@exept.de>
parents: 1472
diff changeset
    33
 only in accordance with the terms of that license and with the
7a569eca4d68 copyright
Claus Gittinger <cg@exept.de>
parents: 1472
diff changeset
    34
 inclusion of the above copyright notice.   This software may not
7a569eca4d68 copyright
Claus Gittinger <cg@exept.de>
parents: 1472
diff changeset
    35
 be provided or otherwise made available to, or used by, any
7a569eca4d68 copyright
Claus Gittinger <cg@exept.de>
parents: 1472
diff changeset
    36
 other person.  No title to or ownership of the software is
7a569eca4d68 copyright
Claus Gittinger <cg@exept.de>
parents: 1472
diff changeset
    37
 hereby transferred.
7a569eca4d68 copyright
Claus Gittinger <cg@exept.de>
parents: 1472
diff changeset
    38
"
7a569eca4d68 copyright
Claus Gittinger <cg@exept.de>
parents: 1472
diff changeset
    39
! !
1471
124fe8636686 initial checkin
Stefan Vogel <sv@exept.de>
parents:
diff changeset
    40
124fe8636686 initial checkin
Stefan Vogel <sv@exept.de>
parents:
diff changeset
    41
!HostNameLookupError class methodsFor:'initialization'!
124fe8636686 initial checkin
Stefan Vogel <sv@exept.de>
parents:
diff changeset
    42
124fe8636686 initial checkin
Stefan Vogel <sv@exept.de>
parents:
diff changeset
    43
initialize
124fe8636686 initial checkin
Stefan Vogel <sv@exept.de>
parents:
diff changeset
    44
124fe8636686 initial checkin
Stefan Vogel <sv@exept.de>
parents:
diff changeset
    45
    NotifierString := 'Cannot resolve host name'
124fe8636686 initial checkin
Stefan Vogel <sv@exept.de>
parents:
diff changeset
    46
! !
124fe8636686 initial checkin
Stefan Vogel <sv@exept.de>
parents:
diff changeset
    47
3073
d5f3b25d9040 Fix HostAddressLookupError
Claus Gittinger <cg@exept.de>
parents: 1522
diff changeset
    48
!HostNameLookupError methodsFor:'accessing'!
d5f3b25d9040 Fix HostAddressLookupError
Claus Gittinger <cg@exept.de>
parents: 1522
diff changeset
    49
4624
ec2e3e034b79 #FEATURE by cg
Claus Gittinger <cg@exept.de>
parents: 3073
diff changeset
    50
hostName
ec2e3e034b79 #FEATURE by cg
Claus Gittinger <cg@exept.de>
parents: 3073
diff changeset
    51
    ^ self nameToLookup
ec2e3e034b79 #FEATURE by cg
Claus Gittinger <cg@exept.de>
parents: 3073
diff changeset
    52
!
ec2e3e034b79 #FEATURE by cg
Claus Gittinger <cg@exept.de>
parents: 3073
diff changeset
    53
3073
d5f3b25d9040 Fix HostAddressLookupError
Claus Gittinger <cg@exept.de>
parents: 1522
diff changeset
    54
nameToLookup
d5f3b25d9040 Fix HostAddressLookupError
Claus Gittinger <cg@exept.de>
parents: 1522
diff changeset
    55
    request notNil ifTrue:[
d5f3b25d9040 Fix HostAddressLookupError
Claus Gittinger <cg@exept.de>
parents: 1522
diff changeset
    56
        ^ request canonicalName.
d5f3b25d9040 Fix HostAddressLookupError
Claus Gittinger <cg@exept.de>
parents: 1522
diff changeset
    57
    ].
d5f3b25d9040 Fix HostAddressLookupError
Claus Gittinger <cg@exept.de>
parents: 1522
diff changeset
    58
    ^ nil.
d5f3b25d9040 Fix HostAddressLookupError
Claus Gittinger <cg@exept.de>
parents: 1522
diff changeset
    59
! !
d5f3b25d9040 Fix HostAddressLookupError
Claus Gittinger <cg@exept.de>
parents: 1522
diff changeset
    60
1471
124fe8636686 initial checkin
Stefan Vogel <sv@exept.de>
parents:
diff changeset
    61
!HostNameLookupError class methodsFor:'documentation'!
124fe8636686 initial checkin
Stefan Vogel <sv@exept.de>
parents:
diff changeset
    62
124fe8636686 initial checkin
Stefan Vogel <sv@exept.de>
parents:
diff changeset
    63
version
4624
ec2e3e034b79 #FEATURE by cg
Claus Gittinger <cg@exept.de>
parents: 3073
diff changeset
    64
    ^ '$Header$'
1471
124fe8636686 initial checkin
Stefan Vogel <sv@exept.de>
parents:
diff changeset
    65
! !
124fe8636686 initial checkin
Stefan Vogel <sv@exept.de>
parents:
diff changeset
    66
3073
d5f3b25d9040 Fix HostAddressLookupError
Claus Gittinger <cg@exept.de>
parents: 1522
diff changeset
    67
1471
124fe8636686 initial checkin
Stefan Vogel <sv@exept.de>
parents:
diff changeset
    68
HostNameLookupError initialize!