2007-07-19 12:40:05 +02:00
|
|
|
<?php
|
2008-02-25 03:10:37 +01:00
|
|
|
/**
|
2008-10-01 11:54:39 +02:00
|
|
|
* Reports section of the CMS.
|
|
|
|
*
|
2008-10-07 07:59:03 +02:00
|
|
|
* All reports that should show in the ReportAdmin section
|
2008-10-09 07:54:55 +02:00
|
|
|
* of the CMS need to subclass {@link SSReport}, and implement
|
|
|
|
* the appropriate methods and variables that are required.
|
|
|
|
*
|
|
|
|
* @see SSReport
|
2008-10-01 11:54:39 +02:00
|
|
|
*
|
2008-02-25 03:10:37 +01:00
|
|
|
* @package cms
|
|
|
|
* @subpackage reports
|
|
|
|
*/
|
2007-07-19 12:40:05 +02:00
|
|
|
class ReportAdmin extends LeftAndMain {
|
|
|
|
|
2008-11-02 22:27:55 +01:00
|
|
|
static $url_segment = 'reports';
|
|
|
|
|
|
|
|
static $url_rule = '/$Action/$ID';
|
|
|
|
|
|
|
|
static $menu_title = 'Reports';
|
|
|
|
|
2007-07-19 12:40:05 +02:00
|
|
|
static $template_path = null; // defaults to (project)/templates/email
|
|
|
|
|
|
|
|
public function init() {
|
|
|
|
parent::init();
|
2008-10-01 11:54:39 +02:00
|
|
|
|
2008-10-07 07:59:03 +02:00
|
|
|
Requirements::javascript(CMS_DIR . '/javascript/ReportAdmin_left.js');
|
|
|
|
Requirements::javascript(CMS_DIR . '/javascript/ReportAdmin_right.js');
|
|
|
|
|
|
|
|
Requirements::css(CMS_DIR . '/css/ReportAdmin.css');
|
2008-10-01 11:54:39 +02:00
|
|
|
|
2008-10-07 07:59:03 +02:00
|
|
|
// We don't want this showing up in every ajax-response, it should
|
|
|
|
// always be present in a CMS environment
|
2007-07-19 12:40:05 +02:00
|
|
|
if(!Director::is_ajax()) {
|
2008-11-12 05:31:53 +01:00
|
|
|
Requirements::javascript(MCE_ROOT . "tiny_mce_src.js");
|
2009-05-15 02:13:11 +02:00
|
|
|
HtmlEditorConfig::get('cms')->setOption('ContentCSS', project() . '/css/editor.css');
|
|
|
|
HtmlEditorConfig::get('cms')->setOption('Lang', i18n::get_tinymce_lang());
|
2007-07-19 12:40:05 +02:00
|
|
|
}
|
2009-05-15 02:13:11 +02:00
|
|
|
|
2009-01-05 07:17:59 +01:00
|
|
|
// Always block the HtmlEditorField.js otherwise it will be sent with an ajax request
|
|
|
|
Requirements::block(SAPPHIRE_DIR . '/javascript/HtmlEditorField.js');
|
2007-07-19 12:40:05 +02:00
|
|
|
}
|
|
|
|
|
2009-01-05 07:17:59 +01:00
|
|
|
/**
|
|
|
|
* Does the parent permission checks, but also
|
|
|
|
* makes sure that instantiatable subclasses of
|
|
|
|
* {@link Report} exist. By default, the CMS doesn't
|
|
|
|
* include any Reports, so there's no point in showing
|
|
|
|
*
|
|
|
|
* @param Member $member
|
|
|
|
* @return boolean
|
|
|
|
*/
|
|
|
|
function canView($member = null) {
|
|
|
|
if(!$member && $member !== FALSE) {
|
|
|
|
$member = Member::currentUser();
|
|
|
|
}
|
|
|
|
|
|
|
|
if(!parent::canView($member)) return false;
|
|
|
|
|
|
|
|
$hasViewableSubclasses = false;
|
|
|
|
$subClasses = array_values(ClassInfo::subclassesFor('SSReport'));
|
|
|
|
foreach($subClasses as $subclass) {
|
|
|
|
// Remove abstract classes and LeftAndMain
|
|
|
|
$classReflection = new ReflectionClass($subclass);
|
|
|
|
if($classReflection->isInstantiable() && $subclass != 'SSReport') {
|
|
|
|
if(singleton($subclass)->canView()) $hasViewableSubclasses = true;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
return $hasViewableSubclasses;
|
|
|
|
}
|
|
|
|
|
2008-10-01 06:49:08 +02:00
|
|
|
/**
|
2008-10-08 06:28:23 +02:00
|
|
|
* Return a DataObjectSet of SSReport subclasses
|
2008-10-01 06:49:08 +02:00
|
|
|
* that are available for use.
|
|
|
|
*
|
|
|
|
* @return DataObjectSet
|
|
|
|
*/
|
|
|
|
public function Reports() {
|
|
|
|
$processedReports = array();
|
2008-10-08 06:28:23 +02:00
|
|
|
$subClasses = ClassInfo::subclassesFor('SSReport');
|
2008-10-01 06:49:08 +02:00
|
|
|
|
|
|
|
if($subClasses) {
|
|
|
|
foreach($subClasses as $subClass) {
|
2008-10-09 07:48:28 +02:00
|
|
|
if($subClass != 'SSReport') {
|
|
|
|
$processedReports[] = new $subClass();
|
|
|
|
}
|
2008-10-01 06:49:08 +02:00
|
|
|
}
|
2007-07-19 12:40:05 +02:00
|
|
|
}
|
2008-10-01 11:54:39 +02:00
|
|
|
|
2007-07-19 12:40:05 +02:00
|
|
|
$reports = new DataObjectSet($processedReports);
|
2008-10-01 06:49:08 +02:00
|
|
|
|
2007-07-19 12:40:05 +02:00
|
|
|
return $reports;
|
|
|
|
}
|
|
|
|
|
2008-10-01 06:49:08 +02:00
|
|
|
/**
|
|
|
|
* Show a report based on the URL query string.
|
|
|
|
*
|
|
|
|
* @param HTTPRequest $request The HTTP request object
|
|
|
|
*/
|
|
|
|
public function show($request) {
|
|
|
|
$params = $request->allParams();
|
|
|
|
|
|
|
|
return $this->showWithEditForm($params, $this->reportEditFormFor($params['ID']));
|
2007-07-19 12:40:05 +02:00
|
|
|
}
|
|
|
|
|
2008-10-01 06:49:08 +02:00
|
|
|
/**
|
|
|
|
* @TODO What does this do?
|
|
|
|
*
|
|
|
|
* @param unknown_type $params
|
|
|
|
* @param unknown_type $editForm
|
|
|
|
* @return unknown
|
|
|
|
*/
|
|
|
|
protected function showWithEditForm($params, $editForm) {
|
|
|
|
if(isset($params['ID'])) Session::set('currentPage', $params['ID']);
|
|
|
|
if(isset($params['OtherID'])) Session::set('currentOtherID', $params['OtherID']);
|
|
|
|
|
2008-03-11 01:39:15 +01:00
|
|
|
if(Director::is_ajax()) {
|
2007-07-19 12:40:05 +02:00
|
|
|
SSViewer::setOption('rewriteHashlinks', false);
|
2008-10-01 06:49:08 +02:00
|
|
|
|
2008-10-01 11:56:55 +02:00
|
|
|
$result = $this->customise(array(
|
|
|
|
'EditForm' => $editForm
|
|
|
|
))->renderWith($this->getTemplatesWithSuffix('_right'));
|
|
|
|
|
2007-07-19 12:40:05 +02:00
|
|
|
return $this->getLastFormIn($result);
|
|
|
|
}
|
2008-10-07 07:59:03 +02:00
|
|
|
|
|
|
|
return array();
|
2008-10-01 06:49:08 +02:00
|
|
|
}
|
2008-10-01 11:54:39 +02:00
|
|
|
|
|
|
|
/**
|
|
|
|
* For the current report that the user is viewing,
|
|
|
|
* return a Form instance with the fields for that
|
|
|
|
* report.
|
|
|
|
*
|
|
|
|
* @return Form
|
|
|
|
*/
|
|
|
|
public function EditForm() {
|
2008-10-01 06:49:08 +02:00
|
|
|
$ids = array();
|
2008-10-01 11:54:39 +02:00
|
|
|
$id = isset($_REQUEST['ID']) ? $_REQUEST['ID'] : Session::get('currentPage');
|
2008-10-08 06:28:23 +02:00
|
|
|
$subClasses = ClassInfo::subclassesFor('SSReport');
|
2007-07-19 12:40:05 +02:00
|
|
|
|
2008-10-01 06:49:08 +02:00
|
|
|
if($subClasses) {
|
|
|
|
foreach($subClasses as $subClass) {
|
2008-10-08 06:28:23 +02:00
|
|
|
if($subClass != 'SSReport') {
|
2008-10-01 06:49:08 +02:00
|
|
|
$obj = new $subClass();
|
2008-10-07 07:32:09 +02:00
|
|
|
$ids[] = $obj->ID();
|
2008-10-01 06:49:08 +02:00
|
|
|
}
|
2007-07-19 12:40:05 +02:00
|
|
|
}
|
|
|
|
}
|
2008-10-01 11:54:39 +02:00
|
|
|
|
2008-10-01 06:49:08 +02:00
|
|
|
if($id && in_array($id, $ids)) return $this->reportEditFormFor($id);
|
|
|
|
else return false;
|
2007-07-19 12:40:05 +02:00
|
|
|
}
|
2008-10-01 11:54:39 +02:00
|
|
|
|
2008-10-01 06:49:08 +02:00
|
|
|
/**
|
|
|
|
* Return a Form instance with fields for the
|
|
|
|
* particular report currently viewed.
|
|
|
|
*
|
|
|
|
* @TODO Dealing with multiple data types for the
|
|
|
|
* $id parameter is confusing. Ideally, it should
|
|
|
|
* deal with only one.
|
|
|
|
*
|
|
|
|
* @param id|string $id The ID of the report, or class name
|
|
|
|
* @return Form
|
|
|
|
*/
|
|
|
|
public function reportEditFormFor($id) {
|
|
|
|
$page = false;
|
|
|
|
$fields = new FieldSet();
|
|
|
|
$actions = new FieldSet();
|
|
|
|
|
|
|
|
if(is_numeric($id)) $page = DataObject::get_by_id('SiteTree', $id);
|
2008-10-08 06:28:23 +02:00
|
|
|
$reportClass = is_object($page) ? 'SSReport_' . $page->ClassName : $id;
|
2007-07-19 12:40:05 +02:00
|
|
|
|
2008-10-01 11:54:39 +02:00
|
|
|
$obj = new $reportClass();
|
|
|
|
if($obj) $fields = $obj->getCMSFields();
|
2008-10-01 06:49:08 +02:00
|
|
|
|
|
|
|
$idField = new HiddenField('ID');
|
2007-07-19 12:40:05 +02:00
|
|
|
$idField->setValue($id);
|
2008-10-01 06:49:08 +02:00
|
|
|
$fields->push($idField);
|
2007-07-19 12:40:05 +02:00
|
|
|
|
2008-10-01 06:49:08 +02:00
|
|
|
$form = new Form($this, 'EditForm', $fields, $actions);
|
2008-10-01 11:54:39 +02:00
|
|
|
|
2007-07-19 12:40:05 +02:00
|
|
|
return $form;
|
|
|
|
}
|
2008-04-05 05:43:58 +02:00
|
|
|
|
|
|
|
/**
|
2008-10-01 06:49:08 +02:00
|
|
|
* Determine if we have reports and need
|
|
|
|
* to display the "Reports" main menu item
|
|
|
|
* in the CMS.
|
|
|
|
*
|
|
|
|
* The test for an existance of a report
|
|
|
|
* is done by checking for a subclass of
|
2008-10-08 06:28:23 +02:00
|
|
|
* "SSReport" that exists.
|
2008-04-05 05:43:58 +02:00
|
|
|
*
|
|
|
|
* @return boolean
|
|
|
|
*/
|
|
|
|
public static function has_reports() {
|
2008-10-08 06:28:23 +02:00
|
|
|
$subClasses = ClassInfo::subclassesFor('SSReport');
|
2008-10-01 06:49:08 +02:00
|
|
|
|
|
|
|
if($subClasses) {
|
|
|
|
foreach($subClasses as $subClass) {
|
2008-10-08 06:28:23 +02:00
|
|
|
if($subClass != 'SSReport') {
|
2008-10-01 06:49:08 +02:00
|
|
|
return true;
|
|
|
|
}
|
2008-04-05 05:43:58 +02:00
|
|
|
}
|
|
|
|
}
|
2008-10-01 06:49:08 +02:00
|
|
|
|
2008-04-05 05:43:58 +02:00
|
|
|
return false;
|
|
|
|
}
|
2007-07-19 12:40:05 +02:00
|
|
|
}
|
|
|
|
|
2009-03-10 23:26:22 +01:00
|
|
|
?>
|