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();
            $sTimeFrom = $oDb->quote(date("Y-m-d H:i:s", strtotime($oSmarty->_tpl_vars['time_from'])));
            $sTimeTo = $oDb->quote(date("Y-m-d H:i:s", strtotime($oSmarty->_tpl_vars['time_to'])));

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

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

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

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

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

            $dTimeTo = strtotime(oxRegistry::getConfig()->getRequestParameter("time_to"));
            $dTimeFrom = mktime(23, 59, 59, date("m", $dTimeTo) - 12, date("d", $dTimeTo), date("Y", $dTimeTo));

            $sTimeTo = $oDb->quote(date("Y-m-d H:i:s", $dTimeTo));
            $sTimeFrom = $oDb->quote(date("Y-m-d H:i:s", $dTimeFrom));

            $sSQL = "select oxtime, count(*) as nrof from oxlogs where oxtime >= $sTimeFrom and oxtime <= $sTimeTo 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 >= $sTimeFrom and oxorderdate <= $sTimeTo 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 >= $sTimeFrom and oxcreate <= $sTimeTo 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->getImageDir(true) . "/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();

            $sTimeTo = $oDb->quote(date("Y-m-d H:i:s", strtotime(oxRegistry::getConfig()->getRequestParameter("time_to"))));
            $sTimeFrom = $oDb->quote(date("Y-m-d H:i:s", strtotime(oxRegistry::getConfig()->getRequestParameter("time_from"))));

            $sSQL = "select oxtime, count(*) as nrof from oxlogs where oxtime >= $sTimeFrom and oxtime <= $sTimeTo 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[oxRegistry::get("oxUtilsDate")->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 >= $sTimeFrom and oxorderdate <= $sTimeTo 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[oxRegistry::get("oxUtilsDate")->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 >= $sTimeFrom and oxcreate <= $sTimeTo 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[oxRegistry::get("oxUtilsDate")->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->getImageDir(true) . "/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();
        }
    }
}