// Copyright (C) 2010, 2011, 2012, 2013 GlavSoft LLC.
// All rights reserved.
//
//-------------------------------------------------------------------------
// This file is part of the TightVNC software.  Please visit our Web site:
//
//                       http://www.tightvnc.com/
//
// 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 2 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, write to the Free Software Foundation, Inc.,
// 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
//-------------------------------------------------------------------------
//

package com.glavsoft.viewer;

import com.glavsoft.rfb.protocol.ProtocolSettings;
import com.glavsoft.viewer.cli.Parser;
import com.glavsoft.viewer.mvp.View;
import com.glavsoft.viewer.swing.ConnectionParams;
import com.glavsoft.viewer.swing.ParametersHandler;
import com.glavsoft.viewer.swing.SwingConnectionWorkerFactory;
import com.glavsoft.viewer.swing.SwingViewerWindow;
import com.glavsoft.viewer.swing.SwingViewerWindowFactory;
import com.glavsoft.viewer.swing.gui.ConnectionView;

import javax.swing.*;

import java.awt.*;
import java.awt.event.WindowEvent;
import java.awt.event.WindowListener;
import java.io.IOException;
import java.io.InputStream;
import java.net.Socket;
import java.util.ArrayList;
import java.util.jar.Attributes;
import java.util.jar.Manifest;
import java.util.logging.*;

import jp.ac.u_ryukyu.treevnc.CreateConnectionParam;
import jp.ac.u_ryukyu.treevnc.TreeRFBProto;

@SuppressWarnings("serial")
public class Viewer extends JApplet implements Runnable, WindowListener , ViewerInterface {

    private Logger logger;
    private int paramsMask;
    private boolean allowAppletInteractiveConnections;

    public final ConnectionParams connectionParams;
    protected String passwordFromParams;
    boolean isSeparateFrame = true;
    protected boolean isApplet = true;
    private final ProtocolSettings settings;
    protected UiSettings uiSettings;
    private volatile boolean isAppletStopped = false;
    private ConnectionPresenter connectionPresenter;
    boolean isTreeVNC = false;
    protected TreeRFBProto myRfb;
    private boolean noConnection;
    public int vncport = ConnectionParams.DEFAULT_RFB_PORT;
    private int fbWidth;
    private boolean showTree = false;
    public int width;
    public int height;
    public int fixingSizeWidth;
    public int fixingSizeHeight;

    public static void main(String[] args) {
        Parser parser = new Parser();
        ParametersHandler.completeParserOptions(parser);

        parser.parse(args);
        if (parser.isSet(ParametersHandler.ARG_HELP)) {
            printUsage(parser.optionsUsage());
            System.exit(0);
        }
        Viewer viewer = new Viewer(parser);
        SwingUtilities.invokeLater(viewer);
    }

    public static void printUsage(String additional) {
        System.out.println("Usage: java -jar (progfilename) [hostname [port_number]] [Options]¥n" +
                "    or¥n"+
                " java -jar (progfilename) [Options]¥n" +
                "    or¥n java -jar (progfilename) -help¥n    to view this help¥n¥n" +
                "Where Options are:¥n" + additional +
                "¥nOptions format: -optionName=optionValue. Ex. -host=localhost -port=5900 -viewonly=yes¥n" +
                "Both option name and option value are case insensitive.");
    }

    public Viewer() {
        logger = Logger.getLogger(getClass().getName());
        connectionParams = new ConnectionParams();
        settings = ProtocolSettings.getDefaultSettings();
        uiSettings = new UiSettings();
    }

    private Viewer(Parser parser) {
        this();
        setLoggingLevel(parser.isSet(ParametersHandler.ARG_VERBOSE) ? Level.FINE :
            parser.isSet(ParametersHandler.ARG_VERBOSE_MORE) ? Level.FINER :
                Level.INFO);

        paramsMask = ParametersHandler.completeSettingsFromCLI(parser, connectionParams, settings, uiSettings);
        passwordFromParams = parser.getValueFor(ParametersHandler.ARG_PASSWORD);
        logger.info("TightVNC Viewer version " + ver());
        isApplet = false;
    }

    private void setLoggingLevel(Level levelToSet) {
        final Logger appLogger = Logger.getLogger("com.glavsoft");
        appLogger.setLevel(levelToSet);
        ConsoleHandler ch = null;
        for (Handler h : appLogger.getHandlers()) {
            if (h instanceof ConsoleHandler) {
                ch = (ConsoleHandler) h;
                break;
            }
        }
        if (null == ch) {
            ch = new ConsoleHandler();
            appLogger.addHandler(ch);
        }
        //        ch.setFormatter(new SimpleFormatter());
        ch.setLevel(levelToSet);
    }


    @Override
    public void windowClosing(WindowEvent e) {
        if (e != null && e.getComponent() != null) {
            final Window w = e.getWindow();
            if (w != null) {
                w.setVisible(false);
                w.dispose();
            }
        }
        closeApp();
    }

