// =============================================================================

// $Scanit$

msg_multiple_selections_prohibited="Ой-ля-ля! В данной группе уже выбран один признак.";
msg_ie_crippled = "Cannot view saved content of the classificator under IE. Try other browser. Firefox and Opera are known to work.";

// =============================================================================

function rebuild() {
/*
	if (navigator.userAgent.toLowerCase().indexOf('msie') + 1) {
		alert(msg_ie_crippled);
		return;
	};
*/
	rebuild_fgstable('intsens', 0);
	rebuild_fgstable('logicsethics', 0);
	rebuild_fgstable('nalnost', 0);
	rebuild_fgstable('vertnost', 0);
	rebuild_fgstable('dominants', 1);

	rebuild_indfeatures_table();

	if (top.file_id) {
		// this is a saved copy of the classifier

		// feature selection is taken care of above (in rebuild_*())

		// fill in file properties
		top.frames[1].document.getElementById('file_location').innerHTML = top.location;
		top.frames[1].document.file_properties.file_name.value = top.file_name;
		top.frames[1].document.file_properties.file_source.value = top.file_source;

		// show the overview panel
		toggle_overview(1);
	} else {
		// this is a fresh copy of classifier
		// overview page is hidden by default
	}
}

function toggle_overview(toggle) {
	var on = "50%,50%"
	var off = "*,0";

	if (toggle) {
		parent.document.body.rows = (parent.document.body.rows == on) ? off : on;
	} else {
		// if not toggle, hide it completely
		parent.document.body.rows = off;
	}
}

function register_feature_selection(add, fg_n, fid) {
        var f = fg_n + "_" + fid;

        // remove the feature from the list, to avoid duplicates
        var i;
        for(i=0; i<top.selected_features.length; i++) {
                if (top.selected_features[i] == f) {
                        top.selected_features.splice(i, 1);
                        break;
                }
        }

        if (add) {
                // add the feature
                top.selected_features.push(f);
        }
}

function is_feature_selected(fg_n, fid) {
        var f = fg_n + "_" + fid;

        var i;
        for(i=0; i<top.selected_features.length; i++) {
                if (top.selected_features[i] == f) {
                        return 1;
                }
        }

        return 0;
}

function rebuild_once() {
	rebuild();

	// remove the onLoad handler, to prevent automatic discarding of content of the saved documents
	document.getElementsByTagName('body')[0].setAttribute('onLoad', '');
}

function rebuild_indfeatures_table() {
	// cleanup the representation elements
	flush_table(document, 'indfeatures_table');
	flush_table(parent.frames[1].document, 'overview_indfeatures_table');

        var tbody = document.getElementById('indfeatures_table').getElementsByTagName('tbody')[0];

	var indfs = document.getElementById('db_indfeatures').getElementsByTagName('tbody');
	var i;
	for(i=0; i<indfs.length; i++) { //
		var fg_n = "6-" + ((i+1)<10?'0':'') + (i+1); // XXX not clean
		var fs = indfs[i].getElementsByTagName('tr');
		var type = fs[0].getElementsByTagName('th')[0].innerHTML;

		var row, td;

		row = document.createElement('tr');
		td = document.createElement('th');
		td.className = 'indfeature_type';
		td.setAttribute('colspan', 2);
		td.innerHTML = '<br>' + type + '<br>&nbsp;';
		row.appendChild(td);
		tbody.appendChild(row);
		row = null;

		var j;
		for (j=1; j < fs.length; j++) {
			var fid = j; // XXX not clean
			var result = fs[j].getElementsByTagName('td')[0].innerHTML;
			td = document.createElement('td');
			td.id = "indfeature_main_" + fg_n + "_" + fid;
			td.className = 'indfeature_descr';

			///var a = document.createElement('a');
			///a.innerHTML = '&nbsp;' + result;
			td.innerHTML = '&nbsp;' + result;
			td.setAttribute('onClick', "toggle_indfeature_selection('" + fg_n + "', '" + fid + "', '" + type + "', '" + result + "', " + (fs.length-1) + "); return false;");
			///td.appendChild(a);

			if (row) {
				row.appendChild(td);
				tbody.appendChild(row);
				row = null;
			} else {
				row = document.createElement('tr');
				row.appendChild(td);
			}
		}

		if (row) {
			td = document.createElement('td');
			td.innerHTML = '&nbsp;';
			row.appendChild(td);
			tbody.appendChild(row);
			row = null;
		}

		// second pass, to toggle feature selection
		for (j=1; j < fs.length; j++) {
			var fid = j; // XXX not clean
			var result = fs[j].getElementsByTagName('td')[0].innerHTML;

			if (is_feature_selected(fg_n, fid)) {
				toggle_indfeature_selection(fg_n, fid, type, result , (fs.length-1));
			}
		}
	}
}

