una/modules/boonex/charts/classes/BxChartsModule.php

<?php defined('BX_DOL') or die('hack attempt');
/**
 * Copyright (c) UNA, Inc - https://una.io
 * MIT License - https://opensource.org/licenses/MIT
 *
 * @defgroup    Charts Charts
 * @ingroup     UnaModules
 *
 * @{
 */

class BxChartsModule extends BxDolModule
{
    protected $aColors = array('#3366CC','#DC3912','#FF9900','#109618','#990099','#3B3EAC','#0099C6','#DD4477','#66AA00','#B82E2E','#316395','#994499','#22AA99','#AAAA11','#6633CC','#E67300','#8B0707','#329262','#5574A6','#3B3EAC');
    
    function __construct(&$aModule)
    {
        parent::__construct($aModule);
    }
    
    /**
     * Service methods
     */
    
    /**
     * @page service Service Calls
     * @section bx_charts Charts
     * @subsection bx_charts-other Other
     * @subsubsection bx_charts get_profile_modules
     * 
     * @code bx_srv('bx_charts', 'get_profile_modules', [...]); @endcode
     * 
     * Get list of avaliable profile modules
     * 
     * @return an array with avaliable modules. 
     * 
     * @see BxChartsModule::serviceGetProfileModules
     */
    /** 
     * @ref bx_charts-get_profile_modules "get_profile_modules"
     */
    public function serviceGetProfileModules()
    {
        $aResult = array();
        $BxDolModuleQuery = BxDolModuleQuery::getInstance();
        $aModules = $BxDolModuleQuery->getModulesBy(array('type' => 'modules', 'active' => 1));
        foreach($aModules as $aModule){
            if(BxDolRequest::serviceExists($aModule['name'], 'act_as_profile') && BxDolService::call($aModule['name'], 'act_as_profile') == true){
                $aResult[$aModule['name']] = $aModule['title'];
            }
        }
        return $aResult;
    }
    
    /**
     * @page service Service Calls
     * @section bx_charts Charts
     * @subsection bx_charts-other Other
     * @subsubsection bx_charts-on-profile get_text_modules
     * 
     * @code bx_srv('bx_charts', 'get_text_modules', [...]); @endcode
     * 
     * Get list of avaliable text modules
     * 
     * @return an array with avaliable modules. 
     * 
     * @see BxChartsModule::serviceGetTextModules
     */
    /** 
     * @ref bx_charts-get_text_modules "get_text_modules"
     */
    public function serviceGetTextModules()
    {
        $aResult = array();
        $BxDolModuleQuery = BxDolModuleQuery::getInstance();
        $aModules = $BxDolModuleQuery->getModulesBy(array('type' => 'modules', 'active' => 1));
        foreach($aModules as $aModule){
            $oModule = BxDolModule::getInstance($aModule['name']);
            if($oModule instanceof iBxDolContentInfoService && isset($oModule->_oConfig->CNF['OBJECT_VOTES'])){
                $aResult[$aModule['name']] = $aModule['title'];
            }
        }
        return $aResult;
    }
    
    /**
     * @page service Service Calls
     * @section bx_charts Charts
     * @subsection bx_charts-other Other
     * @subsubsection bx_charts get_modules
     * 
     * @code bx_srv('bx_charts', 'get_modules', [...]); @endcode
     * 
     * Get list of avaliable modules
     * 
     * @return an array with avaliable modules. 
     * 
     * @see BxChartsModule::serviceGeModules
     */
    /** 
     * @ref bx_charts-get_modules "get_modules"
     */
    public function serviceGetModules()
    {
        $aResult = array();
        $aItems = $this->_oDb->getStatistic();
        foreach($aItems as $aItem) {
            $aResult[$aItem['name']] = _t($aItem['title']);
        }
        return $aResult;
    }
    
    /**
     * @page service Service Calls
     * @section bx_charts Charts
     * @subsection bx_charts-other Other
     * @subsubsection bx_charts get_growth_group_by
     * 
     * @code bx_srv('bx_charts', 'get_growth_group_by', [...]); @endcode
     * 
     * Get list of avaliable grouping mode(day/week/month)
     * 
     * @return an array with avaliable grouping mode(day/week/month). 
     * 
     * @see BxChartsModule::serviceGetGrowthGroupBy
     */
    /** 
     * @ref bx_charts-get_growth_group_by "get_growth_group_by"
     */
    public function serviceGetGrowthGroupBy()
    {
        return array('date' => _t('_bx_charts_txt_growth_group_by_day'),'week' => _t('_bx_charts_txt_growth_group_by_week'),'month' => _t('_bx_charts_txt_growth_group_by_month'));
    }
    
