import testsuite

git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/base/trunk@32187 72102866-910b-0410-8b05-ffd578937521

Tests/base/NSFileHandle/socket.m

@@ -0,0 +1,100 @@
+#if	defined(GNUSTEP_BASE_LIBRARY)
+/*
+   Copyright (C) 2005 Free Software Foundation, Inc.
+
+   Written by: David Ayers <d.ayers@inode.at>
+   Date: November 2005
+   
+   This file is part of the GNUstep Base Library.
+
+   This library is free software; you can redistribute it and/or
+   modify it under the terms of the GNU Lesser General Public
+   License as published by the Free Software Foundation; either
+   version 2 of the License, or (at your option) any later version.
+   
+   This library is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+   Library General Public License for more details.
+
+   You should have received a copy of the GNU Library General Public
+   License along with this library; if not, write to the Free
+   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111 USA.
+  
+*/
+#import "Testing.h"
+#import "ObjectTesting.h"
+#import <Foundation/Foundation.h>
+
+#define GST_PORT @"32329"
+
+NSFileHandle *rFH = nil;
+
+@interface Handler : NSObject
+@end
+@implementation Handler
+- (id)init
+{
+  if ((self = [super init]))
+    {
+      NSNotificationCenter *nc = [NSNotificationCenter defaultCenter];
+      [nc addObserver: self
+	  selector: @selector(connect:)
+	  name: NSFileHandleConnectionAcceptedNotification
+	  object: nil];
+    }
+  return self;
+}
+- (void)connect:(NSNotification *)notif
+{
+  NSDictionary *d = [notif userInfo];
+NSLog(@"%@", notif);
+  rFH = [[d objectForKey: NSFileHandleNotificationFileHandleItem] retain];
+}
+@end
+
+int main()
+{
+  NSAutoreleasePool   *arp = [NSAutoreleasePool new];
+  Handler *h;
+  NSFileHandle *sFH, *cFH;
+  NSData *wData = [@"Socket Test" dataUsingEncoding:NSASCIIStringEncoding];
+  NSData *rData;
+  /* Note that the above data should be short enough to fit into the
+     socket send buffer otherwise we risk being blocked in this single
+     threaded process.  */
+
+  h = [[Handler new] autorelease];
+
+  sFH = [NSFileHandle fileHandleAsServerAtAddress: @"127.0.0.1"
+		       service: GST_PORT
+		       protocol: @"tcp"];
+  PASS([sFH isKindOfClass:[NSFileHandle class]],
+       "NSFileHandle understands +fileHandleAsServerAtAddress:");
+
+  [sFH acceptConnectionInBackgroundAndNotify];
+
+  
+  cFH = [NSFileHandle fileHandleAsClientAtAddress: @"127.0.0.1"
+		      service: GST_PORT
+		      protocol: @"tcp"];
+  PASS([cFH isKindOfClass:[NSFileHandle class]],
+       "NSFileHandle understands +fileHandleAsClientAtAddress:");
+
+  [cFH writeData: wData];
+  [[NSRunLoop currentRunLoop] run];
+  PASS(rFH != nil, "NSFileHandle connection was made");
+
+  rData = [rFH availableData];
+  PASS([wData isEqual: rData],
+       "NSFileHandle -writeData:/-availableData match with socket");
+
+  [arp release]; arp = nil;
+  return 0;
+}
+#else
+int main()
+{
+  return 0;
+}
+#endif