libs-base/Tests/base/NSHost/create.m
Richard Frith-MacDonald afc6974925 Provisional IPv6 support added.
git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/base/trunk@33933 72102866-910b-0410-8b05-ffd578937521
2011-10-03 16:03:19 +00:00

40 lines
1.1 KiB
Objective-C

#import "ObjectTesting.h"
#import <Foundation/NSHost.h>
#import <Foundation/NSAutoreleasePool.h>
#import <Foundation/NSString.h>
int main()
{
NSAutoreleasePool *arp = [NSAutoreleasePool new];
NSHost *current;
NSHost *localh;
NSHost *tmp;
current = [NSHost currentHost];
PASS(current != nil && [current isKindOfClass: [NSHost class]],
"NSHost understands +currentHost");
#if defined(GNUSTEP_BASE_LIBRARY)
localh = [NSHost localHost];
PASS(localh != nil && [localh isKindOfClass: [NSHost class]],
"NSHost understands +localHost");
#else
localh = current;
#endif
tmp = [NSHost hostWithName: @"::1"];
PASS([[tmp address] isEqual: @"::1"], "+hostWithName: works for IPV6 addr");
tmp = [NSHost hostWithName: [current name]];
PASS([tmp isEqualToHost: current], "NSHost understands +hostWithName:");
tmp = [NSHost hostWithAddress: [current address]];
PASS([tmp isEqualToHost: current], "NSHost understands +hostWithAddress:");
tmp = [NSHost hostWithName: @"127.0.0.1"];
PASS(tmp != nil && [tmp isEqualToHost: localh],
"NSHost understands [+hostWithName: 127.0.0.1]");
[arp release]; arp = nil;
return 0;
}