org.renjin.desktop.MainFrame.java Source code

Introduction

Here is the source code for org.renjin.desktop.MainFrame.java

Source

/*
 * R : A Computer Language for Statistical Data Analysis
 * Copyright (C) 1995, 1996  Robert Gentleman and Ross Ihaka
 * Copyright (C) 1997--2008  The R Development Core Team
 * Copyright (C) 2003, 2004  The R Foundation
 * Copyright (C) 2010 bedatadriven
 *
 * This program is free software: you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation, either version 3 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program.  If not, see <http://www.gnu.org/licenses/>.
 */

package org.renjin.desktop;

import java.awt.BorderLayout;
import java.awt.Color;
import java.io.PrintWriter;

import javax.swing.JDesktopPane;
import javax.swing.JFrame;
import javax.swing.JInternalFrame;
import javax.swing.UIManager;

import org.apache.commons.vfs2.FileSystemException;
import org.renjin.cli.Console;
import org.renjin.cli.Interpreter;
import org.renjin.eval.Context;

public class MainFrame extends JFrame {

    JConsole console;

    public MainFrame() {
        super("Renjin");
        setDefaultCloseOperation(JFrame.EXIT_ON_CLOSE);

        JDesktopPane desktop = new JDesktopPane();
        desktop.setBackground(new Color(171, 171, 171));

        JInternalFrame internalFrame = new JInternalFrame("R Console", true, true, true, true);
        console = new JConsole();

        internalFrame.add(console, BorderLayout.CENTER);
        internalFrame.setBounds(25, 25, 600, 300);
        internalFrame.setVisible(true);

        desktop.add(internalFrame);

        add(desktop, BorderLayout.CENTER);

        setSize(650, 450);
        setVisible(true);
    }

    private Console getConsole() {
        return console;
    }

    public static void main(String[] args) throws FileSystemException {

        loadNativeLookAndFeel();

        MainFrame mainFrame = new MainFrame();

        Context topLevelContext = Context.newTopLevelContext();
        topLevelContext.getSession().setStdOut(new PrintWriter(mainFrame.getConsole().getOut()));
        //topLevelContext.getGlobals().setSessionController(new CliSessionController(mainFrame.));

        Interpreter interpreter = new Interpreter(mainFrame.getConsole(), topLevelContext);
        new Thread(interpreter).start();
    }

    private static void loadNativeLookAndFeel() {
        try {
            UIManager.setLookAndFeel(UIManager.getSystemLookAndFeelClassName());
        } catch (Exception e) {
            e.printStackTrace();
        }
    }
}