THINKPHP中cron任务的实现方法

<?php
define('MODE_NAME', 'cli');
// 检测PHP环境
if(version_compare(PHP_VERSION,'5.3.0','<'))  die('require PHP > 5.3.0 !');

define('APP_DEBUG', true);

// 定义应用目录
define('APP_PATH', __DIR__ . '/Application/');

// 引入ThinkPHP入口文件
require __DIR__ . '/ThinkPHP/ThinkPHP.php';

define('AUTO_CRON', true);
include __DIR__ . '/cli.php';

DROP TABLE IF EXISTS `cron`;
CREATE TABLE IF NOT EXISTS `cron` (
  `cron_id` int(10) unsigned NOT NULL AUTO_INCREMENT,
  `name` varchar(255) COLLATE utf8_unicode_ci NOT NULL DEFAULT '',
  `expression` varchar(255) COLLATE utf8_unicode_ci NOT NULL DEFAULT '',
  `class` varchar(255) COLLATE utf8_unicode_ci NOT NULL DEFAULT '',
  `method` varchar(255) COLLATE utf8_unicode_ci NOT NULL DEFAULT '',
  `type` varchar(30) COLLATE utf8_unicode_ci NOT NULL DEFAULT '',
  `status` varchar(30) COLLATE utf8_unicode_ci NOT NULL DEFAULT '',
  `created_at` timestamp NOT NULL DEFAULT '0000-00-00 00:00:00',
  `updated_at` timestamp NOT NULL DEFAULT '0000-00-00 00:00:00',
  `run_at` timestamp NULL DEFAULT NULL,
  `ms` int(10) unsigned NOT NULL DEFAULT '0',
  `error` text COLLATE utf8_unicode_ci NOT NULL,
  PRIMARY KEY (`cron_id`),
  KEY `name` (`name`,`created_at`),
  KEY `cron_status_index` (`status`)
) ENGINE=InnoDB DEFAULT CHARSET=utf8 COLLATE=utf8_unicode_ci AUTO_INCREMENT=1 ;

<?php
return array(
    'version' => '1.0.0',
    'beastalkd' => array(
        'process_untreated_queue' => array(
            'expression' => '* * * * *',
            'class' => 'Statistics\Model\PheanstalkModel',
            'method' => 'processUntreatedQueue'
        )
    )
);

<?php
use Think\Log, Think\Db, Cron\Model\Cron;
$Model = new \Think\Model();
$Has = !$Model->query("SHOW TABLES LIKE 'cron'")?false:true;

if(defined("AUTO_CRON") && $Has){
    class CronCommand
    {

        protected $_initializedJobs;
        protected $_jobs;
        protected $_now;

        public function __construct()
        {
            $this->_now = strtotime(date('Y-n-j H:i'));
            import("Cron.Common.Cron.tdcron_entry",'','.php');
            import("Cron.Common.Cron.tdcron",'','.php');
        }

        /**
         * 这里是放要执行的代码
         */
        public function fire()
        {
            restore_error_handler();
            restore_exception_handler();
            $this->_initializedJobs = array();
            $jobs = M('cron')->where("status = 'initialized'")->select();
            /**
             * @var $cron Cron
             * 已存在 cron
             */
            if($jobs) {
                $cron = new Cron();
                foreach ($jobs as $data) {
                    $cron->setData($data)->isNew(false);
                    $this->_initializedJobs[$data['name']] = $cron;
                }
            }

            /**
             * 新 cron
             */
            foreach ($this->getCronJobs() as $name => $cronJob) {
                if (isset($cronJob['expression'])) {
                    $expression = $cronJob['expression'];
                } else {
                    Log::write('Cron expression is required for cron job "' . $name . '"',Log::WARN);
                    continue;
                }
                if ($this->_now != tdCron::getNextOccurrence($expression, $this->_now)) continue;
                $cronJob['name'] = $name;
                $cron = isset($this->_initializedJobs[$name]) ? $this->_initializedJobs[$name] : $this->_initializedJobs[$name] = new Cron();
                $cron->initialize($cronJob);
            }

            /* @var $cron Cron 处理*/
            foreach ($this->_initializedJobs as $cron) {
                $cron->run();
            }

        }


        /**
         * Get All Defined Cron Jobs
         * 获取配置
         * @return array
         */
        public function getCronJobs()
        {
            if ($this->_jobs === null) {
                $this->_jobs = C('beastalkd');
            }
            return $this->_jobs;
        }

    }
    $command = new CronCommand();
    $command->fire();
}

