<?php

switch ( $_REQUEST['task'] )
{
    case 'create' :
    {
        // Silently ignore bogus requests
        if ( !empty($_POST['level']) && !empty($_POST['message']) )
        {
            logInit( array( 'id' => "web_js" ) );

            $string = $_POST['message'];

            $file = !empty($_POST['file']) ? preg_replace( '/\w+:\/\/\w+\//', '', $_POST['file'] ) : '';
            if ( !empty( $_POST['line'] ) )
                $line = $_POST['line'];
            else
                $line = NULL;

            $levels = array_flip(Logger::$codes);
            if ( !isset($levels[$_POST['level']]) )
                Panic( "Unexpected logger level '".$_POST['level']."'" );
            $level = $levels[$_POST['level']];
            Logger::fetch()->logPrint( $level, $string, $file, $line );
        }
        ajaxResponse();
        break;
    }
    case 'query' :
    {
        if ( !canView( 'System' ) )
            ajaxError( 'Insufficient permissions to view log entries' );

        $minTime = isset($_POST['minTime'])?$_POST['minTime']:NULL;
        $maxTime = isset($_POST['maxTime'])?$_POST['maxTime']:NULL;
        $limit = isset($_POST['limit'])?$_POST['limit']:100;
        $filter = isset($_POST['filter'])?$_POST['filter']:array();
        $sortField = isset($_POST['sortField'])?$_POST['sortField']:'TimeKey';
        $sortOrder = (isset($_POST['sortOrder']) and $_POST['sortOrder']) == 'asc' ? 'asc':'desc';

        $filterFields = array( 'Component', 'Pid', 'Level', 'File', 'Line' );

        $total = dbFetchOne( "SELECT count(*) AS Total FROM Logs", 'Total' );
        $sql = 'SELECT * FROM Logs';
        $where = array();
		$values = array();
        if ( $minTime ) {
            $where[] = "TimeKey > ?";
			$values[] = $minTime;
        } elseif ( $maxTime ) {
            $where[] = "TimeKey < ?";
			$values[] = $maxTime;
		}
        foreach ( $filter as $field=>$value ) {
            if ( $field == 'Level' ){
                $where[] = $field." <= ?";
				$values[] = $value;
            } else {
                $where[] = $field." = ?";
				$values[] = $value;
			}
		}
        if ( count($where) )
            $sql.= ' WHERE '.join( ' AND ', $where );
        $sql .= " order by ".$sortField." ".$sortOrder." limit ".$limit;
        $logs = array();
        foreach ( dbFetchAll( $sql, NULL, $values ) as $log ) {
            $log['DateTime'] = preg_replace( '/^\d+/', strftime( "%Y-%m-%d %H:%M:%S", intval($log['TimeKey']) ), $log['TimeKey'] );
            $logs[] = $log;
        }
        $options = array();
        $where = array();
		$values = array();
        foreach( $filter as $field=>$value ) {
            if ( $field == 'Level' ) {
                $where[$field] = $field." <= ?";
				$values[$field] = $value;
            } else {
                $where[$field] = $field." = ?";
				$values[$field] = $value;
			} 
		}
        foreach( $filterFields as $field )
        {
            $sql = "SELECT DISTINCT $field FROM Logs WHERE NOT isnull($field)";
            $fieldWhere = array_diff_key( $where, array( $field=>true ) );
			$fieldValues = array_diff_key( $values, array( $field=>true ) );
            if ( count($fieldWhere) )
                $sql.= " AND ".join( ' AND ', $fieldWhere );
            $sql.= " ORDER BY $field ASC";
            if ( $field == 'Level' )
            {
                foreach( dbFetchAll( $sql, $field, array_values($fieldValues) ) as $value )
                    if ( $value <= Logger::INFO )
                        $options[$field][$value] = Logger::$codes[$value];
                    else
                        $options[$field][$value] = "DB".$value;
            }
            else
            {
                foreach( dbFetchAll( $sql, $field, array_values( $fieldValues ) ) as $value )
                    if ( $value != '' )
                        $options[$field][] = $value;
            }
        }
        if ( count($filter) )
        {
            $sql = "SELECT count(*) AS Available FROM Logs WHERE ".join( ' AND ', $where );
            $available = dbFetchOne( $sql, 'Available', array_values($values) );
        }
        ajaxResponse( array(
            'updated' => preg_match( '/%/', DATE_FMT_CONSOLE_LONG )?strftime( DATE_FMT_CONSOLE_LONG ):date( DATE_FMT_CONSOLE_LONG ), 
            'total' => $total,
            'available' => isset($available)?$available:$total,
            'logs' => $logs,
            'state' => logState(),
            'options' => $options
        ) );
        break;
    }
    case 'export' :
    {
        if ( !canView( 'System' ) )
            ajaxError( 'Insufficient permissions to export logs' );

        $minTime = isset($_POST['minTime'])?$_POST['minTime']:NULL;
        $maxTime = isset($_POST['maxTime'])?$_POST['maxTime']:NULL;
        if ( !is_null($minTime) && !is_null($maxTime) && $minTime > $maxTime )
        {
            $tempTime = $minTime;
            $minTime = $maxTime;
            $maxTime = $tempTime;
        }
        //$limit = isset($_POST['limit'])?$_POST['limit']:1000;
        $filter = isset($_POST['filter'])?$_POST['filter']:array();
        $sortField = isset($_POST['sortField'])?$_POST['sortField']:'TimeKey';
        $sortOrder = isset($_POST['sortOrder'])?$_POST['sortOrder']:'asc';

        $sql = "select * from Logs";
        $where = array();
		$values = array();
        if ( $minTime )
        {
            preg_match( '/(.+)(\.\d+)/', $minTime, $matches );
            $minTime = strtotime($matches[1]).$matches[2];
            $where[] = "TimeKey >= ?";
			$values[] = $minTime;
        }
        if ( $maxTime )
        {
            preg_match( '/(.+)(\.\d+)/', $maxTime, $matches );
            $maxTime = strtotime($matches[1]).$matches[2];
            $where[] = "TimeKey <= ?";
			$values[] = $maxTime;
        }
        foreach ( $filter as $field=>$value ) {
            if ( $value != '' ) {
                if ( $field == 'Level' ) {
                    $where[] = $field." <= ?";
					$values[] = $value;
                } else {
                    $where[] = $field." = ?'";
					$values[] = $value;
				}
			}
		}
        if ( count($where) )
            $sql.= " where ".join( " and ", $where );
        $sql .= " order by ".$sortField." ".$sortOrder;
        //$sql .= " limit ".dbEscape($limit);
        $format = isset($_POST['format'])?$_POST['format']:'text';
        switch( $format )
        {
            case 'text' :
                $exportExt = "txt";
                break;
            case 'tsv' :
                $exportExt = "tsv";
                break;
            case 'html' :
                $exportExt = "html";
                break;
            case 'xml' :
                $exportExt = "xml";
                break;
            default :
                Fatal( "Unrecognised log export format '$format'" );
        }
        $exportKey = substr(md5(rand()),0,8);
        $exportFile = "zm-log.$exportExt";
        $exportPath = "temp/zm-log-$exportKey.$exportExt";
        if ( !($exportFP = fopen( $exportPath, "w" )) )
            Fatal( "Unable to open log export file $exportFile" );
        $logs = array();
        foreach ( dbFetchAll( $sql, NULL, $values ) as $log )
        {
            $log['DateTime'] = preg_replace( '/^\d+/', strftime( "%Y-%m-%d %H:%M:%S", intval($log['TimeKey']) ), $log['TimeKey'] );
            $logs[] = $log;
        }
        switch( $format )
        {
            case 'text' :
            {
                foreach ( $logs as $log )
                {
                    if ( $log['Line'] )
                        fprintf( $exportFP, "%s %s[%d].%s-%s/%d [%s]\n", $log['DateTime'], $log['Component'], $log['Pid'], $log['Code'], $log['File'], $log['Line'], $log['Message'] );
                    else
                        fprintf( $exportFP, "%s %s[%d].%s-%s [%s]\n", $log['DateTime'], $log['Component'], $log['Pid'], $log['Code'], $log['File'], $log['Message'] );
                }
                break;
            }
            case 'tsv' :
            {
                fprintf( $exportFP, $SLANG['DateTime']."\t".$SLANG['Component']."\t".$SLANG['Pid']."\t".$SLANG['Level']."\t".$SLANG['Message']."\t".$SLANG['File']."\t".$SLANG['Line']."\n" );
                foreach ( $logs as $log )
                {
                    fprintf( $exportFP, "%s\t%s\t%d\t%s\t%s\t%s\t%s\n", $log['DateTime'], $log['Component'], $log['Pid'], $log['Code'], $log['Message'], $log['File'], $log['Line'] );
                }
                break;
            }
            case 'html' :
            {
                fwrite( $exportFP,
'<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
  <head>
    <title>'.$SLANG['ZoneMinderLog'].'</title>
    <style type="text/css">
body, h3, p, table, td {
    font-family: Verdana, Arial, Helvetica, sans-serif;
    font-size: 11px;
}
table {
    border-collapse: collapse;
    width: 100%;
}
th {
    font-weight: bold;
}
th, td {
    border: 1px solid #888888;
    padding: 1px 2px;
}
tr.log-fat td {
    background-color:#ffcccc;
    font-weight: bold;
    font-style: italic;
}
tr.log-err td {
    background-color:#ffcccc;
}
tr.log-war td {
    background-color: #ffe4b5;
}
tr.log-dbg td {
    color: #666666;
    font-style: italic;
}
    </style>
  </head>
  <body>
    <h3>'.$SLANG['ZoneMinderLog'].'</h3>
    <p>'.htmlspecialchars(preg_match( '/%/', DATE_FMT_CONSOLE_LONG )?strftime( DATE_FMT_CONSOLE_LONG ):date( DATE_FMT_CONSOLE_LONG )).'</p>
    <p>'.count($logs).' '.$SLANG['Logs'].'</p>
    <table>
      <tbody>
        <tr><th>'.$SLANG['DateTime'].'</th><th>'.$SLANG['Component'].'</th><th>'.$SLANG['Pid'].'</th><th>'.$SLANG['Level'].'</th><th>'.$SLANG['Message'].'</th><th>'.$SLANG['File'].'</th><th>'.$SLANG['Line'].'</th></tr>
' );
                foreach ( $logs as $log )
                {
                    $classLevel = $log['Level'];
                    if ( $classLevel < Logger::FATAL )
                        $classLevel = Logger::FATAL;
                    elseif ( $classLevel > Logger::DEBUG )
                        $classLevel = Logger::DEBUG;
                    $logClass = 'log-'.strtolower(Logger::$codes[$classLevel]);
                    fprintf( $exportFP, "        <tr class=\"%s\"><td>%s</td><td>%s</td><td>%d</td><td>%s</td><td>%s</td><td>%s</td><td>%s</td></tr>\n", $logClass, $log['DateTime'], $log['Component'], $log['Pid'], $log['Code'], $log['Message'], $log['File'], $log['Line'] );
                }
                fwrite( $exportFP, 
'      </tbody>
    </table>
  </body>
</html>' );
                break;
            }
            case 'xml' :
            {
                fwrite( $exportFP,
'<?xml version="1.0" encoding="utf-8"?>
<logexport title="'.$SLANG['ZoneMinderLog'].'" date="'.htmlspecialchars(preg_match( '/%/', DATE_FMT_CONSOLE_LONG )?strftime( DATE_FMT_CONSOLE_LONG ):date( DATE_FMT_CONSOLE_LONG )).'">
  <selector>'.$_POST['selector'].'</selector>' );
                foreach ( $filter as $field=>$value )
                    if ( $value != '' )
                      fwrite( $exportFP, 
'  <filter>
    <'.strtolower($field).'>'.htmlspecialchars($value).'</'.strtolower($field).'>
  </filter>' );
                fwrite( $exportFP, 
'  <columns>
    <column field="datetime">'.$SLANG['DateTime'].'</column><column field="component">'.$SLANG['Component'].'</column><column field="pid">'.$SLANG['Pid'].'</column><column field="level">'.$SLANG['Level'].'</column><column field="message">'.$SLANG['Message'].'</column><column field="file">'.$SLANG['File'].'</column><column field="line">'.$SLANG['Line'].'</column>
  </columns>
  <logs count="'.count($logs).'">
' );
                foreach ( $logs as $log )
                {
                    fprintf( $exportFP, 
"    <log>
      <datetime>%s</datetime>
      <component>%s</component>
      <pid>%d</pid>
      <level>%s</level>
      <message><![CDATA[%s]]></message>
      <file>%s</file>
      <line>%d</line>
    </log>\n", $log['DateTime'], $log['Component'], $log['Pid'], $log['Code'], utf8_decode( $log['Message'] ), $log['File'], $log['Line'] );
                }
                fwrite( $exportFP, 
'  </logs>
</logexport>' );
                break;
            }
                $exportExt = "xml";
                break;
        }
        fclose( $exportFP );
        ajaxResponse( array(
            'key' => $exportKey,
            'format' => $format,
        ) );
        break;
    }
    case 'download' :
    {
        if ( !canView( 'System' ) )
            ajaxError( 'Insufficient permissions to download logs' );

        if ( empty($_REQUEST['key']) )
            Fatal( "No log export key given" );
        $exportKey = $_REQUEST['key'];
        if ( empty($_REQUEST['format']) )
            Fatal( "No log export format given" );
        $format = $_REQUEST['format'];
        
        switch( $format )
        {
            case 'text' :
                $exportExt = "txt";
                break;
            case 'tsv' :
                $exportExt = "tsv";
                break;
            case 'html' :
                $exportExt = "html";
                break;
            case 'xml' :
                $exportExt = "xml";
                break;
            default :
                Fatal( "Unrecognised log export format '$format'" );
        }

        $exportFile = "zm-log.$exportExt";
        $exportPath = "temp/zm-log-$exportKey.$exportExt";

        header( "Pragma: public" );
        header( "Expires: 0" );
        header( "Cache-Control: must-revalidate, post-check=0, pre-check=0" );
        header( "Cache-Control: private", false ); // required by certain browsers
        header( "Content-Description: File Transfer" );
        header( 'Content-Disposition: attachment; filename="'.$exportFile.'"' );
        header( "Content-Transfer-Encoding: binary" );
        header( "Content-Type: application/force-download" );
        header( "Content-Length: ".filesize($exportPath) );
        readfile( $exportPath );
        exit( 0 );
        break;
    }
}

ajaxError( 'Unrecognised action or insufficient permissions' );

?>