// This function rebuilds the representation elements from the storage element
function rebuild_fgstable(tblid, overviewmode) {
	// cleanup the representation elements
	flush_table(document, 'fgstable_' + tblid);
	flush_table(parent.frames[1].document, 'overview_fgstable_' + tblid);

	var fgs = document.getElementById('db_fgstable_' + tblid).getElementsByTagName('tbody');
	var i;
	for(i=0; i<fgs.length; i++) { // for each feature group described by tbody element
		var features = fgs[i].getElementsByTagName('tr');
		var fg_n = features[0].getElementsByTagName('td')[0].innerHTML;
		var fg_descr = features[0].getElementsByTagName('td')[1].innerHTML;

		var frows = add_fg('fgstable_' + tblid, fg_n, fg_descr);

		var nfeatures = features.length-1;
		var j;
		for (j=1; j<features.length; j++) {
			// for each feature
			var tds = features[j].getElementsByTagName('td');
			var feature_result = tds[0].innerHTML;
			var feature_descr = tds[1].innerHTML;
			var feature_picture = tds[2].innerHTML;

			add_feature(frows, feature_result, feature_descr, feature_picture, nfeatures, 'fgstable_' + tblid, fg_n, j, overviewmode);
		}
	}
}

// removes all row from the first tbody element of the table with the given id
// used by rebuild_fgstable()
function flush_table(d, tblid) {
	var fgstbl = d.getElementById(tblid);
	var fgstbodies = fgstbl.getElementsByTagName('tbody');
	if (fgstbodies.length) {
		// assume the table contains only one tbody element
		fgstbl.removeChild(fgstbl.getElementsByTagName('tbody')[0]);
	}
	fgstbl.appendChild(d.createElement('tbody'));
}

// append a new TR to the first TBODY element of table 'tblid', sets feature group number and name cells
// creates features table with single empty row
// similarly populates the overview table
// returns array of these (main and overview ones) row objects
// used by rebuild_fgstable()
function add_fg(tblid, fg_n, fg_descr) {
	var tbody = document.getElementById(tblid).getElementsByTagName('tbody')[0];
	var overview_document = parent.frames[1].document;
	var overview_tbody = overview_document.getElementById('overview_' + tblid).getElementsByTagName('tbody')[0];

	// manipulate the main table

	var row = document.createElement('tr');
	var td, span, ftbl;

	td = document.createElement('td');
	td.className = 'featuregroup_number';
	td.innerHTML = fg_n;
	row.appendChild(td);

	td = document.createElement('td');
	td.className = 'featuregroup_description';
	td.innerHTML = fg_descr;
	row.appendChild(td);

	td = document.createElement('td');
	ftbl = document.createElement('table');
	ftbl.className = 'features_table';
	ftbl.width = '100%';
	var frow = document.createElement('tr');
	ftbl.appendChild(frow);
	td.appendChild (ftbl);
	row.appendChild(td);

	tbody.appendChild(row);

	// manipulate the overview table
	overview_row = overview_document.createElement('tr');
	td = overview_document.createElement('td');
	td.className = 'featuregroup_number_overview';
	td.innerHTML = fg_n;
	overview_row.appendChild(td);

	td = overview_document.createElement('td');
	td.setAttribute('colspan', 4);
	ftbl = overview_document.createElement('table');
	ftbl.className = 'features_table';
	ftbl.width = '100%';
	var overview_frow = overview_document.createElement('tr');
	ftbl.appendChild(overview_frow);
	td.appendChild (ftbl);
	overview_row.appendChild(td);

	overview_tbody.appendChild(overview_row);

	return new Array(frow, overview_frow);
}