    /**
     * @page service Service Calls
     * @section bx_charts Charts
     * @subsection bx_charts-other Other
     * @subsubsection bx_charts-on-profile get_chart_top_contents_by_likes
     * 
     * @code bx_srv('bx_charts', 'get_chart_top_contents_by_likes', [...]); @endcode
     * 
     * Get Chart Top Contents By Likes
     * 
     * @return an html for chart. 
     * 
     * @see BxChartsModule::serviceGetChartTopContentsByLikes
     */
    /** 
     * @ref bx_charts-get_chart_top_contents_by_likes "get_chart_top_contents_by_likes"
     */
    public function serviceGetChartTopContentsByLikes()
    {
        return $this->_oTemplate->getChart('TopContentsByLikes', 100);
    }
    
    /**
     * @page service Service Calls
     * @section bx_charts Charts
     * @subsection bx_charts-other Other
     * @subsubsection bx_charts-on-profile get_chart_most_active_profiles
     * 
     * @code bx_srv('bx_charts', 'get_chart_most_active_profiles', [...]); @endcode
     * 
     * Get Chart Most Active Profiles
     * 
     * @return an html for chart. 
     * 
     * @see BxChartsModule::serviceGetChartMostActiveProfiles
     */
    /** 
     * @ref bx_charts-get_chart_most_active_profiles "get_chart_most_active_profiles"
     */
    public function serviceGetChartMostActiveProfiles()
    {
        return $this->_oTemplate->getChart('MostActiveProfiles', 80);
    }
    
    /**
     * @page service Service Calls
     * @section bx_charts Charts
     * @subsection bx_charts-other Other
     * @subsubsection bx_charts-on-profile get_chart_most_followed_profiles
     * 
     * @code bx_srv('bx_charts', 'get_chart_most_followed_profiles', [...]); @endcode
     * 
     * Get Chart Most Followed Profiles
     * 
     * @return an html for chart. 
     * 
     * @see BxChartsModule::serviceGetChartMostFollowedProfiles
     */
    /** 
     * @ref bx_charts-get_chart_most_followed_profiles "get_chart_most_followed_profiles"
     */
    public function serviceGetChartMostFollowedProfiles()
    {
        return $this->_oTemplate->getChart('MostFollowedProfiles', 40);
    }
    
     /**
     * @page service Service Calls
     * @section bx_charts Charts
     * @subsection bx_charts-other Other
     * @subsubsection bx_charts-on-profile get_chart_content_by_modules
     * 
     * @code bx_srv('bx_charts', 'get_chart_content_by_modules', [...]); @endcode
     * 
     * Get Chart Content By Modules
     * 
     * @return an html for chart. 
     * 
     * @see BxChartsModule::serviceGetChartContentByModules
     */
    /** 
     * @ref bx_charts-get_chart_content_by_modules "get_chart_content_by_modules"
     */

    public function serviceGetChartContentByModules()
    {
        return $this->_oTemplate->getChart('ContentByModules', 100);
    }
    
    /**
     * @page service Service Calls
     * @section bx_charts Charts
     * @subsection bx_charts-other Other
     * @subsubsection bx_charts-on-profile get_chart_growth_by_modules
     * 
     * @code bx_srv('bx_charts', 'get_chart_growth_by_modules', [...]); @endcode
     * 
     * Get Chart Growth By Modules
     * 
     * @return an html for chart. 
     * 
     * @see BxChartsModule::serviceGetChartGrowthByModules
     */
    /** 
     * @ref bx_charts-get_chart_growth_by_modules "get_chart_growth_by_modules"
     */

    public function serviceGetChartGrowthByModules()
    {
        return $this->_oTemplate->getChartGrowth('GrowthByModules', 75);
    }
    
