/**
* Sets up the container for result details of the current test when each
* test is first run
*
* @param PHPUnit_Framework_Test $test the test that is being run
*/
public function startTest(PHPUnit_Framework_Test $test)
{
$this->endCurrentTest();
$this->startTestTime = microtime(true);
$this->currentTest = array('name' => $this->descriptiveTestName($test), 'timeElapsed' => 0, 'status' => TEST_SUCCESS, 'message' => '', 'exception' => NULL, 'trace' => NULL, 'uid' => md5(microtime()));
if ($this->hasTimer) {
$this->timer->start();
}
}
/**
* @access public
*/
protected function runTest()
{
$timer = new Benchmark_Timer();
$timer->start();
parent::runTest();
$timer->stop();
if ($this->fMaxRunningTime != 0 && $timer->timeElapsed() > $this->fMaxRunningTime) {
PHPUnit_Framework_Assert::fail(sprintf('expected running time: <= %s but was: %s', $this->fMaxRunningTime, $timer->timeElapsed()));
}
}
<?php
include_once dirname(__FILE__) . '/../code/PEG.php';
include_once 'Benchmark/Timer.php';
/**
* メモ化の有無での処理時間の差を見るサンプル
* ここではメモ化するのとしないのとでは著しく違いが出る文法規則を元にパーサを組み立てている
*/
$t = new Benchmark_Timer();
$str = '((((((((1))))))))';
$t->start();
// メモ化していないパーサ
$a = PEG::ref($a_ref);
$p = PEG::ref($p_ref);
$a_ref = PEG::choice(PEG::seq($p, '+', $a), PEG::seq($p, '-', $a), $p);
$p_ref = PEG::choice(PEG::seq('(', $a, ')'), '1');
$a->parse(PEG::context($str));
$t->setMarker('no memoize');
// メモ化しているパーサ
$a = PEG::ref($a_ref);
$p = PEG::ref($p_ref);
$a_ref = PEG::memo(PEG::choice(PEG::seq($p, '+', $a), PEG::seq($p, '-', $a), $p));
$p_ref = PEG::memo(PEG::choice(PEG::seq('(', $a, ')'), '1'));
$a->parse($c = PEG::context($str));
$t->setMarker('memoize');
$t->stop();
$t->display();
/* 結果
---------------------------------------------------------
marker time index ex time perct
---------------------------------------------------------
$conf_path = realpath(dirname(__FILE__) . '/../projects/bookstore/build/conf/bookstore-conf.php');
if (!file_exists($conf_path)) {
print "Make sure that you specify properties in conf/bookstore.properties and " . "build propel before running this script.\n";
exit;
}
// Add PHP_CLASSPATH, if set
if (getenv("PHP_CLASSPATH")) {
set_include_path(getenv("PHP_CLASSPATH") . PATH_SEPARATOR . get_include_path());
}
// Add build/classes/ and classes/ to path
set_include_path(realpath(dirname(__FILE__) . '/../projects/bookstore/build/classes') . PATH_SEPARATOR . dirname(__FILE__) . '/../../runtime/classes' . PATH_SEPARATOR . get_include_path());
// Require classes.
require 'propel/Propel.php';
include_once 'Benchmark/Timer.php';
$timer = new Benchmark_Timer();
$timer->start();
// Some utility functions
function boolTest($cond)
{
if ($cond) {
return "[OK]\n";
} else {
return "[FAILED]\n";
}
}
try {
// Initialize Propel
Propel::init($conf_path);
} catch (Exception $e) {
die("Error initializing propel: " . $e->__toString());
}
@define("APP_MIDDLE_COLOR", "#CACACA");
@define("APP_DARK_COLOR", "#CACACA");
@define("APP_CYCLE_COLORS", "#DDDDDD,#CACACA");
@define("APP_INTERNAL_COLOR", "#9C494B");
// define the user_id of system user
@define("APP_SYSTEM_USER_ID", 1);
// define the type of password hashing to use (MD5, MD5-64)
@define('APP_HASH_TYPE', 'MD5');
// if full text searching is enabled
@define("APP_ENABLE_FULLTEXT", '%{APP_ENABLE_FULLTEXT}%');
@define("APP_BENCHMARK", false);
if (APP_BENCHMARK) {
// always benchmark the scripts
include_once "Benchmark/Timer.php";
$bench = new Benchmark_Timer();
$bench->start();
}
include_once APP_INC_PATH . "class.misc.php";
if (isset($_GET)) {
$HTTP_POST_VARS = $_POST;
$HTTP_GET_VARS = $_GET;
$HTTP_SERVER_VARS = $_SERVER;
$HTTP_ENV_VARS = $_ENV;
$HTTP_POST_FILES = $_FILES;
// seems like PHP 4.1.0 didn't implement the $_SESSION auto-global...
if (isset($_SESSION)) {
$HTTP_SESSION_VARS = $_SESSION;
}
$HTTP_COOKIE_VARS = $_COOKIE;
}
// fix magic_quote_gpc'ed values (i wish i knew who is the person behind this)
/**
* Add a profile message that can be displayed after executing the script
*
* You can add benchmark markers by calling
*
* Ak::profile('Searching for books');
*
* To display the results you need to call
*
* Ak::profile(true);
*
* You might also find handy adding this to your application controller.
*
* class ApplicationController extends BaseActionController
* {
* function __construct(){
* $this->afterFilter('_displayBenchmark');
* parent::__construct();
* }
* public function _displayBenchmark(){
* Ak::profile(true);
* }
* }
*
* IMPORTANT NOTE: You must define AK_ENABLE_PROFILER to true for this to work.
*/
function profile($message = '')
{
if(AK_ENABLE_PROFILER){
if(!$ProfileTimer = $Timer = Ak::getStaticVar('ProfileTimer')){
require_once 'Benchmark/Timer.php';
$ProfileTimer = new Benchmark_Timer();
$ProfileTimer->start();
Ak::setStaticVar('ProfileTimer', $ProfileTimer);
}elseif($message === true){
$ProfileTimer->display();
}else {
$ProfileTimer->setMarker($message);
}
}
}
/**
* Выполнение sql-запроса
*
* @param string запрос
*
* @global $nc_core
*
* @return bool выполнился запрос или нет
*/
function ExecuteSQLQuery($Query)
{
global $nc_core;
$SHOW_MYSQL_ERRORS = $nc_core->SHOW_MYSQL_ERRORS;
$db = $nc_core->db;
// таймер
$nccttimer = new Benchmark_Timer();
$Query = trim(stripslashes($Query));
$db->query("DELETE FROM `SQLQueries` WHERE MD5(`SQL_text`) = '" . md5($Query) . "' ");
// если в истории запросов больше 15, то нужно удалить
if ($db->get_var("SELECT COUNT(`SQL_ID`) FROM `SQLQueries`") >= 15) {
$db->query("DELETE FROM `SQLQueries` ORDER BY `SQL_ID` LIMIT 1");
}
$db->query("INSERT INTO SQLQueries (SQL_ID, SQL_text) VALUES ('', '" . $db->escape($Query) . "')");
// скроем ошибки в случае неправильного запроса, чтобы вывести свое сообщение об ошибке
$db->hide_errors();
// выполение запроса
$nccttimer->start();
$res = $db->get_results(stripslashes($Query), ARRAY_A);
$nccttimer->stop();
// если показ ошибок MySQL включен, то включим его обратно
if ($SHOW_MYSQL_ERRORS == 'on') {
$db->show_errors();
}
if ($db->captured_errors) {
echo "<br /><b>Query:</b> " . $db->captured_errors[0][query] . "<br><br><b>Error:</b> " . $db->captured_errors[0][error_str] . "<br /><br />";
return false;
}
$count = $db->num_rows;
// вывод таблицы с результатом, если нет ошибок
if ($res && $count) {
echo "<br /><b>" . htmlspecialchars(stripslashes($Query)) . "</b><br /><br />";
$data = $res;
echo "<table border='0' cellpadding='0' cellspacing='0' width='100%'>\n <tr><td>\n <table class='admin_table sql_table' width='100%'><tr>";
//вывод полей
while (list($key, $val) = each($res[0])) {
echo "<td><font>" . $key . "</td>";
}
echo "</tr>";
reset($res[0]);
for ($i = 0; $i < $count; $i++) {
echo "<tr>";
while (list($key, $val) = each($res[$i])) {
echo "<td><font> " . htmlspecialchars($res[$i][$key]) . "</td>";
}
echo "</tr>";
}
echo "</table></td></tr></table><br>";
$res_num = $count ? $count : $db->rows_affected;
} elseif (!$res) {
if (preg_match("/^(insert|delete|update|replace)\\s+/i", $db->last_query)) {
$res_num = $db->rows_affected;
} else {
$res_num = $db->num_rows;
}
}
echo "<div>" . TOOLS_SQL_OK . "</div>";
echo "<div>" . TOOLS_SQL_TOTROWS . ": " . $res_num . "</div>";
echo "<div>" . TOOLS_SQL_BENCHMARK . ": " . $nccttimer->timeElapsed() . "</div>";
echo "<br />";
}
<?php
if (!isset($NETCAT_FOLDER)) {
$NETCAT_FOLDER = realpath(dirname(__FILE__) . '/../..') . DIRECTORY_SEPARATOR;
}
include_once $NETCAT_FOLDER . "vars.inc.php";
require $ROOT_FOLDER . "connect_io.php";
/* */
///////////////////////
require "Benchmark/Timer.php";
$nccttimer = new Benchmark_Timer();
$nccttimer->start();
///////////////////////
/* * /
$db->debug_all = true;
$db->benchmark = true;
///////////////////////////////////
/* */
/** @var nc_core $nc_core */
/** @var nc_db $db */
// -------------------- Обработка запросов к файлам ----------------------------
if (preg_match("#^" . preg_quote($nc_core->HTTP_FILES_PATH) . "([0-9uct]+)/([0-9]+/)?h_([0-9A-Z]{32})\$#i", $nc_core->url->get_parsed_url('path'), $matches)) {
if ($matches[1] != "u" && $matches[1] != "c" && $matches[1] != "t") {
$matches[1] = intval($matches[1]);
}
if (strlen($matches[2])) {
$file_path = $matches[1] . "/" . $matches[2];
} else {
$file_path = $matches[1] . "/";
}
$full_file_path = $nc_core->FILES_FOLDER . $file_path . $matches[3];
function viewUpload()
{
$form = new SessionUploadForm();
$view = Core_View::factory('sessionsfileupload');
$view->UploadStatusMsg = "";
$view->UploadStatus = "Error";
if ($form->validate()) {
$timer = new Benchmark_Timer();
$timer->start();
$upload = $form->getSubmitValue('upload');
$timer->setMarker('Decode Sessions - Start');
exec('/usr/local/bin/fitdecode -s ' . $upload['tmp_name'], $xml_session);
$xml_session = implode("\n", $xml_session);
$sessions = parseSessions($xml_session);
$timer->setMarker('Decode Sessions - End');
/* There should only be one session */
if (is_array($sessions)) {
$session = $sessions[0];
unset($sessions);
}
$db = Zend_Registry::get('db');
$db->beginTransaction();
try {
$api = new Module_Sessions_API();
/* Insert the session data into the database */
$api->createSessionFull($session->start_time, 'E1', 'Untitled', $session->total_timer_time, $session->total_distance, $session->total_calories, $session->avg_heart_rate, $session->max_heart_rate, $session->avg_speed, $session->max_speed, $session->total_ascent, $session->total_descent, '');
/* Find the seconds since epoch so we can do simple maths */
$ftime = strptime($session->start_time, '%FT%T%z');
$session_epoch = mktime($ftime['tm_hour'], $ftime['tm_min'], $ftime['tm_sec'], 1, $ftime['tm_yday'] + 1, $ftime['tm_year'] + 1900);
$session_timestamp = $session->start_time;
unset($session);
unset($sessions);
$timer->setMarker('Decode Records - Start');
exec('/usr/local/bin/fitdecode -r ' . $upload['tmp_name'], $xml_records);
$xml_records = implode("\n", $xml_records);
$records_input = parseRecords($xml_records, $session_epoch);
$timer->setMarker('Decode Records - End');
if (is_array($records_input)) {
$record_prev = $records_input[0];
}
/* Get the array of records, removing duplicates */
$records = array();
foreach ($records_input as $record) {
if (!isset($record_last) || $record_last->interval != $record->interval) {
$records[] = $record;
}
$record_last = $record;
}
unset($records_input);
unset($record_last);
$UserAPI = Module_UserManagement_API::getInstance();
$user = $UserAPI->getUser();
/* Add the matching data points */
foreach ($records as $record) {
/* Skip duplicates, they will cause issues in graphs */
if (!isset($record->power)) {
$record->power = $api->getPower($record->gradient, $record->temperature, $record->altitude, $record->speed, $record->speed - $record_prev->speed, $record->interval - $record_prev->interval, $user['rider_weight'], $user['bike_weight']);
}
$record_prev = $record;
}
unset($user);
unset($UserAPI);
$timer->setMarker('Record insertion - start');
$api->insertAllSessionData($session_timestamp, $records);
/* Insert all the data */
$timer->setMarker('Record insertion - end');
/* Calculate the climbs */
$climbs = $api->getClimbCategories();
$timer->setMarker('Climb - Start');
$min_climb = $climbs[0];
/* 500m with an average gradient of more than 3% (cat 5)*/
/* Find the points that have a distance of 500m */
$window_distance = 0;
$window_altitude = 0;
$cat = -1;
$climb_num = 1;
$num_records = count($records);
$num_climbs = count($climbs);
for ($front = 0, $back = 0; $front < $num_records; $front++) {
$window_distance += $records[$front]->delta_distance * 1000;
$window_altitude += $records[$front]->delta_altitude;
if ($window_distance > $min_climb['min_distance']) {
$window_gradient = $window_altitude / $window_distance * 100;
/* Check if we have found the start of a climb */
if ($cat == -1 && $window_gradient >= $climbs[$cat + 1]['min_gradient']) {
$cat++;
/* Go through and find the minimum height */
$min = $back;
for ($i = $back; $i < $front; $i++) {
if ($records[$i]->altitude <= $records[$min]->altitude) {
$min = $i;
}
}
$climb['bottom'] = $records[$min]->interval;
$climb['min_altitude'] = $records[$min]->altitude;
}
/* Check if we have finished the climb */
if ($cat != -1 && $window_gradient < $climbs[$cat]['min_gradient']) {
/* Need to go back and find the maximum altitude */
$max = $back;
for ($i = $back; $i < $front; $i++) {
if ($records[$i]->altitude > $records[$max]->altitude) {
$max = $i;
}
}
$climb['top'] = $records[$max]->interval;
$climb['max_altitude'] = $records[$max]->altitude;
/* Get the max gradient */
$climb['gradient_max'] = $records[$min]->gradient;
for ($i = $min; $i <= $max; $i++) {
if ($climb['gradient_max'] < $records[$i]->gradient) {
$climb['gradient_max'] = $records[$i]->gradient;
}
}
/* Tally the totals */
$climb['total_climbed'] = 0;
for ($i = $min + 1; $i <= $max; $i++) {
$climb['total_climbed'] += $records[$i]->delta_altitude;
}
$climb['total_distance'] = round($records[$max]->distance - $records[$min]->distance, 2);
$climb['gradient_avg'] = round($climb['total_climbed'] / ($climb['total_distance'] * 1000) * 100, 2);
/* Find the category of the climb */
$cat = -1;
while ($cat + 1 < $num_climbs && $climb['gradient_avg'] >= $climbs[$cat + 1]['min_gradient'] && $climb['total_distance'] * 1000 >= $climbs[$cat + 1]['min_distance'] && $climb['total_climbed'] >= $climbs[$cat + 1]['min_height']) {
$cat++;
}
$climb['cat'] = $cat;
if ($cat != -1) {
/* Store it into the database */
$api->insertClimb($session_timestamp, $climb_num++, $climb['bottom'], $climb['top'], $climb['gradient_avg'], $climb['gradient_max'], $climb['total_distance'], $climb['total_climbed'], $climb['min_altitude'], $climb['max_altitude']);
/* Start search for the next climb */
$front = $max;
$back = $max;
$window_distance = 0;
$window_altitude = 0;
} else {
/* It was a false climb, either not steep enough,
* too short, and the window just masked this
* Keep searching for the next climb
*/
}
$cat = -1;
}
/* Move the back of the window up */
while ($window_distance > $min_climb['min_distance'] && $back < $num_records) {
$window_distance -= $records[$back]->delta_distance * 1000;
$window_altitude -= $records[$back]->delta_altitude;
$back++;
}
}
}
$timer->setMarker('Climb - End');
/*
* Bikes
* userid
* name
* description
* type, TT or Road
* weight
* picture?
* Assign a bike to an exercise session at creation time?
*/
unset($records);
$timer->setMarker('Laps - Start');
exec('/usr/local/bin/fitdecode -l ' . $upload['tmp_name'], $xml_laps);
$xml_laps = implode("\n", $xml_laps);
$laps = parseLaps($xml_laps);
$timer->setMarker('Laps - End');
$lap_num = 1;
foreach ($laps as $lap) {
$ftime = strptime($lap->start_time, '%FT%T%z');
$start_epoch = mktime($ftime['tm_hour'], $ftime['tm_min'], $ftime['tm_sec'], 1, $ftime['tm_yday'] + 1, $ftime['tm_year'] + 1900);
$lap_start = $start_epoch - $session_epoch;
$api->insertLap($session_timestamp, $lap_num, $lap_start, $lap->start_position_lat, $lap->start_position_long, $lap->total_timer_time, $lap->total_elapsed_time, $lap->total_calories, $lap->avg_heart_rate, $lap->max_heart_rate, $lap->avg_speed, $lap->max_speed, $lap->total_ascent, $lap->total_descent, $lap->total_distance);
$lap_num++;
}
//$timer->display();
$db->commit();
$plans = Module_Plans_API::getInstance();
$view->planned = $plans->getClosestPlan($session_timestamp);
$view->session_timestamp = $session_timestamp;
$view->UploadStatusMsg = "Is this session the planned exercise session on at ere";
$view->UploadStatus = "Success";
} catch (Exception $e) {
$db->rollback();
$view->UploadStatusMsg = "Failed to upload";
$view->UploadStatus = "Error";
echo $e->getMessage();
}
$timer->display();
}
$view->addForm($form);
$view->subTemplate = 'genericForm.tpl';
echo $view->render();
}
function parseRecords($xml, $session_epoch)
{
$records = array();
$timer = new Benchmark_Timer();
$timer->start();
$timer->setMarker('Parse XML to tags - start');
/* Parse the XML into tags */
$parser = xml_parser_create();
xml_parser_set_option($parser, XML_OPTION_CASE_FOLDING, 0);
xml_parser_set_option($parser, XML_OPTION_SKIP_WHITE, 1);
xml_parse_into_struct($parser, $xml, $values, $tags);
xml_parser_free($parser);
// loop through the structures
$timer->setMarker('tags to arrays - start');
foreach ($tags as $key => $value) {
if ($key == "record") {
$molranges = $value;
// each contiguous pair of array entries are the
// lower and upper range for each molecule definition
for ($i = 0; $i < count($molranges); $i += 2) {
$offset = $molranges[$i] + 1;
$len = $molranges[$i + 1] - $offset;
$records[] = parseRecord($values, $offset, $len);
}
} else {
continue;
}
}
$timer->setMarker('tags to array - done');
$i = 0;
$timer->setMarker('gradient calcs - start');
/* Gradient calc constants */
$NUM_GRADIENT_SAMPES = 11;
$LOW_OFFSET = floor($NUM_GRADIENT_SAMPES / 2);
$HIGH_OFFSET = floor($NUM_GRADIENT_SAMPES / 2);
/* Create the window function */
/* Tukey window */
$alpha = 0.5;
$window = array();
for ($i = 0; $i < $NUM_GRADIENT_SAMPES; $i++) {
if ($i <= $alpha * $NUM_GRADIENT_SAMPES / 2) {
$window[$i] = 0.5 * (1 + cos(M_PI * (2 * $i / ($alpha * $NUM_GRADIENT_SAMPES) - 1)));
} else {
if ($i <= $NUM_GRADIENT_SAMPES * (1 - $alpha / 2)) {
$window[$i] = 1.0;
} else {
$window[$i] = 0.5 * (1 + cos(M_PI * (2 * $i / ($alpha * $NUM_GRADIENT_SAMPES) - 2 / $alpha + 1)));
}
}
}
$i = 0;
$num_records = count($records);
foreach ($records as $record) {
/* Convert the timestamp into an interval */
$ftime = strptime($record->timestamp, '%FT%T%z');
$record_epoch = mktime($ftime['tm_hour'], $ftime['tm_min'], $ftime['tm_sec'], 1, $ftime['tm_yday'] + 1, $ftime['tm_year'] + 1900);
$record->interval = $record_epoch - $session_epoch;
if ($i > 0) {
$record->delta_distance = $record->distance - $records[$i - 1]->distance;
$record->delta_altitude = round($record->altitude - $records[$i - 1]->altitude, 2);
} else {
$record->delta_distance = 0;
$record->delta_altitude = 0;
}
/* Calculate the average gradient */
$total_rise = 0;
$total_distance = 0;
unset($first_distance);
$last_distance = 0;
for ($g = $i - $LOW_OFFSET, $j = 0; $g <= $i + $HIGH_OFFSET; $g++, $j++) {
if ($g >= 0 && $g < $num_records) {
if (!isset($first_distance)) {
$first_distance = $records[$g]->distance;
}
$total_rise += ($records[$g]->altitude - $record->altitude) * $window[$j];
$last_distance = $records[$g]->distance;
}
}
$avg_rise = $total_rise / $NUM_GRADIENT_SAMPES;
$avg_distance = ($last_distance - $first_distance) / $NUM_GRADIENT_SAMPES * 1000;
if ($avg_distance) {
$record->gradient = round($avg_rise / $avg_distance * 100, 1);
} else {
$record->gradient = 0;
}
/* TODO: Calculate the power */
$i++;
}
$timer->setMarker('gradient calcs - done');
//$timer->display();
return $records;
}
/**
* A test started.
*
* @param PHPUnit2_Framework_Test $test
* @access public
*/
public function startTest(PHPUnit2_Framework_Test $test)
{
$testCase = $this->document->createElement('testcase');
$testCase->setAttribute('name', $test->getName());
$testCase->setAttribute('class', get_class($test));
$this->testSuites[$this->testSuiteLevel]->appendChild($testCase);
$this->currentTestCase = $testCase;
$this->testSuiteTests[$this->testSuiteLevel]++;
$this->timer->start();
}
/**
* @param PHPUnit2_Framework_Test $suite
* @param mixed $coverageDataFile
* @param mixed $coverageHTMLFile
* @param mixed $coverageTextFile
* @param mixed $testdoxHTMLFile
* @param mixed $testdoxTextFile
* @param mixed $xmlLogfile
* @param boolean $wait
* @return PHPUnit2_Framework_TestResult
* @access public
*/
public function doRun(PHPUnit2_Framework_Test $suite, $coverageDataFile = FALSE, $coverageHTMLFile = FALSE, $coverageTextFile = FALSE, $testdoxHTMLFile = FALSE, $testdoxTextFile = FALSE, $xmlLogfile = FALSE, $wait = FALSE)
{
$result = $this->createTestResult();
$timer = new Benchmark_Timer();
if ($this->printer === NULL) {
$this->printer = new PHPUnit2_TextUI_ResultPrinter();
}
$this->printer->write(PHPUnit2_Runner_Version::getVersionString() . "\n\n");
$result->addListener($this->printer);
if ($testdoxHTMLFile !== FALSE || $testdoxTextFile !== FALSE) {
require_once 'PHPUnit2/Util/TestDox/ResultPrinter.php';
if ($testdoxHTMLFile !== FALSE) {
$result->addListener(PHPUnit2_Util_TestDox_ResultPrinter::factory('HTML', $testdoxHTMLFile));
}
if ($testdoxTextFile !== FALSE) {
$result->addListener(PHPUnit2_Util_TestDox_ResultPrinter::factory('Text', $testdoxTextFile));
}
}
if ($xmlLogfile !== FALSE) {
require_once 'PHPUnit2/Util/Log/XML.php';
$result->addListener(new PHPUnit2_Util_Log_XML($xmlLogfile));
}
if ($coverageDataFile !== FALSE || $coverageHTMLFile !== FALSE || $coverageTextFile !== FALSE) {
$result->collectCodeCoverageInformation(TRUE);
}
$timer->start();
$suite->run($result);
$timer->stop();
$timeElapsed = $timer->timeElapsed();
$this->pause($wait);
$this->printer->printResult($result, $timeElapsed);
$this->handleCodeCoverageInformation($result, $coverageDataFile, $coverageHTMLFile, $coverageTextFile);
return $result;
}
include_once CONF_ROOT . 'config.inc.php';
$xhprof_on = false;
if (defined('_PS_DEBUG')) {
$xhprof_on = true;
if (extension_loaded('xhprof')) {
include_once LIB_ROOT . 'include/xhprof/utils/xhprof_lib.php';
include_once LIB_ROOT . 'include/xhprof/utils/xhprof_runs.php';
xhprof_enable(XHPROF_FLAGS_CPU + XHPROF_FLAGS_MEMORY);
}
}
defined('LIB_ROOT') || define('LIB_ROOT', CONF_ROOT . '/../library/');
if (defined('ENABLE_BENCHMARK') && TRUE === ENABLE_BENCHMARK) {
// for Benchmark
require_once LIB_ROOT . 'Benchmark/Timer.php';
$g_timer = new Benchmark_Timer();
$g_timer->start();
$g_timer->setMarker('web.init: start');
}
// Global Loader
include_once LIB_ROOT . 'class/Loader.php';
isset($g_timer) && $g_timer->setMarker('lib.loader loaded');
if (PHP_SAPI === 'cli') {
// command line
isset($argv) || ($argv = $_SERVER['argv']);
} elseif (isset($_SERVER['HTTP_HOST'])) {
// http mod, cgi, cgi-fcgi
if (headers_sent()) {
exit('headers already sent');
}
$format = 'html';
if (isset($_GET['format'])) {
/**
* Perform mySQL query and try to determine result value
*
* @param string $query
* @param string $output
* @param string $index_field if set, the resulting array will have the value
* of the $index_field as a key
* (use with caution if a get_row() call will follow!)
* @return bool|int
*/
public function query($query, $output = OBJECT, $index_field = null)
{
global $MODULE_VARS;
// Keep track of the time the query took?
$sql_time = is_array($MODULE_VARS['default']) && array_key_exists('NC_DEBUG_SQL_TIME', $MODULE_VARS['default']) && $MODULE_VARS['default']['NC_DEBUG_SQL_TIME'];
// Keep track of from where the method was executed?
$sql_func = is_array($MODULE_VARS['default']) && array_key_exists('NC_DEBUG_SQL_FUNC', $MODULE_VARS['default']) && $MODULE_VARS['default']['NC_DEBUG_SQL_FUNC'];
if ($sql_time && !class_exists('Benchmark_Timer')) {
require_once "Benchmark/Timer.php";
}
if ($this->benchmark || $sql_time) {
$timer = new Benchmark_Timer();
$timer->start();
}
// For reg expressions
$query = trim($query);
// Initialise return
$return_val = 0;
$this->is_error = 0;
$func = '';
$this->errno = 0;
// Flush cached values..
$this->flush();
// Log how the function was called
// $this->func_call = "\$db->query(\"$query\")";
// Keep track of the last query for debug..
$this->last_query = $query;
// Perform the query via std mysql_query function..
$this->result = @mysql_query($query, $this->dbh);
$this->num_queries++;
$q = ['query' => $query];
// таймер
if ($this->benchmark || $sql_time) {
$timer->stop();
if ($this->benchmark) {
$timer->display();
}
$sql_time = $timer->timeElapsed();
$q['sql_time'] = $sql_time;
}
if ($sql_func) {
$backtrace = debug_backtrace();
$func = ($backtrace[2]['class'] ? $backtrace[2]['class'] . '::' : '') . $backtrace[2]['function'];
$q['sql_func'] = $func;
}
$this->queries_arr[] = $q;
// If there is an error then take note of it..
if ($str = @mysql_error($this->dbh)) {
$this->register_error($str);
$this->is_error = 1;
$this->show_errors ? trigger_error($str, E_USER_WARNING) : null;
$this->errno = mysql_errno();
if ($this->debug_all || $this->trace) {
echo "<div style='border: 2pt solid red; margin: 10px; padding:10px; font-size:13px; color:black;'><br/>\n";
echo "Query: <b>" . $query . "</b><br/>\n";
echo "Error: <b>" . $str . "</b><br/>\n";
echo "</div>\n";
}
}
$this->debugMessage($this->num_queries . ". " . $query, $func, $sql_time, $this->is_error ? 'error' : 'ok');
if ($this->is_error) {
return false;
}
// Query was an insert, delete, update, replace
if (preg_match("/^(insert|delete|update|replace)\\s+/i", $query)) {
$this->rows_affected = @mysql_affected_rows($this->dbh);
// Take note of the insert_id
// NB: не нужно заменять на nc_preg_match(), поскольку запрос не обязательно
// является корректной UTF строкой - в этом случае условие не будет выполнено!
if (preg_match("/^(insert|replace)\\s+/i", $query)) {
$this->insert_id = @mysql_insert_id($this->dbh);
}
// Return number of rows affected
$return_val = $this->rows_affected;
} else {
// Take note of column info
if ($this->fill_col_info) {
$this->col_info = array();
$i = 0;
while ($i < @mysql_num_fields($this->result)) {
$this->col_info[$i] = @mysql_fetch_field($this->result);
$i++;
}
} else {
$this->col_info = false;
}
// mysql_query returns TRUE for INSERT/UPDATE/DROP queries and FALSE on error
if (!is_bool($this->result)) {
// Store Query Results
$this->result_output_type = $output;
if ($output == ARRAY_N) {
$fetch_function = 'mysql_fetch_row';
} elseif ($output == ARRAY_A) {
$fetch_function = 'mysql_fetch_assoc';
} else {
$fetch_function = 'mysql_fetch_object';
}
// Store results as an objects within main array
$num_rows = 0;
while ($row = $fetch_function($this->result)) {
$key = $index_field !== null ? is_array($row) ? $row[$index_field] : $row->{$index_field} : $num_rows;
$this->last_result[$key] = $row;
$num_rows++;
}
mysql_free_result($this->result);
// Log number of rows the query returned
$this->num_rows = $num_rows;
}
// Return number of rows selected
$return_val = $this->num_rows;
}
// If debug ALL queries
$this->trace || $this->debug_all ? $this->debug() : null;
if (1 || $this->debug_all) {
preg_match("/(from\\s+\\w+)/si", $query, $regs);
$from = preg_replace("/\\s+/s", " ", $regs[1]);
$from = preg_replace("/from /i", "FROM ", $from);
$this->groupped_queries[$from][$this->num_queries] = $query;
}
if ($this->benchmark && $GLOBALS["nccttimer"] instanceof Benchmark_Timer) {
$GLOBALS["nccttimer"]->setMarker("QRY {$this->num_queries}<br />");
}
return $return_val;
}
/**
* @param PHPUnit2_Framework_Test $suite
* @param boolean $wait
* @return PHPUnit2_Framework_TestResult
* @access public
*/
public function doRun(PHPUnit2_Framework_Test $suite, $wait = false)
{
$result = $this->createTestResult();
if ($this->printer === null) {
$this->printer = new PHPUnit2_TextUI_ResultPrinter();
}
$this->printer->write(PHPUnit2_Runner_Version::getVersionString() . "\n\n");
$result->addListener($this->printer);
if (class_exists('Benchmark_Timer')) {
$timer = new Benchmark_Timer();
}
if (isset($timer)) {
$timer->start();
}
$suite->run($result);
if (isset($timer)) {
$timer->stop();
$timeElapsed = $timer->timeElapsed();
} else {
$timeElapsed = false;
}
$this->pause($wait);
$this->printer->printResult($result, $timeElapsed);
return $result;
}
function sparql($I)
{
##Parse the query and build the dataset
#global $timer;
if (is_file(S3DB_SERVER_ROOT . '/pearlib/Benchmark/Timer.php')) {
require_once S3DB_SERVER_ROOT . '/pearlib/Benchmark/Timer.php';
$timer = new Benchmark_Timer();
$timer->start();
}
extract($I);
##To use SPARQL with ARC library, we will need it to work with a remote endpoint. That means that we do not want to configure ARC as a datastore, but rather to retrieve the data from s3db deployments, convert it to RDF and then use ARC to run the query on it
/* ARC2 static class inclusion */
ini_set("include_path", S3DB_SERVER_ROOT . "/pearlib/arc" . PATH_SEPARATOR . ini_get("include_path"));
include_once "ARC2.php";
$s3ql['url'] = $in['url'] != '' ? $in['url'] : $default_uri;
$s3ql['key'] = $in['key'] != '' ? $in['key'] : get_user_key($user_id, $db);
$q = $in['query'];
list($query, $triples, $prefixes) = parse_sparql_query($q, $s3ql);
$bq .= "PREFIX " . implode("\n PREFIX ", $query['prefix']) . "\n ";
$bq .= "SELECT " . $query['select'][0] . "\n ";
$bq .= "FROM" . implode(" FROM ", $query['from']) . "\n ";
$bq .= "WHERE " . $query['where'][0] . "\n ";
preg_match_all('(\\?[A-Za-z0-9]+) ', $bq, $vars);
if ($vars[0]) {
$vars = array_unique($vars[0]);
$sparql_vars = implode(" ", $vars);
}
if ($query['select'][0] != "" && $query['select'][0] != "*") {
$outputCols = explode(" ", trim($query['select'][0]));
$outputCols = array_filter($outputCols);
$outputCols = array_intersect($vars, $outputCols);
}
$sparql = ereg_replace("FROM(.*)WHERE", "WHERE", $bq);
#lets preprocess the order by which the must be queries must be performed to optimize speedness
list($iterations, $scrambled) = iterationOrder($triples, $prefixes, true);
##$rdf_results will contain the totality of triples retrieved from s3db;
##Start a rdf-api model
$iterations = array_values($iterations);
$rdf = S3DB_URI_BASE . '/s3dbcore/model.n3';
#base s3db rdf model
$filename = md5($rdf);
$file_place = $GLOBALS['uploads'] . '/';
#$queryModel = rdf2php($rdf);
#$data = $queryModel->sparqlQuery($sparql);
#echo '<pre>';print_r($data);exit;
if ($timer) {
$timer->setMarker('Core model read into results');
}
$rdf_results = array();
$performedQueries = array();
$r = 0;
foreach ($iterations as $it => $triples2query) {
$S3QL = array();
$S3QLfinal = array();
foreach ($triples2query as $i => $tripleInd) {
$tripleString = $tripleInd;
list($subject, $predicate, $object) = explode(' ', trim($tripleString));
$subject = ereg_replace('^<|>$', '', $subject);
$predicate = ereg_replace('^<|>$', '', $predicate);
$object = ereg_replace('^<|>$', '', $object);
$triple = compact('subject', 'predicate', 'object');
#sparql triple is used to calculate the values of the variables in the triple
#$sparql_triple = $sparql_prefixes_default.' SELECT * WHERE { '.ltrim($tripleString).' . }';
#now lets interpret the triple to explore the space of possible queries on S3QL
$pack = compact('triple', 's3ql', 'user_id', 'db', 'prefixes', 'varType', 'discoveredData', 'it', 'varTypeWhere', 'collected_data', 'performedQueries');
$sp = sparql_navigator($pack);
extract($sp);
# if($timer) $timer->setMarker('Built query '.$i);
##Remove queries that were already performed
if ($S3QL[0]) {
foreach ($S3QL as $s => $q) {
$S3QLfinal[] = $q;
$queried_elements[] = $element[$s];
}
$localQueries[$tripleString] = $localQueries[0];
$remoteQueries[$tripleString] = $remoteQueries[0];
$localQueries = array_filter($localQueries);
$remoteQueries = array_filter($remoteQueries);
}
}
$S3QL = $S3QLfinal;
##Remove repeated queries
$S3QL = array_unique($S3QL);
#if only the s3ql is requested, we can return it now
if ($in['output'] == 'S3QL') {
foreach ($localQueries as $sparqlVersion => $s3qlVersion) {
$Q[]['S3QL'] = S3QLQuery($s3qlVersion);
}
foreach ($remoteQueries as $rq) {
$Q[]['S3QL'] = $rq;
}
$root = 's3ql';
#root is just the word that xml should parse as the root for each entry
$data = $Q;
$cols = array('S3QL');
$format = $in['format'] == '' ? 'html' : $in['format'];
$z = compact('data', 'cols', 'format', 'root');
$out = outputFormat($z);
return array(true, $out);
}
#If paralel library is activated, use it for the data. Otherwise use the custom version
#$query_answers_file = 'sparql_query_ans'.rand(100,200); $a=fopen($query_answers_file, 'a');
if (!empty($S3QL)) {
if (extension_loaded('curl') && $goparallel) {
// Create cURL handlers
if ($timer) {
$timer->setMarker('Starting queries from group ' . $it);
}
foreach ($S3QL as $k => $url) {
$qURL = $url;
$ch[$k] = curl_init();
// Set options
curl_setopt($ch[$k], CURLOPT_URL, $qURL . '&format=php');
curl_setopt($ch[$k], CURLOPT_RETURNTRANSFER, 1);
}
$mh = curl_multi_init();
foreach ($S3QL as $k => $url) {
curl_multi_add_handle($mh, $ch[$k]);
}
$running = null;
do {
curl_multi_exec($mh, $running);
if ($timer) {
$timer->setMarker('Query ' . $k . ' of group ' . $it . ' executed');
}
} while ($running > 0);
foreach ($S3QL as $k => $url) {
$answer[$k] = curl_multi_getcontent($ch[$k]);
if (!empty($answer[$k])) {
#@fwrite($a, $answer[$k]);
##This is what takes the longest after the query, can it be replaced?
$ans = unserialize($answer[$k]);
$letter = $queried_elements[$r][0];
if (empty($ans)) {
##is this query part is not optional, then the result will be null
##TO BE DEVELOPED SOON
} else {
$rdf_results[$letter][] = $ans;
}
$r++;
##Add the triples to already existing triples
#Line up the answer with the model
if ($timer) {
$timer->setMarker('Query ' . $it . '=>' . $k . ' converted to php ');
}
}
}
curl_multi_close($mh);
####Time count
#$time_end = microtime(true);
#$time = $time_end - $time_start;
#echo "Query took ".$time." seconds\n";exit;
###
} else {
#Now solve the remaining triples with the constants found in this one
if (is_array($localQueries) && !empty($localQueries)) {
foreach ($localQueries as $sparql_triple => $s3ql) {
$s3ql = array_filter(array_diff_key($s3ql, array('url' => '')));
$answer = localQ($s3ql);
if (!empty($answer)) {
$rdfanswer = rdf2php($answer);
#Line up the answer with the model
$queryModel->addModel($rdfanswer);
#Now perform the query on the small model to find a constant for the remaining queries
#list($data,$discovered, $discoveredData,$queryModel) = executeQuery($queryModel,$sparql_triple,$discovered,$format);
}
}
}
if (is_array($remoteQueries) && !empty($remoteQueries)) {
foreach ($remoteQueries as $remoteQuery) {
$answer = remoteQ($remoteQuery);
if (!empty($answer)) {
$rdfanswer = rdf2php($answer);
#Line up the answer with the model
$queryModel->addModel($rdfanswer);
#Now perform the query on the small model to find a constant for the remaining queries
#list($data,$discovered, $discoveredData,$queryModel) = executeQuery($queryModel,$sparql_triple,$discovered,$format);
}
}
}
}
}
}
##Get the data from the file
##Now, add the dictionary data
if ($complete) {
include_once S3DB_SERVER_ROOT . '/s3dbcore/dictionary.php';
$s3qlN = compact('user_id', 'db');
$s3qlN['from'] = 'link';
$s3qlN['format'] = 'php';
$links = query_user_dictionaries($s3qlN, $db, $user_id);
$links = unserialize($links);
$rdf_results['E'][0] = $links;
$s3qlN = compact('user_id', 'db');
$s3qlN['from'] = 'namespaces';
$s3qlN['format'] = 'php';
$ns = query_user_dictionaries($s3qlN, $db, $user_id);
$ns = unserialize($ns);
if ($timer) {
$timer->setMarker('Dictionary links retrieved');
}
}
##Convert the result into an RDF file
$data_triples = array();
if (is_array($rdf_results)) {
foreach ($rdf_results as $letter => $results2rdfize) {
$dont_skip_core_name = false;
$dont_skip_serialized = true;
if (ereg('S', $letter)) {
$dont_skip_serialized = false;
}
if (ereg('C|R|P', $letter)) {
$dont_skip_core_name = true;
}
foreach ($results2rdfize as $k => $data) {
$tmp_triples = rdf_encode($data, $letter, 'array', $s3ql['db'], $ns, $collected_data, $dont_skip_serialized, $dont_skip_core_name);
if (is_array($tmp_triples)) {
$data_triples = array_merge($data_triples, $tmp_triples);
}
}
}
}
if (!empty($data_triples)) {
$tmp['ns'] = $prefixes;
/*
#this one for turtle
$parser = ARC2::getComponent('TurtleParser', $a);
$index = ARC2::getSimpleIndex($triples, false) ; # false -> non-flat version
$rdf_doc = $parser->toTurtle($index,$prefixes);
*/
$parser = ARC2::getComponent('RDFXMLParser', $tmp);
$index = ARC2::getSimpleIndex($data_triples, false);
/* false -> non-flat version */
$rdf_doc = $parser->toRDFXML($index, $prefixes);
$filename = S3DB_SERVER_ROOT . '/tmp/' . random_string(15) . '.rdf';
$rr = fopen($filename, 'a+');
fwrite($rr, $rdf_doc);
fclose($rr);
if ($timer) {
$timer->setMarker(count($data_triples) . ' triples written to file ' . $filename);
}
##The better strategy would be to let the client cpu resolve the query; return the graphs with the rdf so that a sparql on the client can handle it
if ($return_file_name) {
if (filesize($filename) > 0) {
return array(true, $filename);
} else {
return array(false);
}
exit;
}
if ($redirect) {
##And now use an external service ( I gave up with ARC) to parse the query
$url2search = str_replace(S3DB_SERVER_ROOT, S3DB_URI_BASE, $filename);
##Giving up on ARC, surrender to sparql.com
$remote_endpoint = "http://sparql.org/sparql?query=";
$bq = ereg_replace("FROM <.*>", "FROM <" . $url2search . ">", $bq);
$bq = urlencode($bq);
$remote_endpoint .= $bq . '&default-graph-uri=&stylesheet=/xml-to-html.xsl';
return array(true, $remote_endpoint);
}
#echo $filename;exit;
#And finally perform the query on the model.
$queryModel = rdf2php($filename);
$format = $in['format'] != '' ? $in['format'] : 'html';
unlink($filename);
if ($timer) {
$timer->setMarker('Data converted to a model the rdf-api can query');
}
if (eregi('^(sparql-xml|sparql-html)$', $format)) {
switch ($format) {
case 'sparql-xml':
$result = $queryModel->sparqlQuery($sparql, 'XML');
break;
case 'sparql-html':
$result = $queryModel->sparqlQuery($sparql, 'HTML');
if ($_REQUEST['su3d']) {
$timer->stop();
$profiling = $timer->getProfiling();
echo "Query took " . $profiling[count($profiling) - 1]['total'] . ' sec';
}
break;
}
if ($result) {
return array(true, $result);
} else {
return false;
}
} elseif ($format == 'html.form') {
$form .= '
<html>
<head>
</head><body>
<form method="GET" action="sparql.php" id="sparqlform">
<h5>Target Deployment(s)</h5>
<input type="hidden" name="key" value="' . $s3ql['key'] . '"/>
<input type="hidden" name="format" value="' . $_REQUEST['format'] . '"/>
<input type = "text" id="url" size = "100%" value="' . $GLOBALS['url'] . '" name="url">
<h5>SPARQL <a href="http://www.w3.org/TR/rdf-sparql-query/" target="_blank">(help!!)</a></h5>
<br />
<textarea cols="100" id="sparql" rows="10" name = "query">' . stripslashes($sparql) . '</textarea><br />
<input type="submit" value="SPARQL this!" id="submitsparql"></body>
</form>
';
$form .= '<br />' . count($data) . " rows";
$form .= '<br />Query took ' . (strtotime(date('His')) - $start) . ' sec';
if (count($data) > 0) {
return array(true, $form);
} else {
return array(false);
}
} else {
#and output the result according to requested format
$data = $queryModel->sparqlQuery($sparql);
if ($timer) {
$timer->setMarker('Query on SPARQL data executed by rdf-api.');
}
if (is_array($outputCols) && !empty($outputCols)) {
##only this one are to be shown in the final result
$vars = $outputCols;
}
$cleanCols = array();
foreach ($vars as $varname) {
$cleanCols[] = ereg_replace('^\\?', '', $varname);
}
$outputData = array();
if (is_array($data)) {
foreach ($data as $s => $sparql_line) {
foreach ($sparql_line as $sparql_var => $sparql_var_value) {
if ($sparql_var_value->uri != '') {
$outputData[$s][ereg_replace('^\\?', '', $sparql_var)] = $sparql_var_value->uri;
} elseif ($sparql_var_value->label != '') {
$outputData[$s][ereg_replace('^\\?', '', $sparql_var)] = $sparql_var_value->label;
} else {
$outputData[$s][ereg_replace('^\\?', '', $sparql_var)] = "";
}
}
}
}
if ($timer) {
$timer->setMarker('Data converted in a format that fun outputformat can read');
}
#$timer ->display();
#root is just the word that xml should parse as the root for each entry
$root = 'sparql';
if ($timer) {
$timer->setMarker('All variables fitted into their places to represent in the final output');
}
$data = $outputData;
$cols = $cleanCols;
if ($_REQUEST['su3d']) {
$timer->stop();
$profiling = $timer->getProfiling();
echo "Query took " . $profiling[count($profiling) - 1]['total'] . ' sec<br>';
}
$z = compact('data', 'cols', 'format', 'root');
$out = outputFormat($z);
echo $out;
exit;
if (count($data) > 0) {
return array(true, $out);
} else {
return array(false);
}
}
} else {
return array(false);
}
#else {
#$out= formatReturn($GLOBALS['error_codes']['no_results'], 'Your query did not return any results.', $format,'');
#}
}
/**
* Runs a test suite.
*
* @param PHPUnit_Framework_Test $suite
* @param optional boolean $wait
* @return PHPUnit_Framework_TestResult
* @access public
*/
public function doRun(PHPUnit_Framework_Test $suite, $wait = false)
{
printf("PHPUnit %s by Sebastian Bergmann.\n\n", PHPUnit_Framework_Version);
$result = new PHPUnit_Framework_TestResult();
$result->addListener($this->fPrinter);
$timer = new Benchmark_Timer();
$timer->start();
$suite->run($result);
$timer->stop();
$this->pause($wait);
$this->fPrinter->printResult($result, $timer->timeElapsed());
return $result;
}
