science-ation/admin/reports.inc.php

<?
/* 
   This file is part of the 'Science Fair In A Box' project
   SFIAB Website: http://www.sfiab.ca

   Copyright (C) 2005 Sci-Tech Ontario Inc <info@scitechontario.org>
   Copyright (C) 2005 James Grant <james@lightbox.org>

   This program is free software; you can redistribute it and/or
   modify it under the terms of the GNU General Public
   License as published by the Free Software Foundation, version 2.

   This program is distributed in the hope that it will be useful,
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
    General Public License for more details.

   You should have received a copy of the GNU General Public License
   along with this program; see the file COPYING.  If not, write to
   the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
   Boston, MA 02111-1307, USA.
*/

 require_once("reports_students.inc.php");  /* $report_students_fields */
 require_once("reports_judges.inc.php");  /* $report_students_fields */
 require_once("reports_awards.inc.php");  /* $report_students_fields */
 require_once("reports_committees.inc.php");  /* $report_students_fields */
 require_once('../lpdf.php');
 require_once('../lcsv.php');

 $filter_ops = array(	0 => '=',
 			1 => '<=',
			2 => '>=',
			3 => '<',
			4 => '>',
			5 => '!=',
			6 => 'IS',
			7 => 'IS NOT',
			8 => 'LIKE',
			9 => 'NOT LIKE ',
		);
 
 $options = array();
 $options['type'] = array( 	'desc' => 'Report Format',
 				'values' => array('pdf'=>'PDF', 'csv'=>'CSV', 'label'=>'Label')
		);
 $options['group_new_page'] = array( 	'desc' => 'Start each new grouping on a new page',
 					'values' => array('no'=>'No', 'yes'=>'Yes')
		);
 $options['allow_multiline'] = array( 	'desc' => 'Allow table rows to span multiple lines',
 					'values' => array('no'=>'No', 'yes'=>'Yes')
		);

 $options['label_box'] = array( 	'desc' => 'Draw a box around each label',
 					'values' => array('no'=>'No', 'yes'=>'Yes')
		);
 $options['label_fairname'] = array( 	'desc' => 'Print the fair name at the top of each label',
 					'values' => array('no'=>'No', 'yes'=>'Yes')
		);
 $options['label_logo'] = array( 	'desc' => 'Print the fair logo at the top of each label',
 					'values' => array('no'=>'No', 'yes'=>'Yes')
		);
  
 
  

/*
Viceroy		Grand	Avery	rows?	w x h"		per page
		& Toy	
LRP 130		99180	5960	3	2 5/8 x 1	30
LRP 120		99189	5961	2	4 x 1		20
LRP 114		99179	5959	7	4 x 1 1/2	14
LRP 214		99190	5962	7	4 x 1 1/3	14
LRP 110		99181	5963	5	4 x 2		10
LRP 106		99763	5964	3	4 x 3 1/3	6
LRP 100		99764	5965	1	8 1/2 x 11	1
LRP 180		99765	5967	4	1 3/4 x 1/2 	80 */


/* FIXME: put these in a databse */
 $stock = array();
 $stock['fullpage'] = array('name' => 'Letter 8.5 x 11',
			'page_width' => 8.5,
			'page_height' => 11,
			'label_width' => 7,
			'x_spacing' => 0,
			'cols' => 1,
			'label_height' => 9.5,
			'y_spacing' => 0,
			'rows' => 1,
			);

 $stock['fullpage_landscape'] = array('name' => 'Letter 8.5 x 11 Landscape',
			'page_width' => 11,
			'page_height' => 8.5,
			'label_width' => 9.5,
			'x_spacing' => 0,
			'cols' => 1,
			'label_height' => 7,
			'y_spacing' => 0,
			'rows' => 1,
			);
			
 $stock['5961'] = array('name' => 'Avery 5961, G&T 99189',
			'page_width' => 8.5,
			'page_height' => 11,
			'label_width' => 4,
			'x_spacing' => 0.08,
			'cols' => 2,
			'label_height' => 1,
			'y_spacing' => 0.08,
			'rows' => 10,
			);

 $stock['5964'] = array('name' => 'Avery 5964, G&T 99763',
			'page_width' => 8.5,
			'page_height' => 11,
			'label_width' => 4,
			'x_spacing' => 3/16,
			'cols' => 2,
			'label_height' => 3 + 1/3,
			'y_spacing' => 0,
			'rows' => 3,
			);
 $stock['nametag'] = array('name' => 'Cards 4"x3"',
			'page_width' => 8.5,
			'page_height' => 11,
			'label_width' => 4,
			'x_spacing' => 0,
			'cols' => 2,
			'label_height' => 3,
			'y_spacing' => 0,
			'rows' => 3,
			);