<?php
namespace Cron\Model;
use Common\Model;
use Think\Log;

/**
 * Class Cron
 * @method string getClass()
 * @method string getMethod()
 * @method string getName()
 * @method string getType()
 * @package Cron\Model
 */
class Cron extends Model{

    const STATUS_COMPLETED = 'completed';
    const STATUS_FAILED = 'failed';
    const STATUS_INITIALIZED = 'initialized';
    const STATUS_RUNNING = 'running';

    protected $name = 'cron';
    protected $tableName = 'cron';
    protected $pk = 'cron_id';

    protected $_originalData = array();
    /**
     *  保存配置信息CLASS
     */
    protected static $_cron_classes = array();


    /**
     * @param $class
     * @return mixed  获取配置的 CLASS
     */
    public function getSingleton($class)
    {
        isset(static::$_cron_classes[$class]) or static::$_cron_classes[$class] = new $class;
        return static::$_cron_classes[$class];
    }


    /**
     * @param $cronJob
     * @return $this
     * 初始化 任务状态
     */
    public function initialize($cronJob)
    {
        foreach ($cronJob as $k => $v) {
            $this->setData($k, $v);
        }
        $now = date('Y-m-d H:i:s');
        $this->setData('status',self::STATUS_INITIALIZED)->setData('created_at',$now)->setData('updated_at',$now)->save();
        return $this;
    }

    /**
     * @return $this  run 命令
     */
    public function run()
    {
        $this->setData('run_at',date('Y-m-d H:i:s'))->setData('status',self::STATUS_RUNNING)->save();
        Timer::start();
        try {
            $class = $this->getData('class');
            $method = $this->getData('method');
            if (!class_exists($class)) throw new \Exception(sprintf('Class "%s" not found!', $class));
            if (!method_exists($class, $method)) throw new \Exception(sprintf('Method "%s::%s()" not found!', $class, $method));
            $callback = array($this->getSingleton($class), $method);

            //new CLASS 使用操作方法
            // 执行配置里的 Statistics\Model\PheanstalkModel类 的 processUntreatedQueue 操作 
            call_user_func($callback);
            Timer::stop();
            $this->setData('ms',round(Timer::diff() * 1000))->setData('status',self::STATUS_COMPLETED)->save();

        } catch (\Exception $e) {
            Timer::stop();
            $this->setData('ms',round(Timer::diff() * 1000))
                ->setData('status',self::STATUS_FAILED)
                ->setData('error',$e->getMessage() . "\nParams:\n" . var_export($this->getDbFields(), true))->save();
            Log::write($e->getMessage() . "\n" . $e->getTraceAsString(),Log::ERR);
        }
        return $this;
    }

}

<?php

namespace Common;

use Think\Model as ThinkModel;

/**
 * Class Model
 * @package Common
 *
 * @property \Think\Db\Driver\Mysql $db DB instance
 */
abstract class Model extends ThinkModel {
   protected $_isNew = true;
   protected $_jsonFields = array();
   protected $_originalData = array();

   protected function _after_find(&$result, $options) {
      foreach ($this->_jsonFields as $field) {
         is_string($_data = fnGet($result, $field)) and $result[$field] = json_decode($_data, true);
      }
      $this->_originalData = $result;
      $this->_isNew = !$result;
      parent::_after_find($result, $options);
   }

   protected function _after_save($result) {
   }