    /**
     * Closes App(lication) or stops App(let).
     */
    public void closeApp() {
        if (connectionPresenter != null) {
            connectionPresenter.cancelConnection();
            logger.info("Connections cancelled.");
        }
        if (isApplet) {
            if ( ! isAppletStopped) {
                logger.severe("Applet is stopped.");
                isAppletStopped  = true;
                repaint();
                stop();
            }
        } else {
            System.exit(0);
        }
    }

    @Override
    public void paint(Graphics g) {
        if ( ! isAppletStopped) {
            super.paint(g);
        } else {
            getContentPane().removeAll();
            g.clearRect(0, 0, getWidth(), getHeight());
            g.drawString("Disconnected", 10, 20);
        }
    }

    @Override
    public void destroy() {
        closeApp();
        super.destroy();
    }

    @Override
    public void init() {
        paramsMask = ParametersHandler.completeSettingsFromApplet(this, connectionParams, settings, uiSettings);
        isSeparateFrame = ParametersHandler.isSeparateFrame;
        passwordFromParams = getParameter(ParametersHandler.ARG_PASSWORD);
        isApplet = true;
        allowAppletInteractiveConnections = ParametersHandler.allowAppletInteractiveConnections;
        repaint();

        try {
            SwingUtilities.invokeAndWait(this);
        } catch (Exception e) {
            logger.severe(e.getMessage());
        }
    }

    @Override
    public void start() {
        super.start();
    }

    private boolean checkJsch() {
        try {
            Class.forName("com.jcraft.jsch.JSch");
            return true;
        } catch (ClassNotFoundException e) {
            return false;
        }
    }

    public void setNoConnection(boolean c){
        noConnection = c;
    }

    @Override
    public void run() {
        final boolean hasJsch = checkJsch();
        final boolean allowInteractive = allowAppletInteractiveConnections || ! isApplet;
        connectionPresenter = new ConnectionPresenter(hasJsch, allowInteractive);
        connectionPresenter.setNoConnection(noConnection);
        connectionPresenter.addModel("ConnectionParamsModel", connectionParams);
        ConnectionView connectionView = new ConnectionView(
                Viewer.this, // appWindowListener
                connectionPresenter, hasJsch);
        connectionPresenter.addView(ConnectionPresenter.CONNECTION_VIEW, connectionView);
        if (isApplet) {
            connectionPresenter.addView("AppletStatusStringView", new View() {
                @Override
                public void showView() { /*nop*/ }
                @Override
                public void closeView() { /*nop*/ }
            });
        }

        SwingViewerWindowFactory viewerWindowFactory = new SwingViewerWindowFactory(isSeparateFrame, isApplet, this, width, height);

        connectionPresenter.setConnectionWorkerFactory(
                new SwingConnectionWorkerFactory(connectionView.getFrame(), passwordFromParams, connectionPresenter, viewerWindowFactory, myRfb));
        connectionPresenter.setNeedReconnection(!noConnection);
        connectionPresenter.startConnection(settings, uiSettings, paramsMask);
    }

    @Override
    public void windowOpened(WindowEvent e) { /* nop */ }
    @Override
    public void windowClosed(WindowEvent e) { /* nop */ }
    @Override
    public void windowIconified(WindowEvent e) { /* nop */ }
    @Override
    public void windowDeiconified(WindowEvent e) { /* nop */ }
    @Override
    public void windowActivated(WindowEvent e) { /* nop */ }
    @Override
    public void windowDeactivated(WindowEvent e) { /* nop */ }

    public static String ver() {
        final InputStream mfStream = Viewer.class.getClassLoader().getResourceAsStream(
                "META-INF/MANIFEST.MF");
        if (null == mfStream) {
            System.out.println("No Manifest file found.");
            return "-1";
        }
        try {
            Manifest mf = new Manifest();
            mf.read(mfStream);
            Attributes atts = mf.getMainAttributes();
            return atts.getValue(Attributes.Name.IMPLEMENTATION_VERSION);
        } catch (IOException e) {
            return "-2";
        }
    }


    public void setSocket(Socket soc) { 
        connectionParams.setConnectionParam(soc.getInetAddress().getHostAddress(),soc.getPort());
    }

    public void setOpenPort(int parseInt) {
    }

    public void setTeminationType(boolean b) {
        myRfb.setTerminationType(b);
    }

    /**
     * start TreeVNC viewer
     */
    public void startTreeViewer(String hostName,boolean cui) {
        TreeRFBProto rfb = new TreeRFBProto(false);
        rfb.setCuiVersion(cui);
        rfb.setHasViewer(true);
        rfb.setViewer(this);
        rfb.createConnectionAndStart(this);
        CreateConnectionParam cp = new CreateConnectionParam(rfb);
        if (hostName!=null) {
            cp.setHostName(hostName);
        } else {
            try {
                cp.findTreeVncRoot();
            } catch (InterruptedException e) {
                System.out.println("cannot find TreeVNC Root "+e.getMessage());
                return;
            }
        }
        cp.sendWhereToConnect(this);
        isTreeVNC = true;
        myRfb =  rfb;
        settings.setViewOnly(true); // too avoid unnecessary upward traffic
        rfb.getAcceptThread().waitForShutdown();
    }


