The Yoix^® Scripting Language

Reading returns the current cursor. Writing immediately sets the tablemanager's cursor, and the cursor of components contained in the tablemanager that do not pick their own, to the new value. A tablemanager that does not set its own cursor uses DEFAULT_CURSOR.

When inputfilter is a string, each line in text corresponds to a row in the table and any character in the inputfilter string qualifies as a column separator; leading and trailing column separators can be omitted.

An inputfilter that is an array must be arranged in triples that consist of a prefix that is a string, a column number that is an integer, and a simple character translator that is a string or NULL. Each line in text is compared to the prefix in each triple. When there is a match the prefix is stripped from the line, characters in the line at even positions in the character translator string (i.e., the third element in each triple) are translated into characters at the corresponding odd positions, and the resulting string is stored in the column selected by the second element of the triple.

import yoix.*.*;

String text = "";
String line;
File   fp;

Header(String name, int alignment) {
    return(new Label {
        String text = name;
        Color  background = Color.black;
        Color  foreground = Color.white;
        int    alignment = alignment;
    });
}

HeaderConstraint(int number) {
    return(new GridBagConstraints {
        int    gridx = number;
        int    gridy = 1;
        int    fill = HORIZONTAL;
        Insets insets = {double left = 1;};
    });
}

Column(int rows, int columns, int alignment, Function action) {
    return(new TableColumn {
        int   rows = rows;
        int   columns = columns;
        int   alignment = alignment;
        Color background = Color.white;
        Color foreground = (action == NULL) ? Color.black : Color.blue;
        Color visitcolor = (action == NULL) ? NULL : Color.magenta;
        Function actionPerformed = action;
    });
}

ColumnConstraint(int number) {
    return(new GridBagConstraints {
        int    gridx = number;
        int    gridy = 2;
        int    fill = BOTH;
        Insets insets = {double left = 1, top = 1;};
    });
}

actionPerformed(ActionEvent e) {
    printf("you just picked %s\n", e.command);
}

syncViewport(viewport, extent, cell) {
    Pointer vbar;

    if (root != NULL) {
        vbar = root.components.vbar;
        vbar.cellheight = cell.height;
        vbar.minimum = 0;
        vbar.maximum =
	    (extent.height + viewport.height)/cell.height - 1;
        vbar.visibleamount = viewport.height/cell.height;
        vbar.unitincrement = 1;
        vbar.blockincrement = viewport.height/cell.height - 1;
    }
}

Frame f = {
    Dimension size = NULL;

    Array layout = {
        new TableManager {
            String        tag = "passwd";
            String        inputfilter = ":";
            Color         background = Color.red;
            Function      syncViewport = global.syncViewport;
            GridBagLayout layoutmanager;

            int nextcolumn = 1;

            Array layout = {
                Header("Name", CENTER),
                HeaderConstraint(nextcolumn),
                Column(20, 10, LEFT, global.actionPerformed),
                ColumnConstraint(nextcolumn++),
                Header("Password", CENTER),
                HeaderConstraint(nextcolumn),
                Column(20, 15, LEFT, NULL),
                ColumnConstraint(nextcolumn++),
                Header("UID", RIGHT),
                HeaderConstraint(nextcolumn),
                Column(20, 6, RIGHT, NULL),
                ColumnConstraint(nextcolumn++),
                Header("GID", RIGHT),
                HeaderConstraint(nextcolumn),
                Column(20, 6, RIGHT, NULL),
                ColumnConstraint(nextcolumn++),
                Header("GECOS", LEFT),
                HeaderConstraint(nextcolumn),
                Column(20, 40, LEFT, NULL),
                ColumnConstraint(nextcolumn++),
            };
        }, WEST,

        new Scrollbar {
            String tag = "vbar";
            double cellheight;

            adjustmentValueChanged(e) {
                Point origin = root.components.passwd.origin;

                origin.y = value*cellheight;
                root.components.passwd.origin = origin;
            }
        }, EAST,
    };
};

if ((fp = fopen("/etc/passwd", "r")) != NULL) {
    while ((line = fp.nextline) != NULL) {
        if (line[0] != '#')
            text += line + "\n";
    }
    f.components.passwd.text = text;
    fclose(fp);
}

f.visible = TRUE;