1 // Tags: not-a-test |
|
2 // Copyright (c) Object Oriented Concepts, Inc. Billerica, MA, USA |
|
3 |
|
4 // Adapted for Mauve by Audrius Meskauskas <audriusa@bluewin.ch> |
|
5 |
|
6 // This file is part of Mauve. |
|
7 |
|
8 // Mauve is free software; you can redistribute it and/or modify |
|
9 // it under the terms of the GNU General Public License as published by |
|
10 // the Free Software Foundation; either version 2, or (at your option) |
|
11 // any later version. |
|
12 |
|
13 // Mauve is distributed in the hope that it will be useful, |
|
14 // but WITHOUT ANY WARRANTY; without even the implied warranty of |
|
15 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
|
16 // GNU General Public License for more details. |
|
17 |
|
18 // You should have received a copy of the GNU General Public License |
|
19 // along with Mauve; see the file COPYING. If not, write to |
|
20 // the Free Software Foundation, 59 Temple Place - Suite 330, |
|
21 // Boston, MA 02111-1307, USA. |
|
22 |
|
23 /* |
|
24 This code originally came from the OMG's CORBA Open Source Testing project, |
|
25 which lived at cost.omg.org. That site no longer exists. |
|
26 |
|
27 All the contributing companies agreed to release their tests under the |
|
28 terms of the GNU Lesser General Public License, available in the file |
|
29 COPYING.LIB. |
|
30 |
|
31 The code has been modified integrating into Mauve test environment and |
|
32 removing tests that are not yet supported by Suns jre 1.4. Hence the license |
|
33 is now GPL. |
|
34 |
|
35 We downloaded the code from http://sourceforge.net/projects/corba-cost/, |
|
36 administrated by Duncan Grisby. |
|
37 */ |
|
38 |
|
39 package gnu.testlet.org.omg.PortableServer.POA; |
|
40 |
|
41 import org.omg.CORBA.BAD_PARAM; |
|
42 import org.omg.CORBA.ORB; |
|
43 import org.omg.CORBA.TypeCode; |
|
44 import org.omg.CORBA.portable.Delegate; |
|
45 import org.omg.CORBA.portable.ObjectImpl; |
|
46 |
|
47 public abstract class TestLocationForwardHelper |
|
48 { |
|
49 private static String _id = "IDL:test/poa/TestLocationForward:1.0"; |
|
50 |
|
51 public static TypeCode type() |
|
52 { |
|
53 return ORB.init().create_interface_tc(TestLocationForwardHelper.id(), |
|
54 "TestLocationForward" |
|
55 ); |
|
56 } |
|
57 |
|
58 public static String id() |
|
59 { |
|
60 return _id; |
|
61 } |
|
62 |
|
63 public static TestLocationForward narrow(org.omg.CORBA.Object obj) |
|
64 { |
|
65 if (obj == null) |
|
66 return null; |
|
67 else if (obj instanceof TestLocationForward) |
|
68 return (TestLocationForward) obj; |
|
69 else if (!obj._is_a(id())) |
|
70 throw new BAD_PARAM(); |
|
71 else |
|
72 { |
|
73 Delegate delegate = ((ObjectImpl) obj)._get_delegate(); |
|
74 _TestLocationForwardStub stub = new _TestLocationForwardStub(); |
|
75 stub._set_delegate(delegate); |
|
76 return stub; |
|
77 } |
|
78 } |
|
79 } |
|