function add_feature(frows, result, descr, picture, nfeatures, tblid, fg_n, fid, overviewmode) {
	var frow = frows[0];
	var overview_frow = frows[1];
	var overview_document = parent.frames[1].document; // XXX not very nice

	// manipulate the main table
	var fc = document.createElement('td'); // a cell enclosing a single feature
	fc.id = tblid + "_main_" + fg_n + "_" + fid;
	fc.className = 'feature_cell';
	fc.width = 100/nfeatures + '%';

	var tbl = document.createElement('table');
	tbl.className = 'feature_table';
	tbl.width = '100%';
	var trow, td, i;

	trow = document.createElement('tr');
	td = document.createElement('td');
	td.className = 'feature_result';
	td.innerHTML = result;
	trow.appendChild(td);
	tbl.appendChild(trow);

	trow = document.createElement('tr');
	td = document.createElement('td');
	td.className = 'feature_description';
	td.innerHTML = descr;
	trow.appendChild(td);
	tbl.appendChild(trow);

	trow = document.createElement('tr');
	td = document.createElement('td');
	td.className = 'feature_picture';
	if (picture) {
		var pictures = picture.split(" ");

		var i;
		for(i=0; i<pictures.length; i++) {
			if (td.innerHTML) td.innerHTML += '<br>';
			td.innerHTML += '<img border="0" src="' + pictures[i] + '">';
		}
	}
	trow.appendChild(td);
	tbl.appendChild(trow);

	////var a = document.createElement('a');
	////a.setAttribute('onClick', "toggle_feature_selection('" + tblid + "', '" + fg_n + "', '" + fid + "', '" + result + "', " + overviewmode + "); return false;");
	////a.setAttribute('href', '#');
	////a.appendChild(tbl);
	////fc.appendChild(a);

        fc.setAttribute('onClick', "toggle_feature_selection('" + tblid + "', '" + fg_n + "', '" + fid + "', '" + result + "', " + overviewmode + "); return false;");
        fc.appendChild(tbl);

	frow.appendChild(fc);

	// manipulate the overview table
        fc = overview_document.createElement('td'); // a cell enclosing a single feature
	fc.width = 100/nfeatures + '%';
	fc.id = tblid + "_overview_" + fg_n + "_" + fid;
        fc.className = 'feature_result_overview';
	/*
	if (overviewmode == 0) {
        	fc.innerHTML = '<b>+</b>';
	} else {
        	fc.innerHTML = '<b>'+result+'</b>';
	}
	*/

        overview_frow.appendChild(fc);

	if (is_feature_selected(fg_n, fid)) {
		toggle_feature_selection(tblid, fg_n, fid, result,overviewmode);
	}
}

// =============================================================================

function toggle_feature_selection(tblid, fg_n, fid, result, overviewmode) {
	var cell = document.getElementById(tblid + "_main_" + fg_n + "_" + fid);
	var overview_cell = parent.frames[1].document.getElementById(tblid + "_overview_" + fg_n + "_" + fid);

	// change the style of the feature table
	//var delta;
	if (cell.className == 'feature_cell_selected') {
		cell.className = 'feature_cell';
		//delta = -1;
        	overview_cell.innerHTML = '';

		register_feature_selection(0, fg_n, fid);
	} else {
		// verify if there are no selected cells in this row
		var tds = cell.parentNode.getElementsByTagName('td');
		var i;
		for (i=0; i<tds.length; i++) {
			if (tds[i].className == 'feature_cell_selected') {
				alert(msg_multiple_selections_prohibited);
				return;
			}
		}

		cell.className = 'feature_cell_selected';
		//delta = +1;
		if (overviewmode == 0) {
        		overview_cell.innerHTML = '+';
		} else {
        		overview_cell.innerHTML = result;
		}

		register_feature_selection(1, fg_n, fid);
	}

/*
	// find relevant element in the summary and update it

	var tbody = document.getElementById('summary_table').getElementsByTagName('tbody')[0];
	var rows = tbody.getElementsByTagName('tr');
	var i;
	for (i=0; i<rows.length; i++) {
		var tds = rows[i].getElementsByTagName('td');
		if (tds[0].innerHTML == result) {
			tds[1].innerHTML = parseInt(tds[1].innerHTML) + delta;
			
			if (tds[1].innerHTML == 0) {
				// counter has reached zero -- delete row from the summary
				tbody.removeChild(rows[i]);
			}
			return;
		}
	}

	// not such an elemenet yet -- create it
	var tr = document.createElement('tr');
	var td1 = document.createElement('td');
	td1.innerHTML = result;
	td1.className = 'summary_result';
	tr.appendChild(td1);
	var td2 = document.createElement('td');
	td2.innerHTML = '1';
	td2.className = 'summary_n';
	tr.appendChild(td2);
	tbody.appendChild(tr);
*/
}

