KickJava   Java API By Example, From Geeks To Geeks.

Java > Open Source Codes > org > jruby > TopSelfFactory


1 /***** BEGIN LICENSE BLOCK *****
2  * Version: CPL 1.0/GPL 2.0/LGPL 2.1
3  *
4  * The contents of this file are subject to the Common Public
5  * License Version 1.0 (the "License"); you may not use this file
6  * except in compliance with the License. You may obtain a copy of
7  * the License at http://www.eclipse.org/legal/cpl-v10.html
8  *
9  * Software distributed under the License is distributed on an "AS
10  * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
11  * implied. See the License for the specific language governing
12  * rights and limitations under the License.
13  *
14  * Copyright (C) 2002 Jan Arne Petersen <jpetersen@uni-bonn.de>
15  * Copyright (C) 2002-2004 Anders Bengtsson <ndrsbngtssn@yahoo.se>
16  * Copyright (C) 2004 Thomas E Enebo <enebo@acm.org>
17  * Copyright (C) 2004 Stefan Matthias Aust <sma@3plus4.de>
18  *
19  * Alternatively, the contents of this file may be used under the terms of
20  * either of the GNU General Public License Version 2 or later (the "GPL"),
21  * or the GNU Lesser General Public License Version 2.1 or later (the "LGPL"),
22  * in which case the provisions of the GPL or the LGPL are applicable instead
23  * of those above. If you wish to allow use of your version of this file only
24  * under the terms of either the GPL or the LGPL, and not to allow others to
25  * use your version of this file under the terms of the CPL, indicate your
26  * decision by deleting the provisions above and replace them with the notice
27  * and other provisions required by the GPL or the LGPL. If you do not delete
28  * the provisions above, a recipient may use your version of this file under
29  * the terms of any one of the CPL, the GPL or the LGPL.
30  ***** END LICENSE BLOCK *****/

31 package org.jruby;
32
33 import org.jruby.runtime.Arity;
34 import org.jruby.runtime.Block;
35 import org.jruby.runtime.builtin.IRubyObject;
36 import org.jruby.runtime.callback.Callback;
37
38 /**
39  *
40  * @author jpetersen
41  */

42 public final class TopSelfFactory {
43
44     /**
45      * Constructor for TopSelfFactory.
46      */

47     private TopSelfFactory() {
48         super();
49     }
50     
51     public static IRubyObject createTopSelf(final Ruby runtime) {
52         IRubyObject topSelf = new RubyObject(runtime, runtime.getObject());
53         
54         topSelf.defineSingletonMethod("to_s", new Callback() {
55             /**
56              * @see org.jruby.runtime.callback.Callback#execute(IRubyObject, IRubyObject[])
57              */

58             public IRubyObject execute(IRubyObject recv, IRubyObject[] args, Block block) {
59                 return runtime.newString("main");
60             }
61
62             /**
63              * @see org.jruby.runtime.callback.Callback#getArity()
64              */

65             public Arity getArity() {
66                 return Arity.noArguments();
67             }
68         });
69         
70         topSelf.defineSingletonMethod("include", new Callback() {
71             /**
72              * @see org.jruby.runtime.callback.Callback#execute(IRubyObject, IRubyObject[])
73              */

74             public IRubyObject execute(IRubyObject recv, IRubyObject[] args, Block block) {
75                 runtime.secure(4);
76                 return runtime.getObject().include(args);
77             }
78
79             /**
80              * @see org.jruby.runtime.callback.Callback#getArity()
81              */

82             public Arity getArity() {
83                 return Arity.optional();
84             }
85         });
86         
87         topSelf.defineSingletonMethod("public", new Callback() {
88             /**
89              * @see org.jruby.runtime.callback.Callback#execute(IRubyObject, IRubyObject[])
90              */

91             public IRubyObject execute(IRubyObject recv, IRubyObject[] args, Block unusedBlock) {
92                 return runtime.getObject().rbPublic(args);
93             }
94
95             /**
96              * @see org.jruby.runtime.callback.Callback#getArity()
97              */

98             public Arity getArity() {
99                 return Arity.optional();
100             }
101         });
102         
103         topSelf.defineSingletonMethod("private", new Callback() {
104             /**
105              * @see org.jruby.runtime.callback.Callback#execute(IRubyObject, IRubyObject[])
106              */

107             public IRubyObject execute(IRubyObject recv, IRubyObject[] args, Block unusedBlock) {
108                 return runtime.getObject().rbPrivate(args);
109             }
110
111             /**
112              * @see org.jruby.runtime.callback.Callback#getArity()
113              */

114             public Arity getArity() {
115                 return Arity.optional();
116             }
117         });
118         
119         return topSelf;
120     }
121 }
122
Popular Tags