report_visitor_absolute.php

Go to the documentation of this file.

<?php

if ( !class_exists( "report_visitor_absolute") ) {
    class Report_visitor_absolute extends report_base
    {
        protected $_sThisTemplate = "report_visitor_absolute.tpl";

        public function drawReport()
        {
            $oDb = oxDb::getDb();

            $oSmarty    = $this->getSmarty();
            $sTime_from = $oDb->quote( date( "Y-m-d H:i:s", strtotime( $oSmarty->_tpl_vars['time_from'] ) ) );
            $sTime_to   = $oDb->quote( date( "Y-m-d H:i:s", strtotime( $oSmarty->_tpl_vars['time_to'] ) ) );

            if ( $oDb->getOne( "select 1 from oxlogs where oxtime >= $sTime_from and oxtime <= $sTime_to" ) ) {
                return true;
            }

            // buyer
            if ( $oDb->getOne( "select 1 from oxorder where oxorderdate >= $sTime_from and oxorderdate <= $sTime_to" ) ) {
                return true;
            }

            // newcustomer
            if ( $oDb->getOne( "select 1 from oxuser where oxcreate >= $sTime_from and oxcreate <= $sTime_to" ) ) {
                return true;
            }
        }

        public function visitor_month()
        {
            $myConfig = $this->getConfig();
            $oDb = oxDb::getDb();

            $aDataX = array();
            $aDataY = array();

            $dTimeTo    = strtotime( oxConfig::getParameter( "time_to"));
            $sTime_to   = $oDb->quote( date( "Y-m-d H:i:s", $dTimeTo ) );
            $dTimeFrom  = mktime( 23, 59, 59, date( "m", $dTimeTo)-12, date( "d", $dTimeTo), date( "Y", $dTimeTo));
            $sTime_from = $oDb->quote( date( "Y-m-d H:i:s", $dTimeFrom ) );

            $sSQL = "select oxtime, count(*) as nrof from oxlogs where oxtime >= $sTime_from and oxtime <= $sTime_to group by oxsessid";
            $aTemp = array();
            for ( $i = 1; $i <= 12; $i++)
                $aTemp[date( "m/Y", mktime( 23, 59, 59, date( "m", $dTimeFrom)+$i, date( "d", $dTimeFrom), date( "Y", $dTimeFrom)) )] = 0;

            $rs = $oDb->execute( $sSQL);
            if ($rs != false && $rs->recordCount() > 0) {
                while (!$rs->EOF) {
                    $aTemp[date( "m/Y", strtotime( $rs->fields[0]))]++;
                    $rs->moveNext();
                }
            }

            foreach ( $aTemp as $key => $value) {
                 $aDataX[$key]     = $value;
                $aDataX2[$key]    = 0;
                $aDataX3[$key]    = 0;
                $aDataY[]         = $key;
            }

            // buyer
            $sSQL = "select oxorderdate from oxorder where oxorderdate >= $sTime_from and oxorderdate <= $sTime_to order by oxorderdate";
            $aTemp = array();
            $rs = $oDb->execute( $sSQL);
            if ($rs != false && $rs->recordCount() > 0) {
                while (!$rs->EOF) {
                    $aTemp[date( "m/Y", strtotime( $rs->fields[0]))]++;
                    $rs->moveNext();
                }
            }

            foreach ( $aTemp as $key => $value) {
                 $aDataX2[$key] = $value;
            }

            // newcustomer
            $sSQL = "select oxcreate from oxuser where oxcreate >= $sTime_from and oxcreate <= $sTime_to order by oxcreate";
            $aTemp = array();
            $rs = $oDb->execute( $sSQL);
            if ($rs != false && $rs->recordCount() > 0) {
                while (!$rs->EOF) {
                    $aTemp[date( "m/Y", strtotime( $rs->fields[0]))]++;
                    $rs->moveNext();
                }
            }

            foreach ( $aTemp as $key => $value) {
                 $aDataX3[$key] = $value;
            }


            header ("Content-type: image/png" );

            // New graph with a drop shadow
            $graph = new Graph(800, 600);

            $graph->setBackgroundImage( $myConfig->getAbsAdminImageDir()."/reportbgrnd.jpg", BGIMG_FILLFRAME);

            // Use a "text" X-scale
            $graph->setScale("textlin");

            // Label align for X-axis
            $graph->xaxis->setLabelAlign('center', 'top', 'right');

            // Label align for Y-axis
            $graph->yaxis->setLabelAlign('right', 'bottom');

            $graph->setShadow();
            // Description
            $graph->xaxis->setTickLabels( $aDataY);


            // Set title and subtitle
            $graph->title->set("Monat");

            // Use built in font
            $graph->title->setFont(FF_FONT1, FS_BOLD);

            $aDataFinalX = array();
            foreach ( $aDataX as $dData)
                $aDataFinalX[] = $dData;
            // Create the bar plot
            $bplot = new BarPlot( $aDataFinalX);
            $bplot->setFillGradient("navy", "lightsteelblue", GRAD_VER);
            $bplot->setLegend("Besucher");

            $aDataFinalX2 = array();
            foreach ( $aDataX2 as $dData)
                $aDataFinalX2[] = $dData;
            // Create the bar plot
            $bplot2 = new BarPlot( $aDataFinalX2);
            $bplot2->setFillColor ("orange");
            $bplot2->setLegend("Kaeufer");

            $aDataFinalX3 = array();
            foreach ( $aDataX3 as $dData)
                $aDataFinalX3[] = $dData;
            // Create the bar plot
            $bplot3 = new BarPlot( $aDataFinalX3);
            $bplot3->setFillColor ("silver");
            $bplot3->setLegend("Neukunden");

            // Create the grouped bar plot
            $gbplot = new groupBarPlot (array($bplot, $bplot2, $bplot3));
            $graph->add( $gbplot);

            // Finally output the  image
            $graph->stroke();

        }

        public function visitor_week()
        {
            $myConfig = $this->getConfig();
            $oDb = oxDb::getDb();

            $aDataX = array();
            $aDataY = array();

            $dTimeTo    = strtotime( oxConfig::getParameter( "time_to"));
            $sTime_to   = $oDb->quote( date( "Y-m-d H:i:s", $dTimeTo ) );
            $dTimeFrom  = strtotime( oxConfig::getParameter( "time_from"));
            $sTime_from = $oDb->quote( date( "Y-m-d H:i:s", $dTimeFrom ) );

            $sSQL = "select oxtime, count(*) as nrof from oxlogs where oxtime >= $sTime_from and oxtime <= $sTime_to group by oxsessid order by oxtime";
            $aTemp = array();
            $rs = $oDb->execute( $sSQL);
            if ($rs != false && $rs->recordCount() > 0) {
                while (!$rs->EOF) {
                    //$aTemp[date( "W", strtotime( $rs->fields[0]))]++;
                    $aTemp[oxUtilsDate::getInstance()->getWeekNumber($myConfig->getConfigParam( 'iFirstWeekDay' ), strtotime( $rs->fields[0]))]++;
                    $rs->moveNext();
                }
            }

            // initializing
            list( $iFrom, $iTo ) = $this->getWeekRange();
            for ( $i = $iFrom; $i < $iTo; $i++ ) {
                $aDataX[$i]  = 0;
                $aDataX2[$i] = 0;
                $aDataX3[$i] = 0;
                $aDataY[]      = "KW ".$i;
            }

            foreach ( $aTemp as $key => $value) {
                $aDataX[$key]  = $value;
                $aDataX2[$key] = 0;
                $aDataX3[$key] = 0;
                $aDataY[]      = "KW ".$key;
            }

            // buyer
            $sSQL = "select oxorderdate from oxorder where oxorderdate >= $sTime_from and oxorderdate <= $sTime_to order by oxorderdate";
            $aTemp = array();
            $rs = $oDb->execute( $sSQL);
            if ($rs != false && $rs->recordCount() > 0) {
                while (!$rs->EOF) {
                    //$aTemp[date( "W", strtotime( $rs->fields[0]))]++;
                    $aTemp[oxUtilsDate::getInstance()->getWeekNumber($myConfig->getConfigParam( 'iFirstWeekDay' ), strtotime( $rs->fields[0]))]++;
                    $rs->moveNext();
                }
            }

            foreach ( $aTemp as $key => $value) {
                 $aDataX2[$key] = $value;
            }

            // newcustomer
            $sSQL = "select oxcreate from oxuser where oxcreate >= $sTime_from and oxcreate <= $sTime_to order by oxcreate";
            $aTemp = array();
            $rs = $oDb->execute( $sSQL);
            if ($rs != false && $rs->recordCount() > 0) {
                while (!$rs->EOF) {
                    //$aTemp[date( "W", strtotime( $rs->fields[0]))]++;
                    $aTemp[oxUtilsDate::getInstance()->getWeekNumber($myConfig->getConfigParam( 'iFirstWeekDay' ), strtotime( $rs->fields[0]))]++;
                    $rs->moveNext();
                }
            }

            foreach ( $aTemp as $key => $value) {
                 $aDataX3[$key] = $value;
            }

            header ("Content-type: image/png" );

            // New graph with a drop shadow
            $graph = new Graph( max( 800, count( $aDataX) * 80), 600);

            $graph->setBackgroundImage( $myConfig->getAbsAdminImageDir()."/reportbgrnd.jpg", BGIMG_FILLFRAME);

            // Use a "text" X-scale
            $graph->setScale("textlin");

            // Label align for X-axis
            $graph->xaxis->setLabelAlign('center', 'top', 'right');

            // Label align for Y-axis
            $graph->yaxis->setLabelAlign('right', 'bottom');

            $graph->setShadow();
            // Description
            $graph->xaxis->setTickLabels( $aDataY);


            // Set title and subtitle
            $graph->title->set("Woche");

            // Use built in font
            $graph->title->setFont(FF_FONT1, FS_BOLD);

            $aDataFinalX = array();
            foreach ( $aDataX as $dData)
                $aDataFinalX[] = $dData;
            // Create the bar plot
            $bplot = new BarPlot( $aDataFinalX);
            $bplot->setFillGradient("navy", "lightsteelblue", GRAD_VER);
            $bplot->setLegend("Besucher");

            $aDataFinalX2 = array();
            foreach ( $aDataX2 as $dData)
                $aDataFinalX2[] = $dData;
            // Create the bar plot
            $bplot2 = new BarPlot( $aDataFinalX2);
            $bplot2->setFillColor ("orange");
            $bplot2->setLegend("Kaeufer");

            $aDataFinalX3 = array();
            foreach ( $aDataX3 as $dData)
                $aDataFinalX3[] = $dData;
            // Create the bar plot
            $bplot3 = new BarPlot( $aDataFinalX3);
            $bplot3->setFillColor ("silver");
            $bplot3->setLegend("Neukunden");

            // Create the grouped bar plot
            $gbplot = new groupBarPlot (array($bplot, $bplot2, $bplot3));
            $graph->add( $gbplot);

            // Finally output the  image
            $graph->stroke();
        }
    }
}