turnitintooltwo_perflog.class.php

<?php

require_once(__DIR__.'/sdk/perflog.class.php');
require_once(__DIR__.'/lib.php');

class turnitintooltwo_perflog extends PerfLog {

    /**
     * Log networking performance details of an individual request
     *
     * @param resource $ch The cURL handle corresponding to the request to log
     * @param float $total_response_time Total time taken for the request in seconds
     */
    protected function log($ch, $total_response_time) {
        global $CFG, $USER, $action;

        static $config;
        if (empty($config)) {
            $config = turnitintooltwo_admin_config();
        }

        if ($config->enableperformancelogs) {
            // We only keep 10 log files, delete any additional files.
            $prefix = "perflog_";

            $dirpath = $CFG->tempdir."/turnitintooltwo/logs";
            if (!file_exists($dirpath)) {
                mkdir($dirpath, 0777, true);
            }
            $dir = opendir($dirpath);
            $files = array();
            while ($entry = readdir($dir)) {
                if (substr(basename($entry), 0, 1) != "." AND substr_count(basename($entry), $prefix) > 0) {
                    $files[] = basename($entry);
                }
            }
            sort($files);
            for ($i = 0; $i < count($files) - 10; $i++) {
                unlink($dirpath."/".$files[$i]);
            }

            // Prepare string.
            $str = '';
            if (!empty($action)) {
                $str .= " - $action";
            } else {
                $do = (!empty($_REQUEST['do'])) ? $_REQUEST['do'] : '';
                if (!empty($do)) {
                    $str .= " - {$do}";
                }
            }
            $http_status = curl_getinfo($ch, CURLINFO_HTTP_CODE);
            $str .= " - HTTP:" . $http_status;
            if ($http_status === 0 && curl_getinfo($ch, CURLINFO_SIZE_UPLOAD) === 0) {
                // CURLINFO_CONNECT_TIME is not reliable when the request fails to connect.
                $connect_time = $total_response_time;
            } else {
                $connect_time = curl_getinfo($ch, CURLINFO_CONNECT_TIME);
            }
            $str .= " - connect:" . sprintf('%0.3f', $connect_time);
            $str .= " - total:" . sprintf('%0.3f', $total_response_time);
            $str .= " - up:" . curl_getinfo($ch, CURLINFO_SIZE_UPLOAD);
            $str .= " - down:" . curl_getinfo($ch, CURLINFO_SIZE_DOWNLOAD);
            $str .= " - userid:" . $USER->id;
            $str .= " - " . $_SERVER['REQUEST_URI'];

            if ($http_status === 0) {
                $str .= " - " . curl_error($ch);
            }

            // Write to log file.
            $filepath = $dirpath."/".$prefix.gmdate('Y-m-d', time()).".txt";
            $file = fopen($filepath, 'a');
            $output = date('Y-m-d H:i:s O') . $str . "\r\n";
            fwrite($file, $output);
            fclose($file);
        }
    }

}