   protected function _before_find() {
      $this->_originalData = array();
   }

   protected function _facade($data) {
      foreach ($this->_jsonFields as $field) {
         is_array($_data = fnGet($data, $field)) and $data[$field] = json_encode($_data);
      }
      return parent::_facade($data);
   }

   public function find($options = array()) {
      $this->_before_find();
      return parent::find($options);
   }

   public function getData($key = null) {
      return $key === null ? $this->data : $this->__get($key);
   }

   public function getOptions() {
      return $this->options;
   }

   public function getOriginalData($key = null) {
      return $key === null ? $this->_originalData : fnGet($this->_originalData, $key);
   }

   /**
    * Get or set isNew flag
    *
    * @param bool $flag
    *
    * @return bool
    */
   public function isNew($flag = null) {
      if ($flag !== null) $this->_isNew = (bool)$flag;
      return $this->_isNew;
   }

   public function save($data = '', $options = array()) {
      if ($this->_isNew) {
         $oldData = $this->data;
         $result = $this->add($data, $options);
         $this->data = $oldData;
         if ($result && $this->pk && is_string($this->pk)) {
            $this->setData($this->pk, $result);
         }
         $this->_isNew = false;
      } else {
         $oldData = $this->data;
         $result = parent::save($data, $options);
         $this->data = $oldData;
      }
      $this->_after_save($result);
      return $result;
   }

   public function setData($key, $value = null) {
      is_array($key) ?
         $this->data = $key :
         $this->data[$key] = $value;
      return $this;
   }
}

<?php
namespace Cron\Model;
class Timer
{
    protected static $_start = array(0, 0);
    protected static $_stop = array(0, 0);

    public static function diff($start = null, $stop = null)
    {
        $start and self::start($start);
        $stop and self::stop($stop);
        return (self::$_stop[0] - self::$_start[0]) + (self::$_stop[1] - self::$_start[1]);
    }

    public static function start($microtime = null)
    {
        $microtime or $microtime = microtime();
        self::$_start = explode(' ', $microtime);
    }

    public static function stop($microtime = null)
    {
        $microtime or $microtime = microtime();
        self::$_stop = explode(' ', $microtime);
    }
}

<?php

define('IDX_MINUTE', 0);
define('IDX_HOUR', 1);
define('IDX_DAY', 2);
define('IDX_MONTH', 3);
define('IDX_WEEKDAY', 4);
define('IDX_YEAR', 5);

/*
 * tdCron v0.0.1 beta - CRON-Parser for PHP
 *
 * Copyright (c) 2010 Christian Land / tagdocs.de
 *
 * Permission is hereby granted, free of charge, to any person obtaining a copy of this software and
 * associated documentation files (the "Software"), to deal in the Software without restriction,
 * including without limitation the rights to use, copy, modify, merge, publish, distribute, sublicense,
 * and/or sell copies of the Software, and to permit persons to whom the Software is furnished to do so,
 * subject to the following conditions:
 *
 * The above copyright notice and this permission notice shall be included in all copies or substantial
 * portions of the Software.
 *
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT
 * LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN
 * NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
 * WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
 * SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
 *
 * @author Christian Land <devel@tagdocs.de>
 * @package    tdCron
 * @copyright  Copyright (c) 2010, Christian Land / tagdocs.de
 * @version    v0.0.1 beta
 */

class tdCron
{

   /**
    * Parsed cron-expressions cache.
    * @var mixed
    */
   static private $pcron = array();

   /**
    * getNextOccurrence() uses a cron-expression to calculate the time and date at which a cronjob
    * should be executed the next time. If a reference-time is passed, the next time and date
    * after that time is calculated.
    *
    * @access    public
    * @param     string $expression cron-expression to use
    * @param     int $timestamp optional reference-time
    * @return    int
    * @throws    Exception
    */
   static public function getNextOccurrence($expression, $timestamp = null)
   {
      try {
         // Convert timestamp to array
         $next = self::getTimestamp($timestamp);

         // Calculate date/time
         $next_time = self::calculateDateTime($expression, $next);
      } catch (Exception $e) {
         throw $e;
      }

      // return calculated time
      return $next_time;
   }

