function draw()
 {
     $object = $this->popMailbox();
     if (!$object) {
         $object = new date();
         $object->timestamp = time();
         $object->parse();
     }
     //if (!$object) $object = new date(); $object->timestamp = 0; $object->parse();
     $out .= "<select name=\"" . ($this->__prefix ? $this->__prefix . "_" : "") . $this->selector_day . "\">";
     $out .= "<option value=\"0\" " . ($object->string == "N/A" ? "selected" : "") . ">--</option>";
     for ($i = 1; $i < 32; $i++) {
         $out .= "\n\t<option value=\"" . $i . "\" " . ($object->day == $i ? "selected" : "") . ">" . $i . "</option>";
     }
     $out .= "</select>";
     $out .= "<select name=\"" . ($this->__prefix ? $this->__prefix . "_" : "") . $this->selector_month . "\">";
     $out .= "<option value=\"0\" " . ($object->string == "N/A" ? "selected" : "") . ">--</option>";
     for ($i = 1; $i < 13; $i++) {
         $out .= "\n\t<option value=\"" . $i . "\" " . ($object->month == $i ? "selected" : "") . ">" . $object->__months[$i] . "</option>";
     }
     $out .= "</select>";
     $out .= "<select name=\"" . ($this->__prefix ? $this->__prefix . "_" : "") . $this->selector_year . "\">";
     $out .= "<option value=\"0\" " . ($object->string == "N/A" ? "selected" : "") . ">--</option>";
     for ($i = 1970; $i < 2020; $i++) {
         $out .= "\n\t<option value=\"" . $i . "\" " . ($object->year == $i ? "selected" : "") . ">" . $i . "</option>";
     }
     $out .= "</select>";
     //$out .="<input type=\"text\" name=\"".($this->__prefix ? $this->__prefix."_" : "").$this->selector_hour."\" value=\"".$object->hour."\" size=\"2\"> : <input type=\"text\" name=\"".($this->__prefix ? $this->__prefix."_" : "").$this->selector_minutes."\" value=\"".$object->minutes."\" size=\"2\">";
     return $out;
 }

 function datestring($timestamp)
 {
     $d = new date();
     $d->timestamp = $timestamp;
     $d->parse();
     $this->timestamp = $timestamp;
     $this->string = $d->string;
 }

 function test_new_host_new_day()
 {
     $this->test_new_host();
     $date = new date();
     $date->set_by_days($date->date_to_days() + 1);
     $this->stats_counter->set_new_host();
     $this->stats_counter->update($date);
     $this->_check_stats_counter_record($hits_all = 2, $hits_today = 1, $hosts_all = 2, $hosts_today = 1, $date);
     $this->_check_stats_day_counters_record($hits_today, $hosts_today, $home_hits = 0, $audience_host = 0, $date);
     $this->_check_counters_consistency($date);
 }

 function test_same_host_wrong_day()
 {
     $date1 = new date();
     $ip = ip::encode_ip('192.168.0.5');
     $this->stats_ip->setReturnValue('get_client_ip', $ip);
     $this->stats_ip->is_new_host($date1);
     $date2 = new date();
     $date2->set_by_days($date1->date_to_days() - 2);
     $this->stats_ip->setReturnValueAt(1, 'get_client_ip', $ip);
     $this->assertFalse($this->stats_ip->is_new_host($date2));
     $this->_check_stats_ip_record($total_records = 1, $ip, $date1);
 }

 /**
  * Permet de créer un TOKEN sous la base Encrypteur NOCTUS, il est vérifier et déchiffrer par le décrypteur NOCTUS
  * @return string
  */
 public function new_token()
 {
     $date_format = new date();
     $date = $date_format->format_strt("d-m-Y H:i:s");
     $username = $this->username;
     $password = $this->password;
     $chaine = "azertyuiopqsdfghjklmwxcvbnAZERTYUIOPQSDFGHJKLMWXCVBN&0123456789_@";
     $shuff = str_shuffle($chaine);
     $key = substr($shuff, 0, 15);
     $token = $username . "_" . $key . "_" . $password . "_" . time();
     return $token;
 }

 public function __visitor_count_month($date)
 {
     $start_date;
     $start = date('Y-m-d H:i', strtotime($date['year'] . "-" . $date['month'] . "-01 00:00"));
     $final_date = $this->_plus_month($date);
     $end = date('Y-m-d H:i', strtotime($final_date['year'] . "-" . $final_date['month'] . "-01 00:00"));
     $html = "";
     $html .= "<p>total visits: " . stats::get_visitor_count($start, $end) . "</p>";
     $html .= "<p>unique visitors: " . stats::get_visitor_count($start, $end, true) . "</p>";
     $views = array();
     $unique = array();
     foreach (date::days($date['month'], $date['year']) as $day) {
         $start = date('Y-m-d H:i', strtotime($date['year'] . "-" . $date['month'] . "-" . $day . " 00:00"));
         $end_day = $day + 1;
         if (count(date::days($date['month'], $date['year'])) < $end_day) {
             $end = date('Y-m-d H:i', strtotime($final_date['year'] . "-" . $final_date['month'] . "-01 00:00"));
         } else {
             $end = date('Y-m-d H:i', strtotime($date['year'] . "-" . $date['month'] . "-" . ($day + 1) . " 00:00"));
         }
         $count = stats::get_visitor_count($start, $end);
         $views[$day] = $count;
         $count = stats::get_visitor_count($start, $end, true);
         $unique[$day] = $count;
     }
     $chart = new GoogChart();
     $dataMultiple = array("Page views" => $views, "Unique visitors" => $unique);
     $min = 0;
     $max = 10;
     //	chxr='y',$min,$max,(($max-$min)/10);
     /* # Chart 2 # */
     $chart->setChartAttrs(array('type' => 'line', 'title' => 'Visits for ' . date('F Y', strtotime($start)), 'data' => $dataMultiple, 'size' => array(750, 200), 'labelsXY' => true, 'color' => array('#27aae1', '#e127aa')));
     // Print chart
     $html .= $chart;
     return $html;
 }

 public function __construct($year, $weekno)
 {
     $this->week = $weekno;
     $this->year = $year;
     $day = date::new_from_format("{$year}-W{$weekno}");
     $this->push($day);
     while ($day->get_day_of_week() != 7) {
         $day = $day->tomorrow();
         $this->push($day);
     }
     // The day can be any day in a week. So we start to push
     // the asked day, then we push comming days, then we revert the day's storage, then we push
     // the passed days until the first, and revert the storage.
     /*
     $aday = $day;
     $this->push($aday);
     
     while($aday->get_day_of_week() != 7)
     {
     	$aday = $aday->tomorrow();
     	$this->push($aday);
     }
     
     $this->reverse();
     $aday = $day;
     
     while($aday->get_day_of_week() != 1)
     {
     	$aday = $aday->yesterday();
     	$this->push($aday);
     }
     
     $this->reverse();
     */
 }

 function _set_period_filter()
 {
     $locale =& locale::instance();
     $start_date = new date();
     $start_date->set_hour(0);
     $start_date->set_minute(0);
     $start_date->set_second(0);
     if (isset($_REQUEST['stats_start_date'])) {
         $start_date->set_by_string($_REQUEST['stats_start_date'], $locale->get_short_date_time_format());
     }
     $finish_date = new date();
     if (isset($_REQUEST['stats_finish_date'])) {
         $finish_date->set_by_string($_REQUEST['stats_finish_date'], $locale->get_short_date_time_format());
     }
     $this->stats_report->set_period_filter($start_date, $finish_date);
 }

 /**
  * Output dates as friendly dates
  * @developer Brandon Hansen
  * @date May 16, 2010
  */
 public function __get($key)
 {
     if (in_array($key, array('created_at', 'modified_at'))) {
         return date::full_date_time(parent::__get($key));
     } else {
         return parent::__get($key);
     }
 }

 public function week_days($year = FALSE, $week = FALSE)
 {
     $w = date::week($year, $week);
     $list = array();
     for ($day = 0; $day <= 6; $day++) {
         $list[] = date('Y-m-d', strtotime($w['year'] . "W" . $w['week'] . $day));
     }
     return $list;
 }

 /**
  * Make sure that the one to update belongs to the user
  * @Developer brandon
  * @Date May 19, 2010
  */
 public function edit($id = NULL)
 {
     $journal = ORM::factory('journal', $id);
     if ($journal->user->id != user::current()->id) {
         url::redirect('');
     }
     meta::set_title(date::user_friendly_date($journal->created_at) . ' : ' . $journal->title);
     parent::edit($id);
 }

 public function lista_semana()
 {
     $semana = date::week_days();
     //echo Kohana::debug($semana);
     $lista = array();
     foreach ($semana as $dia) {
         $lista[$dia] = ORM::Factory('procedimento')->where('data', $dia)->find_all();
     }
     return $lista;
 }

 protected function load_value()
 {
     if (is_bool($this->valid)) {
         return;
     }
     $time = $this->input_value($this->name);
     // Make sure all the required inputs keys are set
     $time += $this->time_array(time());
     $this->data['value'] = mktime(date::adjust($time['hour'], $time['am_pm']), $time['minute'], 0, $time['month'], $time['day'], $time['year']);
 }

 /**
  * Set estimated_end_date
  *
  * @param date $estimated_end_date
  */
 public function setEstimatedEndDate($estimated_end_date)
 {
     if ($this->getId() && $this->estimated_end_date != $estimated_end_date) {
         $current = isset($this->estimated_end_date) ? $this->estimated_end_date->format('Y-m-d') : '';
         $this->getLastNote()->addChange("Estimated end date changed from '{$current}' to '{$estimated_end_date->format('Y-m-d')}'");
     }
     if ($this->getOriginalEstimatedEndDate() == null) {
         $this->setOriginalEstimatedEndDate($estimated_end_date);
     }
     $this->estimated_end_date = $estimated_end_date;
 }

 function _get_mail_body($template_path)
 {
     $template = new template($template_path);
     $locale =& locale::instance();
     $date = new date();
     $template->set('date', $date->format($locale->get_short_date_format()));
     $cart =& cart::instance();
     $list =& $template->find_child('cart_items');
     $list->register_dataset($cart->get_items_array_dataset());
     $template->set('name', $this->dataspace->get('name'));
     $template->set('notes', $this->dataspace->get('notes'));
     $template->set('phone', $this->dataspace->get('phone'));
     $template->set('address', $this->dataspace->get('address'));
     $template->set('email', $this->dataspace->get('email'));
     ob_start();
     $template->display();
     $content = ob_get_contents();
     ob_end_clean();
     return $content;
 }

 /**
  * Send out the daily topic e-mail
  * @developer Brandon Hansen
  * @date May 25, 2010
  */
 public function send_daily_email()
 {
     if ($topic = ORM::factory('topic')->topic_of_the_day()) {
         $users = ORM::factory('user')->users_subscribed_to_topic_of_the_day();
         $this->subject = 'Topic of the Day for ' . date::user_friendly_date(date('Y-m-d'));
         $this->body = View::factory('emails/daily_topic')->set('topic', $topic)->render();
         foreach ($users as $user) {
             $this->recipient = $user->email;
             $this->send();
         }
     }
 }

  function _set_period_filter(&$request)
  {
    $locale =& locale :: instance();
    $start_date = new date();
    $start_date->set_hour(0);
    $start_date->set_minute(0);
    $start_date->set_second(0);

    if ($stats_start_date = $request->get_attribute('stats_start_date'))
      $start_date->set_by_string($stats_start_date, $locale->get_short_date_time_format());

    $finish_date = new date();
    if ($stats_finish_date = $request->get_attribute('stats_finish_date'))
      $finish_date->set_by_string($stats_finish_date, $locale->get_short_date_time_format());

    $finish_date->set_hour(23);
    $finish_date->set_minute(59);
    $finish_date->set_second(59);

    $this->stats_report->set_period_filter($start_date, $finish_date);
  }

 /**
  * Magic setter
  *
  * @param  string  $key
  * @param  mixed   $value
  */
 public function __set($key, $value)
 {
     switch ($key) {
         // Date of birth
         case 'dob':
             $value = date::format(date::DATE_SQL, $value);
             break;
             // Always lowercase e-mail
         // Always lowercase e-mail
         case 'email':
             $value = utf8::strtolower($value);
             break;
     }
     parent::__set($key, $value);
 }

 /**
  * shortcut fot DateTime::createFromFormat
  * @param  string $date          
  * @param  string $input_format  
  * @param  string $output_format 
  * @return mixed                
  */
 public static function from_format($date, $input_format = 'd/m/yy', $output_format = 'm-d-Y')
 {
     if ($date === NULL) {
         $date = time();
     }
     $datetime = DateTime::createFromFormat($input_format, $date);
     switch ($output_format) {
         case 'unix':
             return date::unix2mysql($datetime->getTimestamp());
             break;
         default:
             return $datetime->format($output_format);
             break;
     }
 }

 public function add_data($file, $name, $contents = NULL)
 {
     // Determine the file type: 16 = dir, 32 = file
     $type = substr($file, -1) === '/' ? 16 : 32;
     // Fetch the timestamp, using the current time if manually setting the contents
     $timestamp = date::unix2dos($contents === NULL ? filemtime($file) : time());
     // Read the file or use the defined contents
     $data = $contents === NULL ? file_get_contents($file) : $contents;
     // Gzip the data, use substr to fix a CRC bug
     $zdata = substr(gzcompress($data), 2, -4);
     $this->data[] = "PK" . "" . "" . "" . pack('V', $timestamp) . pack('V', crc32($data)) . pack('V', strlen($zdata)) . pack('V', strlen($data)) . pack('v', strlen($name)) . pack('v', 0) . $name . $zdata;
     // Compressed data
     $this->dirs[] = "PK" . "" . "" . "" . "" . pack('V', $timestamp) . pack('V', crc32($data)) . pack('V', strlen($zdata)) . pack('V', strlen($data)) . pack('v', strlen($name)) . pack('v', 0) . pack('v', 0) . pack('v', 0) . pack('v', 0) . pack('V', $type) . pack('V', $this->offset) . $name;
     // File name
     // Set the new offset
     $this->offset = strlen(implode('', $this->data));
 }