This documentation is archived and is not being maintained.
IChannelReceiver Interface
Visual Studio 2008
Provides required functions and properties for the receiver channels.
Assembly: mscorlib (in mscorlib.dll)
Class MyCustomChannel Implements IChannelReceiver Private myChannelData As ChannelDataStore Private myChannelPriority As Integer = 25 ' Set the 'ChannelName' to 'MyCustomChannel'. Private myChanneName As String = "tcp" ' Implement 'ChannelName' property. Private myTcpListener As TcpListener Private myPortNo As Integer Private myListening As Boolean = False Private myThread As Thread Public Sub New(ByVal portNo As Integer) myPortNo = portNo Dim myURI(0) As String myURI(0) = Dns.Resolve(Dns.GetHostName()).AddressList(0).ToString() + ":" + _ portNo.ToString() ' Store the 'URI' in 'myChannelDataStore'. myChannelData = New ChannelDataStore(myURI) ' Create 'myTcpListener' to listen at the 'myPortNo' port. myTcpListener = New TcpListener(myPortNo) ' Create the thread 'myThread'. myThread = New Thread(New ThreadStart(AddressOf myTcpListener.Start)) Me.StartListening(Nothing) End Sub 'New Public ReadOnly Property ChannelName() As String Implements IChannelReceiver.ChannelName Get Return myChanneName End Get End Property Public ReadOnly Property ChannelPriority() As Integer _ Implements IChannelReceiver.ChannelPriority Get Return myChannelPriority End Get End Property Public Function Parse(ByVal myUrl As String, ByRef objectURI As String) As String _ Implements IChannelReceiver.Parse Dim myRegex As New Regex("/", RegexOptions.RightToLeft) ' Check for '/' in 'myUrl' from Right to left. Dim myMatch As Match = myRegex.Match(myUrl) ' Get the object URI. objectURI = myUrl.Substring(myMatch.Index) ' Return the channel url. Return myUrl.Substring(0, myMatch.Index) End Function 'Parse ' Implementation of 'IChannelReceiver' interface. Public ReadOnly Property ChannelData() As Object Implements IChannelReceiver.ChannelData Get Return myChannelData End Get End Property ' Create and send the object URL. Public Function GetUrlsForUri(ByVal objectURI As String) As String() _ Implements IChannelReceiver.GetUrlsForUri Dim myString(0) As String myString(0) = Dns.Resolve(Dns.GetHostName()).AddressList(0).ToString() + "/" + objectURI Return myString End Function 'GetUrlsForUri ' Start listening to the port. Public Sub StartListening(ByVal data As Object) Implements IChannelReceiver.StartListening If myListening = False Then myTcpListener.Start() myListening = True Console.WriteLine("Server Started Listening !!!") End If End Sub 'StartListening ' Stop listening to the port. Public Sub StopListening(ByVal data As Object) Implements IChannelReceiver.StopListening If myListening = True Then myTcpListener.Stop() myListening = False Console.WriteLine("Server Stopped Listening !!!") End If End Sub 'StopListening End Class 'MyCustomChannel
__gc class MyCustomChannel : public IChannelReceiver
{
private:
ChannelDataStore* myChannelData;
int myChannelPriority;
// Set the 'ChannelName' to 'MyCustomChannel'.
String* myChannelName;
// Implement 'ChannelName' property.
TcpListener* myTcpListener;
int myPortNo;
bool myListening;
Thread* myThread;
public:
MyCustomChannel() : myChannelPriority(25), myChannelName(S"tcp"), myListening(false) {}
MyCustomChannel(int portNo)
{
myPortNo = portNo;
String* myURI[] = new String*[1];
myURI[0] = String::Concat( Dns::Resolve(Dns::GetHostName())->AddressList[0], S":", __box(portNo));
// Store the 'URI' in 'myChannelDataStore'.
myChannelData = new ChannelDataStore(myURI);
// Create 'myTcpListener' to listen at the 'myPortNo' port.
myTcpListener = new TcpListener(myPortNo);
// Create the thread 'myThread'.
myThread = new Thread(new ThreadStart(myTcpListener, &TcpListener::Start));
this->StartListening(0);
}
__property String* get_ChannelName()
{
return myChannelName;
}
__property int get_ChannelPriority()
{
return myChannelPriority;
}
String* Parse(String* myUrl, [Out]String** objectURI)
{
Regex* myRegex = new Regex(S"/",RegexOptions::RightToLeft);
// Check for '/' in 'myUrl' from Right to left.
Match* myMatch = myRegex->Match(myUrl);
// Get the object URI.
*objectURI = myUrl->Substring(myMatch->Index);
// Return the channel url.
return myUrl->Substring(0,myMatch->Index);
}
// Implementation of 'IChannelReceiver' interface.
__property Object* get_ChannelData()
{
return myChannelData;
}
// Create and send the object URL.
String*GetUrlsForUri(String* objectURI)[]
{
String* myString[] = new String*[1];
myString[0] = String::Concat( Dns::Resolve(Dns::GetHostName())->AddressList[0], S"/", objectURI );
return myString;
}
// Start listening to the port.
void StartListening(Object* data)
{
if(myListening == false)
{
myTcpListener->Start();
myListening = true;
Console::WriteLine(S"Server Started Listening !!!");
}
}
// Stop listening to the port.
void StopListening(Object* data)
{
if(myListening == true)
{
myTcpListener->Stop();
myListening = false;
Console::WriteLine(S"Server Stopped Listening !!!");
}
}
};
Windows 7, Windows Vista, Windows XP SP2, Windows XP Media Center Edition, Windows XP Professional x64 Edition, Windows XP Starter Edition, Windows Server 2008 R2, Windows Server 2008, Windows Server 2003, Windows Server 2000 SP4, Windows Millennium Edition, Windows 98
The .NET Framework and .NET Compact Framework do not support all versions of every platform. For a list of the supported versions, see .NET Framework System Requirements.
Show: