TopSelfFactory.java

  1. /***** BEGIN LICENSE BLOCK *****
  2.  * Version: EPL 1.0/GPL 2.0/LGPL 2.1
  3.  *
  4.  * The contents of this file are subject to the Eclipse 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/epl-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 EPL, 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 EPL, the GPL or the LGPL.
  30.  ***** END LICENSE BLOCK *****/
  31. package org.jruby;

  32. import org.jruby.internal.runtime.methods.JavaMethod;
  33. import org.jruby.runtime.ThreadContext;
  34. import org.jruby.runtime.Visibility;
  35. import org.jruby.runtime.builtin.IRubyObject;

  36. /**
  37.  *
  38.  * @author jpetersen
  39.  */
  40. public final class TopSelfFactory {

  41.     /**
  42.      * Constructor for TopSelfFactory.
  43.      */
  44.     private TopSelfFactory() {
  45.         super();
  46.     }
  47.    
  48.     public static IRubyObject createTopSelf(final Ruby runtime) {
  49.         IRubyObject topSelf = new RubyObject(runtime, runtime.getObject());
  50.        
  51.         topSelf.getSingletonClass().addMethod("to_s", new JavaMethod.JavaMethodZero(topSelf.getSingletonClass(), Visibility.PUBLIC) {
  52.             @Override
  53.             public IRubyObject call(ThreadContext context, IRubyObject self, RubyModule clazz, String name) {
  54.                 return runtime.newString("main");
  55.             }
  56.         });
  57.         topSelf.getSingletonClass().defineAlias("inspect", "to_s");
  58.        
  59.         // The following three methods must be defined fast, since they expect to modify the current frame
  60.         // (i.e. they expect no frame will be allocated for them). JRUBY-1185.
  61.         topSelf.getSingletonClass().addMethod("include", new JavaMethod.JavaMethodN(topSelf.getSingletonClass(), Visibility.PRIVATE) {
  62.             @Override
  63.             public IRubyObject call(ThreadContext context, IRubyObject self, RubyModule clazz, String name, IRubyObject[] args) {
  64.                 return context.runtime.getObject().include(args);
  65.             }
  66.         });
  67.        
  68.         topSelf.getSingletonClass().addMethod("public", new JavaMethod.JavaMethodN(topSelf.getSingletonClass(), Visibility.PRIVATE) {
  69.             @Override
  70.             public IRubyObject call(ThreadContext context, IRubyObject self, RubyModule clazz, String name, IRubyObject[] args) {
  71.                 return context.runtime.getObject().rbPublic(context, args);
  72.             }
  73.         });
  74.        
  75.         topSelf.getSingletonClass().addMethod("private", new JavaMethod.JavaMethodN(topSelf.getSingletonClass(), Visibility.PRIVATE) {
  76.             @Override
  77.             public IRubyObject call(ThreadContext context, IRubyObject self, RubyModule clazz, String name, IRubyObject[] args) {
  78.                 return context.runtime.getObject().rbPrivate(context, args);
  79.             }
  80.         });
  81.        
  82.         return topSelf;
  83.     }
  84. }