   /**
    * getLastOccurrence() does pretty much the same as getNextOccurrence(). The only difference
    * is, that it doesn't calculate the next but the last time a cronjob should have been executed.
    *
    * @access    public
    * @param     string $expression cron-expression to use
    * @param     int $timestamp optional reference-time
    * @return    int
    * @throws    Exception
    */
   static public function getLastOccurrence($expression, $timestamp = null)
   {
      try {
         // Convert timestamp to array
         $last = self::getTimestamp($timestamp);

         // Calculate date/time
         $last_time = self::calculateDateTime($expression, $last, false);
      } catch (Exception $e) {
         throw $e;
      }

      // return calculated time
      return $last_time;
   }

   /**
    * calculateDateTime() is the function where all the magic happens :-)
    *
    * It calculates the time and date at which the next/last call of a cronjob is/was due.
    *
    * @access    private
    * @param     mixed $expression cron-expression
    * @param     mixed $rtime reference-time
    * @param     bool $next true = nextOccurence, false = lastOccurence
    * @return    int
    * @throws    Exception
    */
   static private function calculateDateTime($expression, $rtime, $next = true)
   {
      // Initialize vars
      $calc_date = true;

      // Parse cron-expression (if neccessary)
      $cron = self::getExpression($expression, !$next);

      // OK, lets see if the day/month/weekday of the reference-date exist in our
      // $cron-array.
      if (!in_array($rtime[IDX_DAY], $cron[IDX_DAY]) || !in_array($rtime[IDX_MONTH], $cron[IDX_MONTH]) || !in_array($rtime[IDX_WEEKDAY], $cron[IDX_WEEKDAY])) {
         // OK, things are easy. The day/month/weekday of the reference time
         // can't be found in the $cron-array. This means that no matter what
         // happens, we WILL end up at at a different date than that of our
         // reference-time. And in this case, the lastOccurrence will ALWAYS
         // happen at the latest possible time of the day and the nextOccurrence
         // at the earliest possible time.
         //
         // In both cases, the time can be found in the first elements of the
         // hour/minute cron-arrays.
         $rtime[IDX_HOUR] = reset($cron[IDX_HOUR]);
         $rtime[IDX_MINUTE] = reset($cron[IDX_MINUTE]);
      } else {
         // OK, things are getting a little bit more complicated...
         $nhour = self::findValue($rtime[IDX_HOUR], $cron[IDX_HOUR], $next);

         // Meh. Such a cruel world. Something has gone awry. Lets see HOW awry it went.
         if ($nhour === false) {
            // Ah, the hour-part went wrong. Thats easy. Wrong hour means that no
            // matter what we do we'll end up at a different date. Thus we can use
            // some simple operations to make things look pretty ;-)
            //
            // As alreasy mentioned before -> different date means earliest/latest
            // time:
            $rtime[IDX_HOUR] = reset($cron[IDX_HOUR]);
            $rtime[IDX_MINUTE] = reset($cron[IDX_MINUTE]);

            // Now all we have to do is add/subtract a day to get a new reference time
            // to use later to find the right date. The following line probably looks
            // a little odd but thats the easiest way of adding/substracting a day without
            // screwing up the date. Just trust me on that one ;-)
            $rtime = explode(',', strftime('%M,%H,%d,%m,%w,%Y', mktime($rtime[IDX_HOUR], $rtime[IDX_MINUTE], 0, $rtime[IDX_MONTH], $rtime[IDX_DAY], $rtime[IDX_YEAR]) + ((($next) ? 1 : -1) * 86400)));
         } else {
            // OK, there is a higher/lower hour available. Check the minutes-part.
            $nminute = self::findValue($rtime[IDX_MINUTE], $cron[IDX_MINUTE], $next);
            if ($nminute === false) {
               // No matching minute-value found... lets see what happens if we substract/add an hour
               $nhour = self::findValue($rtime[IDX_HOUR] + (($next) ? 1 : -1), $cron[IDX_HOUR], $next);
               if ($nhour === false) {
                  // No more hours available... add/substract a day... you know what happens ;-)
                  $nminute = reset($cron[IDX_MINUTE]);
                  $nhour = reset($cron[IDX_HOUR]);

                  $rtime = explode(',', strftime('%M,%H,%d,%m,%w,%Y', mktime($nhour, $nminute, 0, $rtime[IDX_MONTH], $rtime[IDX_DAY], $rtime[IDX_YEAR]) + ((($next) ? 1 : -1) * 86400)));
               } else {
                  // OK, there was another hour. Set the right minutes-value
                  $rtime[IDX_HOUR] = $nhour;
                  $rtime[IDX_MINUTE] = (($next) ? reset($cron[IDX_MINUTE]) : end($cron[IDX_MINUTE]));

                  $calc_date = false;
               }

            } else {
               // OK, there is a matching minute... reset minutes if hour has changed
               if ($nhour <> $rtime[IDX_HOUR]) {
                  $nminute = reset($cron[IDX_MINUTE]);
               }

               // Set time
               $rtime[IDX_HOUR] = $nhour;
               $rtime[IDX_MINUTE] = $nminute;

               $calc_date = false;
            }
         }
      }

      // If we have to calculate the date... we'll do so
      if ($calc_date) {
         if (in_array($rtime[IDX_DAY], $cron[IDX_DAY]) && in_array($rtime[IDX_MONTH], $cron[IDX_MONTH]) && in_array($rtime[IDX_WEEKDAY], $cron[IDX_WEEKDAY])) {
            return mktime($rtime[1], $rtime[0], 0, $rtime[3], $rtime[2], $rtime[5]);
         } else {
            // OK, some searching necessary...
            $cdate = mktime(0, 0, 0, $rtime[IDX_MONTH], $rtime[IDX_DAY], $rtime[IDX_YEAR]);

            // OK, these three nested loops are responsible for finding the date...
            //
            // The class has 2 limitations/bugs right now:
            //
            // -> it doesn't work for dates in 2036 or later!
            // -> it will most likely fail if you search for a Feburary, 29th with a given weekday
            //    (this does happen because the class only searches in the next/last 10 years! And
            //    while it usually takes less than 10 years for a "normal" date to iterate through
            //    all weekdays, it can take 20+ years for Feb, 29th to iterate through all weekdays!
            for ($nyear = $rtime[IDX_YEAR]; (($next) ? ($nyear <= $rtime[IDX_YEAR] + 10) : ($nyear >= $rtime[IDX_YEAR] - 10)); $nyear = $nyear + (($next) ? 1 : -1)) {
               foreach ($cron[IDX_MONTH] as $nmonth) {
                  foreach ($cron[IDX_DAY] as $nday) {
                     if (checkdate($nmonth, $nday, $nyear)) {
                        $ndate = mktime(0, 0, 1, $nmonth, $nday, $nyear);
                        if (($next) ? ($ndate >= $cdate) : ($ndate <= $cdate)) {
                           $dow = date('w', $ndate);

                           // The date is "OK" - lets see if the weekday matches, too...
                           if (in_array($dow, $cron[IDX_WEEKDAY])) {
                              // WIN! :-) We found a valid date...
                              $rtime = explode(',', strftime('%M,%H,%d,%m,%w,%Y', mktime($rtime[IDX_HOUR], $rtime[IDX_MINUTE], 0, $nmonth, $nday, $nyear)));
                              return mktime($rtime[1], $rtime[0], 0, $rtime[3], $rtime[2], $rtime[5]);
                           }
                        }
                     }
                  }
               }
            }
         }

         throw new Exception('Failed to find date, No matching date found in a 10 years range!', 10004);
      }

      return mktime($rtime[1], $rtime[0], 0, $rtime[3], $rtime[2], $rtime[5]);

   }

