summaryrefslogtreecommitdiff
path: root/packages/cocoaint/src/foundation/NSNetServices.inc
blob: 0a3576fddc2239175dc3d711605bf5012b7d0a8f (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
{ Parsed from Foundation.framework NSNetServices.h }
{ Version: 2.1.4 - Sun Jan 2 15:08:57 CET 2011 }


{$ifdef TYPES}
{$ifndef NSNETSERVICES_PAS_T}
{$define NSNETSERVICES_PAS_T}

{ Constants }

const
  NSNetServicesUnknownError = -72000;
  NSNetServicesCollisionError = -72001;
  NSNetServicesNotFoundError = -72002;
  NSNetServicesActivityInProgress = -72003;
  NSNetServicesBadArgumentError = -72004;
  NSNetServicesCancelledError = -72005;
  NSNetServicesInvalidError = -72006;
  NSNetServicesTimeoutError = -72007;

const
  NSNetServiceNoAutoRename = 1 shl 0;

{ Types }
type
  NSNetServicesError = NSInteger;
  NSNetServicesErrorPtr = ^NSNetServicesError;
  NSNetServiceOptions = NSUInteger;
  NSNetServiceOptionsPtr = ^NSNetServiceOptions;

{$endif}
{$endif}

{$ifdef RECORDS}
{$ifndef NSNETSERVICES_PAS_R}
{$define NSNETSERVICES_PAS_R}

{$endif}
{$endif}

{$ifdef FUNCTIONS}
{$ifndef NSNETSERVICES_PAS_F}
{$define NSNETSERVICES_PAS_F}

{$endif}
{$endif}

{$ifdef EXTERNAL_SYMBOLS}
{$ifndef NSNETSERVICES_PAS_S}
{$define NSNETSERVICES_PAS_S}

{ External string constants }
var
  NSNetServicesErrorCode: NSString; cvar; external;
  NSNetServicesErrorDomain: NSString; cvar; external;

{$endif}
{$endif}

{$ifdef FORWARD}
  NSNetServiceDelegateProtocol = objcprotocol;
  NSNetServiceBrowserDelegateProtocol = objcprotocol;
  NSNetService = objcclass;
  NSNetServicePointer = ^NSNetService;
  NSNetServicePtr = NSNetServicePointer;
  NSNetServiceBrowser = objcclass;
  NSNetServiceBrowserPointer = ^NSNetServiceBrowser;
  NSNetServiceBrowserPtr = NSNetServiceBrowserPointer;

{$endif}

{$ifdef CLASSES}
{$ifndef NSNETSERVICES_PAS_C}
{$define NSNETSERVICES_PAS_C}

{ NSNetService }
  NSNetService = objcclass external (NSObject)
  private
    _netService: id;
    _delegate: id;
    _reserved: id;
    
  public
    function initWithDomain_type_name_port(domain_: NSString; type__: NSString; name_: NSString; port_: cint): id; message 'initWithDomain:type:name:port:';
    function initWithDomain_type_name(domain_: NSString; type__: NSString; name_: NSString): id; message 'initWithDomain:type:name:';
    function delegate: id; message 'delegate';
    procedure setDelegate(delegate_: id); message 'setDelegate:';
    procedure scheduleInRunLoop_forMode(aRunLoop: NSRunLoop; mode: NSString); message 'scheduleInRunLoop:forMode:';
    procedure removeFromRunLoop_forMode(aRunLoop: NSRunLoop; mode: NSString); message 'removeFromRunLoop:forMode:';
    function domain: NSString; message 'domain';
    function type_: NSString; message 'type';
    function name: NSString; message 'name';
    function addresses: NSArray; message 'addresses';
    function port: NSInteger; message 'port';
    procedure publish; message 'publish';
    procedure publishWithOptions(options: NSNetServiceOptions); message 'publishWithOptions:';
    procedure resolve; message 'resolve'; deprecated 'in Mac OS X 10.4 and later';
    procedure stop; message 'stop';
    class function dictionaryFromTXTRecordData(txtData: NSData): NSDictionary; message 'dictionaryFromTXTRecordData:';
    class function dataFromTXTRecordDictionary(txtDictionary: NSDictionary): NSData; message 'dataFromTXTRecordDictionary:';
    function hostName: NSString; message 'hostName';
    procedure resolveWithTimeout(timeout: NSTimeInterval); message 'resolveWithTimeout:';
    function getInputStream_outputStream(inputStream: NSInputStreamPointer; outputStream: NSOutputStreamPointer): Boolean; message 'getInputStream:outputStream:';
    function setTXTRecordData(recordData: NSData): Boolean; message 'setTXTRecordData:';
    function TXTRecordData: NSData; message 'TXTRecordData';
    procedure startMonitoring; message 'startMonitoring';
    procedure stopMonitoring; message 'stopMonitoring';
  end;

{ NSNetServiceBrowser }
  NSNetServiceBrowser = objcclass external (NSObject)
  private
    _netServiceBrowser: id;
    _delegate: id;
    _reserved: Pointer;
    
  public
    function init: id; message 'init';
    function delegate: id; message 'delegate';
    procedure setDelegate(delegate_: id); message 'setDelegate:';
    procedure scheduleInRunLoop_forMode(aRunLoop: NSRunLoop; mode: NSString); message 'scheduleInRunLoop:forMode:';
    procedure removeFromRunLoop_forMode(aRunLoop: NSRunLoop; mode: NSString); message 'removeFromRunLoop:forMode:';
    procedure searchForBrowsableDomains; message 'searchForBrowsableDomains';
    procedure searchForRegistrationDomains; message 'searchForRegistrationDomains';
    procedure searchForServicesOfType_inDomain(type_: NSString; domainString: NSString); message 'searchForServicesOfType:inDomain:';
    procedure stop; message 'stop';
  end;

{ NSDeprecated_NSNetServiceCategory }
  NSDeprecated_NSNetServiceCategory = objccategory external name 'NSDeprecated' (NSNetService)
    function protocolSpecificInformation: NSString; message 'protocolSpecificInformation'; deprecated 'in Mac OS X 10.4 and later';
    procedure setProtocolSpecificInformation(specificInformation: NSString); message 'setProtocolSpecificInformation:'; deprecated 'in Mac OS X 10.4 and later';
  end;

{ NSDeprecated_NSNetServiceBrowserCategory }
  NSDeprecated_NSNetServiceBrowserCategory = objccategory external name 'NSDeprecated' (NSNetServiceBrowser)
    procedure searchForAllDomains; message 'searchForAllDomains'; deprecated 'in Mac OS X 10.4 and later';
  end;

{$endif}
{$endif}
{$ifdef PROTOCOLS}
{$ifndef NSNETSERVICES_PAS_P}
{$define NSNETSERVICES_PAS_P}
  
{ NSNetServiceDelegate Protocol }
  NSNetServiceDelegateProtocol = objcprotocol external name 'NSNetServiceDelegate'
    procedure netServiceWillPublish(sender: NSNetService); message 'netServiceWillPublish:';
    procedure netServiceDidPublish(sender: NSNetService); message 'netServiceDidPublish:';
    procedure netService_didNotPublish(sender: NSNetService; errorDict: NSDictionary); message 'netService:didNotPublish:';
    procedure netServiceWillResolve(sender: NSNetService); message 'netServiceWillResolve:';
    procedure netServiceDidResolveAddress(sender: NSNetService); message 'netServiceDidResolveAddress:';
    procedure netService_didNotResolve(sender: NSNetService; errorDict: NSDictionary); message 'netService:didNotResolve:';
    procedure netServiceDidStop(sender: NSNetService); message 'netServiceDidStop:';
    procedure netService_didUpdateTXTRecordData(sender: NSNetService; data: NSData); message 'netService:didUpdateTXTRecordData:';
  end;
  
{ NSNetServiceBrowserDelegate Protocol }
  NSNetServiceBrowserDelegateProtocol = objcprotocol external name 'NSNetServiceBrowserDelegate'
    procedure netServiceBrowserWillSearch(aNetServiceBrowser: NSNetServiceBrowser); message 'netServiceBrowserWillSearch:';
    procedure netServiceBrowserDidStopSearch(aNetServiceBrowser: NSNetServiceBrowser); message 'netServiceBrowserDidStopSearch:';
    procedure netServiceBrowser_didNotSearch(aNetServiceBrowser: NSNetServiceBrowser; errorDict: NSDictionary); message 'netServiceBrowser:didNotSearch:';
    procedure netServiceBrowser_didFindDomain_moreComing(aNetServiceBrowser: NSNetServiceBrowser; domainString: NSString; moreComing: Boolean); message 'netServiceBrowser:didFindDomain:moreComing:';
    procedure netServiceBrowser_didFindService_moreComing(aNetServiceBrowser: NSNetServiceBrowser; aNetService: NSNetService; moreComing: Boolean); message 'netServiceBrowser:didFindService:moreComing:';
    procedure netServiceBrowser_didRemoveDomain_moreComing(aNetServiceBrowser: NSNetServiceBrowser; domainString: NSString; moreComing: Boolean); message 'netServiceBrowser:didRemoveDomain:moreComing:';
    procedure netServiceBrowser_didRemoveService_moreComing(aNetServiceBrowser: NSNetServiceBrowser; aNetService: NSNetService; moreComing: Boolean); message 'netServiceBrowser:didRemoveService:moreComing:';
  end;
{$endif}
{$endif}