    public function actionGetChartData($Id = 0)
    {
        header('Content-Type: application/json');
        if ($Id == 'TopContentsByLikes'){
            $aValues = array('labels' => array(), 'values' => array(), 'colors' => array(), 'links' => array());
            $aData = $this->_oDb->getTopByLikes();
            foreach ($aData as $aValue) {
                $oModule = BxDolModule::getInstance($aValue['module']);
                array_push($aValues['labels'], $this->getItemName($oModule->serviceGetTitle($aValue['object_id'])) . ' (' . $oModule->_aModule['title'].')'. ' - ' . $aValue['value']);
                array_push($aValues['values'], $aValue['value']);
                array_push($aValues['links'], $oModule->serviceGetLink($aValue['object_id']));
            }
            $aValues['colors'] = array_slice($this->aColors, 0, count($aValues['values']));
            echo  '{"type": "doughnut", "data":{"labels":' . json_encode($aValues['labels']) . ',"datasets":[{"data":' . json_encode($aValues['values']) . ',"backgroundColor":' . json_encode($aValues['colors']) . '}]}, "options": {"legend": {"position": "bottom"}}, "links": ' . json_encode($aValues['links']) . '}';
        }
        
        if ($Id == 'MostActiveProfiles'){
            $aValues = array('labels' => array(), 'values1' => array(), 'values2' => array(), 'links' => array());
            $aData = $this->_oDb->getMostActiveProfiles();
            foreach ($aData as $aValue) {
                $oModule = BxDolModule::getInstance($aValue['module']);
                array_push($aValues['labels'], $this->getItemName($oModule->serviceGetTitle($aValue['object_id'])));
                array_push($aValues['values1'], $aValue['create_count']);
                array_push($aValues['values2'], $aValue['views_count']);
                array_push($aValues['links'], $oModule->serviceGetLink($aValue['object_id']));
            }
            echo  '{"type":"horizontalBar",  "data": {"labels":' . json_encode($aValues['labels']) . ',"datasets": [{"label": "' . _t('_bx_charts_most_active_profiles_legend_posts') . '","backgroundColor": "' . $this->aColors[0] . '","borderColor": "' . $this->aColors[0] . '","borderWidth": 1,"data": ' . json_encode($aValues['values1']) . '}, {"label": "' . _t('_bx_charts_most_active_profiles_legend_views') . '","backgroundColor": "' . $this->aColors[1] . '","borderColor":"' . $this->aColors[1] . '","borderWidth": 1,"data": ' . json_encode($aValues['values2']) . '}]}, "options": {"legend": {"position": "bottom"}}, "links": ' . json_encode($aValues['links']) . '}';
        }
        
        if ($Id == 'MostFollowedProfiles'){
            $aValues = array('labels' => array(), 'values' => array(), 'links' => array());
            $aData = $this->_oDb->getMostFollowedProfiles();
            foreach ($aData as $aValue) {
                $oModule = BxDolModule::getInstance($aValue['module']);
                array_push($aValues['labels'], $this->getItemName($oModule->serviceGetTitle($aValue['object_id'])));
                array_push($aValues['values'], $aValue['followers_count']);
                array_push($aValues['links'], $oModule->serviceGetLink($aValue['object_id']));
            }
            echo  '{"type":"horizontalBar",  "data": {"labels":' . json_encode($aValues['labels']) . ',"datasets": [{"label": "' . _t('_bx_charts_most_followed_profiles_legend') . '","backgroundColor": "' . $this->aColors[0] . '","borderColor": "' . $this->aColors[0] . '","borderWidth": 1,"data": ' . json_encode($aValues['values']) . '}]}, "options": {"legend": {"position": "bottom"}}, "links": ' . json_encode($aValues['links']) . '}';
        }
        
        if ($Id == 'ContentByModules'){
            $aValues = array('labels' => array(), 'values' => array(), 'colors' => array(), 'links' => array());
            $aItems = $this->_oDb->getStatistic();
            foreach($aItems as $aItem) {
                
                $iValue = 0;
                if(!empty($aItem['query']))
                    $iValue = (int)$this->_oDb->getOne($aItem['query']);
                else if(BxDolRequest::serviceExists($aItem['module'], 'get_query_statistics'))
                    $iValue = (int)BxDolService::call($aItem['module'], 'get_query_statistics', array($aItem));
                
                $sLink = '';
                if(!empty($aItem['link']))
                    $sLink = BxDolPermalinks::getInstance()->permalink($aItem['link']);
                
                array_push($aValues['labels'], _t($aItem['title']) . ' - ' . $iValue);
                array_push($aValues['values'], $iValue);
                array_push($aValues['links'], $sLink);
            }
            $aValues['colors'] = array_slice($this->aColors, 0, count($aValues['values']));
            echo  '{"type": "doughnut", "data":{"labels":' . json_encode($aValues['labels']) . ',"datasets":[{"data":' . json_encode($aValues['values']) . ',"backgroundColor":' . json_encode($aValues['colors']) . '}]}, "options": {"legend": {"position": "bottom"}}, "links": ' . json_encode($aValues['links']) . '}';
        }
        
        if ($Id == 'GrowthByModules'){
            $aValues = array('labels' => array(), 'values1' => array(), 'values2' => array(), 'links' => array());
            $sModuleName = $sTableName = bx_get('m');
            $sModuleTitle = "";
            $aTmp = $this->getSelectedModulesGrowth();
            if (empty($sModuleName)){
                $sModuleName = $sTableName = $aTmp[0][0];
            }
            $sModuleTitle = $aTmp[1][$sModuleName];
            $oModule = BxDolModule::getInstance($sModuleName);
            if (isset($oModule->_oConfig->CNF['TABLE_ENTRIES']))
                $sTableName = $oModule->_oConfig->CNF['TABLE_ENTRIES'];
            
            $aData = $this->_oDb->getGrowth($sTableName);
            $aTmp2 = $this->_oDb->getGrowthInitValue($sTableName); 
            $iValuePrev = $aTmp2[0]; 
            $iMinTime = $aTmp2[1] * 1000; 
            $iMaxTime = time() * 1000; 
            $sGroupBy = getParam('bx_charts_chart_growth_group_by');
            foreach ($aData as $aValue) {
                $aValue['count1'] = $iValuePrev + $aValue['count'];
                $iX = $this->getXValueByParams($aValue, getParam('bx_charts_chart_growth_group_by'));
                array_push($aValues['values1'], array('x' => $iX , 'y' => $aValue['count1']));
                array_push($aValues['values2'], array('x' => $iX, 'y' => $aValue['count']));
                $iValuePrev = $aValue['count1'];
            }
            
            echo  '{"type":"line",  "data": {"datasets": [{"label": "' . $sModuleTitle . ':' . _t('_bx_charts_growth_speed_legend') . '","fill": "false","backgroundColor": "' . $this->aColors[2] . '","borderColor":"' . $this->aColors[2] . '","borderWidth": 1,"data": ' . json_encode($aValues['values2']) . '}, {"label": "' . $sModuleTitle . ':' . _t('_bx_charts_growth_legend') . '","fill": "false","backgroundColor": "' . $this->aColors[3] . '","borderColor": "' . $this->aColors[3] . '","borderWidth": 1,"data": ' . json_encode($aValues['values1']) . '}]}, "options": {"legend": {"position": "bottom"},"scales": {"xAxes": [{"type": "time", "time": {"tooltipFormat": "DD.MM.YYYY", "unit" : "' . ($sGroupBy == 'month' ? 'month' : 'day') . '"}, "ticks": {"min": "' . $iMinTime . '", "max": "' . $iMaxTime . '", "autoSkip": "true"}, "display": "true", "distribution": "linear"}]}}}';
        }
    }
    
    public function getSelectedModulesGrowth()
    {
        $aModulesList = $this->serviceGetModules();
        $aModules = array_keys($aModulesList);
        $sModulesDisabled = explode(',', getParam('bx_charts_chart_growth_modules'));
        return array(array_diff($aModules, $sModulesDisabled), $aModulesList);
    }
    
    private function getItemName($sString)
    {
        $sString = strip_tags($sString);
        if ($sString == ''){
            $sString = _t('_bx_charts_txt_empty_title_item');
        }
        else{
            $sString = strmaxtextlen($sString, 50, '...');
        }
        return $sString;
    }
    
    private function getXValueByParams($aValue, $sMode)
    {
        switch ($sMode) {
            case 'date':
                return strtotime($aValue['period']) * 1000;
            case 'week':
                $mixedTime = strtotime("01.01." . $aValue['year'], time());
                $iDay = date('w', $mixedTime);
                $mixedTime += ((7 * $aValue['period']) + 1 - $iDay) * 24 * 3600;
                return $mixedTime * 1000;
            case 'month':
                return strtotime('01.' . $aValue['period'] . '.' . $aValue['year']) * 1000;
        }
    }
}

/** @} */