   /**
    * getTimestamp() converts an unix-timestamp to an array. The returned array contains the following values:
    *
    *    [0]    -> minute
    *    [1]    -> hour
    *    [2]    -> day
    *    [3]    -> month
    *    [4]    -> weekday
    *    [5]    -> year
    *
    * The array is used by various functions.
    *
    * @access    private
    * @param    int $timestamp If none is given, the current time is used
    * @return    mixed
    */
   static private function getTimestamp($timestamp = null)
   {
      if (is_null($timestamp)) {
         $arr = explode(',', strftime('%M,%H,%d,%m,%w,%Y', time()));
      } else {
         $arr = explode(',', strftime('%M,%H,%d,%m,%w,%Y', $timestamp));
      }

      // Remove leading zeros (or we'll get in trouble ;-)
      foreach ($arr as $key => $value) {
         $arr[$key] = (int)ltrim($value, '0');
      }
      return $arr;
   }

   /**
    * findValue() checks if the given value exists in an array. If it does not exist, the next
    * higher/lower value is returned (depending on $next). If no higher/lower value exists,
    * false is returned.
    *
    * @access    public
    * @param    int $value
    * @param    mixed $data
    * @param    bool $next
    * @return    mixed
    */
   static private function findValue($value, $data, $next = true)
   {
      if (in_array($value, $data)) {
         return (int)$value;
      } else {
         if (($next) ? ($value <= end($data)) : ($value >= end($data))) {
            foreach ($data as $curval) {
               if (($next) ? ($value <= (int)$curval) : ($curval <= $value)) {
                  return (int)$curval;
               }
            }
         }
      }
      return false;
   }

