TclDebugPlugin.java

/*******************************************************************************
 * Copyright (c) 2005, 2017 IBM Corporation and others.
 * All rights reserved. This program and the accompanying materials
 * are made available under the terms of the Eclipse Public License v1.0
 * which accompanies this distribution, and is available at
 * http://www.eclipse.org/legal/epl-v10.html
 *
 *******************************************************************************/
package org.eclipse.dltk.tcl.internal.debug;

import org.eclipse.core.runtime.IStatus;
import org.eclipse.core.runtime.Plugin;
import org.eclipse.core.runtime.Status;
import org.eclipse.debug.core.DebugException;
import org.osgi.framework.BundleContext;

/**
 * The plugin class for the Tcl Debug Model plug-in.
 */

public class TclDebugPlugin extends Plugin {

	public static final String PLUGIN_ID = "org.eclipse.dltk.tcl.debug"; //$NON-NLS-1$

	private static TclDebugPlugin fgPlugin;

	public static final int INTERNAL_ERROR = 120;

	public static void log(IStatus status) {
		getDefault().getLog().log(status);
	}

	private boolean fTrace = false;

	public boolean isTraceMode() {
		return fTrace;
	}

	public static void logTraceMessage(String message) {
		if (getDefault().isTraceMode()) {
			IStatus s = new Status(IStatus.WARNING, TclDebugPlugin.PLUGIN_ID,
					INTERNAL_ERROR, message, null);
			getDefault().getLog().log(s);
		}
	}

	public static TclDebugPlugin getDefault() {
		return fgPlugin;
	}

	public TclDebugPlugin() {
		super();
		fgPlugin = this;
	}

	@Override
	public void start(BundleContext context) throws Exception {
		super.start(context);

		// getDefault().getLog().log(new Status(Status.INFO, PLUGIN_ID,
		// Status.OK, "TCLDebugPlugin starting...", null));
	}

	@Override
	public void stop(BundleContext context) throws Exception {
		try {
			savePluginPreferences();
		} finally {
			fgPlugin = null;
			super.stop(context);
		}
	}

	public static void log(Throwable t) {
		Throwable top = t;
		if (t instanceof DebugException) {
			DebugException de = (DebugException) t;
			IStatus status = de.getStatus();
			if (status.getException() != null) {
				top = status.getException();
			}
		}
		// this message is intentionally not internationalized, as an exception
		// may
		// be due to the resource bundle itself
		log(new Status(IStatus.ERROR, PLUGIN_ID, INTERNAL_ERROR,
				"Internal error logged from Tcl Debug: ", top)); //$NON-NLS-1$
	}
}