/*
 * Copyright (c) 2008, 2009 Borland Software Corp.
 * 
 * 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:
 *    Artem Tikhomirov (Borland) - initial API and implementation
 */
modeltype widget uses "http://www.eclipse.org/gmf/2008/Widget";

library Widgets;

helper fieldName(w : widget::Widget) : String {
	return 'my' + w.name.firstToUpper()
}

helper widget::Composite::hasTextWidgets() : Boolean {
	return self.children->asSequence()->hasTextWidgets()
}

helper widget::Composite::hasRadioButtons() : Boolean {
	return self.children->asSequence()->hasRadioButtons()
}

helper widget::Composite::hasCheckBoxes() : Boolean {
	return self.children->asSequence()->hasCheckBoxes()
}

helper widget::Composite::hasSpins() : Boolean {
	return self.children->asSequence()->hasSpins()
}

helper widget::Composite::hasCombos() : Boolean {
	return self.children->asSequence()->hasCombos()
}

helper Sequence(widget::Widget)::hasTextWidgets() : Boolean {
	return not self->textWidgets()->isEmpty()
}

helper Sequence(widget::Widget)::hasRadioButtons() : Boolean {
	return not self->radioWidgets()->isEmpty()
}

helper Sequence(widget::Widget)::hasCheckBoxes() : Boolean {
	return not self->checkboxWidgets()->isEmpty()
}

helper Sequence(widget::Widget)::hasSpins() : Boolean {
	return not self->spinWidgets()->isEmpty()
}

helper Sequence(widget::Widget)::hasCombos() : Boolean {
	return not self->comboWidgets()->isEmpty()
}

helper widget::Composite::textWidgets() : Sequence(widget::TextEntry) {
	return self.children->asSequence()->textWidgets()
}

helper widget::Composite::radioWidgets() : Sequence(widget::RadioButton) {
	return self.children->asSequence()->radioWidgets()
}

helper widget::Composite::checkboxWidgets() : Sequence(widget::CheckBox) {
	return self.children->asSequence()->checkboxWidgets()
}

helper widget::Composite::spinWidgets() : Sequence(widget::Spin) {
	return self.children->asSequence()->spinWidgets()
}

helper widget::Composite::comboWidgets() : Sequence(widget::Combo) {
	return self.children->asSequence()->comboWidgets()
}

helper Sequence(widget::Widget)::textWidgets() : Sequence(widget::TextEntry) {
	return allWidgets(self)[widget::TextEntry]
}

helper Sequence(widget::Widget)::radioWidgets() : Sequence(widget::RadioButton) {
	return allWidgets(self)[widget::RadioButton]
}

helper Sequence(widget::Widget)::checkboxWidgets() : Sequence(widget::CheckBox) {
	return allWidgets(self)[widget::CheckBox]
}

helper Sequence(widget::Widget)::spinWidgets() : Sequence(widget::Spin) {
	return allWidgets(self)[widget::Spin]
}

helper Sequence(widget::Widget)::comboWidgets() : Sequence(widget::Combo) {
	return allWidgets(self)[widget::Combo]
}

helper allWidgets(w : Sequence(widget::Widget)) : Sequence(widget::Widget) {
	return if w[widget::Composite]->isEmpty() then w else w->union(allWidgets(w[widget::Composite].children)) endif
}

helper createsAnyLabel(w : Sequence(widget::Widget)) : Boolean {
	return let aw = allWidgets(w) in not aw[widget::Spin]->isEmpty() or aw[widget::TextEntry]->exists(te | te.label <> null)
}