DataMuseum.dk

top - metrics - download

    Length: 5837 (0x16cd)
    Types: TextFile
    Names: »Menus.c«

└─⟦8648bda34⟧ Bits:30007244 EUUGD5_II: X11R5
    └─⟦87c3ac0e0⟧ »./contrib-3/contrib-3.00« 
        └─⟦de8ce1454⟧ 
            └─⟦this⟧ »contrib/lib/iv/src/bin/doc/Menus.c« 

TextFile

/*
 * Copyright (c) 1991 Stanford University
 *
 * Permission to use, copy, modify, distribute, and sell this software and its
 * documentation for any purpose is hereby granted without fee, provided
 * that the above copyright notice appear in all copies and that both that
 * copyright notice and this permission notice appear in supporting
 * documentation, and that the name of Stanford not be used in advertising or
 * publicity pertaining to distribution of the software without specific,
 * written prior permission.  Stanford makes no representations about
 * the suitability of this software for any purpose.  It is provided "as is"
 * without express or implied warranty.
 *
 * STANFORD DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
 * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS.
 * IN NO EVENT SHALL STANFORD BE LIABLE FOR ANY SPECIAL, INDIRECT OR
 * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE,
 * DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
 * OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION
 * WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
 */

/*
 * Menus for doc
 */

#include "Command.h"
#include "Document.h"
#include "DocViewer.h"
#include "Menus.h"
#include "TextItem.h"
#include "list.h"

#include <IV-look/kit.h>
#include <IV-look/menu.h>
#include <IV-look/telltale.h>
#include <InterViews/box.h>
#include <InterViews/label.h>
#include <InterViews/session.h>
#include <InterViews/style.h>
#include <InterViews/target.h>

#include <OS/string.h>

#include <stdio.h>
#include <string.h>
#include <strstream.h>

class DocMenuInfo {
public:
    char* _tag;
    DocMenu* _menu;
};

declareList(DocMenuInfo_List,DocMenuInfo)
implementList(DocMenuInfo_List,DocMenuInfo)

static Glyph* make_label (Document* document, char* text) {
    istrstream in(text);
    TextItem* entry = new TextItem(nil, nil, 0, 0, "");
    entry->ref();
    document->read(in, entry, 0, 0);
    long count = entry->item_count();
    Glyph* label = new Target(new LRBox(count), TargetPrimitiveHit);
    for (long i = 0; i < count; ++i) {
	label->append(
	    document->character(entry->item_code(i), entry->item_style(i))
	);
    }
    entry->unref();
    return label;
}

DocMenu::DocMenu (
    DocumentViewer* viewer, const char* name, Menu* body
) : MonoGlyph(body) {
    _menu = body;
    _info = new DocMenuInfo_List();
    _viewer = viewer;
    Style* style = Session::instance()->style();
    String v;
    if (!style->find_attribute(name, v)) {
	return;
    }

    Kit* kit = Kit::instance();
    const char* def = v.string();
    boolean done = false;
    while (!done) {
        char line[256];
        char* p = line;
        char c;
        do {
            c = *def; if (c == '\n') c = '\0'; *p = c;
            if (*def == '\0') done = true;
            ++p; ++def;
        } while (c != '\0');
        p = line;
        while (*p == ' ' || *p == '\t') ++p;
        char* tag;
        if (*p == '<') {
            tag = p + 1;
            p = strchr(tag, '>');
            *p = '\0';
            ++p;
        } else {
            tag = "";
        }
        char* command;
        while (*p == ' ' || *p == '\t') ++p;
        if (*p == '(') {
            command = p + 1;
            p = strchr(command, ')');
            *p = '\0';
            ++p;
        } else {
            command = "";
        }
        while (*p == ' ' || *p == '\t') ++p;

        DocMenuInfo info;
        info._tag = strcpy(new char[strlen(tag) + 1], tag);
	info._menu = nil;

	if (p == nil || strlen(p) == 0) {
	    _menu->add_item(kit->menu_item_separator(style));
	} else {
	    Glyph* label = make_label(viewer->document(), p);
	    if (strncmp(command, "menu", 4) == 0) {
		Menu* pulldown = kit->pulldown(style);
		info._menu = new DocMenu(viewer, command+5, pulldown);
		_menu->add_item(kit->menubar_item(label, style), pulldown);
	    } else {
		Command* cmd = nil;
		if (strlen(command) > 0) {
		    cmd = new Command(viewer, command);
		}
		_menu->add_item(kit->menu_item(label, style), cmd);
	    }
	}

        _info->append(info);
    }
}

DocMenu::~DocMenu () {
    while (_info->count() > 0) {
        DocMenuInfo& info = _info->item(0);
        delete info._tag;
        _info->remove(0);
    }
    delete _info;
}

int DocMenu::highlight (const char* tag, boolean highlight) {
    int tally = 0;
    long count = _info->count();
    for (long i = 0; i < count; i++) {
        DocMenuInfo& info = _info->item(i);
        int subtally = 0;
        if (info._menu != nil) {
            subtally += info._menu->highlight(tag, highlight);
        }
        if (tag == nil || strcmp(tag, info._tag) == 0) {
            subtally += 1;
        }
        if (subtally > 0) {
            _menu->telltale(i)->highlight(highlight);
        }
        tally += subtally;
    }
    return tally;
}

void DocMenu::choose (const char* tag, boolean choose) {
    long count = _info->count();
    for (long i = 0; i < count; i++) {
        DocMenuInfo& info = _info->item(i);
        if (tag == nil || strcmp(tag, info._tag) == 0) {
            _menu->telltale(i)->choose(choose);
        }
        if (info._menu != nil) {
            info._menu->choose(tag, choose);
        }
    }
}

void DocMenu::enable (const char* tag, boolean enable) {
    long count = _info->count();
    for (long i = 0; i < count; i++) {
        DocMenuInfo& info = _info->item(i);
        if (tag == nil || strcmp(tag, info._tag) == 0) {
            _menu->telltale(i)->enable(enable);
        }
        if (info._menu != nil) {
            info._menu->enable(tag, enable);
        }
    }
}

DocMenubar::DocMenubar (
    DocumentViewer* viewer, const char* name
) : DocMenu(
    viewer, name,
    Kit::instance()->menubar(Session::instance()->style())
) { }

DocMenubar::~DocMenubar () { }