function toggle_indfeature_selection(fg_n, fid, type, indfeature, nfeatures) {
	var cell = document.getElementById("indfeature_main_" + fg_n + "_" + fid);

	//if (cell == null) { alert(fg_n + "_" + fid); return; }

        // change the style of the indfeature cell
	var add;

        if (cell.className == 'feature_cell_selected') {
                cell.className = 'feature_cell';
		add = 0;
        } else {
                cell.className = 'feature_cell_selected';
		add = 1;
        }

	register_feature_selection(add, fg_n, fid);

	// find relevant element in the summary and update it

	var overview_document = parent.frames[1].document;
	var tbody = overview_document.getElementById('overview_indfeatures_table').getElementsByTagName('tbody')[0];
	var rows = tbody.getElementsByTagName('tr');
	var i;
	var oldrow = null;
	for (i=0; i<rows.length; i++) {
		var tds = rows[i].getElementsByTagName('td');
		if (tds[0].innerHTML == type) {
			// found an existing for for this type

			if (add) {
				var li = overview_document.createElement('div');
				li.innerHTML = '&nbsp;' + indfeature;
				tds[2].appendChild(li);
				
				oldrow = rows[i];
				break;
			} else {
				// remove the indfeature from the list
				var lis = tds[2].getElementsByTagName('div');
				var j;
				for(j=0; j<lis.length; j++) {
					if (lis[j].innerHTML == ('&nbsp;' + indfeature)) {
						tds[2].removeChild(lis[j]);
					}
				}

				// if the list is empty, remove the row for this type completely
				if (tds[2].getElementsByTagName('div').length == 0) {
					// the list is empty
					tbody.removeChild(rows[i]);
					// the row is removed completely, no rebuild is necessary
					return;
				}
				// proceed to row rebuild
				oldrow = rows[i];
				break;
			}
		}
	}

	// new table row and fill it in
	var newtr = overview_document.createElement('tr');

	var td0 = overview_document.createElement('td');
	td0.innerHTML = type;
	newtr.appendChild(td0);

	var td1 = overview_document.createElement('td');
	td1.align = 'center';
	if (oldrow) {
		var n = tds[2].getElementsByTagName('div').length;
		td1.innerHTML = n + '/' + nfeatures;
	} else {
		td1.innerHTML = '1/' + nfeatures;
	}
	newtr.appendChild(td1);

	var td2 = overview_document.createElement('td');
	if (oldrow) {
       		var lis = tds[2].getElementsByTagName('div');
		var j;
		for(j=0; j<lis.length; j++) {
			var li = overview_document.createElement('div');
			li.innerHTML = lis[j].innerHTML;
			td2.appendChild(li);
		}
		newtr.appendChild(td2);

		tbody.replaceChild(newtr, oldrow);
		return;
	} else {
		var li = overview_document.createElement('div');
		li.innerHTML = '&nbsp;' + indfeature;
		td2.appendChild(li);
		newtr.appendChild(td2);

		tbody.appendChild(newtr);
		return;
	}

	tbody.appendChild(tr);
}