/*******************************************************************************
 * Copyright (c) 2000, 2007 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
 *
 * Contributors:
 *     IBM Corporation - initial API and implementation
 *     
 * Port to the D programming language:
 *     Jacob Carlborg <jacob.carlborg@gmail.com>
 *******************************************************************************/
module dwt.widgets.Display;

import dwt.DWT;
import dwt.DWTError;
import dwt.DWTException;
import dwt.graphics.Color;
import dwt.graphics.Cursor;
import dwt.graphics.Device;
import dwt.graphics.DeviceData;
import dwt.graphics.GCData;
import dwt.graphics.Image;
import dwt.graphics.Point;
import dwt.graphics.Rectangle;
import dwt.internal.cocoa.CGPoint;
import dwt.internal.cocoa.NSApplication;
import dwt.internal.cocoa.NSArray;
import dwt.internal.cocoa.NSAutoreleasePool;
import dwt.internal.cocoa.NSBundle;
import dwt.internal.cocoa.NSColor;
import dwt.internal.cocoa.NSColorSpace;
import dwt.internal.cocoa.NSDate;
import dwt.internal.cocoa.NSDictionary;
import dwt.internal.cocoa.NSEvent;
import dwt.internal.cocoa.NSGraphicsContext;
import dwt.internal.cocoa.NSImage;
import dwt.internal.cocoa.NSMenu;
import dwt.internal.cocoa.NSMenuItem;
import dwt.internal.cocoa.NSNumber;
import dwt.internal.cocoa.NSObject;
import dwt.internal.cocoa.NSPoint;
import dwt.internal.cocoa.NSRect;
import dwt.internal.cocoa.NSResponder;
import dwt.internal.cocoa.NSRunLoop;
import dwt.internal.cocoa.NSScreen;
import dwt.internal.cocoa.NSString;
import dwt.internal.cocoa.NSText;
import dwt.internal.cocoa.NSTimer;
import dwt.internal.cocoa.NSView;
import dwt.internal.cocoa.NSWindow;
import dwt.internal.cocoa.NSWorkspace;
import dwt.internal.cocoa.OS;
import dwt.internal.cocoa.SWTApplicationDelegate;
import dwt.internal.cocoa.SWTWindowDelegate;
import dwt.internal.cocoa.id;

import tango.core.Thread;
import tango.stdc.stringz;

import dwt.dwthelper.Runnable;
import dwt.dwthelper.System;
import dwt.dwthelper.utils;

import dwt.internal.c.carboncore.MacTypes;
import dwt.internal.cocoa.NSInteger;
import objc = dwt.internal.objc.runtime;

import dwt.widgets.Caret;
import dwt.widgets.Control;
import dwt.widgets.Dialog;
import dwt.widgets.Event;
import dwt.widgets.EventTable;
import dwt.widgets.Listener;
import dwt.widgets.Menu;
import dwt.widgets.Monitor;
import dwt.widgets.Shell;
import dwt.widgets.Synchronizer;
import dwt.widgets.Tray;
import dwt.widgets.Widget;

/**
 * Instances of this class are responsible for managing the
 * connection between DWT and the underlying operating
 * system. Their most important function is to implement
 * the DWT event loop in terms of the platform event model.
 * They also provide various methods for accessing information
 * about the operating system, and have overall control over
 * the operating system resources which DWT allocates.
 * <p>
 * Applications which are built with DWT will <em>almost always</em>
 * require only a single display. In particular, some platforms
 * which DWT supports will not allow more than one <em>active</em>
 * display. In other words, some platforms do not support
 * creating a new display if one already exists that has not been
 * sent the <code>dispose()</code> message.
 * <p>
 * In DWT, the thread which creates a <code>Display</code>
 * instance is distinguished as the <em>user-interface thread</em>
 * for that display.
 * </p>
 * The user-interface thread for a particular display has the
 * following special attributes:
 * <ul>
 * <li>
 * The event loop for that display must be run from the thread.
 * </li>
 * <li>
 * Some DWT API methods (notably, most of the public methods in
 * <code>Widget</code> and its subclasses), may only be called
 * from the thread. (To support multi-threaded user-interface
 * applications, class <code>Display</code> provides inter-thread
 * communication methods which allow threads other than the 
 * user-interface thread to request that it perform operations
 * on their behalf.)
 * </li>
 * <li>
 * The thread is not allowed to construct other 
 * <code>Display</code>s until that display has been disposed.
 * (Note that, this is in addition to the restriction mentioned
 * above concerning platform support for multiple displays. Thus,
 * the only way to have multiple simultaneously active displays,
 * even on platforms which support it, is to have multiple threads.)
 * </li>
 * </ul>
 * Enforcing these attributes allows DWT to be implemented directly
 * on the underlying operating system's event model. This has 
 * numerous benefits including smaller footprint, better use of 
 * resources, safer memory management, clearer program logic,
 * better performance, and fewer overall operating system threads
 * required. The down side however, is that care must be taken
 * (only) when constructing multi-threaded applications to use the
 * inter-thread communication mechanisms which this class provides
 * when required.
 * </p><p>
 * All DWT API methods which may only be called from the user-interface
 * thread are distinguished in their documentation by indicating that
 * they throw the "<code>ERROR_THREAD_INVALID_ACCESS</code>"
 * DWT exception.
 * </p>
 * <dl>
 * <dt><b>Styles:</b></dt>
 * <dd>(none)</dd>
 * <dt><b>Events:</b></dt>
 * <dd>Close, Dispose, Settings</dd>
 * </dl>
 * <p>
 * IMPORTANT: This class is <em>not</em> intended to be subclassed.
 * </p>
 * @see #syncExec
 * @see #asyncExec
 * @see #wake
 * @see #readAndDispatch
 * @see #sleep
 * @see Device#dispose
 */
public class Display : Device {
    
    /* Windows and Events */
    Event [] eventQueue;
    EventTable eventTable, filterTable;
    bool disposing;

    /* Sync/Async Widget Communication */
    Synchronizer synchronizer;
    Thread thread;
    bool allowTimers, runAsyncMessages;
    
    int lastModifiers;

    Caret currentCaret;
    
    Menu menuBar;

    NSApplication application;
    NSAutoreleasePool pool;

    NSPoint cascade = NSPoint();
    
    /* Menus */
//  Menu menuBar;
//  Menu [] menus, popups;
//  static final int ID_TEMPORARY = 1000;
//  static final int ID_START = 1001;
    
    /* Display Shutdown */
    Runnable [] disposeList;

    /* System Tray */
    Tray tray;
    
    /* System Resources */
    Image errorImage, infoImage, warningImage;
    Cursor [] cursors = new Cursor [DWT.CURSOR_HAND + 1];
    
    /* Key Mappings. */
    static int [] [] KeyTable = [

         /* Keyboard and Mouse Masks */
//       [58,    DWT.ALT],
//       [56,    DWT.SHIFT],
//       [59,    DWT.CONTROL],
//       [55,    DWT.COMMAND],

         /* Non-Numeric Keypad Keys */
         [OS.NSUpArrowFunctionKey, DWT.ARROW_UP],
         [OS.NSDownArrowFunctionKey, DWT.ARROW_DOWN],
         [OS.NSLeftArrowFunctionKey, DWT.ARROW_LEFT],
         [OS.NSRightArrowFunctionKey, DWT.ARROW_RIGHT],
         [OS.NSPageUpFunctionKey, DWT.PAGE_UP],
         [OS.NSPageDownFunctionKey, DWT.PAGE_DOWN],
         [OS.NSHomeFunctionKey, DWT.HOME],
         [OS.NSEndFunctionKey, DWT.END],
         
//       [??,    DWT.INSERT],

         /* Virtual and Ascii Keys */
         [OS.NSDeleteCharacter, DWT.BS],
//       [36,    DWT.CR],
         [OS.NSDeleteFunctionKey, DWT.DEL],
//       [53,    DWT.ESC],
//       [76,    DWT.LF],
//       [48,    DWT.TAB],   
         
         /* Functions Keys */
         [OS.NSF1FunctionKey, DWT.F1],
         [OS.NSF2FunctionKey, DWT.F2],
         [OS.NSF3FunctionKey, DWT.F3],
         [OS.NSF4FunctionKey, DWT.F4],
         [OS.NSF5FunctionKey, DWT.F5],
         [OS.NSF6FunctionKey, DWT.F6],
         [OS.NSF7FunctionKey, DWT.F7],
         [OS.NSF8FunctionKey, DWT.F8],
         [OS.NSF9FunctionKey, DWT.F9],
         [OS.NSF10FunctionKey, DWT.F10],
         [OS.NSF11FunctionKey, DWT.F11],
         [OS.NSF12FunctionKey, DWT.F12],
         [OS.NSF13FunctionKey, DWT.F13],
         [OS.NSF14FunctionKey, DWT.F14],
         [OS.NSF15FunctionKey, DWT.F15],
         
         /* Numeric Keypad Keys */
//       [67, DWT.KEYPAD_MULTIPLY],
//       [69, DWT.KEYPAD_ADD],
//       [76, DWT.KEYPAD_CR],
//       [78, DWT.KEYPAD_SUBTRACT],
//       [65, DWT.KEYPAD_DECIMAL],
//       [75, DWT.KEYPAD_DIVIDE],
//       [82, DWT.KEYPAD_0],
//       [83, DWT.KEYPAD_1],
//       [84, DWT.KEYPAD_2],
//       [85, DWT.KEYPAD_3],
//       [86, DWT.KEYPAD_4],
//       [87, DWT.KEYPAD_5],
//       [88, DWT.KEYPAD_6],
//       [89, DWT.KEYPAD_7],
//       [91, DWT.KEYPAD_8],
//       [92, DWT.KEYPAD_9],
//       [81, DWT.KEYPAD_EQUAL],

         /* Other keys */
//       [??,    DWT.CAPS_LOCK],
         
//       [71,    DWT.NUM_LOCK],
         
//       [??,    DWT.SCROLL_LOCK],
//       [??,    DWT.PAUSE],
//       [??,    DWT.BREAK],
//       [??,    DWT.PRINT_SCREEN],
         
         [OS.NSHelpFunctionKey, DWT.HELP],
         
     ];

    static String APP_NAME = "DWT";
    static const String ADD_WIDGET_KEY = "dwt.internal.addWidget";

    /* Multiple Displays. */
    static Display Default;
    static Display [] Displays = new Display [4];
                
    /* Package Name */
    static const String PACKAGE_PREFIX = "dwt.widgets.";
            
    /* Timer */
    Runnable timerList [];
    NSTimer nsTimers [];
    SWTWindowDelegate timerDelegate = cast(SWTWindowDelegate)(new SWTWindowDelegate()).alloc().init();
    SWTApplicationDelegate applicationDelegate;
    
    /* Display Data */
    Object data;
    String [] keys;
    Object [] values;
    