    /**
     * Start client with new parent (including reconnection) 
     * @param port
     * @param hostname
     * @throws IOException
     */
    @Override
    public void connectToParenet(int port, String hostname)  throws IOException {
        setTeminationType(false);
        closeApp();
        connectionParams.setConnectionParam(hostname, port);
        run();
    }

    public void setIsTreeVNC(boolean flag) {
        isTreeVNC = flag;
    }

    public TreeRFBProto getRfb() {
        return myRfb;
    }

    public boolean getCuiVersion() {
        return myRfb.getCuiVersion();
    }
    public void setCuiVersion(boolean flag) {
        myRfb.setCuiVersion(flag);
    }

    /**
     * start new VNC server receiver with
     * inherited clients
     * @param vs
     * @param hostName
     */
    @Override
    public void inhelitClients(ViewerInterface vs, String hostName) {
        myRfb.vncConnected(false);
        connectionParams.setConnectionParam(hostName, vncport);
        isApplet = true;
        this.setNoConnection(false);
        run();
    }

    public void proxyStart(String[] argv, int width, int height, boolean showTree, boolean checkDelay, boolean addSerialNum, boolean fixingSize, boolean filterSingleDisplay) {
        fbWidth = width;
        this.showTree = showTree;
        // input into arguments Decision
        Parser parser = new Parser();
        ParametersHandler.completeParserOptions(parser);
        if (fbWidth == 0)
            parser.parse(argv);
        if (parser.isSet(ParametersHandler.ARG_HELP)) {
            printUsage(parser.optionsUsage());
            System.exit(0);
        }
        String hostname = "localhost";
        TreeRFBProto rfb = new TreeRFBProto(true);
        myRfb = rfb;
        rfb.setShowTree(showTree);
        rfb.setCheckDelay(checkDelay);
        rfb.setAddSerialNum(addSerialNum);
        rfb.setFixingSize(fixingSize);
        if(fixingSize) {
            rfb.fixingSizeWidth = fixingSizeWidth;
            rfb.fixingSizeHeight = fixingSizeHeight;
        }
        rfb.setFilterSingleDisplay(filterSingleDisplay);
        rfb.setViewer(this);
        rfb.setCuiVersion(false);
        rfb.setHasViewer(true); // this flag will be overwrited after this method. Do we have to set here?
        rfb.createConnectionAndStart(this);
        setIsTreeVNC(true);
        connectionParams.setConnectionParam(hostname, vncport);
        isApplet = true;
        settings.setViewOnly(true); // too avoid unnecessary upward traffic
        rfb.setReconnecting(true);

        ArrayList<Rectangle> rectangles = getScreenRectangles();
        int leftScreenNumber = 0;
        int singleWidth = (int) rectangles.get(leftScreenNumber).getWidth();
        int singleHeight = (int) rectangles.get(leftScreenNumber).getHeight();
        getRfb().setSingleDisplaySize(singleWidth, singleHeight);

        run();
    }

    public void initRoot(TreeRFBProto myRfbProto, String hostName) {
        setIsTreeVNC(true);
        connectionParams.setConnectionParam(hostName, vncport);
        isApplet = true;
        myRfbProto.createConnectionAndStart(this);
        myRfbProto.setReconnecting(true);
        run();
    }

    @Override
    public void setVisible(boolean b) {
        SwingViewerWindow v = connectionPresenter.getViewer();
        if (v != null) 
            v.setVisible(b);
    }

    @Override
    public Socket getVNCSocket() {
        return connectionPresenter.getSocket();
    }

    @Override
    public boolean getShowTree() {
        return showTree;
    }

    @Override
    public void setWidth(int w) {
        width = w;
    }

    @Override
    public void setHeight(int h) {
        height = h;
    }

    @Override
    public void setFixingSize(int width, int height) {
        this.fixingSizeWidth = width;
        this.fixingSizeHeight = height;
    }

    @Override
    public ArrayList<Rectangle> getScreenRectangles() {
        // before change the screen server, data from previous server
        // should be stopped.
        setCuiVersion(false);
        // New screen server has one or more screens.
        // Screens are numbered in the order from left.
        // put screens in an ArrayList.
        ArrayList<Rectangle> rectangles = new ArrayList<Rectangle>();
        GraphicsEnvironment ge = GraphicsEnvironment.getLocalGraphicsEnvironment();
        GraphicsDevice[] gs = ge.getScreenDevices();
        for (GraphicsDevice gd : gs) {
            for (GraphicsConfiguration r : gd.getConfigurations()) {
                rectangles.add(r.getBounds());
            }
        }
        return rectangles;
    }

    @Override
    public void setFitScreen() {
        SwingViewerWindow v = connectionPresenter.getViewer();
        if (v != null) {
            v.fitScreen();
        }
    }

}