   /**
    * getExpression() returns a parsed cron-expression. Parsed cron-expressions are cached to reduce
    * unneccessary calls of the parser.
    *
    * @access    public
    * @param     string $expression
    * @param     bool $reverse
    * @return    mixed
    * @throws    Exception
    */
   static private function getExpression($expression, $reverse = false)
   {
      // First of all we cleanup the expression and remove all duplicate tabs/spaces/etc.
      // For example "*              * *    * *" would be converted to "* * * * *", etc.
      $expression = preg_replace('/(\s+)/', ' ', strtolower(trim($expression)));

      // Lets see if we've already parsed that expression
      if (!isset(self::$pcron[$expression])) {
         // Nope - parse it!
         try {
            self::$pcron[$expression] = tdCronEntry::parse($expression);
            self::$pcron['reverse'][$expression] = self::arrayReverse(self::$pcron[$expression]);
         } catch (Exception $e) {
            throw $e;
         }
      }
      return ($reverse ? self::$pcron['reverse'][$expression] : self::$pcron[$expression]);
   }

   /**
    * arrayReverse() reverses all sub-arrays of our cron array. The reversed values are used for calculations
    * that are run when getLastOccurence() is called.
    *
    * @access    public
    * @param    mixed $cron
    * @return    mixed
    */
   static private function arrayReverse($cron)
   {
      foreach ($cron as $key => $value) {
         $cron[$key] = array_reverse($value);
      }
      return $cron;
   }
}

<?php

