Ticket #20: tablebug.d

/*******************************************************************************
 * Copyright (c) 2000, 2004 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
 * D Port:
 *     Jesse Phillips <Jesse.K.Phillips+D> gmail.com
 *******************************************************************************/
//module table.Snippet144;

/*
 * Virtual Table example snippet: create a table with 1,000,000 items (lazy)
 *
 * For a list of all SWT example snippets see
 * http://www.eclipse.org/swt/snippets/
 *
 * @since 3.0
 *
 */
 
/*
 * This sample triggers "ArrayBoundsException@dwt.widgets.Table(198): Array index out of bounds"
 * when using DWT 3.4-1.  Tango 0.99.7, DMD 1.033.
 *
 * build command: bud tablebug.d -odobj -g -debug -Xtango tango-user-dmd.lib -L/su:console:4 -L/rc:dwt
 *
 * Different ways to make the crash go away:
 * 1. Comment out the EraseItem listener.
 * 2. Comment out the PaintItem listener.
 * 3. Create the table with DWT.FULL_SELECTION.
 *
 * I don't know if the table has to be virtual or not yet.
 *
 * -torhu
 */
 
import dwt.DWT;
import dwt.graphics.TextLayout;
import dwt.widgets.Button;
import dwt.widgets.Display;
import dwt.widgets.Event;
import dwt.widgets.Label;
import dwt.widgets.Listener;
import dwt.widgets.Shell;
import dwt.widgets.Table;
import dwt.widgets.TableItem;
import dwt.layout.RowLayout;
import dwt.layout.RowData;

import tango.io.Stdout;
import tango.time.StopWatch;
import tango.util.Convert;

const int COUNT = 1000000;

void main() {
    auto display = new Display ();
    auto shell = new Shell (display);
    shell.setLayout (new RowLayout (DWT.VERTICAL));
    auto table = new Table (shell, DWT.VIRTUAL | DWT.BORDER);
    //auto table = new Table (shell, DWT.VIRTUAL | DWT.BORDER | DWT.FULL_SELECTION);
    table.addListener (DWT.SetData, new class Listener {
        public void handleEvent (Event event) {
            auto item = cast(TableItem) event.item;
            auto index = table.indexOf (item);
            item.setText ("Item " ~ to!(char[])(index));
            Stdout(item.getText ()).newline;
        }
    });
    table.addListener (DWT.EraseItem, new class Listener {
        public void handleEvent (Event e) {
            Stdout("e").flush;
        }
    });
    table.addListener (DWT.PaintItem, new class Listener {
        public void handleEvent (Event e) {           
            Stdout("p").flush;
        }
    });
    table.setLayoutData (new RowData (200, 200));
    auto button = new Button (shell, DWT.PUSH);
    button.setText ("Add Items");
    auto label = new Label(shell, DWT.NONE);
    button.addListener (DWT.Selection, new class Listener {
        public void handleEvent (Event event) {
            StopWatch elapsed;
            elapsed.start;
            table.setItemCount (COUNT);
            auto t = elapsed.stop;
            label.setText ("Items: " ~ to!(char[])(COUNT) ~
                           ", Time: " ~ to!(char[])(t) ~ " (sec)");
            shell.layout ();
        }
    });
    shell.pack ();
    shell.open ();
    while (!shell.isDisposed ()) {
        if (!display.readAndDispatch ()) display.sleep ();
    }
    display.dispose ();
}