$options['stock'] = array('desc' => "Paper Type",
                                'values' => array() );
				

/* Add more types to the report format */
foreach($stock as $n=>$v) {
	$options['stock']['values'][$n] = $v['name'];
}


 $allow_options = array_keys($options);

 
 function report_save_field($report, $type, $loc)
 {
 	global $allow_options;
	global $report_students_fields, $report_judges_fields, $report_awards_fields;
	global $report_committees_fields;
	

	switch($report['type']) {
	case 'student': $allow_fields = array_keys($report_students_fields); break;
	case 'judge': 	$allow_fields = array_keys($report_judges_fields); break;
	case 'award': 	$allow_fields = array_keys($report_awards_fields); break;
	case 'committee':$allow_fields = array_keys($report_committees_fields); break;
	}

	/* First delete all existing fields */
	mysql_query("DELETE FROM reports_items 
			WHERE `reports_id`='{$report['id']}'
			AND `type`='$type'");
	/* Now add new ones */

	if(count($report[$type]) == 0) return;
	
	$q = '';
	$x = 0;
	foreach($report[$type] as $k=>$v) {
		if($type == 'option') {
			/* field, value, x, y, w, h, lines, face, align */
			$vals = "'$k','$v','0','0','0','0','0','',''";
		} else {
			$vals = "'{$v['field']}','{$v['value']}',
				'{$v['x']}','{$v['y']}','{$v['w']}',
				'{$v['h']}','{$v['lines']}','{$v['face']}',
				'{$v['align']}'";
		}
		if($q != '') $q .= ',';
		$q .= "({$report['id']}, '$type','$x',$vals)";
		$x++;
	}
	mysql_query("INSERT INTO reports_items(`reports_id`,`type`,`ord`,
				`field`,`value`,`x`, `y`, `w`, `h`,
				`lines`, `face`, `align`) 
			VALUES $q;");
	echo mysql_error();
	
 }
	
 function report_load($report_id)
 {
 	global $allow_options, $report_students_fields, $report_judges_fields;
	global $report_committees_fields, $report_awards_fields;

	$report = array();

	$q = mysql_query("SELECT * FROM reports WHERE id='$report_id'");
	$r = mysql_fetch_assoc($q);
	$report['name'] = $r['name'];
	$report['id'] = $r['id'];
	$report['desc'] = $r['desc'];
	$report['creator'] = $r['creator'];
	$report['type'] = $r['type'];

	$report['col'] = array();
	$report['sort'] = array();
	$report['group'] = array();
	$report['distinct'] = array();
	$report['options'] = array();
	$report['filter'] = array();
	$report['loc'] = array();

	$allow_fields = array();
	switch($report['type']) {
	case 'student': $allow_fields = array_keys($report_students_fields); break;
	case 'judge': 	$allow_fields = array_keys($report_judges_fields); break;
	case 'award': 	$allow_fields = array_keys($report_awards_fields); break;
	case 'committee':$allow_fields = array_keys($report_committees_fields); break;
	}

 	$q = mysql_query("SELECT * FROM reports_items 
			WHERE reports_id='{$report['id']}' 
			ORDER BY `ord`");
	print(mysql_error());
	
	if(mysql_num_rows($q) == 0) return $ret;

	while($a = mysql_fetch_assoc($q)) {
		$f = $a['field'];
		$t = $a['type'];
		switch($t) {
		case 'option':
			/* We dont' care about order, just construct
			 * ['option'][name] = value; */
			if(!in_array($f, $allow_options)) {
				print("Type[$type] Field[$f] not allowed.\n");
				continue;
			}
			$report['option'][$f] = $a['value'];
			break;
		default:
			if(!in_array($f, $allow_fields)) {
				print("Type[$type] Field[$f] not allowed.\n");
				continue;
			}
			/* Pull out all the data */
			$val = array();
			$col_fields = array('field', 'x', 'y', 'w', 'h', 'lines', 'face', 'align', 'value');
			foreach($col_fields as $lf) $val[$lf] = $a[$lf];

			if($val['lines'] == 0) $val['lines'] = 1;

			$report[$t][$a['ord']] = $val;
			break;
		}
	}
	return $report;
 }

 function report_save($report)
 {
 	if($report['id'] == 0) {
		/* New report */
		mysql_query("INSERT INTO reports (`id`) VALUES ('')");
		$report['id'] = mysql_insert_id();
	}

/*
	print("<pre>");
	print_r($_POST);
	print_r($report);
	print("</pre>");
*/

 	mysql_query("UPDATE reports SET 
			`name`='".mysql_escape_string($report['name'])."',
			`desc`='".mysql_escape_string($report['desc'])."',
			`creator`='".mysql_escape_string($report['creator'])."',
			`type`='".mysql_escape_string($report['type'])."'
			WHERE `id`={$report['id']}");

	report_save_field($report, 'col', $report['loc']);
	report_save_field($report, 'group', array());
	report_save_field($report, 'sort', array());
	report_save_field($report, 'distinct', array());
	report_save_field($report, 'option', array());
	report_save_field($report, 'filter', array());
	return $report['id'];
 }

 function report_load_all() 
 {
 	$ret = array();
 	$q = mysql_query("SELECT * FROM reports ORDER BY `name`");

	while($r = mysql_fetch_assoc($q)) {
		$report = array();
	        $report['name'] = $r['name'];
	        $report['id'] = $r['id'];
	        $report['desc'] = $r['desc'];
	        $report['creator'] = $r['creator'];
	        $report['type'] = $r['type'];
		$ret[]  = $report;
	}
	return $ret; 
 }



 function report_gen_by_id($report_id, $format=NULL)
 {
 	global $options;
 	$report = report_load($report_id);
	if($format != NULL) {
		$keys = array_keys($options['type']['values']);
		if(in_array($format, $keys)) {
			$report['option']['type'] = $format;
		} else {
			print("type [$format] not permitted\n");
			exit;
		}
	}
	return report_gen($report);
 }

 function report_delete($report_id)
 {
 	$r = intval($report_id);
 	mysql_query("DELETE FROM reports WHERE `id`=$r");
	mysql_query("DELETE FROM reports_items WHERE `reports_id`=$r");
 }

 function report_gen($report) 
 {
 	global $config, $report_students_fields, $report_judges_fields, $report_awards_fields;
	global $stock, $report_committees_fields;
	global $filter_ops;

	//print_r($report);
	switch($report['type']) {
	case 'student': $fields = $report_students_fields; break;
	case 'judge': $fields = $report_judges_fields; break;
	case 'award': $fields = $report_awards_fields; break;
	case 'committee': $fields = $report_committees_fields; break;
	}

	$gen_mode = '';
	$fieldname = array();
	$thead = array();
		
	$table['header']=array();
	$table['widths']=array();
	$table['dataalign']=array();
	$table['option']=array();
	
	if($report['option']['type']=='csv') {
		$rep=new lcsv(i18n($report['name']));
		$gen_mode = 'table';

	} else if($report['option']['type']=='label') {
		/* Label */
		$label_stock = $stock[$report['option']['stock']];
		$rep=new lpdf(	i18n($config['fairname']),
				i18n($report['name']),
				$_SERVER['DOCUMENT_ROOT'].$config['SFIABDIRECTORY']."/data/logo-200.gif");
		$rep->setPageStyle("labels");
		$rep->newPage($label_stock['page_width'], $label_stock['page_height']);
		$rep->setFontSize(11);
		$rep->setLabelDimensions($label_stock['label_width'], $label_stock['label_height'],
				$label_stock['x_spacing'], $label_stock['y_spacing']);
		$gen_mode = 'label';
	} else {
		$rep=new lpdf(	i18n($config['fairname']),
				i18n($report['name']),
				$_SERVER['DOCUMENT_ROOT'].$config['SFIABDIRECTORY']."/data/logo-200.gif");
		$rep->newPage();
		$rep->setFontSize(11);
		$gen_mode = 'table';
		if($report['option']['allow_multiline'] == 'yes') 
			$table['option']['allow_multiline'] = true;
	}
	
	$sel = array();
	$x=0;
	$group_by = array();
	$components = array();
	$order = array();

	/* Select columns to display */
	foreach($report['col'] as $o=>$d) {
		$f = $d['field'];
		$table['header'][] = i18n($fields[$f]['header']);
		$table['widths'][] = $fields[$f]['width'];
		$table['dataalign'][] = 'left';
		$sel[] = "{$fields[$f]['table']} AS C$x";
		$fieldname[$f] = "C$x";
		if(is_array($fields[$f]['group_by']))
			$group_by = array_merge($group_by, $fields[$f]['group_by']);

		if(is_array($fields[$f]['components'])) {
			$components = array_merge($components, 
					$fields[$f]['components']);
		}
		$x++;
	}
	/* We also want to select any column groupings, but we won't display them */

	foreach($report['group'] as $o=>$d) {
		$f = $d['field'];
		if(!isset($fieldname[$f])) {
			$sel[] = "{$fields[$f]['table']} AS G$o";
			$fieldname[$f] = "G$o";
		}

		if(isset($fields[$f]['table_sort']))
			$order[] = $fields[$f]['table_sort'];
		else
			$order[] = $fieldname[$f];

		if(is_array($fields[$f]['components'])) { 
			$components = array_merge($components, 
					$fields[$f]['components']);
		}
	}

	foreach($report['sort'] as $o=>$d) {
		$f = $d['field'];
		if(!isset($fieldname[$f])) {
			$sel[] = "{$fields[$f]['table']} AS S$o";
			$fieldname[$f] = "S$o";
		}

		if(isset($fields[$f]['table_sort']))
			$order[] = $fields[$f]['table_sort'];
		else
			$order[] = $fieldname[$f];
	}
	
	foreach($report['distinct'] as $o=>$d) {
		$f = $d['field'];
		if(!isset($fieldname[$f])) {
			$sel[] =  "{$fields[$f]['table']} AS D$o";
			$fieldname[$f] = "D$o";
		}
		$group_by[] = $fieldname[$f];
	}

	foreach($report['filter'] as $o=>$d) {
		$f = $d['field'];
		if(!isset($fieldname[$f])) {
			$sel[] =  "{$fields[$f]['table']} AS F$o";
			$fieldname[$f] = "F$o";
		}
		$t = $filter_ops[$d['x']];
		$filter[] = "{$fields[$f]['table']} $t '{$d['value']}'";
	}
	$sel = implode(",", $sel);
	$order = implode(",", $order);
		
	
	if(!isset($report['year'])) {
		$report['year'] = $config['FAIRYEAR'];
	}
	
	$group_query = "";
	if(count($group_by)) {
		$group_query = "GROUP BY ".implode(",", $group_by);
	}

	$filter_query = "";
	if(count($filter)) {
		$filter_query = " AND ".implode(" AND ", $filter);
	}
	

	$q = '';
	switch($report['type']) {
	case 'student': $q = report_students_fromwhere($report, $components); break;
	case 'judge': $q = report_judges_fromwhere($report, $components); break;
	case 'award': $q = report_awards_fromwhere($report, $components); break;
	case 'committee': $q = report_committees_fromwhere($report, $components); break;
	}

	$q = "SELECT $sel  $q  $filter_query $group_query ORDER BY $order";

//	print("$q");

	$r = mysql_query($q);
	echo mysql_error();

	$ncols = count($report['col']);
	$n_groups = count($report['group']);
	$last_group_data = array();

	while($i = mysql_fetch_assoc($r)) {

		if($n_groups > 0) {
			$group_change = false;
			for($x=0; $x<$n_groups; $x++) {
				if($last_group_data["G$x"] != $i["G$x"]) {
					$group_change = true;
				}
				$last_group_data["G$x"] = $i["G$x"];
			}

			if($group_change) {
				/* Dump the last table */
				if(count($table['data'])) {
				//	print_r($table);
					$rep->addTable($table);
					$rep->nextLine();
					$table['data'] = array();
					/* Start a new page AFTER a table is
					* dumped, so the first page doesn't
					* end up blank */
					if($report['option']['group_new_page'] == 'yes') {
						$rep->newPage();
					} else {
						$rep->hr();
						$rep->vspace(-0.1);
					}
				}
				
				/* Construct a new header */
				$h = implode(" -- ", $last_group_data);
				$rep->heading($h);
				$rep->nextLine();
			}
			
		}

		$data = array();
		if($gen_mode == 'label') {
			$show_box = ($report['option']['label_box'] == 'yes') ? true : false;
			$show_fair = ($report['option']['label_fairname'] == 'yes') ? true : false;
			$show_logo = ($report['option']['label_logo'] == 'yes') ? true : false;
			$rep->newLabel($show_box, $show_fair, $show_logo);
		}
		foreach($report['col'] as $o=>$d) {
			$f = $d['field'];
			if(is_array($fields[$f]['value_map'])) {
				$v = $fields[$f]['value_map'][$i["C$o"]];
			} else {
				$v =  $i["C$o"];
			}
			if($gen_mode == 'table') {
				$data[] = $v;
			} else if($gen_mode == 'label') {
				$opt = array();
				if($d['face'] == 'bold') $opt[] = 'bold';
				$opt[] = $d['align'];

				/* Special column, override result with static text */
				if($f == 'static_text') $v = $d['value'];

				
				$rep->addLabelText2($d['x'], $d['y'], $d['w'],
							$d['h'], $d['h']/$d['lines'],
							$v, $opt);
			}
		}
		if(count($data)) $table['data'][] = $data;
	}

	if(count($table['data'])) {
		$rep->addTable($table);
	}
	$rep->output();
}

?>