/**
 * tinyCronEntry is part of tdCron. Its a class to parse Cron-Expressions like "1-45 1,2,3 1-30/5 January,February Mon,Tue"
 * and convert it to an easily useable format.
 *
 * The parser is quite powerful and understands pretty much everything you will ever find in a Cron-Expression.
 *
 * A Cron-Expression consists of 5 segments:
 *
 * <pre>
 *  .---------------- minute (0 - 59)
 *  |   .------------- hour (0 - 23)
 *  |   |   .---------- day of month (1 - 31)
 *  |   |   |   .------- month (1 - 12)
 *  |   |   |   |  .----- day of week (0 - 6)
 *  |   |   |   |  |
 *  *   *   *   *  *
 * </pre>
 *
 * Each segment can contain values, ranges and intervals. A range is always written as "value1-value2" and
 * intervals as "value1/value2".
 *
 * Of course each segment can contain multiple values seperated by commas.
 *
 * Some valid examples:
 *
 * <pre>
 * 1,2,3,4,5
 * 1-5
 * 10-20/*
 * Jan,Feb,Oct
 * Monday-Friday
 * 1-10,15,20,40-50/2
 * </pre>
 *
 * The current version of the parser understands all weekdays and month names in german and english!
 *
 * Usually you won't need to call this class directly.
 *
 * Copyright (c) 2010 Christian Land / tagdocs.de
 *
 * Permission is hereby granted, free of charge, to any person obtaining a copy of this software and
 * associated documentation files (the "Software"), to deal in the Software without restriction,
 * including without limitation the rights to use, copy, modify, merge, publish, distribute, sublicense,
 * and/or sell copies of the Software, and to permit persons to whom the Software is furnished to do so,
 * subject to the following conditions:
 *
 * The above copyright notice and this permission notice shall be included in all copies or substantial
 * portions of the Software.
 *
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT
 * LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN
 * NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
 * WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
 * SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
 *
 * @author    Christian Land <devel@tagdocs.de>
 * @package    tinyCron
 * @subpackage    tinyCronEntry
 * @copyright    Copyright (c) 2010, Christian Land / tagdocs.de
 * @version    v0.0.1 beta
 */
class tdCronEntry
{

   /**
    * The parsed cron-expression.
    * @var mixed
    */
   static private $cron = array();

   /**
    * Ranges.
    * @var mixed
    */
   static private $ranges = array(
      IDX_MINUTE => array('min' => 0, 'max' => 59), // Minutes
      IDX_HOUR => array('min' => 0, 'max' => 23), // Hours
      IDX_DAY => array('min' => 1, 'max' => 31), // Days
      IDX_MONTH => array('min' => 1, 'max' => 12), // Months
      IDX_WEEKDAY => array('min' => 0, 'max' => 7) // Weekdays
   );

   /**
    * Named intervals.
    * @var mixed
    */
   static private $intervals = array(
      '@yearly' => '0 0 1 1 *',
      '@annually' => '0 0 1 1 *',
      '@monthly' => '0 0 1 * *',
      '@weekly' => '0 0 * * 0',
      '@midnight' => '0 0 * * *',
      '@daily' => '0 0 * * *',
      '@hourly' => '0 * * * *'
   );

   /**
    * Possible keywords for months/weekdays.
    * @var mixed
    */
   static private $keywords = array(
      IDX_MONTH => array(
         '/(january|januar|jan)/i' => 1,
         '/(february|februar|feb)/i' => 2,
         '/(march|maerz|m?rz|mar|mae|m?r)/i' => 3,
         '/(april|apr)/i' => 4,
         '/(may|mai)/i' => 5,
         '/(june|juni|jun)/i' => 6,
         '/(july|juli|jul)/i' => 7,
         '/(august|aug)/i' => 8,
         '/(september|sep)/i' => 9,
         '/(october|oktober|okt|oct)/i' => 10,
         '/(november|nov)/i' => 11,
         '/(december|dezember|dec|dez)/i' => 12
      ),
      IDX_WEEKDAY => array(
         '/(sunday|sonntag|sun|son|su|so)/i' => 0,
         '/(monday|montag|mon|mo)/i' => 1,
         '/(tuesday|dienstag|die|tue|tu|di)/i' => 2,
         '/(wednesdays|mittwoch|mit|wed|we|mi)/i' => 3,
         '/(thursday|donnerstag|don|thu|th|do)/i' => 4,
         '/(friday|freitag|fre|fri|fr)/i' => 5,
         '/(saturday|samstag|sam|sat|sa)/i' => 6
      )
   );

