New test.
[mono.git] / mcs / class / corlib / System.Runtime.Remoting / WellKnownClientTypeEntry.cs
1 //
2 // System.Runtime.Remoting.WellKnownClientTypeEntry.cs
3 //
4 // AUthor: Duncan Mak  (duncan@ximian.com)
5 //
6 // 2002 (C) Copyright. Ximian, Inc.
7 //
8
9 //
10 // Copyright (C) 2004 Novell, Inc (http://www.novell.com)
11 //
12 // Permission is hereby granted, free of charge, to any person obtaining
13 // a copy of this software and associated documentation files (the
14 // "Software"), to deal in the Software without restriction, including
15 // without limitation the rights to use, copy, modify, merge, publish,
16 // distribute, sublicense, and/or sell copies of the Software, and to
17 // permit persons to whom the Software is furnished to do so, subject to
18 // the following conditions:
19 // 
20 // The above copyright notice and this permission notice shall be
21 // included in all copies or substantial portions of the Software.
22 // 
23 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
24 // EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
25 // MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
26 // NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
27 // LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
28 // OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
29 // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
30 //
31
32 using System;
33 using System.Reflection;
34
35 namespace System.Runtime.Remoting {
36
37         public class WellKnownClientTypeEntry : TypeEntry
38         {
39                 Type obj_type;
40                 string obj_url;
41                 string app_url = null;
42                 
43                 public WellKnownClientTypeEntry (Type type, string objectUrl )
44                 {
45                         AssemblyName = type.Assembly.FullName;
46                         TypeName = type.FullName;
47                         obj_type = type;
48                         obj_url = objectUrl;
49                 }
50
51                 public WellKnownClientTypeEntry (string typeName, string assemblyName, string objectUrl)
52                 {
53                         obj_url = objectUrl;
54                         AssemblyName = assemblyName;
55                         TypeName = typeName;
56                         Assembly a = Assembly.Load (assemblyName);
57                         obj_type = a.GetType (typeName);
58                         if (obj_type == null) 
59                                 throw new RemotingException ("Type not found: " + typeName + ", " + assemblyName);
60                 }
61
62                 public string ApplicationUrl {
63                         get { return app_url; }
64                         set { app_url = value; }
65                 }
66
67                 public Type ObjectType {
68                         get { return obj_type; }
69                 }
70
71                 public string ObjectUrl {
72                         get { return obj_url; }
73                 }
74
75                 public override string ToString ()
76                 {
77                         if (ApplicationUrl != null)
78                                 return TypeName + AssemblyName + ObjectUrl + ApplicationUrl;
79                         else
80                                 return TypeName + AssemblyName + ObjectUrl;
81                 }
82         }
83 }