    /*
    * TEMPORARY CODE.  Install the runnable that
    * gets the current display. This code will
    * be removed in the future.
    */
    static this () {
        DeviceFinder = new class Runnable {
            public void run () {
                Device device = getCurrent ();
                if (device is null) {
                    device = getDefault ();
                }
                setDevice (device);
            }
        };
    }
    
/*
* TEMPORARY CODE.
*/
static void setDevice (Device device) {
    CurrentDevice = device;
}

static byte [] ascii (String name) {
    int length = name.length ();
    char [] chars = new char [length];
    name.getChars (0, length, chars, 0);
    byte [] buffer = new byte [length + 1];
    for (int i=0; i<length; i++) {
        buffer [i] = cast(byte) chars [i];
    }
    return buffer;
}

static int translateKey (int key) {
    for (int i=0; i<KeyTable.length; i++) {
        if (KeyTable [i] [0] is key) return KeyTable [i] [1];
    }
    return 0;
}

static int untranslateKey (int key) {
    for (int i=0; i<KeyTable.length; i++) {
        if (KeyTable [i] [1] is key) return KeyTable [i] [0];
    }
    return 0;
}

/**
 * Adds the listener to the collection of listeners who will
 * be notified when an event of the given type occurs anywhere
 * in a widget. The event type is one of the event constants
 * defined in class <code>DWT</code>. When the event does occur,
 * the listener is notified by sending it the <code>handleEvent()</code>
 * message.
 * <p>
 * Setting the type of an event to <code>DWT.None</code> from
 * within the <code>handleEvent()</code> method can be used to
 * change the event type and stop subsequent Java listeners
 * from running. Because event filters run before other listeners,
 * event filters can both block other listeners and set arbitrary
 * fields within an event. For this reason, event filters are both
 * powerful and dangerous. They should generally be avoided for
 * performance, debugging and code maintenance reasons.
 * </p>
 * 
 * @param eventType the type of event to listen for
 * @param listener the listener which should be notified when the event occurs
 *
 * @exception IllegalArgumentException <ul>
 *    <li>ERROR_NULL_ARGUMENT - if the listener is null</li>
 * </ul>
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 *
 * @see Listener
 * @see DWT
 * @see #removeFilter
 * @see #removeListener
 * 
 * @since 3.0 
 */
public void addFilter (int eventType, Listener listener) {
    checkDevice ();
    if (listener is null) error (DWT.ERROR_NULL_ARGUMENT);
    if (filterTable is null) filterTable = new EventTable ();
    filterTable.hook (eventType, listener);
}

/**
 * Adds the listener to the collection of listeners who will
 * be notified when an event of the given type occurs. The event
 * type is one of the event constants defined in class <code>DWT</code>.
 * When the event does occur in the display, the listener is notified by
 * sending it the <code>handleEvent()</code> message.
 *
 * @param eventType the type of event to listen for
 * @param listener the listener which should be notified when the event occurs
 *
 * @exception IllegalArgumentException <ul>
 *    <li>ERROR_NULL_ARGUMENT - if the listener is null</li>
 * </ul>
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 *
 * @see Listener
 * @see DWT
 * @see #removeListener
 * 
 * @since 2.0 
 */
public void addListener (int eventType, Listener listener) {
    checkDevice ();
    if (listener is null) error (DWT.ERROR_NULL_ARGUMENT);
    if (eventTable is null) eventTable = new EventTable ();
    eventTable.hook (eventType, listener);
}

//void addMenu (Menu menu) {
//  if (menus is null) menus = new Menu [12];
//  for (int i=0; i<menus.length; i++) {
//      if (menus [i] is null) {
//          menu.id = cast(short)(ID_START + i);
//          menus [i] = menu;
//          return;
//      }
//  }
//  Menu [] newMenus = new Menu [menus.length + 12];
//  menu.id = cast(short)(ID_START + menus.length);
//  newMenus [menus.length] = menu;
//  System.arraycopy (menus, 0, newMenus, 0, menus.length);
//  menus = newMenus;
//}
//
//void addPopup (Menu menu) {
//  if (popups is null) popups = new Menu [4];
//  int length = popups.length;
//  for (int i=0; i<length; i++) {
//      if (popups [i] is menu) return;
//  }
//  int index = 0;
//  while (index < length) {
//      if (popups [index] is null) break;
//      index++;
//  }
//  if (index is length) {
//      Menu [] newPopups = new Menu [length + 4];
//      System.arraycopy (popups, 0, newPopups, 0, length);
//      popups = newPopups;
//  }
//  popups [index] = menu;
//}

/**
 * Causes the <code>run()</code> method of the runnable to
 * be invoked by the user-interface thread at the next 
 * reasonable opportunity. The caller of this method continues 
 * to run in parallel, and is not notified when the
 * runnable has completed.  Specifying <code>null</code> as the
 * runnable simply wakes the user-interface thread when run.
 * <p>
 * Note that at the time the runnable is invoked, widgets 
 * that have the receiver as their display may have been
 * disposed. Therefore, it is necessary to check for this
 * case inside the runnable before accessing the widget.
 * </p>
 *
 * @param runnable code to run on the user-interface thread or <code>null</code>
 *
 * @exception DWTException <ul>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 * 
 * @see #syncExec
 */
public void asyncExec (Runnable runnable) {
    synchronized (Device.classinfo) {
        if (isDisposed ()) error (DWT.ERROR_DEVICE_DISPOSED);
        synchronizer.asyncExec (runnable);
    }
}

/**
 * Causes the system hardware to emit a short sound
 * (if it supports this capability).
 * 
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 */
public void beep () {
    checkDevice ();
}

protected void checkDevice () {
    if (thread is null) error (DWT.ERROR_WIDGET_DISPOSED);
    if (thread !is Thread.getThis ()) error (DWT.ERROR_THREAD_INVALID_ACCESS);
    if (isDisposed ()) error (DWT.ERROR_DEVICE_DISPOSED);
}

/**
 * Checks that this class can be subclassed.
 * <p>
 * IMPORTANT: See the comment in <code>Widget.checkSubclass()</code>.
 * </p>
 *
 * @exception DWTException <ul>
 *    <li>ERROR_INVALID_SUBCLASS - if this class is not an allowed subclass</li>
 * </ul>
 *
 * @see Widget#checkSubclass
 */
protected void checkSubclass () {
    if (!Display.isValidClass (this.classinfo)) error (DWT.ERROR_INVALID_SUBCLASS);
}

/**
 * Constructs a new instance of this class.
 * <p>
 * Note: The resulting display is marked as the <em>current</em>
 * display. If this is the first display which has been 
 * constructed since the application started, it is also
 * marked as the <em>default</em> display.
 * </p>
 *
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if called from a thread that already created an existing display</li>
 *    <li>ERROR_INVALID_SUBCLASS - if this class is not an allowed subclass</li>
 * </ul>
 *
 * @see #getCurrent
 * @see #getDefault
 * @see Widget#checkSubclass
 * @see Shell
 */
public this () {
    this (null);
}

/**
 * Constructs a new instance of this class using the parameter.
 * 
 * @param data the device data
 */
public this (DeviceData data) {
    super (data);
}

static void checkDisplay (Thread thread, bool multiple) {
    synchronized (Device.classinfo) {
        for (int i=0; i<Displays.length; i++) {
            if (Displays [i] !is null) {
                if (!multiple) DWT.error (DWT.ERROR_NOT_IMPLEMENTED, null, " [multiple displays]");
                if (Displays [i].thread is thread) DWT.error (DWT.ERROR_THREAD_INVALID_ACCESS);
            }
        }
    }
}

static String convertToLf(String text) {
    char Cr = '\r';
    char Lf = '\n';
    int length = text.length ();
    if (length is 0) return text;
    
    /* Check for an LF or CR/LF.  Assume the rest of the string 
     * is formated that way.  This will not work if the string 
     * contains mixed delimiters. */
    int i = text.indexOf (Lf, 0);
    if (i is -1 || i is 0) return text;
    if (text.charAt (i - 1) !is Cr) return text;

    /* The string is formatted with CR/LF.
     * Create a new string with the LF line delimiter. */
    i = 0;
    StringBuffer result = new StringBuffer ();
    while (i < length) {
        int j = text.indexOf (Cr, i);
        if (j is -1) j = length;
        String s = text.substring (i, j);
        result.append (s);
        i = j + 2;
        result.append (Lf);
    }
    return result.toString ();
}

/**
 * Requests that the connection between DWT and the underlying
 * operating system be closed.
 *
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 *
 * @see Device#dispose
 * 
 * @since 2.0
 */
public void close () {
    checkDevice ();
    Event event = new Event ();
    sendEvent (DWT.Close, event);
    if (event.doit) dispose ();
}

/**
 * Creates the device in the operating system.  If the device
 * does not have a handle, this method may do nothing depending
 * on the device.
 * <p>
 * This method is called before <code>init</code>.
 * </p>
 *
 * @param data the DeviceData which describes the receiver
 *
 * @see #init
 */
protected void create (DeviceData data) {
    checkSubclass ();
    checkDisplay (thread = Thread.getThis (), false);
    createDisplay (data);
    register (this);
    synchronizer = new Synchronizer (this);
    if (Default is null) Default = this;
}

void createDisplay (DeviceData data) {
    if (OS.VERSION < 0x1050) {
        System.Out.println ("***WARNING: DWT requires MacOS X version {}{}{}{}" , 10 , "." , 5 , " or greater"); //$NON-NLS-1$ //$NON-NLS-2$ //$NON-NLS-3$
        System.Out.println ("***WARNING: Detected: {}{}{}{}{}" , Integer.toHexString((OS.VERSION & 0xFF00) >> 8) , "." , Integer.toHexString((OS.VERSION & 0xF0) >> 4) , "." , Integer.toHexString(OS.VERSION & 0xF)); //$NON-NLS-1$ //$NON-NLS-2$ //$NON-NLS-3$
        error(DWT.ERROR_NOT_IMPLEMENTED);
    }

    /*
    * Feature in the Macintosh.  On OS 10.2, it is necessary
    * to explicitly check in with the Process Manager and set
    * the current process to be the front process in order for
    * windows to come to the front by default.  The fix is call
    * both GetCurrentProcess() and SetFrontProcess().
    * 
    * NOTE: It is not actually necessary to use the process
    * serial number returned by GetCurrentProcess() in the
    * call to SetFrontProcess() (ie. kCurrentProcess can be
    * used) but both functions must be called in order for
    * windows to come to the front.
    */
    ProcessSerialNumber* psn;
    if (OS.GetCurrentProcess (psn) is OS.noErr) {
//      int pid = OS.getpid ();
//      byte [] buffer = null;
//      int ptr = OS.getenv (ascii ("APP_NAME_" + pid));
//      if (ptr !is 0) {
//          buffer = new byte [OS.strlen (ptr) + 1];
//          OS.memmove (buffer, ptr, buffer.length);
//      } else {
//          if (APP_NAME !is null) {
//              char [] chars = new char [APP_NAME.length ()];
//              APP_NAME.getChars (0, chars.length, chars, 0);
//              int cfstring = OS.CFStringCreateWithCharacters (OS.kCFAllocatorDefault, chars, chars.length);
//              if (cfstring !is 0) {
//                  CFRange range = new CFRange ();
//                  range.length = chars.length;
//                  int encoding = OS.CFStringGetSystemEncoding ();
//                  int [] size = new int [1];
//                  int numChars = OS.CFStringGetBytes (cfstring, range, encoding, cast(byte) '?', true, null, 0, size);
//                  if (numChars !is 0) {
//                      buffer = new byte [size [0] + 1];
//                      numChars = OS.CFStringGetBytes (cfstring, range, encoding, cast(byte) '?', true, buffer, size [0], size);
//                  }
//                  OS.CFRelease (cfstring);
//              }
//          }
//      }
//      if (buffer !is null) OS.CPSSetProcessName (psn, buffer); 
        OS.TransformProcessType (psn, OS.kProcessTransformToForegroundApplication);
        OS.SetFrontProcess (psn);
//      ptr = OS.getenv (ascii ("APP_ICON_" + pid));
//      if (ptr !is 0) {
//          int image = readImageRef (ptr);
//          if (image !is 0) {
//              dockImage = image;
//              OS.SetApplicationDockTileImage (dockImage);
//          }
//      }
    }
    
    pool = cast(NSAutoreleasePool)(new NSAutoreleasePool()).alloc().init();
    application = NSApplication.sharedApplication();
}

static void deregister (Display display) {
    synchronized (Device.classinfo) {
        for (int i=0; i<Displays.length; i++) {
            if (display is Displays [i]) Displays [i] = null;
        }
    }
}

/**
 * Destroys the device in the operating system and releases
 * the device's handle.  If the device does not have a handle,
 * this method may do nothing depending on the device.
 * <p>
 * This method is called after <code>release</code>.
 * </p>
 * @see Device#dispose
 * @see #release
 */
protected void destroy () {
    if (this is Default) Default = null;
    deregister (this);
    destroyDisplay ();
}

void destroyDisplay () {
    if (pool !is null) pool.release();
    pool = null;
    application = null;
}

/**
 * Causes the <code>run()</code> method of the runnable to
 * be invoked by the user-interface thread just before the
 * receiver is disposed.  Specifying a <code>null</code> runnable
 * is ignored.
 *
 * @param runnable code to run at dispose time.
 * 
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 */
public void disposeExec (Runnable runnable) {
    checkDevice ();
    if (disposeList is null) disposeList = new Runnable [4];
    for (int i=0; i<disposeList.length; i++) {
        if (disposeList [i] is null) {
            disposeList [i] = runnable;
            return;
        }
    }
    Runnable [] newDisposeList = new Runnable [disposeList.length + 4];
    System.arraycopy (disposeList, 0, newDisposeList, 0, disposeList.length);
    newDisposeList [disposeList.length] = runnable;
    disposeList = newDisposeList;
}

void error (int code) {
    DWT.error(code);
}

bool filterEvent (Event event) {
    if (filterTable !is null) filterTable.sendEvent (event);
    return false;
}

bool filters (int eventType) {
    if (filterTable is null) return false;
    return filterTable.hooks (eventType);
}

/**
 * Given the operating system handle for a widget, returns
 * the instance of the <code>Widget</code> subclass which
 * represents it in the currently running application, if
 * such exists, or null if no matching widget can be found.
 * <p>
 * <b>IMPORTANT:</b> This method should not be called from
 * application code. The arguments are platform-specific.
 * </p>
 *
 * @param handle the handle for the widget
 * @return the DWT widget that the handle represents
 *
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 */
public Widget findWidget (objc.id handle) {
    checkDevice ();
    if (handle !is null && OS.objc_msgSend(handle, OS.sel_respondsToSelector_1, OS.sel_tag) !is null) {
        NSInteger tag = cast(NSInteger) OS.objc_msgSend(handle, OS.sel_tag);
        if (tag !is -1) {
            Object object = OS.JNIGetObject(tag);
            if (cast(Widget) object) {
                return cast(Widget)object;
            }
        }
    }
    return null;
}

/**
 * Given the operating system handle for a widget,
 * and widget-specific id, returns the instance of
 * the <code>Widget</code> subclass which represents
 * the handle/id pair in the currently running application,
 * if such exists, or null if no matching widget can be found.
 * <p>
 * <b>IMPORTANT:</b> This method should not be called from
 * application code. The arguments are platform-specific.
 * </p>
 *
 * @param handle the handle for the widget
 * @param id the id for the subwidget (usually an item)
 * @return the DWT widget that the handle/id pair represents
 *
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 * 
 * @since 3.1
 */
public Widget findWidget (objc.id handle, int id) {
    checkDevice ();
    return null;
}

/**
 * Given a widget and a widget-specific id, returns the
 * instance of the <code>Widget</code> subclass which represents
 * the widget/id pair in the currently running application,
 * if such exists, or null if no matching widget can be found.
 *
 * @param widget the widget
 * @param id the id for the subwidget (usually an item)
 * @return the DWT subwidget (usually an item) that the widget/id pair represents
 *
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 * 
 * @since 3.3
 */
public Widget findWidget (Widget widget, int id) {
    checkDevice ();
    return null;
}

/**
 * Returns the display which the given thread is the
 * user-interface thread for, or null if the given thread
 * is not a user-interface thread for any display.  Specifying
 * <code>null</code> as the thread will return <code>null</code>
 * for the display. 
 *
 * @param thread the user-interface thread
 * @return the display for the given thread
 */
public static Display findDisplay (Thread thread) {
    synchronized (Device.classinfo) {
        for (int i=0; i<Displays.length; i++) {
            Display display = Displays [i];
            if (display !is null && display.thread is thread) {
                return display;
            }
        }
        return null;
    }
}

/**
 * Returns the currently active <code>Shell</code>, or null
 * if no shell belonging to the currently running application
 * is active.
 *
 * @return the active shell or null
 *
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 */
public Shell getActiveShell () {
    checkDevice ();
    NSWindow window = application.keyWindow();
    if (window !is null) {
        NSView view = window.contentView();
        if (view !is null && view.respondsToSelector(OS.sel_tag)) {
            NSInteger tag = OS.objc_msgSend(view.id_, OS.sel_tag);
            if (tag !is -1) {
                Object object = OS.JNIGetObject(tag);
                if (cast(Shell) object) {
                    return cast(Shell)object;
                }
            }
        }
    }
    return null;
}

/**
 * Returns a rectangle describing the receiver's size and location.
 *
 * @return the bounding rectangle
 *
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 */
public Rectangle getBounds () {
    checkDevice ();
    return super.getBounds ();
}

/**
 * Returns the display which the currently running thread is
 * the user-interface thread for, or null if the currently
 * running thread is not a user-interface thread for any display.
 *
 * @return the current display
 */
public static Display getCurrent () {
    return findDisplay (Thread.getThis ());
}

int getCaretBlinkTime () {
    checkDevice ();
    return 560;
}

/**
 * Returns a rectangle which describes the area of the
 * receiver which is capable of displaying data.
 * 
 * @return the client area
 *
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 *
 * @see #getBounds
 */
public Rectangle getClientArea () {
    checkDevice ();
    return super.getClientArea ();
}

/**
 * Returns the control which the on-screen pointer is currently
 * over top of, or null if it is not currently over one of the
 * controls built by the currently running application.
 *
 * @return the control under the cursor
 *
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 */
public Control getCursorControl () {
    checkDevice();
    return null;
}

/**
 * Returns the location of the on-screen pointer relative
 * to the top left corner of the screen.
 *
 * @return the cursor location
 *
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 */
public Point getCursorLocation () {
    checkDevice ();
    NSPoint location = NSEvent.mouseLocation();
    //TODO bad for other screens
    NSRect rect = NSScreen.mainScreen().frame();
    return new Point (cast(int) location.x, cast(int) (rect.height - location.y));
}

/**
 * Returns an array containing the recommended cursor sizes.
 *
 * @return the array of cursor sizes
 *
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 * 
 * @since 3.0
 */
public Point [] getCursorSizes () {
    checkDevice ();
    return new Point [] [new Point (16, 16)];
}

/**
 * Returns the default display. One is created (making the
 * thread that invokes this method its user-interface thread)
 * if it did not already exist.
 *
 * @return the default display
 */
public static Display getDefault () {
    synchronized (Device.classinfo) {
        if (Default is null) Default = new Display ();
        return Default;
    }
}

/**
 * Returns the application defined property of the receiver
 * with the specified name, or null if it has not been set.
 * <p>
 * Applications may have associated arbitrary objects with the
 * receiver in this fashion. If the objects stored in the
 * properties need to be notified when the display is disposed
 * of, it is the application's responsibility to provide a
 * <code>disposeExec()</code> handler which does so.
 * </p>
 *
 * @param key the name of the property
 * @return the value of the property or null if it has not been set
 *
 * @exception IllegalArgumentException <ul>
 *    <li>ERROR_NULL_ARGUMENT - if the key is null</li>
 * </ul>
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 *
 * @see #setData(String, Object)
 * @see #disposeExec(Runnable)
 */
public Object getData (String key) {
    checkDevice ();
    //if (key is null) error (DWT.ERROR_NULL_ARGUMENT);
    if (keys is null) return null;
    for (int i=0; i<keys.length; i++) {
        if (keys [i].equals (key)) return values [i];
    }
    return null;
}

/**
 * Returns the application defined, display specific data
 * associated with the receiver, or null if it has not been
 * set. The <em>display specific data</em> is a single,
 * unnamed field that is stored with every display. 
 * <p>
 * Applications may put arbitrary objects in this field. If
 * the object stored in the display specific data needs to
 * be notified when the display is disposed of, it is the
 * application's responsibility to provide a
 * <code>disposeExec()</code> handler which does so.
 * </p>
 *
 * @return the display specific data
 *
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 *
 * @see #setData(Object)
 * @see #disposeExec(Runnable)
 */
public Object getData () {
    checkDevice ();
    return data;
}

/**
 * Returns the button dismissal alignment, one of <code>LEFT</code> or <code>RIGHT</code>.
 * The button dismissal alignment is the ordering that should be used when positioning the
 * default dismissal button for a dialog.  For example, in a dialog that contains an OK and
 * CANCEL button, on platforms where the button dismissal alignment is <code>LEFT</code>, the
 * button ordering should be OK/CANCEL.  When button dismissal alignment is <code>RIGHT</code>,
 * the button ordering should be CANCEL/OK.
 *
 * @return the button dismissal order
 *
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 * 
 * @since 2.1
 */
public int getDismissalAlignment () {
    checkDevice ();
    return DWT.RIGHT;
}

/**
 * Returns the longest duration, in milliseconds, between
 * two mouse button clicks that will be considered a
 * <em>double click</em> by the underlying operating system.
 *
 * @return the double click time
 *
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 */
public int getDoubleClickTime () {
    checkDevice ();
    return 0;
//  return OS.GetDblTime () * 1000 / 60; 
}

/**
 * Returns the control which currently has keyboard focus,
 * or null if keyboard events are not currently going to
 * any of the controls built by the currently running
 * application.
 *
 * @return the control under the cursor
 *
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 */
public Control getFocusControl () {
    checkDevice ();
    NSWindow window = application.keyWindow();
    if (window !is null) {
        NSResponder view = window.firstResponder();
        if (view !is null && view.respondsToSelector(OS.sel_tag)) {
            NSInteger tag = OS.objc_msgSend(view.id_, OS.sel_tag);
            if (tag !is -1) {
                Object object = OS.JNIGetObject(tag);
                if (cast(Control) object) {
                    //TODO go up hierarchy
                    return cast(Control)object;
                }
            } else {
                /*
                * If the first responder is the shared field editor then answer its
                * delegate as the focus control.
                */
                if (view.isKindOfClass(NSText.static_class())) {
                    NSText text = new NSText(view.id_);
                    if (text.isFieldEditor()) {
                        id delegateId = text.delegatee();
                        if (delegateId !is null) {
                            NSObject delegatee = new NSObject(delegateId.id_);
                            if (delegatee.respondsToSelector(OS.sel_tag)) {
                                tag = OS.objc_msgSend(delegatee.id_, OS.sel_tag);
                                if (tag !is 0 && tag !is -1) {
                                    Object object = OS.JNIGetObject(tag);
                                    if (cast(Control) object) {
                                        return cast(Control)object;
                                    }
                                }
                            }
                        }
                    }
                }
            }
        }
    }
    return null;
}


/**
 * Returns true when the high contrast mode is enabled.
 * Otherwise, false is returned.
 * <p>
 * Note: This operation is a hint and is not supported on
 * platforms that do not have this concept.
 * </p>
 *
 * @return the high contrast mode
 *
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 * 
 * @since 3.0
 */
public bool getHighContrast () {
    checkDevice ();
    return false;
}

/**
 * Returns the maximum allowed depth of icons on this display, in bits per pixel.
 * On some platforms, this may be different than the actual depth of the display.
 *
 * @return the maximum icon depth
 *
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 * 
 * @see Device#getDepth
 */
public int getIconDepth () {
    return getDepth ();
}

/**
 * Returns an array containing the recommended icon sizes.
 *
 * @return the array of icon sizes
 *
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 * 
 * @see Decorations#setImages(Image[])
 * 
 * @since 3.0
 */
public Point [] getIconSizes () {
    checkDevice ();
    return new Point [] [ 
        new Point (16, 16), new Point (32, 32), 
        new Point (64, 64), new Point (128, 128)];  
}

int getLastEventTime () {
    /*
    * This code is intentionally commented.  Event time is
    * in seconds and we need an accurate time in milliseconds.
    */
//  return (int) (OS.GetLastUserEventTime () * 1000.0);
    return cast(int) System.currentTimeMillis ();
}

//Menu [] getMenus (Decorations shell) {
//  if (menus is null) return new Menu [0];
//  int count = 0;
//  for (int i = 0; i < menus.length; i++) {
//      Menu menu = menus[i];
//      if (menu !is null && menu.parent is shell) count++;
//  }
//  int index = 0;
//  Menu[] result = new Menu[count];
//  for (int i = 0; i < menus.length; i++) {
//      Menu menu = menus[i];
//      if (menu !is null && menu.parent is shell) {
//          result[index++] = menu;
//      }
//  }
//  return result;
//}
//
//Menu getMenu (int id) {
//  if (menus is null) return null;
//  int index = id - ID_START;
//  if (0 <= index && index < menus.length) return menus [index];
//  return null;
//}
//
//Menu getMenuBar () {
//  return menuBar;
//}

int getMessageCount () {
    return synchronizer.getMessageCount ();
}

/**
 * Returns an array of monitors attached to the device.
 * 
 * @return the array of monitors
 * 
 * @since 3.0
 */
public dwt.widgets.Monitor.Monitor [] getMonitors () {
    checkDevice ();
    NSArray screens = NSScreen.screens();
    int count = screens.count();
    dwt.widgets.Monitor.Monitor [] monitors = new dwt.widgets.Monitor.Monitor [count];
    for (int i=0; i<count; i++) {
        dwt.widgets.Monitor.Monitor monitor = new dwt.widgets.Monitor.Monitor ();
        NSScreen screen = new NSScreen(screens.objectAtIndex(i));
        NSRect frame = screen.frame();
        monitor.x = cast(int)frame.x;
        monitor.y = cast(int)frame.y;
        monitor.width = cast(int)frame.width;
        monitor.height = cast(int)frame.height;
        NSRect visibleFrame = screen.visibleFrame();
        monitor.clientX = cast(int)visibleFrame.x;
        monitor.clientY = cast(int)visibleFrame.y;
        monitor.clientWidth = cast(int)visibleFrame.width;
        monitor.clientHeight = cast(int)visibleFrame.height;
        monitors [i] = monitor;
    }
    return monitors;
}

/**
 * Returns the primary monitor for that device.
 * 
 * @return the primary monitor
 * 
 * @since 3.0
 */
public dwt.widgets.Monitor.Monitor getPrimaryMonitor () {
    checkDevice ();
    dwt.widgets.Monitor.Monitor monitor = new dwt.widgets.Monitor.Monitor ();
    NSScreen screen = NSScreen.mainScreen();
    NSRect frame = screen.frame();
    monitor.x = cast(int)frame.x;
    monitor.y = cast(int)frame.y;
    monitor.width = cast(int)frame.width;
    monitor.height = cast(int)frame.height;
    NSRect visibleFrame = screen.visibleFrame();
    monitor.clientX = cast(int)visibleFrame.x;
    monitor.clientY = cast(int)visibleFrame.y;
    monitor.clientWidth = cast(int)visibleFrame.width;
    monitor.clientHeight = cast(int)visibleFrame.height;
    return monitor;
}

/**
 * Returns a (possibly empty) array containing all shells which have
 * not been disposed and have the receiver as their display.
 *
 * @return the receiver's shells
 *
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 */
public Shell [] getShells () {
    checkDevice ();
    NSArray windows = application.windows();
    int index = 0;
    Shell [] result = new Shell [windows.count()];
    for (int i = 0; i < result.length; i++) {
        NSWindow window = new NSWindow(windows.objectAtIndex(i));
        NSView view = window.contentView();
        if (view !is null) {
            NSInteger jniRef = OS.objc_msgSend(view.id_, OS.sel_tag);
            if (jniRef !is 0 && jniRef !is -1) {
                Object object = OS.JNIGetObject(jniRef);
                if (cast(Shell) object) {
                    result[index++] = cast(Shell)object;
                }
            }
        }
    }
    if (index is result.length) return result;
    Shell [] newResult = new Shell [index];
    System.arraycopy (result, 0, newResult, 0, index);
    return newResult;
}

/**
 * Gets the synchronizer used by the display.
 *
 * @return the receiver's synchronizer
 * 
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 * 
 * @since 3.4
 */
public Synchronizer getSynchronizer () {
    checkDevice ();
    return synchronizer;
}

/**
 * Returns the thread that has invoked <code>syncExec</code>
 * or null if no such runnable is currently being invoked by
 * the user-interface thread.
 * <p>
 * Note: If a runnable invoked by asyncExec is currently
 * running, this method will return null.
 * </p>
 *
 * @return the receiver's sync-interface thread
 * 
 * @exception DWTException <ul>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 */
public Thread getSyncThread () {
    synchronized (Device.classinfo) {
        if (isDisposed ()) error (DWT.ERROR_DEVICE_DISPOSED);
        return synchronizer.syncThread;
    }
}

/**
 * Returns the matching standard color for the given
 * constant, which should be one of the color constants
 * specified in class <code>DWT</code>. Any value other
 * than one of the DWT color constants which is passed
 * in will result in the color black. This color should
 * not be free'd because it was allocated by the system,
 * not the application.
 *
 * @param id the color constant
 * @return the matching color
 *
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 *
 * @see DWT
 */
public Color getSystemColor (int id) {
    checkDevice ();
    NSColor color = null;
    switch (id) {
        case DWT.COLOR_INFO_FOREGROUND: return super.getSystemColor (DWT.COLOR_BLACK);
        case DWT.COLOR_INFO_BACKGROUND: return Color.cocoa_new (this, new float [] [0xFF / 255f, 0xFF / 255f, 0xE1 / 255f, 1]);
        case DWT.COLOR_TITLE_FOREGROUND: color = NSColor.windowFrameTextColor(); break;
        case DWT.COLOR_TITLE_BACKGROUND: color = NSColor.secondarySelectedControlColor(); break;
        case DWT.COLOR_TITLE_BACKGROUND_GRADIENT: color = NSColor.windowFrameColor(); break;
        case DWT.COLOR_TITLE_INACTIVE_FOREGROUND: color = NSColor.disabledControlTextColor();  break;
        case DWT.COLOR_TITLE_INACTIVE_BACKGROUND: color = NSColor.secondarySelectedControlColor(); break;
        case DWT.COLOR_TITLE_INACTIVE_BACKGROUND_GRADIENT: color = NSColor.secondarySelectedControlColor(); break;
        case DWT.COLOR_WIDGET_DARK_SHADOW: color = NSColor.controlDarkShadowColor(); break;
        case DWT.COLOR_WIDGET_NORMAL_SHADOW: color = NSColor.controlShadowColor(); break;
        case DWT.COLOR_WIDGET_LIGHT_SHADOW: color = NSColor.controlHighlightColor(); break;
        case DWT.COLOR_WIDGET_HIGHLIGHT_SHADOW: color = NSColor.controlLightHighlightColor(); break;
        case DWT.COLOR_WIDGET_BACKGROUND: color = NSColor.controlHighlightColor(); break;
        case DWT.COLOR_WIDGET_FOREGROUND: color = NSColor.controlTextColor(); break;
        case DWT.COLOR_WIDGET_BORDER: return super.getSystemColor (DWT.COLOR_BLACK);
        case DWT.COLOR_LIST_FOREGROUND: color = NSColor.textColor(); break;
        case DWT.COLOR_LIST_BACKGROUND: color = NSColor.textBackgroundColor(); break;
        case DWT.COLOR_LIST_SELECTION_TEXT: color = NSColor.selectedTextColor(); break;
        case DWT.COLOR_LIST_SELECTION: color = NSColor.selectedTextBackgroundColor(); break;
        default:
            return super.getSystemColor (id);   
    }
    if (color is null) return super.getSystemColor(id);
    color = color.colorUsingColorSpace(NSColorSpace.deviceRGBColorSpace());
    if (color is null) return super.getSystemColor(id);
    float[] components = new float[color.numberOfComponents()];
    color.getComponents(components);    
    return Color.cocoa_new (this, new float[][components[0], components[1], components[2], components[3]]);
}

/**
 * Returns the matching standard platform cursor for the given
 * constant, which should be one of the cursor constants
 * specified in class <code>DWT</code>. This cursor should
 * not be free'd because it was allocated by the system,
 * not the application.  A value of <code>null</code> will
 * be returned if the supplied constant is not an DWT cursor
 * constant. 
 *
 * @param id the DWT cursor constant
 * @return the corresponding cursor or <code>null</code>
 *
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 *
 * @see DWT#CURSOR_ARROW
 * @see DWT#CURSOR_WAIT
 * @see DWT#CURSOR_CROSS
 * @see DWT#CURSOR_APPSTARTING
 * @see DWT#CURSOR_HELP
 * @see DWT#CURSOR_SIZEALL
 * @see DWT#CURSOR_SIZENESW
 * @see DWT#CURSOR_SIZENS
 * @see DWT#CURSOR_SIZENWSE
 * @see DWT#CURSOR_SIZEWE
 * @see DWT#CURSOR_SIZEN
 * @see DWT#CURSOR_SIZES
 * @see DWT#CURSOR_SIZEE
 * @see DWT#CURSOR_SIZEW
 * @see DWT#CURSOR_SIZENE
 * @see DWT#CURSOR_SIZESE
 * @see DWT#CURSOR_SIZESW
 * @see DWT#CURSOR_SIZENW
 * @see DWT#CURSOR_UPARROW
 * @see DWT#CURSOR_IBEAM
 * @see DWT#CURSOR_NO
 * @see DWT#CURSOR_HAND
 * 
 * @since 3.0
 */
public Cursor getSystemCursor (int id) {
    checkDevice ();
    if (!(0 <= id && id < cursors.length)) return null;
    if (cursors [id] is null) {
        cursors [id] = new Cursor (this, id);
    }
    return cursors [id];
}

/**
 * Returns the matching standard platform image for the given
 * constant, which should be one of the icon constants
 * specified in class <code>DWT</code>. This image should
 * not be free'd because it was allocated by the system,
 * not the application.  A value of <code>null</code> will
 * be returned either if the supplied constant is not an
 * DWT icon constant or if the platform does not define an
 * image that corresponds to the constant. 
 *
 * @param id the DWT icon constant
 * @return the corresponding image or <code>null</code>
 *
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 *
 * @see DWT#ICON_ERROR
 * @see DWT#ICON_INFORMATION
 * @see DWT#ICON_QUESTION
 * @see DWT#ICON_WARNING
 * @see DWT#ICON_WORKING
 * 
 * @since 3.0
 */
public Image getSystemImage (int id) {
    checkDevice ();
    int code;
    switch(id) {
        case DWT.ICON_ERROR:
            code = OS.kAlertStopIcon;
            break;
        case DWT.ICON_INFORMATION:
        case DWT.ICON_WORKING:
        case DWT.ICON_QUESTION:
            code = OS.kAlertNoteIcon;
            break;
        case DWT.ICON_WARNING:
            code = OS.kAlertCautionIcon;
            break;
        default:
            return null;
    }
    NSImage nsImage = NSWorkspace.sharedWorkspace().iconForFileType(new NSString(OS.NSFileTypeForHFSTypeCode(code)));
    if (nsImage is null) return null;
    return Image.cocoa_new(this, DWT.ICON, nsImage);
}

/**
 * Returns the single instance of the system tray or null
 * when there is no system tray available for the platform.
 *
 * @return the system tray or <code>null</code>
 * 
 * @exception DWTException <ul>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 *
 * @since 3.0
 */
public Tray getSystemTray () {
    checkDevice ();
    if (tray !is null) return tray;
    return tray = new Tray (this, DWT.NONE);
}

/**
 * Returns the user-interface thread for the receiver.
 *
 * @return the receiver's user-interface thread
 * 
 * @exception DWTException <ul>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 */
public Thread getThread () {
    synchronized (Device.classinfo) {
        if (isDisposed ()) error (DWT.ERROR_DEVICE_DISPOSED);
        return thread;
    }
}

/**
 * Initializes any internal resources needed by the
 * device.
 * <p>
 * This method is called after <code>create</code>.
 * </p>
 * 
 * @see #create
 */
protected void init () {
    super.init ();
    initClasses ();
    initApplicationDelegate();  
    application.finishLaunching();
}

void initApplicationDelegate() {
    auto appProc3 = &applicationDelegateProc;

    String className = "SWTApplicationDelegate";
    objc.Class cls = OS.objc_allocateClassPair(OS.class_NSObject, className, 0);
    OS.class_addMethod(cls, OS.sel_applicationWillFinishLaunching_1, appProc3, "@:@");
    OS.class_addMethod(cls, OS.sel_terminate_1, appProc3, "@:@");
    OS.class_addMethod(cls, OS.sel_orderFrontStandardAboutPanel_1, appProc3, "@:@");
    OS.class_addMethod(cls, OS.sel_hideOtherApplications_1, appProc3, "@:@");
    OS.class_addMethod(cls, OS.sel_hide_1, appProc3, "@:@");
    OS.class_addMethod(cls, OS.sel_unhideAllApplications_1, appProc3, "@:@");
    OS.class_addMethod(cls, OS.sel_applicationShouldTerminate_1, appProc3, "@:@");
    OS.class_addMethod(cls, OS.sel_applicationWillTerminate_1, appProc3, "@:@");
    OS.objc_registerClassPair(cls);
    
    applicationDelegate = cast(SWTApplicationDelegate)(new SWTApplicationDelegate()).alloc().init();    
    application.setDelegate(applicationDelegate);
}

void initClasses () {
    auto dialogProc3 = &dialogProc;
    
    auto proc3 = &windowDelegateProc3;
    auto proc2 = &windowDelegateProc2;
    auto proc4 = &windowDelegateProc4;
    auto proc5 = &windowDelegateProc5;
    auto proc6 = &windowDelegateProc6;
    
    auto drawRectProc = OS.drawRect_CALLBACK(proc3);

    String className = "SWTWindowDelegate";
    objc.Class cls = OS.objc_allocateClassPair(OS.class_NSObject, className, 0);
    
    static if ((void*).sizeof > int.sizeof) // 64bit target
        OS.class_addIvar(cls, "tag", OS.PTR_SIZEOF, cast(byte)(Math.log(OS.PTR_SIZEOF) / Math.log(2)), "q");
    else
        OS.class_addIvar(cls, "tag", OS.PTR_SIZEOF, cast(byte)(Math.log(OS.PTR_SIZEOF) / Math.log(2)), "i");
    
    OS.class_addMethod(cls, OS.sel_windowDidResize_1, proc3, "@:@");
    OS.class_addMethod(cls, OS.sel_windowShouldClose_1, proc3, "@:@");
    OS.class_addMethod(cls, OS.sel_windowWillClose_1, proc3, "@:@");
    OS.class_addMethod(cls, OS.sel_windowWillClose_1, proc3, "@:@");
    OS.class_addMethod(cls, OS.sel_windowDidResignKey_1, proc3, "@:@");
    OS.class_addMethod(cls, OS.sel_windowDidBecomeKey_1, proc3, "@:@");
    OS.class_addMethod(cls, OS.sel_tag, proc2, "@:");
    OS.class_addMethod(cls, OS.sel_setTag_1, proc3, "@:i");
    OS.class_addMethod(cls, OS.sel_timerProc_1, proc3, "@:@");
    OS.objc_registerClassPair(cls);
    
    className = "SWTPanelDelegate";
    cls = OS.objc_allocateClassPair(OS.class_NSObject, className, 0);
    OS.class_addIvar(cls, "tag", OS.PTR_SIZEOF, cast(byte)(Math.log(OS.PTR_SIZEOF) / Math.log(2)), "i");
    OS.class_addMethod(cls, OS.sel_windowWillClose_1, dialogProc3, "@:@");
    OS.class_addMethod(cls, OS.sel_changeColor_1, dialogProc3, "@:@");
    OS.class_addMethod(cls, OS.sel_changeFont_1, dialogProc3, "@:@");
    OS.class_addMethod(cls, OS.sel_tag, proc2, "@:");
    OS.class_addMethod(cls, OS.sel_setTag_1, proc3, "@:i");
    OS.objc_registerClassPair(cls);
    
    className = "SWTMenu";
    cls = OS.objc_allocateClassPair(OS.class_NSMenu, className, 0);
    OS.class_addIvar(cls, "tag", OS.PTR_SIZEOF, cast(byte)(Math.log(OS.PTR_SIZEOF) / Math.log(2)), "i");
    OS.class_addMethod(cls, OS.sel_tag, proc2, "@:");
    OS.class_addMethod(cls, OS.sel_setTag_1, proc3, "@:i");
//  OS.class_addMethod(cls, OS.sel_menuWillOpen_1, proc3, "@:@");
    OS.class_addMethod(cls, OS.sel_menuWillClose_1, proc3, "@:@");
//  OS.class_addMethod(cls, OS.sel_numberOfItemsInMenu_1, proc3, "@:@");    
    OS.class_addMethod(cls, OS.sel_menu_1willHighlightItem_1, proc4, "@:@@");
    OS.class_addMethod(cls, OS.sel_menuNeedsUpdate_1, proc3, "@:@");
    OS.objc_registerClassPair(cls);

    className = "SWTView";
    cls = OS.objc_allocateClassPair(OS.class_NSView, className, 0);
    OS.class_addIvar(cls, "tag", OS.PTR_SIZEOF, cast(byte)(Math.log(OS.PTR_SIZEOF) / Math.log(2)), "i");
    OS.class_addMethod(cls, OS.sel_tag, proc2, "@:");
    OS.class_addMethod(cls, OS.sel_setTag_1, proc3, "@:i");
    OS.class_addMethod(cls, OS.sel_isFlipped, proc2, "@:");
    OS.class_addMethod(cls, OS.sel_drawRect_1, drawRectProc, "@:i");
    OS.class_addMethod(cls, OS.sel_mouseDown_1, proc3, "@:@");
    OS.class_addMethod(cls, OS.sel_mouseDragged_1, proc3, "@:@");
    OS.class_addMethod(cls, OS.sel_mouseEntered_1, proc3, "@:@");
    OS.class_addMethod(cls, OS.sel_mouseUp_1, proc3, "@:@");
    OS.class_addMethod(cls, OS.sel_menuForEvent_1, proc3, "@:@");
    OS.class_addMethod(cls, OS.sel_acceptsFirstResponder, proc2, "@:");
    OS.class_addMethod(cls, OS.sel_resignFirstResponder, proc2, "@:");
    OS.class_addMethod(cls, OS.sel_becomeFirstResponder, proc2, "@:");
    OS.objc_registerClassPair(cls);
    
    className = "SWTScrollView";
    cls = OS.objc_allocateClassPair(OS.class_NSScrollView, className, 0);
    OS.class_addIvar(cls, "tag", OS.PTR_SIZEOF, cast(byte)(Math.log(OS.PTR_SIZEOF) / Math.log(2)), "i");
    OS.class_addMethod(cls, OS.sel_tag, proc2, "@:");
    OS.class_addMethod(cls, OS.sel_setTag_1, proc3, "@:i");
    OS.class_addMethod(cls, OS.sel_sendVerticalSelection, proc2, "@:");
    OS.class_addMethod(cls, OS.sel_sendHorizontalSelection, proc2, "@:");
//  OS.class_addMethod(cls, OS.sel_menuForEvent_1, proc3, "@:@");
    OS.objc_registerClassPair(cls);
    
    className = "SWTButton";
    cls = OS.objc_allocateClassPair(OS.class_NSButton, className, 0);
//  OS.class_addMethod(cls, OS.sel_isFlipped, proc2, "@:");
//  OS.class_addMethod(cls, OS.sel_mouseDown_1, proc3, "@:@");
    OS.class_addMethod(cls, OS.sel_drawRect_1, drawRectProc, "@:i");
    OS.class_addMethod(cls, OS.sel_sendSelection, proc2, "@:");
    OS.class_addMethod(cls, OS.sel_sendArrowSelection, proc2, "@:");
    OS.class_addMethod(cls, OS.sel_menuForEvent_1, proc3, "@:@");
    OS.objc_registerClassPair(cls);
    
    className = "SWTTableView";
    cls = OS.objc_allocateClassPair(OS.class_NSTableView, className, 0);
    OS.class_addMethod(cls, OS.sel_sendDoubleSelection, proc2, "@:");
//  OS.class_addMethod(cls, OS.sel_isFlipped, proc2, "@:");
    OS.class_addMethod(cls, OS.sel_numberOfRowsInTableView_1, proc3, "@:@");
    OS.class_addMethod(cls, OS.sel_tableView_1objectValueForTableColumn_1row_1, proc5, "@:@:@:@");
    OS.class_addMethod(cls, OS.sel_tableView_1shouldEditTableColumn_1row_1, proc5, "@:@:@:@");
    OS.class_addMethod(cls, OS.sel_tableViewSelectionDidChange_1, proc3, "@:@");
    OS.class_addMethod(cls, OS.sel_tableView_1willDisplayCell_1forTableColumn_1row_1, proc6, "@:@@@i");
    OS.class_addMethod(cls, OS.sel_menuForEvent_1, proc3, "@:@");
    OS.class_addMethod(cls, OS.sel_tableView_1setObjectValue_1forTableColumn_1row_1, proc6, "@:@@@i");
    OS.objc_registerClassPair(cls);
    
    className = "SWTOutlineView";
    cls = OS.objc_allocateClassPair(OS.class_NSOutlineView, className, 0);
    OS.class_addMethod(cls, OS.sel_sendDoubleSelection, proc2, "@:");
    OS.class_addMethod(cls, OS.sel_outlineViewSelectionDidChange_1, proc3, "@:@");
    OS.class_addMethod(cls, OS.sel_outlineView_1shouldCollapseItem_1, proc4, "@:@@");
    OS.class_addMethod(cls, OS.sel_outlineView_1shouldExpandItem_1, proc4, "@:@@");
    OS.class_addMethod(cls, OS.sel_outlineView_1child_1ofItem_1, proc5, "@:@i@");
    OS.class_addMethod(cls, OS.sel_outlineView_1isItemExpandable_1, proc4, "@:@@");
    OS.class_addMethod(cls, OS.sel_outlineView_1numberOfChildrenOfItem_1, proc4, "@:@@");
    OS.class_addMethod(cls, OS.sel_outlineView_1objectValueForTableColumn_1byItem_1, proc5, "@:@@@");
    OS.class_addMethod(cls, OS.sel_outlineView_1willDisplayCell_1forTableColumn_1item_1, proc6, "@:@@@@");
    OS.class_addMethod(cls, OS.sel_outlineView_1setObjectValue_1forTableColumn_1byItem_1, proc6, "@:@@@@");
    OS.class_addMethod(cls, OS.sel_menuForEvent_1, proc3, "@:@");
    OS.objc_registerClassPair(cls);

    className = "SWTTreeItem";
    cls = OS.objc_allocateClassPair(OS.class_NSObject, className, 0);
//  OS.class_addMethod(cls, OS.sel_isFlipped, proc2, "@:");
    OS.class_addIvar(cls, "tag", OS.PTR_SIZEOF, cast(byte)(Math.log(OS.PTR_SIZEOF) / Math.log(2)), "i");
    OS.class_addMethod(cls, OS.sel_tag, proc2, "@:");
    OS.class_addMethod(cls, OS.sel_setTag_1, proc3, "@:i");
    OS.objc_registerClassPair(cls);

    className = "SWTTabView";
    cls = OS.objc_allocateClassPair(OS.class_NSTabView, className, 0);
//  OS.class_addMethod(cls, OS.sel_isFlipped, proc2, "@:");
    OS.class_addIvar(cls, "tag", OS.PTR_SIZEOF, cast(byte)(Math.log(OS.PTR_SIZEOF) / Math.log(2)), "i");
    OS.class_addMethod(cls, OS.sel_tabView_1willSelectTabViewItem_1, proc4, "@:@@");
    OS.class_addMethod(cls, OS.sel_tag, proc2, "@:");
    OS.class_addMethod(cls, OS.sel_setTag_1, proc3, "@:i");
    OS.class_addMethod(cls, OS.sel_menuForEvent_1, proc3, "@:@");
    OS.objc_registerClassPair(cls);
    
    className = "SWTBox";
    cls = OS.objc_allocateClassPair(OS.class_NSBox, className, 0);
//  OS.class_addMethod(cls, OS.sel_isFlipped, proc2, "@:");
    OS.class_addIvar(cls, "tag", OS.PTR_SIZEOF, cast(byte)(Math.log(OS.PTR_SIZEOF) / Math.log(2)), "i");
    OS.class_addMethod(cls, OS.sel_tag, proc2, "@:");
    OS.class_addMethod(cls, OS.sel_setTag_1, proc3, "@:i");
    OS.class_addMethod(cls, OS.sel_menuForEvent_1, proc3, "@:@");
    OS.objc_registerClassPair(cls);
    
    className = "SWTProgressIndicator";
    cls = OS.objc_allocateClassPair(OS.class_NSProgressIndicator, className, 0);
//  OS.class_addMethod(cls, OS.sel_isFlipped, proc2, "@:");
    OS.class_addIvar(cls, "tag", OS.PTR_SIZEOF, cast(byte)(Math.log(OS.PTR_SIZEOF) / Math.log(2)), "i");
    OS.class_addMethod(cls, OS.sel_tag, proc2, "@:");
    OS.class_addMethod(cls, OS.sel_setTag_1, proc3, "@:i");
    OS.class_addMethod(cls, OS.sel_menuForEvent_1, proc3, "@:@");
    OS.objc_registerClassPair(cls); 

    className = "SWTSlider";
    cls = OS.objc_allocateClassPair(OS.class_NSSlider, className, 0);
//  OS.class_addMethod(cls, OS.sel_isFlipped, proc2, "@:");
    OS.class_addMethod(cls, OS.sel_menuForEvent_1, proc3, "@:@");
    OS.objc_registerClassPair(cls); 
    
    className = "SWTPopUpButton";
    cls = OS.objc_allocateClassPair(OS.class_NSPopUpButton, className, 0);
//  OS.class_addMethod(cls, OS.sel_isFlipped, proc2, "@:");
    OS.class_addMethod(cls, OS.sel_sendSelection, proc2, "@:");
    OS.class_addMethod(cls, OS.sel_menuForEvent_1, proc3, "@:@");
    OS.objc_registerClassPair(cls);
    
    className = "SWTComboBox";
    cls = OS.objc_allocateClassPair(OS.class_NSComboBox, className, 0);
//  OS.class_addMethod(cls, OS.sel_isFlipped, proc2, "@:");
    OS.class_addMethod(cls, OS.sel_comboBoxSelectionDidChange_1, proc3, "@:@");
    OS.class_addMethod(cls, OS.sel_sendSelection, proc2, "@:");
    OS.class_addMethod(cls, OS.sel_menuForEvent_1, proc3, "@:@");
    OS.objc_registerClassPair(cls);
    
    className = "SWTDatePicker";
    cls = OS.objc_allocateClassPair(OS.class_NSDatePicker, className, 0);
//  OS.class_addMethod(cls, OS.sel_isFlipped, proc2, "@:");
    OS.class_addMethod(cls, OS.sel_sendSelection, proc2, "@:");
    OS.class_addMethod(cls, OS.sel_menuForEvent_1, proc3, "@:@");
    OS.objc_registerClassPair(cls);

    className = "SWTImageView";
    cls = OS.objc_allocateClassPair(OS.class_NSImageView, className, 0);
//  OS.class_addMethod(cls, OS.sel_isFlipped, proc2, "@:");
    OS.class_addMethod(cls, OS.sel_drawRect_1, OS.drawRect_CALLBACK(proc3), "@:i");
    OS.class_addMethod(cls, OS.sel_mouseDown_1, proc3, "@:@");
    OS.class_addMethod(cls, OS.sel_mouseUp_1, proc3, "@:@");
    OS.class_addMethod(cls, OS.sel_rightMouseDown_1, proc3, "@:@");
    OS.class_addMethod(cls, OS.sel_menuForEvent_1, proc3, "@:@");
    OS.objc_registerClassPair(cls);

    className = "SWTStepper";
    cls = OS.objc_allocateClassPair(OS.class_NSStepper, className, 0);
//  OS.class_addMethod(cls, OS.sel_isFlipped, proc2, "@:");
    OS.class_addMethod(cls, OS.sel_sendSelection, proc2, "@:");
    OS.class_addMethod(cls, OS.sel_menuForEvent_1, proc3, "@:@");
    OS.objc_registerClassPair(cls);

    className = "SWTScroller";
    cls = OS.objc_allocateClassPair(OS.class_NSScroller, className, 0);
//  OS.class_addMethod(cls, OS.sel_isFlipped, proc2, "@:");
    OS.class_addMethod(cls, OS.sel_sendSelection, proc2, "@:");
    OS.class_addMethod(cls, OS.sel_menuForEvent_1, proc3, "@:@");
    OS.objc_registerClassPair(cls);

    className = "SWTMenuItem";
    cls = OS.objc_allocateClassPair(OS.class_NSMenuItem, className, 0);
//  OS.class_addMethod(cls, OS.sel_isFlipped, proc2, "@:");
    OS.class_addMethod(cls, OS.sel_sendSelection, proc2, "@:");
    OS.objc_registerClassPair(cls);

    className = "SWTTextView";
    cls = OS.objc_allocateClassPair(OS.class_NSTextView, className, 0);
//  OS.class_addMethod(cls, OS.sel_isFlipped, proc2, "@:");
//  OS.class_addMethod(cls, OS.sel_sendSelection, proc2, "@:");
    OS.class_addIvar(cls, "tag", OS.PTR_SIZEOF, cast(byte)(Math.log(OS.PTR_SIZEOF) / Math.log(2)), "i");
    OS.class_addMethod(cls, OS.sel_tag, proc2, "@:");
    OS.class_addMethod(cls, OS.sel_setTag_1, proc3, "@:i");
    OS.class_addMethod(cls, OS.sel_menuForEvent_1, proc3, "@:@");
    OS.class_addMethod(cls, OS.sel_textView_1clickedOnLink_1atIndex_1, proc5, "@:@@i");
    OS.objc_registerClassPair(cls);
    
    className = "SWTTextField";
    cls = OS.objc_allocateClassPair(OS.class_NSTextField, className, 0);
    OS.class_addMethod(cls, OS.sel_drawRect_1, drawRectProc, "@:i");
    OS.objc_registerClassPair(cls);

    className = "SWTWindow";
    cls = OS.objc_allocateClassPair(OS.class_NSWindow, className, 0);
    OS.class_addIvar(cls, "tag", OS.PTR_SIZEOF, cast(byte)(Math.log(OS.PTR_SIZEOF) / Math.log(2)), "i");
    OS.class_addMethod(cls, OS.sel_tag, proc2, "@:");
    OS.class_addMethod(cls, OS.sel_setTag_1, proc3, "@:i");
    OS.class_addMethod(cls, OS.sel_sendEvent_1, proc3, "@:@");
    OS.class_addMethod(cls, OS.sel_flagsChanged_1, proc3, "@:@");
    OS.class_addMethod(cls, OS.sel_helpRequested_1, proc3, "@:@");
    OS.objc_registerClassPair(cls);
}

/**  
 * Invokes platform specific functionality to allocate a new GC handle.
 * <p>
 * <b>IMPORTANT:</b> This method is <em>not</em> part of the public
 * API for <code>Display</code>. It is marked public only so that it
 * can be shared within the packages provided by DWT. It is not
 * available on all platforms, and should never be called from
 * application code.
 * </p>
 *
 * @param data the platform specific GC data 
 * @return the platform specific GC handle
 * 
 * @exception DWTException <ul>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 * @exception DWTError <ul>
 *    <li>ERROR_NO_HANDLES if a handle could not be obtained for gc creation</li>
 * </ul>
 */
public objc.id internal_new_GC (GCData data) {
    if (isDisposed()) DWT.error(DWT.ERROR_DEVICE_DISPOSED);
    NSGraphicsContext context = application.context();
//  NSAffineTransform transform = NSAffineTransform.transform();
//  NSSize size = handle.size();
//  transform.translateXBy(0, size.height);
//  transform.scaleXBy(1, -1);
//  transform.set();
    if (data !is null) {
        int mask = DWT.LEFT_TO_RIGHT | DWT.RIGHT_TO_LEFT;
        if ((data.style & mask) is 0) {
            data.style |= DWT.LEFT_TO_RIGHT;
        }
        data.device = this;
        data.background = getSystemColor(DWT.COLOR_WHITE).handle;
        data.foreground = getSystemColor(DWT.COLOR_BLACK).handle;
        data.font = getSystemFont();
    }
    return context.id_;
}

/**  
 * Invokes platform specific functionality to dispose a GC handle.
 * <p>
 * <b>IMPORTANT:</b> This method is <em>not</em> part of the public
 * API for <code>Display</code>. It is marked public only so that it
 * can be shared within the packages provided by DWT. It is not
 * available on all platforms, and should never be called from
 * application code.
 * </p>
 *
 * @param hDC the platform specific GC handle
 * @param data the platform specific GC data 
 */
public void internal_dispose_GC (int context, GCData data) {
    if (isDisposed()) DWT.error(DWT.ERROR_DEVICE_DISPOSED);
    
}

static bool isValidClass (Class clazz) {
    String name = clazz.name;
    int index = name.lastIndexOf ('.');
    return name.substring (0, index + 1).equals (PACKAGE_PREFIX);
}

bool isValidThread () {
    return thread is Thread.getThis ();
}

/**
 * Generate a low level system event.
 * 
 * <code>post</code> is used to generate low level keyboard
 * and mouse events. The intent is to enable automated UI
 * testing by simulating the input from the user.  Most
 * DWT applications should never need to call this method.
 * <p>
 * Note that this operation can fail when the operating system
 * fails to generate the event for any reason.  For example,
 * this can happen when there is no such key or mouse button
 * or when the system event queue is full.
 * </p>
 * <p>
 * <b>Event Types:</b>
 * <p>KeyDown, KeyUp
 * <p>The following fields in the <code>Event</code> apply:
 * <ul>
 * <li>(in) type KeyDown or KeyUp</li>
 * <p> Either one of:
 * <li>(in) character a character that corresponds to a keyboard key</li>
 * <li>(in) keyCode the key code of the key that was typed,
 *          as defined by the key code constants in class <code>DWT</code></li>
 * </ul>
 * <p>MouseDown, MouseUp</p>
 * <p>The following fields in the <code>Event</code> apply:
 * <ul>
 * <li>(in) type MouseDown or MouseUp
 * <li>(in) button the button that is pressed or released
 * </ul>
 * <p>MouseMove</p>
 * <p>The following fields in the <code>Event</code> apply:
 * <ul>
 * <li>(in) type MouseMove
 * <li>(in) x the x coordinate to move the mouse pointer to in screen coordinates
 * <li>(in) y the y coordinate to move the mouse pointer to in screen coordinates
 * </ul>
 * </dl>
 * 
 * @param event the event to be generated
 * 
 * @return true if the event was generated or false otherwise
 * 
 * @exception IllegalArgumentException <ul>
 *    <li>ERROR_NULL_ARGUMENT - if the event is null</li>
 * </ul>
 * @exception DWTException <ul>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 *
 * @since 3.0
 * 
 */
public bool post(Event event) {
    synchronized (Device.classinfo) {
        if (isDisposed ()) error (DWT.ERROR_DEVICE_DISPOSED);
        if (event is null) error (DWT.ERROR_NULL_ARGUMENT);
//      int type = event.type;
//      switch (type) {
//          case DWT.KeyDown:
//          case DWT.KeyUp: {
//              int vKey = Display.untranslateKey (event.keyCode);
//              if (vKey !is 0) {
//                  return OS.CGPostKeyboardEvent (0, vKey, type is DWT.KeyDown) is 0;
//              } else {
//                  vKey = -1;
//                  int kchrPtr = OS.GetScriptManagerVariable (cast(short) OS.smKCHRCache);
//                  int key = -1;
//                  int [] state = new int [1];
//                  int [] encoding = new int [1];
//                  short keyScript = cast(short) OS.GetScriptManagerVariable (cast(short) OS.smKeyScript);
//                  short regionCode = cast(short) OS.GetScriptManagerVariable (cast(short) OS.smRegionCode);
//                  if (OS.UpgradeScriptInfoToTextEncoding (keyScript, cast(short) OS.kTextLanguageDontCare, regionCode, null, encoding) is OS.paramErr) {
//                      if (OS.UpgradeScriptInfoToTextEncoding (keyScript, cast(short) OS.kTextLanguageDontCare, cast(short) OS.kTextRegionDontCare, null, encoding) is OS.paramErr) {
//                          encoding [0] = OS.kTextEncodingMacRoman;
//                      }
//                  }
//                  int [] encodingInfo = new int [1];
//                  OS.CreateUnicodeToTextInfoByEncoding (encoding [0], encodingInfo);
//                  if (encodingInfo [0] !is 0) {
//                      char [] input = {event.character};
//                      byte [] buffer = new byte [2];
//                      OS.ConvertFromUnicodeToPString (encodingInfo [0], 2, input, buffer);
//                      OS.DisposeUnicodeToTextInfo (encodingInfo);
//                      key = buffer [1] & 0x7f;
//                  }
//                  if (key is -1) return false;                
//                  for (int i = 0 ; i <= 0x7F ; i++) {
//                      int result1 = OS.KeyTranslate (kchrPtr, cast(short) (i | 512), state);
//                      int result2 = OS.KeyTranslate (kchrPtr, cast(short) i, state);
//                      if ((result1 & 0x7f) is key || (result2 & 0x7f) is key) {
//                          vKey = i;
//                          break;
//                      }
//                  }
//                  if (vKey is -1) return false;
//                  return OS.CGPostKeyboardEvent (key, vKey, type is DWT.KeyDown) is 0;
//              }
//          }
//          case DWT.MouseDown:
//          case DWT.MouseMove: 
//          case DWT.MouseUp: {
//              CGPoint mouseCursorPosition = new CGPoint ();
//              int chord = OS.GetCurrentEventButtonState ();
//              if (type is DWT.MouseMove) {
//                  mouseCursorPosition.x = event.x;
//                  mouseCursorPosition.y = event.y;
//                  return OS.CGPostMouseEvent (mouseCursorPosition, true, 5, (chord & 0x1) !is 0, (chord & 0x2) !is 0, (chord & 0x4) !is 0, (chord & 0x8) !is 0, (chord & 0x10) !is 0) is 0;
//              } else {
//                  int button = event.button;
//                  if (button < 1 || button > 5) return false;
//                  bool button1 = false, button2 = false, button3 = false, button4 = false, button5 = false;
//                  switch (button) {
//                      case 1: {
//                          button1 = type is DWT.MouseDown;
//                          button2 = (chord & 0x4) !is 0;
//                          button3 = (chord & 0x2) !is 0;
//                          button4 = (chord & 0x8) !is 0;
//                          button5 = (chord & 0x10) !is 0;
//                          break;
//                      }
//                      case 2: {
//                          button1 = (chord & 0x1) !is 0;
//                          button2 = type is DWT.MouseDown;
//                          button3 = (chord & 0x2) !is 0;
//                          button4 = (chord & 0x8) !is 0;
//                          button5 = (chord & 0x10) !is 0;
//                          break;
//                      }
//                      case 3: {
//                          button1 = (chord & 0x1) !is 0;
//                          button2 = (chord & 0x4) !is 0;
//                          button3 = type is DWT.MouseDown;
//                          button4 = (chord & 0x8) !is 0;
//                          button5 = (chord & 0x10) !is 0;
//                          break;
//                      }
//                      case 4: {
//                          button1 = (chord & 0x1) !is 0;
//                          button2 = (chord & 0x4) !is 0;
//                          button3 = (chord & 0x2) !is 0;
//                          button4 = type is DWT.MouseDown;
//                          button5 = (chord & 0x10) !is 0;
//                          break;
//                      }
//                      case 5: {
//                          button1 = (chord & 0x1) !is 0;
//                          button2 = (chord & 0x4) !is 0;
//                          button3 = (chord & 0x2) !is 0;
//                          button4 = (chord & 0x8) !is 0;
//                          button5 = type is DWT.MouseDown;
//                          break;
//                      }
//                  }
//                  dwt.internal.carbon.Point pt = new dwt.internal.carbon.Point ();
//                  OS.GetGlobalMouse (pt);
//                  mouseCursorPosition.x = pt.h;
//                  mouseCursorPosition.y = pt.v;
//                  return OS.CGPostMouseEvent (mouseCursorPosition, true, 5, button1, button3, button2, button4, button5) is 0;
//              }
//          }
//          case DWT.MouseWheel: {
//              return OS.CGPostScrollWheelEvent (1, event.count) is 0;
//          }
//      } 
        return false;
    }
}

void postEvent (Event event) {
    /*
    * Place the event at the end of the event queue.
    * This code is always called in the Display's
    * thread so it must be re-enterant but does not
    * need to be synchronized.
    */
    if (eventQueue is null) eventQueue = new Event [4];
    int index = 0;
    int length = eventQueue.length;
    while (index < length) {
        if (eventQueue [index] is null) break;
        index++;
    }
    if (index is length) {
        Event [] newQueue = new Event [length + 4];
        System.arraycopy (eventQueue, 0, newQueue, 0, length);
        eventQueue = newQueue;
    }
    eventQueue [index] = event;
}

/**
 * Maps a point from one coordinate system to another.
 * When the control is null, coordinates are mapped to
 * the display.
 * <p>
 * NOTE: On right-to-left platforms where the coordinate
 * systems are mirrored, special care needs to be taken
 * when mapping coordinates from one control to another
 * to ensure the result is correctly mirrored.
 * 
 * Mapping a point that is the origin of a rectangle and
 * then adding the width and height is not equivalent to
 * mapping the rectangle.  When one control is mirrored
 * and the other is not, adding the width and height to a
 * point that was mapped causes the rectangle to extend
 * in the wrong direction.  Mapping the entire rectangle
 * instead of just one point causes both the origin and
 * the corner of the rectangle to be mapped.
 * </p>
 * 
 * @param from the source <code>Control</code> or <code>null</code>
 * @param to the destination <code>Control</code> or <code>null</code>
 * @param point to be mapped 
 * @return point with mapped coordinates 
 * 
 * @exception IllegalArgumentException <ul>
 *    <li>ERROR_NULL_ARGUMENT - if the point is null</li>
 *    <li>ERROR_INVALID_ARGUMENT - if the Control from or the Control to have been disposed</li> 
 * </ul>
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 * 
 * @since 2.1.2
 */
public Point map (Control from, Control to, Point point) {
    checkDevice ();
    if (point is null) error (DWT.ERROR_NULL_ARGUMENT); 
    return map (from, to, point.x, point.y);
}

/**
 * Maps a point from one coordinate system to another.
 * When the control is null, coordinates are mapped to
 * the display.
 * <p>
 * NOTE: On right-to-left platforms where the coordinate
 * systems are mirrored, special care needs to be taken
 * when mapping coordinates from one control to another
 * to ensure the result is correctly mirrored.
 * 
 * Mapping a point that is the origin of a rectangle and
 * then adding the width and height is not equivalent to
 * mapping the rectangle.  When one control is mirrored
 * and the other is not, adding the width and height to a
 * point that was mapped causes the rectangle to extend
 * in the wrong direction.  Mapping the entire rectangle
 * instead of just one point causes both the origin and
 * the corner of the rectangle to be mapped.
 * </p>
 * 
 * @param from the source <code>Control</code> or <code>null</code>
 * @param to the destination <code>Control</code> or <code>null</code>
 * @param x coordinates to be mapped
 * @param y coordinates to be mapped
 * @return point with mapped coordinates
 * 
 * @exception IllegalArgumentException <ul>
 *    <li>ERROR_INVALID_ARGUMENT - if the Control from or the Control to have been disposed</li> 
 * </ul>
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 * 
 * @since 2.1.2
 */
public Point map (Control from, Control to, int x, int y) {
    checkDevice ();
    if (from !is null && from.isDisposed()) error (DWT.ERROR_INVALID_ARGUMENT);
    if (to !is null && to.isDisposed()) error (DWT.ERROR_INVALID_ARGUMENT);
    Point point = new Point (x, y);
    if (from is to) return point;
    NSPoint pt = NSPoint();
    pt.x = x;
    pt.y = y;
    NSWindow fromWindow = from !is null ? from.view.window() : null;
    NSWindow toWindow = to !is null ? to.view.window() : null;
    if (toWindow !is null && fromWindow !is null && toWindow.id_ is fromWindow.id_) {
        pt = from.view.convertPoint_toView_(pt, to.view);
    } else {
        if (from !is null) {
            pt = from.view.convertPoint_toView_(pt, null);
            pt = fromWindow.convertBaseToScreen(pt);
            pt.y = fromWindow.screen().frame().height - pt.y;
        }
        if (to !is null) {
            pt.y = toWindow.screen().frame().height - pt.y;
            pt = toWindow.convertScreenToBase(pt);
            pt = to.view.convertPoint_fromView_(pt, null);
        }
    }
    point.x = cast(int)pt.x;
    point.y = cast(int)pt.y;
    return point;
}

/**
 * Maps a point from one coordinate system to another.
 * When the control is null, coordinates are mapped to
 * the display.
 * <p>
 * NOTE: On right-to-left platforms where the coordinate
 * systems are mirrored, special care needs to be taken
 * when mapping coordinates from one control to another
 * to ensure the result is correctly mirrored.
 * 
 * Mapping a point that is the origin of a rectangle and
 * then adding the width and height is not equivalent to
 * mapping the rectangle.  When one control is mirrored
 * and the other is not, adding the width and height to a
 * point that was mapped causes the rectangle to extend
 * in the wrong direction.  Mapping the entire rectangle
 * instead of just one point causes both the origin and
 * the corner of the rectangle to be mapped.
 * </p>
 * 
 * @param from the source <code>Control</code> or <code>null</code>
 * @param to the destination <code>Control</code> or <code>null</code>
 * @param rectangle to be mapped
 * @return rectangle with mapped coordinates
 * 
 * @exception IllegalArgumentException <ul>
 *    <li>ERROR_NULL_ARGUMENT - if the rectangle is null</li>
 *    <li>ERROR_INVALID_ARGUMENT - if the Control from or the Control to have been disposed</li> 
 * </ul>
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 * 
 * @since 2.1.2
 */
public Rectangle map (Control from, Control to, Rectangle rectangle) {
    checkDevice ();
    if (rectangle is null) error (DWT.ERROR_NULL_ARGUMENT); 
    return map (from, to, rectangle.x, rectangle.y, rectangle.width, rectangle.height);
}

/**
 * Maps a point from one coordinate system to another.
 * When the control is null, coordinates are mapped to
 * the display.
 * <p>
 * NOTE: On right-to-left platforms where the coordinate
 * systems are mirrored, special care needs to be taken
 * when mapping coordinates from one control to another
 * to ensure the result is correctly mirrored.
 * 
 * Mapping a point that is the origin of a rectangle and
 * then adding the width and height is not equivalent to
 * mapping the rectangle.  When one control is mirrored
 * and the other is not, adding the width and height to a
 * point that was mapped causes the rectangle to extend
 * in the wrong direction.  Mapping the entire rectangle
 * instead of just one point causes both the origin and
 * the corner of the rectangle to be mapped.
 * </p>
 * 
 * @param from the source <code>Control</code> or <code>null</code>
 * @param to the destination <code>Control</code> or <code>null</code>
 * @param x coordinates to be mapped
 * @param y coordinates to be mapped
 * @param width coordinates to be mapped
 * @param height coordinates to be mapped
 * @return rectangle with mapped coordinates
 * 
 * @exception IllegalArgumentException <ul>
 *    <li>ERROR_INVALID_ARGUMENT - if the Control from or the Control to have been disposed</li> 
 * </ul>
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 * 
 * @since 2.1.2
 */
public Rectangle map (Control from, Control to, int x, int y, int width, int height) {
    checkDevice ();
    if (from !is null && from.isDisposed()) error (DWT.ERROR_INVALID_ARGUMENT);
    if (to !is null && to.isDisposed()) error (DWT.ERROR_INVALID_ARGUMENT);
    Rectangle rectangle = new Rectangle (x, y, width, height);
    if (from is to) return rectangle;
    NSPoint pt = NSPoint();
    pt.x = x;
    pt.y = y;
    NSWindow fromWindow = from !is null ? from.view.window() : null;
    NSWindow toWindow = to !is null ? to.view.window() : null;
    if (toWindow !is null && fromWindow !is null && toWindow.id_ is fromWindow.id_) {
        pt = from.view.convertPoint_toView_(pt, to.view);
    } else {
        if (from !is null) {
            pt = from.view.convertPoint_toView_(pt, null);
            pt = fromWindow.convertBaseToScreen(pt);
            pt.y = fromWindow.screen().frame().height - pt.y;
        }
        if (to !is null) {
            pt.y = toWindow.screen().frame().height - pt.y;
            pt = toWindow.convertScreenToBase(pt);
            pt = to.view.convertPoint_fromView_(pt, null);
        }
    }
    rectangle.x = cast(int)pt.x;
    rectangle.y = cast(int)pt.y;
    return rectangle;
}

/**
 * Reads an event from the operating system's event queue,
 * dispatches it appropriately, and returns <code>true</code>
 * if there is potentially more work to do, or <code>false</code>
 * if the caller can sleep until another event is placed on
 * the event queue.
 * <p>
 * In addition to checking the system event queue, this method also
 * checks if any inter-thread messages (created by <code>syncExec()</code>
 * or <code>asyncExec()</code>) are waiting to be processed, and if
 * so handles them before returning.
 * </p>
 *
 * @return <code>false</code> if the caller can sleep upon return from this method
 *
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 *    <li>ERROR_FAILED_EXEC - if an exception occurred while running an inter-thread message</li>
 * </ul>
 *
 * @see #sleep
 * @see #wake
 */
public bool readAndDispatch () {
    checkDevice ();
    NSAutoreleasePool pool = cast(NSAutoreleasePool)(new NSAutoreleasePool()).alloc().init();
    try {
        bool events = false;
        events |= runTimers ();
        NSEvent event = application.nextEventMatchingMask(0, null, OS.NSDefaultRunLoopMode, true);
        if (event !is null) {
            events = true;
            application.sendEvent(event);
        }
        if (events) {
            runDeferredEvents ();
            return true;
        }
        return runAsyncMessages (false);
    } finally {
        pool.release();
    }
}

static void register (Display display) {
    synchronized (Device.classinfo) {
        for (int i=0; i<Displays.length; i++) {
            if (Displays [i] is null) {
                Displays [i] = display;
                return;
            }
        }
        Display [] newDisplays = new Display [Displays.length + 4];
        System.arraycopy (Displays, 0, newDisplays, 0, Displays.length);
        newDisplays [Displays.length] = display;
        Displays = newDisplays;
    }
}

/**
 * Releases any internal resources back to the operating
 * system and clears all fields except the device handle.
 * <p>
 * Disposes all shells which are currently open on the display. 
 * After this method has been invoked, all related related shells
 * will answer <code>true</code> when sent the message
 * <code>isDisposed()</code>.
 * </p><p>
 * When a device is destroyed, resources that were acquired
 * on behalf of the programmer need to be returned to the
 * operating system.  For example, if the device allocated a
 * font to be used as the system font, this font would be
 * freed in <code>release</code>.  Also,to assist the garbage
 * collector and minimize the amount of memory that is not
 * reclaimed when the programmer keeps a reference to a
 * disposed device, all fields except the handle are zero'd.
 * The handle is needed by <code>destroy</code>.
 * </p>
 * This method is called before <code>destroy</code>.
 * 
 * @see Device#dispose
 * @see #destroy
 */
protected void release () {
    disposing = true;
    sendEvent (DWT.Dispose, new Event ());
    Shell [] shells = getShells ();
    for (int i=0; i<shells.length; i++) {
        Shell shell = shells [i];
        if (!shell.isDisposed ()) shell.dispose ();
    }
    if (tray !is null) tray.dispose ();
    tray = null;
//  while (readAndDispatch ()) {}
    if (disposeList !is null) {
        for (int i=0; i<disposeList.length; i++) {
            if (disposeList [i] !is null) disposeList [i].run ();
        }
    }
    disposeList = null;
    synchronizer.releaseSynchronizer ();
    synchronizer = null;
    releaseDisplay ();
    super.release ();
}

void releaseDisplay () {    
    /* Release the System Images */
    if (errorImage !is null) errorImage.dispose ();
    if (infoImage !is null) infoImage.dispose ();
    if (warningImage !is null) warningImage.dispose ();
    errorImage = infoImage = warningImage = null;
    
    //TODO - stop caret
    currentCaret = null;
    
    /* Release Timers */
    if (nsTimers !is null) {
        for (int i=0; i<nsTimers.length; i++) {
            //TODO - check -1 as sentinal
            if (nsTimers [i] !is null /*&& timerIds [i] !is -1*/) {
                nsTimers [i].invalidate();
                nsTimers [i].release();
            }
        }
    }
    nsTimers = null;
    
    /* Release the System Cursors */
    for (int i = 0; i < cursors.length; i++) {
        if (cursors [i] !is null) cursors [i].dispose ();
    }
    cursors = null;
}

/**
 * Removes the listener from the collection of listeners who will
 * be notified when an event of the given type occurs anywhere in
 * a widget. The event type is one of the event constants defined
 * in class <code>DWT</code>.
 *
 * @param eventType the type of event to listen for
 * @param listener the listener which should no longer be notified when the event occurs
 *
 * @exception IllegalArgumentException <ul>
 *    <li>ERROR_NULL_ARGUMENT - if the listener is null</li>
 * </ul>
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
 * </ul>
 *
 * @see Listener
 * @see DWT
 * @see #addFilter
 * @see #addListener
 * 
 * @since 3.0
 */
public void removeFilter (int eventType, Listener listener) {
    checkDevice ();
    if (listener is null) error (DWT.ERROR_NULL_ARGUMENT);
    if (filterTable is null) return;
    filterTable.unhook (eventType, listener);
    if (filterTable.size () is 0) filterTable = null;
}

/**
 * Removes the listener from the collection of listeners who will
 * be notified when an event of the given type occurs. The event type
 * is one of the event constants defined in class <code>DWT</code>.
 *
 * @param eventType the type of event to listen for
 * @param listener the listener which should no longer be notified when the event occurs
 *
 * @exception IllegalArgumentException <ul>
 *    <li>ERROR_NULL_ARGUMENT - if the listener is null</li>
 * </ul>
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 *
 * @see Listener
 * @see DWT
 * @see #addListener
 * 
 * @since 2.0 
 */
public void removeListener (int eventType, Listener listener) {
    checkDevice ();
    if (listener is null) error (DWT.ERROR_NULL_ARGUMENT);
    if (eventTable is null) return;
    eventTable.unhook (eventType, listener);
}

//void removeMenu (Menu menu) {
//  if (menus is null) return;
//  menus [menu.id - ID_START] = null;
//}
//
//void removePopup (Menu menu) {
//  if (popups is null) return;
//  for (int i=0; i<popups.length; i++) {
//      if (popups [i] is menu) {
//          popups [i] = null;
//          return;
//      }
//  }
//}

bool runAsyncMessages (bool all) {
    return synchronizer.runAsyncMessages (all);
}

bool runDeferredEvents () {
    /*
    * Run deferred events.  This code is always
    * called  in the Display's thread so it must
    * be re-enterant need not be synchronized.
    */
    while (eventQueue !is null) {
        
        /* Take an event off the queue */
        Event event = eventQueue [0];
        if (event is null) break;
        int length = eventQueue.length;
        System.arraycopy (eventQueue, 1, eventQueue, 0, --length);
        eventQueue [length] = null;

        /* Run the event */
        Widget widget = event.widget;
        if (widget !is null && !widget.isDisposed ()) {
            Widget item = event.item;
            if (item is null || !item.isDisposed ()) {
                widget.notifyListeners (event.type, event);
            }
        }

        /*
        * At this point, the event queue could
        * be null due to a recursive invokation
        * when running the event.
        */
    }

    /* Clear the queue */
    eventQueue = null;
    return true;
}

bool runTimers () {
    if (timerList is null) return false;
    bool result = false;
    for (int i=0; i<timerList.length; i++) {
        if (nsTimers [i] is null && timerList [i] !is null) {
            Runnable runnable = timerList [i];
            timerList [i] = null;
            if (runnable !is null) {
                result = true;
                runnable.run ();
            }
        }
    }
    return result;
}

void sendEvent (int eventType, Event event) {
    if (eventTable is null && filterTable is null) {
        return;
    }
    if (event is null) event = new Event ();
    event.display = this;
    event.type = eventType;
    if (event.time is 0) event.time = getLastEventTime ();
    if (!filterEvent (event)) {
        if (eventTable !is null) eventTable.sendEvent (event);
    }
}

/**
 * On platforms which support it, sets the application name
 * to be the argument. On Motif, for example, this can be used
 * to set the name used for resource lookup.  Specifying
 * <code>null</code> for the name clears it.
 *
 * @param name the new app name or <code>null</code>
 */
public static void setAppName (String name) {
    APP_NAME = name;
}

//TODO - use custom timer instead of timerExec
Runnable caretTimer = new class Runnable {
    public void run () {
        if (currentCaret !is null) {
            if (currentCaret is null || currentCaret.isDisposed()) return;
            if (currentCaret.blinkCaret ()) {
                int blinkRate = currentCaret.blinkRate;
                if (blinkRate !is 0) timerExec (blinkRate, this);
            } else {
                currentCaret = null;
            }
        }
        
    }
};
void setCurrentCaret (Caret caret) {
//  if (caretID !is 0) OS.RemoveEventLoopTimer (caretID);
//  caretID = 0;
    currentCaret = caret;
    if (currentCaret !is null) {
        int blinkRate = currentCaret.blinkRate;
        timerExec (blinkRate, caretTimer);
    }
}

/**
 * Sets the location of the on-screen pointer relative to the top left corner
 * of the screen.  <b>Note: It is typically considered bad practice for a
 * program to move the on-screen pointer location.</b>
 *
 * @param x the new x coordinate for the cursor
 * @param y the new y coordinate for the cursor
 * 
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 * 
 * @since 2.1
 */
public void setCursorLocation (int x, int y) {
    checkDevice ();
    CGPoint pt = CGPoint ();
    pt.x = x;  pt.y = y;
    OS.CGWarpMouseCursorPosition (pt);
}

/**
 * Sets the location of the on-screen pointer relative to the top left corner
 * of the screen.  <b>Note: It is typically considered bad practice for a
 * program to move the on-screen pointer location.</b>
 *
 * @param point new position
 * 
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
 *    <li>ERROR_NULL_ARGUMENT - if the point is null
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 * 
 * @since 2.0
 */
public void setCursorLocation (Point point) {
    checkDevice ();
    if (point is null) error (DWT.ERROR_NULL_ARGUMENT);
    setCursorLocation (point.x, point.y);
}

/**
 * Sets the application defined property of the receiver
 * with the specified name to the given argument.
 * <p>
 * Applications may have associated arbitrary objects with the
 * receiver in this fashion. If the objects stored in the
 * properties need to be notified when the display is disposed
 * of, it is the application's responsibility provide a
 * <code>disposeExec()</code> handler which does so.
 * </p>
 *
 * @param key the name of the property
 * @param value the new value for the property
 *
 * @exception IllegalArgumentException <ul>
 *    <li>ERROR_NULL_ARGUMENT - if the key is null</li>
 * </ul>
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 *
 * @see #getData(String)
 * @see #disposeExec(Runnable)
 */
public void setData (String key, Object value) {
    checkDevice ();
    //if (key is null) error (DWT.ERROR_NULL_ARGUMENT);
    
    /* Remove the key/value pair */
    if (value is null) {
        if (keys is null) return;
        int index = 0;
        while (index < keys.length && !keys [index].equals (key)) index++;
        if (index is keys.length) return;
        if (keys.length is 1) {
            keys = null;
            values = null;
        } else {
            String [] newKeys = new String [keys.length - 1];
            Object [] newValues = new Object [values.length - 1];
            System.arraycopy (keys, 0, newKeys, 0, index);
            System.arraycopy (keys, index + 1, newKeys, index, newKeys.length - index);
            System.arraycopy (values, 0, newValues, 0, index);
            System.arraycopy (values, index + 1, newValues, index, newValues.length - index);
            keys = newKeys;
            values = newValues;
        }
        return;
    }
    
    /* Add the key/value pair */
    if (keys is null) {
        keys = new String [] [key];
        values = new Object [] [value];
        return;
    }
    for (int i=0; i<keys.length; i++) {
        if (keys [i].equals (key)) {
            values [i] = value;
            return;
        }
    }
    String [] newKeys = new String [keys.length + 1];
    Object [] newValues = new Object [values.length + 1];
    System.arraycopy (keys, 0, newKeys, 0, keys.length);
    System.arraycopy (values, 0, newValues, 0, values.length);
    newKeys [keys.length] = key;
    newValues [values.length] = value;
    keys = newKeys;
    values = newValues;
}

void setMenuBar (Menu menu) {
    /*
    * Feature in the Macintosh.  SetRootMenu() does not
    * accept NULL to indicate that their should be no
    * menu bar. The fix is to create a temporary empty
    * menu, set that to be the menu bar, clear the menu
    * bar and then delete the temporary menu.
    */
    if (menu is menuBar) return;
    menuBar = menu;
    //remove all existing menu items except the application menu
    NSMenu menubar = application.mainMenu();
    NSInteger count = menubar.numberOfItems();
    while (count > 1) {
        menubar.removeItemAtIndex(count - 1);
        count--;
    }
    //set parent of each item to NULL and add them to menubar
    if (menu !is null) {
        MenuItem[] items = menu.getItems();
        for (int i = 0; i < items.length; i++) {
            items[i].nsItem.setMenu(null);
            menubar.addItem(items[i].nsItem);
        }
    }
}

/**
 * Sets the application defined, display specific data
 * associated with the receiver, to the argument.
 * The <em>display specific data</em> is a single,
 * unnamed field that is stored with every display. 
 * <p>
 * Applications may put arbitrary objects in this field. If
 * the object stored in the display specific data needs to
 * be notified when the display is disposed of, it is the
 * application's responsibility provide a
 * <code>disposeExec()</code> handler which does so.
 * </p>
 *
 * @param data the new display specific data
 *
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 *
 * @see #getData()
 * @see #disposeExec(Runnable)
 */
public void setData (Object data) {
    checkDevice ();
    this.data = data;
}

/**
 * Sets the synchronizer used by the display to be
 * the argument, which can not be null.
 *
 * @param synchronizer the new synchronizer for the display (must not be null)
 *
 * @exception IllegalArgumentException <ul>
 *    <li>ERROR_NULL_ARGUMENT - if the synchronizer is null</li>
 * </ul>
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 *    <li>ERROR_FAILED_EXEC - if an exception occurred while running an inter-thread message</li>
 * </ul>
 */
public void setSynchronizer (Synchronizer synchronizer) {
    checkDevice ();
    if (synchronizer is null) error (DWT.ERROR_NULL_ARGUMENT);
    if (synchronizer is this.synchronizer) return;
    Synchronizer oldSynchronizer;
    synchronized (Device.classinfo) {
        oldSynchronizer = this.synchronizer;
        this.synchronizer = synchronizer;
    }
    if (oldSynchronizer !is null) {
        oldSynchronizer.runAsyncMessages(true);
    }
}

/**
 * Causes the user-interface thread to <em>sleep</em> (that is,
 * to be put in a state where it does not consume CPU cycles)
 * until an event is received or it is otherwise awakened.
 *
 * @return <code>true</code> if an event requiring dispatching was placed on the queue.
 *
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 *
 * @see #wake
 */
public bool sleep () {
    checkDevice ();
    if (getMessageCount () !is 0) return true;
    NSAutoreleasePool pool = cast(NSAutoreleasePool)(new NSAutoreleasePool()).alloc().init();
    try {
        allowTimers = runAsyncMessages = false;
        NSRunLoop.currentRunLoop().runMode(OS.NSDefaultRunLoopMode, NSDate.distantFuture());
        allowTimers = runAsyncMessages = true;
        return true;
    } finally {
        pool.release();
    }
}

int sourceProc (int info) {
    return 0;
}

/**
 * Causes the <code>run()</code> method of the runnable to
 * be invoked by the user-interface thread at the next 
 * reasonable opportunity. The thread which calls this method
 * is suspended until the runnable completes.  Specifying <code>null</code>
 * as the runnable simply wakes the user-interface thread.
 * <p>
 * Note that at the time the runnable is invoked, widgets 
 * that have the receiver as their display may have been
 * disposed. Therefore, it is necessary to check for this
 * case inside the runnable before accessing the widget.
 * </p>
 * 
 * @param runnable code to run on the user-interface thread or <code>null</code>
 *
 * @exception DWTException <ul>
 *    <li>ERROR_FAILED_EXEC - if an exception occurred when executing the runnable</li>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 *
 * @see #asyncExec
 */
public void syncExec (Runnable runnable) {
    Synchronizer synchronizer;
    synchronized (Device.classinfo) {
        if (isDisposed ()) error (DWT.ERROR_DEVICE_DISPOSED);
        synchronizer = this.synchronizer;
    }
    synchronizer.syncExec (runnable);
}

/**
 * Causes the <code>run()</code> method of the runnable to
 * be invoked by the user-interface thread after the specified
 * number of milliseconds have elapsed. If milliseconds is less
 * than zero, the runnable is not executed.
 * <p>
 * Note that at the time the runnable is invoked, widgets 
 * that have the receiver as their display may have been
 * disposed. Therefore, it is necessary to check for this
 * case inside the runnable before accessing the widget.
 * </p>
 *
 * @param milliseconds the delay before running the runnable
 * @param runnable code to run on the user-interface thread
 *
 * @exception IllegalArgumentException <ul>
 *    <li>ERROR_NULL_ARGUMENT - if the runnable is null</li>
 * </ul>
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 *
 * @see #asyncExec
 */
public void timerExec (int milliseconds, Runnable runnable) {
    checkDevice ();
    //TODO - remove a timer, reschedule a timer not tested
    if (runnable is null) error (DWT.ERROR_NULL_ARGUMENT);
    if (timerList is null) timerList = new Runnable [4];
    if (nsTimers is null) nsTimers = new NSTimer [4];
    int index = 0;
    while (index < timerList.length) {
        if (timerList [index] is runnable) break;
        index++;
    }
    if (index !is timerList.length) {
        NSTimer timer = nsTimers [index];
        if (milliseconds < 0) {
            timer.invalidate();
            timerList [index] = null;
            nsTimers [index] = null;
        } else {
            timer.setFireDate(NSDate.dateWithTimeIntervalSinceNow (milliseconds / 1000.0));
        }
        return;
    } 
    if (milliseconds < 0) return;
    index = 0;
    while (index < timerList.length) {
        if (timerList [index] is null) break;
        index++;
    }
    if (index is timerList.length) {
        Runnable [] newTimerList = new Runnable [timerList.length + 4];
        System.arraycopy (timerList, 0, newTimerList, 0, timerList.length);
        timerList = newTimerList;
        NSTimer [] newTimerIds = new NSTimer [nsTimers.length + 4];
        System.arraycopy (nsTimers, 0, newTimerIds, 0, nsTimers.length);
        nsTimers = newTimerIds;
    }
    NSNumber userInfo = NSNumber.numberWithInt(index);
    NSTimer timer = NSTimer.static_scheduledTimerWithTimeInterval_target_selector_userInfo_repeats_(milliseconds / 1000.0, timerDelegate, OS.sel_timerProc_1, userInfo.id_, false);
    timer.retain();
    if (timer !is null) {
        nsTimers [index] = timer;
        timerList [index] = runnable;
    }
}

int timerProc (int id) {
    NSTimer timer = new NSTimer (id);
    NSNumber number = new NSNumber(timer.userInfo());
    int index = number.intValue();
    if (timerList is null) return 0;
    if (0 <= index && index < timerList.length) {
        if (allowTimers) {
            Runnable runnable = timerList [index];
            timerList [index] = null;
            nsTimers [index] = null;
            if (runnable !is null) runnable.run ();
        } else {
            nsTimers [index] = null;
            wakeThread ();
        }
    }
    timer.release();
    return 0;
}

/**
 * Forces all outstanding paint requests for the display
 * to be processed before this method returns.
 *
 * @exception DWTException <ul>
 *    <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 * 
 * @see Control#update()
 */
public void update () {
    checkDevice (); 
//  Shell [] shells = getShells ();
//  for (int i=0; i<shells.length; i++) {
//      Shell shell = shells [i];
//      if (!shell.isDisposed ()) shell.update (true);
//  }

}

/**
 * If the receiver's user-interface thread was <code>sleep</code>ing, 
 * causes it to be awakened and start running again. Note that this
 * method may be called from any thread.
 * 
 * @exception DWTException <ul>
 *    <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
 * </ul>
 * 
 * @see #sleep
 */
public void wake () {
    synchronized (Device.classinfo) {
        if (isDisposed ()) error (DWT.ERROR_DEVICE_DISPOSED);
        if (thread is Thread.getThis ()) return;
        wakeThread ();
    }
}

void wakeThread () {
    NSObject object = (new NSObject()).alloc().init();
    object.performSelectorOnMainThread_withObject_waitUntilDone_(OS.sel_release, null, false);
}

extern (C) private static:

objc.id applicationDelegateProc(objc.id ID, objc.SEL selector, objc.id arg0) {
    Display display = Display.findDisplay(Thread.getThis);
    String sel = fromStringz(selector);
    with (display) {
    
    if (sel == OS.sel_applicationWillFinishLaunching_1) {
        id dict = NSDictionary.dictionaryWithObject(applicationDelegate, NSString.stringWith("NSOwner"));
        NSString nibFile = NSString.stringWith("/System/Library/Frameworks/JavaVM.framework/Resources/English.lproj/DefaultApp.nib");
        if (!NSBundle.loadNibFile(nibFile, dict, null)) {
            nibFile = NSString.stringWith("/System/Library/Frameworks/JavaVM.framework/Versions/1.5.0/Resources/English.lproj/DefaultApp.nib");
            NSBundle.loadNibFile(nibFile, dict, null);  
        }
        //replace %@ with application name
        NSMenu mainmenu = application.mainMenu();
        NSMenuItem appitem = mainmenu.itemAtIndex(0);
        if (appitem !is null) {
            NSMenu sm = appitem.submenu();
            NSArray ia = sm.itemArray();
            for(int i = 0; i < ia.count(); i++) {
                NSMenuItem ni = new NSMenuItem(ia.objectAtIndex(i));
                NSString title = ni.title().stringByReplacingOccurrencesOfString_withString_(NSString.stringWith("%@"), NSString.stringWith(APP_NAME));
                ni.setTitle(title);
            }
        }
    } else if (sel == OS.sel_terminate_1) {
        application.terminate(application);
    } else if (sel == OS.sel_orderFrontStandardAboutPanel_1) {
        Event event = new Event ();
        sendEvent (DWT.ABORT, event);
    } else if (sel == OS.sel_hideOtherApplications_1) {
        application.hideOtherApplications(application);
    } else if (sel == OS.sel_hide_1) {
        application.hide(application);
    } else if (sel == OS.sel_unhideAllApplications_1) {
        application.unhideAllApplications(application);
    } else if (sel == OS.sel_applicationShouldTerminate_1) {
        if (!disposing) {
            Event event = new Event ();
            sendEvent (DWT.Close, event);
            if (event.doit) {
                return cast(objc.id) OS.NSTerminateNow;
            }
        }
        return cast(objc.id) OS.NSTerminateCancel;
    } else if (sel == OS.sel_applicationWillTerminate_1) {
        dispose();
    } 
    return null;
    }
}


objc.id dialogProc(objc.id id, objc.SEL selector, objc.id arg0) {
    String sel = fromStringz(selector);
        
    NSIntger jniRef = cast(NSIntger) OS.objc_msgSend(id, OS.sel_tag);
    if (jniRef is 0 || jniRef is -1) return 0;
    if (sel == OS.sel_changeColor_1) {
        ColorDialog dialog = cast(ColorDialog)OS.JNIGetObject(jniRef);
        if (dialog is null) return 0;
        dialog.changeColor(arg0);
    } else if (sel == OS.sel_changeFont_1) {
        FontDialog dialog = cast(FontDialog)OS.JNIGetObject(jniRef);
        if (dialog is null) return 0;
        dialog.changeFont(arg0);
    } else if (sel == OS.sel_windowWillClose_1) {
        Object object = OS.JNIGetObject(jniRef);
        if (cast(FontDialog) object) {
            (cast(FontDialog)object).windowWillClose(arg0);
        } else if (cast(ColorDialog) object) {
            (cast(ColorDialog)object).windowWillClose(arg0);
        }
    }
    return null;
}

objc.id windowDelegateProc2(objc.id delegatee, objc.SEL selector) {
    String sel = fromStringz(selector);
    
    if (sel == OS.sel_tag) {
        NSInteger* tag;
        OS.object_getInstanceVariable(delegatee, "tag", tag);    
        return tag[0];
    }
    NSInteger jniRef = cast(NSInteger) OS.objc_msgSend(delegatee, OS.sel_tag);
    if (jniRef is 0 || jniRef is -1) return null;
    Widget widget = cast(Widget)OS.JNIGetObject(jniRef);
    if (widget is null) return null;
    if (sel == OS.sel_isFlipped) {
        return widget.isFlipped() ? cast(objc.id) 1 : null;
    }
    if (sel == OS.sel_sendSelection) {
        widget.sendSelection();
        return null;
    }
    if (sel == OS.sel_sendArrowSelection) {
        widget.sendArrowSelection();
        return null;
    }
    if (sel == OS.sel_sendDoubleSelection) {
        widget.sendDoubleSelection();
        return null;
    }
    if (sel == OS.sel_sendVerticalSelection) {
        widget.sendVerticalSelection();
        return null;
    }
    if (sel == OS.sel_sendHorizontalSelection) {
        widget.sendHorizontalSelection();
        return null;
    }
    if (sel == OS.sel_acceptsFirstResponder) {
        return widget.acceptsFirstResponder() ? cast(objc.id) 1 : null;
    }
    if (sel == OS.sel_becomeFirstResponder) {
        return widget.becomeFirstResponder() ? cast(objc.id) 1 : null;
    }
    if (sel == OS.sel_resignFirstResponder) {
        return widget.resignFirstResponder() ? cast(objc.id) 1 : null;
    }
    return null;
}

objc.id windowDelegateProc3(objc.id ID, objc.SEL selector, objc.id arg0) {
    String sel = fromStringz(selector);
    
    if (sel == OS.sel_timerProc_1) {
        return timerProc (arg0);
    }
    if (sel == OS.sel_setTag_1) {
        OS.object_setInstanceVariable(ID, "tag", cast(NSInteger) arg0);
        return 0;
    }
    NSInteger jniRef = OS.objc_msgSend(ID, OS.sel_tag);
    if (jniRef is 0 || jniRef is -1) return 0;
    Widget widget = cast(Widget)OS.JNIGetObject(jniRef);
    if (widget is null) return 0;
    if (sel == OS.sel_windowWillClose_1) {
        widget.windowWillClose(arg0);
    } else if (sel == OS.sel_drawRect_1) {
        NSRect rect = NSRect();
        OS.memmove(rect, arg0, NSRect.sizeof);
        widget.drawRect(ID, rect);
    } else if (sel == OS.sel_windowShouldClose_1) {
        return widget.windowShouldClose(arg0) ? 1 : 0;
    } else if (sel == OS.sel_mouseDown_1) {
        widget.mouseDown(arg0);
    } else if (sel == OS.sel_rightMouseDown_1) {
        widget.rightMouseDown(arg0);
    } else if (sel == OS.sel_mouseDragged_1) {
        widget.mouseDragged(arg0);
    } else if (sel == OS.sel_mouseUp_1) {
        widget.mouseUp(arg0);
    } else if (sel == OS.sel_mouseEntered_1) {
        widget.mouseEntered(arg0);
    } else if (sel == OS.sel_flagsChanged_1) {
        widget.flagsChanged(arg0);
    } else if (sel == OS.sel_numberOfRowsInTableView_1) {
        return widget.numberOfRowsInTableView(arg0);
    } else if (sel == OS.sel_comboBoxSelectionDidChange_1) {
        widget.comboBoxSelectionDidChange(arg0);
    } else if (sel == OS.sel_tableViewSelectionDidChange_1) {
        widget.tableViewSelectionDidChange(arg0);
    } else if (sel == OS.sel_windowDidResignKey_1) {
        widget.windowDidResignKey(arg0);
    } else if (sel == OS.sel_windowDidBecomeKey_1) {
        widget.windowDidBecomeKey(arg0);
    } else if (sel == OS.sel_windowDidResize_1) {
        widget.windowDidResize(arg0);
    } else if (sel == OS.sel_windowDidMove_1) {
        widget.windowDidMove(arg0);
    } else if (sel == OS.sel_menuForEvent_1) {
        return widget.menuForEvent(arg0);
    } else if (sel == OS.sel_menuWillOpen_1) {
        widget.menuWillOpen(arg0);
    } else if (sel == OS.sel_menuWillClose_1) {
        widget.menuWillClose(arg0);
    } else if (sel == OS.sel_menuNeedsUpdate_1) {
        widget.menuNeedsUpdate(arg0);
    } else if (sel == OS.sel_outlineViewSelectionDidChange_1) {
        widget.outlineViewSelectionDidChange(arg0);
    } else if (sel == OS.sel_sendEvent_1) {
        widget.windowSendEvent(ID, arg0);
    } else if (sel == OS.sel_helpRequested_1) {
        widget.helpRequested(arg0);
    }
    return null;
}


objc.id windowDelegateProc4(objc.id delegatee, objc.SEL selector, objc.id arg0, objc.id arg1) {
    String sel = fromStringz(selector);
    
    NSInteger jniRef = cast(NSInteger) OS.objc_msgSend(delegatee, OS.sel_tag);
    if (jniRef is 0 || jniRef is -1) return 0;
    Widget widget = cast(Widget)OS.JNIGetObject(jniRef);
    if (widget is null) return 0;
    if (sel == OS.sel_tabView_1willSelectTabViewItem_1) {
        widget.willSelectTabViewItem(arg0, arg1);
    } else if (sel == OS.sel_outlineView_1isItemExpandable_1) {
        return widget.outlineView_isItemExpandable(arg0, arg1) ? cast(objc.id) 1 : null;
    } else if (sel == OS.sel_outlineView_1numberOfChildrenOfItem_1) {
        return widget.outlineView_numberOfChildrenOfItem(arg0, arg1);
    } else if (sel == OS.sel_outlineView_1shouldCollapseItem_1) {
        return widget.outlineView_shouldCollapseItem(arg0, arg1) ? cast(objc.id) 1 : null;
    } else if (sel == OS.sel_outlineView_1shouldExpandItem_1) {
        return widget.outlineView_shouldExpandItem(arg0, arg1) ? cast(objc.id) 1 : null;
    } else if (sel == OS.sel_menu_1willHighlightItem_1) {
        widget.menu_willHighlightItem(arg0, arg1);
    }
    return null;
}

objc.id windowDelegateProc5(objc.id delegatee, objc.SEL selector, objc.id arg0, objc.id arg1, objc.id arg2) {
    String sel = fromStringz(selector);
    
    NSInteger jniRef = cast(NSInteger) OS.objc_msgSend(delegatee, OS.sel_tag);
    if (jniRef is 0 || jniRef is -1) return 0;
    Widget widget = cast(Widget)OS.JNIGetObject(jniRef);
    if (widget is null) return 0;
    if (sel == OS.sel_tableView_1objectValueForTableColumn_1row_1) {
        return widget.tableView_objectValueForTableColumn_row(arg0, arg1, cast(NSInteger) arg2);
    }
    if (sel == OS.sel_tableView_1shouldEditTableColumn_1row_1) {
        return widget.tableView_shouldEditTableColumn_row(arg0, arg1, cast(NSInteger) arg2) ? cast(objc.id) 1 : null;
    } else if (sel == OS.sel_textView_1clickedOnLink_1atIndex_1) {
         return widget.clickOnLink(arg0, arg1, cast(NSUInteger) arg2) ? cast(objc.id) 1 : null;
    } else if (sel == OS.sel_outlineView_1child_1ofItem_1) {
         return widget.outlineView_child_ofItem(arg0, arg1, cast(NSInteger) arg2);
    } else if (sel == OS.sel_outlineView_1objectValueForTableColumn_1byItem_1) {
         return widget.outlineView_objectValueForTableColumn_byItem(arg0, arg1, arg2);
    }
    return null;
}

objc.id windowDelegateProc6(objc.id delegatee, int sel, int arg0, int arg1, int arg2, int arg3) {
    String sel = fromStringz(selector);
    
    NSInteger jniRef = cast(NSInteger) OS.objc_msgSend(delegatee, OS.sel_tag);
    if (jniRef is 0 || jniRef is -1) return 0;
    Widget widget = cast(Widget)OS.JNIGetObject(jniRef);
    if (widget is null) return 0;
    if (sel == OS.sel_tableView_1willDisplayCell_1forTableColumn_1row_1) {
        widget.tableView_willDisplayCell_forTableColumn_row(arg0, arg1, arg2, cast(NSInteger) arg3);
    } else if (sel == OS.sel_outlineView_1willDisplayCell_1forTableColumn_1item_1) {
        widget.outlineView_willDisplayCell_forTableColumn_item(arg0, arg1, arg2, arg3);
    } else  if (sel == OS.sel_outlineView_1setObjectValue_1forTableColumn_1byItem_1) {
        widget.outlineView_setObjectValue_forTableColumn_byItem(arg0, arg1, arg2, arg3);
    } else if (sel == OS.sel_tableView_1setObjectValue_1forTableColumn_1row_1) {
        widget.tableView_setObjectValue_forTableColumn_row(arg0, arg1, arg2, cast(NSInteger) arg3);
    }
    return null;
}
}