   /**
    * parseExpression() analyses crontab-expressions like "* * 1,2,3 * mon,tue" and returns an array
    * containing all values. If it can't be parsed, an exception is thrown.
    *
    * @access        public
    * @param        string $expression The cron-expression to parse.
    * @return        mixed
    * @throws Exception
    */
   static public function parse($expression)
   {
      $dummy = array();
      // Convert named expressions if neccessary
      if (substr($expression, 0, 1) == '@') {
         $expression = strtr($expression, self::$intervals);
         if (substr($expression, 0, 1) == '@') {
            // Oops... unknown named interval!?!!
            throw new Exception('Unknown named interval [' . $expression . ']', 10000);
         }
      }

      // Next basic check... do we have 5 segments?
      $cron = explode(' ', $expression);
      if (count($cron) <> 5) {
         // No... we haven't...
         throw new Exception('Wrong number of segments in expression. Expected: 5, Found: ' . count($cron), 10001);
      } else {
         // Yup, 5 segments... lets see if we can work with them
         foreach ($cron as $idx => $segment) {
            try {
               $dummy[$idx] = self::expandSegment($idx, $segment);
            } catch (Exception $e) {
               throw $e;
            }
         }
      }
      return $dummy;
   }

   /**
    * expandSegment() analyses a single segment
    *
    * @access        public
    * @param $idx
    * @param $segment
    * @return array
    * @throws Exception
    */
   static private function expandSegment($idx, $segment)
   {
      // Store original segment for later use
      $osegment = $segment;

      // Replace months/weekdays like "January", "February", etc. with numbers
      if (isset(self::$keywords[$idx])) {
         $segment = preg_replace(array_keys(self::$keywords[$idx]), array_values(self::$keywords[$idx]), $segment);
      }

      // Replace wildcards
      if (substr($segment, 0, 1) == '*') {
         $segment = preg_replace('/^\*(\/\d+)?$/i', self::$ranges[$idx]['min'] . '-' . self::$ranges[$idx]['max'] . '$1', $segment);
      }

      // Make sure that nothing unparsed is left :)
      $dummy = preg_replace('/[0-9\-\/\,]/', '', $segment);

      if (!empty($dummy)) {
         // Ohoh.... thats not good :-)
         throw new Exception('Failed to parse segment: ' . $osegment, 10002);
      }

      // At this point our string should be OK - lets convert it to an array
      $result = array();
      $atoms = explode(',', $segment);

      foreach ($atoms as $curatom) {
         $result = array_merge($result, self::parseAtom($curatom));
      }

      // Get rid of duplicates and sort the array
      $result = array_unique($result);
      sort($result);

      // Check for invalid values
      if ($idx == IDX_WEEKDAY) {
         if (end($result) == 7) {
            if (reset($result) <> 0) {
               array_unshift($result, 0);
            }
            array_pop($result);
         }
      }

      foreach ($result as $key => $value) {
         if (($value < self::$ranges[$idx]['min']) || ($value > self::$ranges[$idx]['max'])) {
            throw new Exception('Failed to parse segment, invalid value [' . $value . ']: ' . $osegment, 10003);
         }
      }

      return $result;

   }

   /**
    * parseAtom() analyses a single segment
    *
    * @access        public
    * @param        string $atom The segment to parse
    * @return        array
    */
   static private function parseAtom($atom)
   {
      $expanded = array();
      if (preg_match('/^(\d+)-(\d+)(\/(\d+))?/i', $atom, $matches)) {
         $low = $matches[1];
         $high = $matches[2];
         if ($low > $high) {
            list($low, $high) = array($high, $low);
         }
         $step = isset($matches[4]) ? $matches[4] : 1;
         for ($i = $low; $i <= $high; $i += $step) {
            $expanded[] = (int)$i;
         }
      } else {
         $expanded[] = (int)$atom;
      }
      $expanded2 = array_unique($expanded);
      return $expanded;
   }
}