('.gettype($var).') '.html::specialchars(print_r($var, TRUE)).'';
}
return implode("\n", $output);
}
/**
* Displays nice backtrace information.
* @see http://php.net/debug_backtrace
*
* @param array backtrace generated by an exception or debug_backtrace
* @return string
*/
public static function backtrace($trace)
{
if ( ! is_array($trace))
return;
// Final output
$output = array();
foreach ($trace as $entry)
{
$temp = '';
if (isset($entry['class']))
{
// Add class and call type
$temp .= $entry['class'].$entry['type'];
}
// Add function
$temp .= $entry['function'].'( ';
// Add function args
if (isset($entry['args']) AND is_array($entry['args']))
{
// Separator starts as nothing
$sep = '';
while ($arg = array_shift($entry['args']))
{
if (is_string($arg) AND is_file($arg))
{
// Remove docroot from filename
$arg = preg_replace('!^'.preg_quote(DOCROOT).'!', '', $arg);
}
$temp .= $sep.html::specialchars(print_r($arg, TRUE));
// Change separator to a comma
$sep = ', ';
}
}
$temp .= ' )- '.implode("\n", $output).'
- ';
foreach ($uri as $link)
{
$output .= '
- '.html::anchor($link).' '; } $output .= '
'.html::anchor($uri).'
'; } // Run the redirect event Event::run('system.redirect', $uri); if (strpos($uri, '://') === FALSE) { // HTTP headers expect absolute URLs $uri = url::site($uri, request::protocol()); } if ($method === 'refresh') { header('Refresh: 0; url='.$uri); } else { header('HTTP/1.1 '.$method.' '.$codes[$method]); header('Location: '.$uri); } // We are about to exit, so run the send_headers event Event::run('system.send_headers'); exit(''.$method.' - '.$codes[$method].'
'.$output); } } // End url ./kohana/system/helpers/date.php 0000644 0001750 0001750 00000024011 11177437372 016430 0 ustar tokkee tokkee > 1); } /** * Converts a DOS timestamp to UNIX format. * * @param integer DOS timestamp * @return integer */ public static function dos2unix($timestamp = FALSE) { $sec = 2 * ($timestamp & 0x1f); $min = ($timestamp >> 5) & 0x3f; $hrs = ($timestamp >> 11) & 0x1f; $day = ($timestamp >> 16) & 0x1f; $mon = ($timestamp >> 21) & 0x0f; $year = ($timestamp >> 25) & 0x7f; return mktime($hrs, $min, $sec, $mon, $day, $year + 1980); } /** * Returns the offset (in seconds) between two time zones. * @see http://php.net/timezones * * @param string timezone that to find the offset of * @param string|boolean timezone used as the baseline * @return integer */ public static function offset($remote, $local = TRUE) { static $offsets; // Default values $remote = (string) $remote; $local = ($local === TRUE) ? date_default_timezone_get() : (string) $local; // Cache key name $cache = $remote.$local; if (empty($offsets[$cache])) { // Create timezone objects $remote = new DateTimeZone($remote); $local = new DateTimeZone($local); // Create date objects from timezones $time_there = new DateTime('now', $remote); $time_here = new DateTime('now', $local); // Find the offset $offsets[$cache] = $remote->getOffset($time_there) - $local->getOffset($time_here); } return $offsets[$cache]; } /** * Number of seconds in a minute, incrementing by a step. * * @param integer amount to increment each step by, 1 to 30 * @param integer start value * @param integer end value * @return array A mirrored (foo => foo) array from 1-60. */ public static function seconds($step = 1, $start = 0, $end = 60) { // Always integer $step = (int) $step; $seconds = array(); for ($i = $start; $i < $end; $i += $step) { $seconds[$i] = ($i < 10) ? '0'.$i : $i; } return $seconds; } /** * Number of minutes in an hour, incrementing by a step. * * @param integer amount to increment each step by, 1 to 30 * @return array A mirrored (foo => foo) array from 1-60. */ public static function minutes($step = 5) { // Because there are the same number of minutes as seconds in this set, // we choose to re-use seconds(), rather than creating an entirely new // function. Shhhh, it's cheating! ;) There are several more of these // in the following methods. return date::seconds($step); } /** * Number of hours in a day. * * @param integer amount to increment each step by * @param boolean use 24-hour time * @param integer the hour to start at * @return array A mirrored (foo => foo) array from start-12 or start-23. */ public static function hours($step = 1, $long = FALSE, $start = NULL) { // Default values $step = (int) $step; $long = (bool) $long; $hours = array(); // Set the default start if none was specified. if ($start === NULL) { $start = ($long === FALSE) ? 1 : 0; } $hours = array(); // 24-hour time has 24 hours, instead of 12 $size = ($long === TRUE) ? 23 : 12; for ($i = $start; $i <= $size; $i += $step) { $hours[$i] = $i; } return $hours; } /** * Returns AM or PM, based on a given hour. * * @param integer number of the hour * @return string */ public static function ampm($hour) { // Always integer $hour = (int) $hour; return ($hour > 11) ? 'PM' : 'AM'; } /** * Adjusts a non-24-hour number into a 24-hour number. * * @param integer hour to adjust * @param string AM or PM * @return string */ public static function adjust($hour, $ampm) { $hour = (int) $hour; $ampm = strtolower($ampm); switch ($ampm) { case 'am': if ($hour == 12) $hour = 0; break; case 'pm': if ($hour < 12) $hour += 12; break; } return sprintf('%02s', $hour); } /** * Number of days in month. * * @param integer number of month * @param integer number of year to check month, defaults to the current year * @return array A mirrored (foo => foo) array of the days. */ public static function days($month, $year = FALSE) { static $months; // Always integers $month = (int) $month; $year = (int) $year; // Use the current year by default $year = ($year == FALSE) ? date('Y') : $year; // We use caching for months, because time functions are used if (empty($months[$year][$month])) { $months[$year][$month] = array(); // Use date to find the number of days in the given month $total = date('t', mktime(1, 0, 0, $month, 1, $year)) + 1; for ($i = 1; $i < $total; $i++) { $months[$year][$month][$i] = $i; } } return $months[$year][$month]; } /** * Number of months in a year * * @return array A mirrored (foo => foo) array from 1-12. */ public static function months() { return date::hours(); } /** * Returns an array of years between a starting and ending year. * Uses the current year +/- 5 as the max/min. * * @param integer starting year * @param integer ending year * @return array */ public static function years($start = FALSE, $end = FALSE) { // Default values $start = ($start === FALSE) ? date('Y') - 5 : (int) $start; $end = ($end === FALSE) ? date('Y') + 5 : (int) $end; $years = array(); // Add one, so that "less than" works $end += 1; for ($i = $start; $i < $end; $i++) { $years[$i] = $i; } return $years; } /** * Returns time difference between two timestamps, in human readable format. * * @param integer timestamp * @param integer timestamp, defaults to the current time * @param string formatting string * @return string|array */ public static function timespan($time1, $time2 = NULL, $output = 'years,months,weeks,days,hours,minutes,seconds') { // Array with the output formats $output = preg_split('/[^a-z]+/', strtolower((string) $output)); // Invalid output if (empty($output)) return FALSE; // Make the output values into keys extract(array_flip($output), EXTR_SKIP); // Default values $time1 = max(0, (int) $time1); $time2 = empty($time2) ? time() : max(0, (int) $time2); // Calculate timespan (seconds) $timespan = abs($time1 - $time2); // All values found using Google Calculator. // Years and months do not match the formula exactly, due to leap years. // Years ago, 60 * 60 * 24 * 365 isset($years) and $timespan -= 31556926 * ($years = (int) floor($timespan / 31556926)); // Months ago, 60 * 60 * 24 * 30 isset($months) and $timespan -= 2629744 * ($months = (int) floor($timespan / 2629743.83)); // Weeks ago, 60 * 60 * 24 * 7 isset($weeks) and $timespan -= 604800 * ($weeks = (int) floor($timespan / 604800)); // Days ago, 60 * 60 * 24 isset($days) and $timespan -= 86400 * ($days = (int) floor($timespan / 86400)); // Hours ago, 60 * 60 isset($hours) and $timespan -= 3600 * ($hours = (int) floor($timespan / 3600)); // Minutes ago, 60 isset($minutes) and $timespan -= 60 * ($minutes = (int) floor($timespan / 60)); // Seconds ago, 1 isset($seconds) and $seconds = $timespan; // Remove the variables that cannot be accessed unset($timespan, $time1, $time2); // Deny access to these variables $deny = array_flip(array('deny', 'key', 'difference', 'output')); // Return the difference $difference = array(); foreach ($output as $key) { if (isset($$key) AND ! isset($deny[$key])) { // Add requested key to the output $difference[$key] = $$key; } } // Invalid output formats string if (empty($difference)) return FALSE; // If only one output format was asked, don't put it in an array if (count($difference) === 1) return current($difference); // Return array return $difference; } /** * Returns time difference between two timestamps, in the format: * N year, N months, N weeks, N days, N hours, N minutes, and N seconds ago * * @param integer timestamp * @param integer timestamp, defaults to the current time * @param string formatting string * @return string */ public static function timespan_string($time1, $time2 = NULL, $output = 'years,months,weeks,days,hours,minutes,seconds') { if ($difference = date::timespan($time1, $time2, $output) AND is_array($difference)) { // Determine the key of the last item in the array $last = end($difference); $last = key($difference); $span = array(); foreach ($difference as $name => $amount) { if ($amount === 0) { // Skip empty amounts continue; } // Add the amount to the span $span[] = ($name === $last ? ' and ' : ', ').$amount.' '.($amount === 1 ? inflector::singular($name) : $name); } // If the difference is less than 60 seconds, remove the preceding and. if (count($span) === 1) { $span[0] = ltrim($span[0], 'and '); } // Replace difference by making the span into a string $difference = trim(implode('', $span), ','); } elseif (is_int($difference)) { // Single-value return $difference = $difference.' '.($difference === 1 ? inflector::singular($output) : $output); } return $difference; } } // End date ./kohana/system/helpers/remote.php 0000644 0001750 0001750 00000002627 11121324570 016777 0 ustar tokkee tokkee = 0; $i -= 2) { // Add up every 2nd digit, starting from the right $checksum += $number[$i]; } for ($i = $length - 2; $i >= 0; $i -= 2) { // Add up every 2nd digit doubled, starting from the right $double = $number[$i] * 2; // Subtract 9 from the double where value is greater than 10 $checksum += ($double >= 10) ? $double - 9 : $double; } // If the checksum is a multiple of 10, the number is valid return ($checksum % 10 === 0); } /** * Checks if a phone number is valid. * * @param string phone number to check * @return boolean */ public static function phone($number, $lengths = NULL) { if ( ! is_array($lengths)) { $lengths = array(7,10,11); } // Remove all non-digit characters from the number $number = preg_replace('/\D+/', '', $number); // Check if the number is within range return in_array(strlen($number), $lengths); } /** * Tests if a string is a valid date string. * * @param string date to check * @return boolean */ public static function date($str) { return (strtotime($str) !== FALSE); } /** * Checks whether a string consists of alphabetical characters only. * * @param string input string * @param boolean trigger UTF-8 compatibility * @return boolean */ public static function alpha($str, $utf8 = FALSE) { return ($utf8 === TRUE) ? (bool) preg_match('/^\pL++$/uD', (string) $str) : ctype_alpha((string) $str); } /** * Checks whether a string consists of alphabetical characters and numbers only. * * @param string input string * @param boolean trigger UTF-8 compatibility * @return boolean */ public static function alpha_numeric($str, $utf8 = FALSE) { return ($utf8 === TRUE) ? (bool) preg_match('/^[\pL\pN]++$/uD', (string) $str) : ctype_alnum((string) $str); } /** * Checks whether a string consists of alphabetical characters, numbers, underscores and dashes only. * * @param string input string * @param boolean trigger UTF-8 compatibility * @return boolean */ public static function alpha_dash($str, $utf8 = FALSE) { return ($utf8 === TRUE) ? (bool) preg_match('/^[-\pL\pN_]++$/uD', (string) $str) : (bool) preg_match('/^[-a-z0-9_]++$/iD', (string) $str); } /** * Checks whether a string consists of digits only (no dots or dashes). * * @param string input string * @param boolean trigger UTF-8 compatibility * @return boolean */ public static function digit($str, $utf8 = FALSE) { return ($utf8 === TRUE) ? (bool) preg_match('/^\pN++$/uD', (string) $str) : ctype_digit((string) $str); } /** * Checks whether a string is a valid number (negative and decimal numbers allowed). * * @see Uses locale conversion to allow decimal point to be locale specific. * @see http://www.php.net/manual/en/function.localeconv.php * * @param string input string * @return boolean */ public static function numeric($str) { // Use localeconv to set the decimal_point value: Usually a comma or period. $locale = localeconv(); return (bool) preg_match('/^-?[0-9'.$locale['decimal_point'].']++$/D', (string) $str); } /** * Checks whether a string is a valid text. Letters, numbers, whitespace, * dashes, periods, and underscores are allowed. * * @param string text to check * @return boolean */ public static function standard_text($str) { // pL matches letters // pN matches numbers // pZ matches whitespace // pPc matches underscores // pPd matches dashes // pPo matches normal puncuation return (bool) preg_match('/^[\pL\pN\pZ\p{Pc}\p{Pd}\p{Po}]++$/uD', (string) $str); } /** * Checks if a string is a proper decimal format. The format array can be * used to specify a decimal length, or a number and decimal length, eg: * array(2) would force the number to have 2 decimal places, array(4,2) * would force the number to have 4 digits and 2 decimal places. * * @param string input string * @param array decimal format: y or x,y * @return boolean */ public static function decimal($str, $format = NULL) { // Create the pattern $pattern = '/^[0-9]%s\.[0-9]%s$/'; if ( ! empty($format)) { if (count($format) > 1) { // Use the format for number and decimal length $pattern = sprintf($pattern, '{'.$format[0].'}', '{'.$format[1].'}'); } elseif (count($format) > 0) { // Use the format as decimal length $pattern = sprintf($pattern, '+', '{'.$format[0].'}'); } } else { // No format $pattern = sprintf($pattern, '+', '+'); } return (bool) preg_match($pattern, (string) $str); } } // End valid ./kohana/system/helpers/email.php 0000644 0001750 0001750 00000011305 11121324570 016564 0 ustar tokkee tokkee setUsername($config['options']['username']); empty($config['options']['password']) or $connection->setPassword($config['options']['password']); if ( ! empty($config['options']['auth'])) { // Get the class name and params list ($class, $params) = arr::callback_string($config['options']['auth']); if ($class === 'PopB4Smtp') { // Load the PopB4Smtp class manually, due to its odd filename require Kohana::find_file('vendor', 'swift/Swift/Authenticator/$PopB4Smtp$'); } // Prepare the class name for auto-loading $class = 'Swift_Authenticator_'.$class; // Attach the authenticator $connection->attachAuthenticator(($params === NULL) ? new $class : new $class($params[0])); } // Set the timeout to 5 seconds $connection->setTimeout(empty($config['options']['timeout']) ? 5 : (int) $config['options']['timeout']); break; case 'sendmail': // Create a sendmail connection $connection = new Swift_Connection_Sendmail ( empty($config['options']) ? Swift_Connection_Sendmail::AUTO_DETECT : $config['options'] ); // Set the timeout to 5 seconds $connection->setTimeout(5); break; default: // Use the native connection $connection = new Swift_Connection_NativeMail($config['options']); break; } // Create the SwiftMailer instance return email::$mail = new Swift($connection); } /** * Send an email message. * * @param string|array recipient email (and name), or an array of To, Cc, Bcc names * @param string|array sender email (and name) * @param string message subject * @param string message body * @param boolean send email as HTML * @return integer number of emails sent */ public static function send($to, $from, $subject, $message, $html = FALSE) { // Connect to SwiftMailer (email::$mail === NULL) and email::connect(); // Determine the message type $html = ($html === TRUE) ? 'text/html' : 'text/plain'; // Create the message $message = new Swift_Message($subject, $message, $html, '8bit', 'utf-8'); if (is_string($to)) { // Single recipient $recipients = new Swift_Address($to); } elseif (is_array($to)) { if (isset($to[0]) AND isset($to[1])) { // Create To: address set $to = array('to' => $to); } // Create a list of recipients $recipients = new Swift_RecipientList; foreach ($to as $method => $set) { if ( ! in_array($method, array('to', 'cc', 'bcc'))) { // Use To: by default $method = 'to'; } // Create method name $method = 'add'.ucfirst($method); if (is_array($set)) { // Add a recipient with name $recipients->$method($set[0], $set[1]); } else { // Add a recipient without name $recipients->$method($set); } } } if (is_string($from)) { // From without a name $from = new Swift_Address($from); } elseif (is_array($from)) { // From with a name $from = new Swift_Address($from[0], $from[1]); } return email::$mail->send($message, $recipients, $from); } } // End email ./kohana/system/helpers/download.php 0000644 0001750 0001750 00000004722 11121324570 017311 0 ustar tokkee tokkee cookie($name, $default, $xss_clean); } /** * Nullify and unset a cookie. * * @param string cookie name * @param string URL path * @param string URL domain * @return boolean */ public static function delete($name, $path = NULL, $domain = NULL) { if ( ! isset($_COOKIE[$name])) return FALSE; // Delete the cookie from globals unset($_COOKIE[$name]); // Sets the cookie value to an empty string, and the expiration to 24 hours ago return cookie::set($name, '', -86400, $path, $domain, FALSE, FALSE); } } // End cookie ./kohana/system/helpers/request.php 0000644 0001750 0001750 00000014312 11203321744 017167 0 ustar tokkee tokkee 0); } /** * Compare the q values for given array of content types and return the one with the highest value. * If items are found to have the same q value, the first one encountered in the given array wins. * If all items in the given array have a q value of 0, FALSE is returned. * * @param array content types * @param boolean set to TRUE to disable wildcard checking * @return mixed string mime type with highest q value, FALSE if none of the given types are accepted */ public static function preferred_accept($types, $explicit_check = FALSE) { // Initialize $mime_types = array(); $max_q = 0; $preferred = FALSE; // Load q values for all given content types foreach (array_unique($types) as $type) { $mime_types[$type] = request::accepts_at_quality($type, $explicit_check); } // Look for the highest q value foreach ($mime_types as $type => $q) { if ($q > $max_q) { $max_q = $q; $preferred = $type; } } return $preferred; } /** * Returns quality factor at which the client accepts content type. * * @param string content type (e.g. "image/jpg", "jpg") * @param boolean set to TRUE to disable wildcard checking * @return integer|float */ public static function accepts_at_quality($type = NULL, $explicit_check = FALSE) { request::parse_accept_header(); // Normalize type $type = strtolower((string) $type); // General content type (e.g. "jpg") if (strpos($type, '/') === FALSE) { // Don't accept anything by default $q = 0; // Look up relevant mime types foreach ((array) Kohana::config('mimes.'.$type) as $type) { $q2 = request::accepts_at_quality($type, $explicit_check); $q = ($q2 > $q) ? $q2 : $q; } return $q; } // Content type with subtype given (e.g. "image/jpg") $type = explode('/', $type, 2); // Exact match if (isset(request::$accept_types[$type[0]][$type[1]])) return request::$accept_types[$type[0]][$type[1]]; // Wildcard match (if not checking explicitly) if ($explicit_check === FALSE AND isset(request::$accept_types[$type[0]]['*'])) return request::$accept_types[$type[0]]['*']; // Catch-all wildcard match (if not checking explicitly) if ($explicit_check === FALSE AND isset(request::$accept_types['*']['*'])) return request::$accept_types['*']['*']; // Content type not accepted return 0; } /** * Parses client's HTTP Accept request header, and builds array structure representing it. * * @return void */ protected static function parse_accept_header() { // Run this function just once if (request::$accept_types !== NULL) return; // Initialize accept_types array request::$accept_types = array(); // No HTTP Accept header found if (empty($_SERVER['HTTP_ACCEPT'])) { // Accept everything request::$accept_types['*']['*'] = 1; return; } // Remove linebreaks and parse the HTTP Accept header foreach (explode(',', str_replace(array("\r", "\n"), '', $_SERVER['HTTP_ACCEPT'])) as $accept_entry) { // Explode each entry in content type and possible quality factor $accept_entry = explode(';', trim($accept_entry), 2); // Explode each content type (e.g. "text/html") $type = explode('/', $accept_entry[0], 2); // Skip invalid content types if ( ! isset($type[1])) continue; // Assume a default quality factor of 1 if no custom q value found $q = (isset($accept_entry[1]) AND preg_match('~\bq\s*+=\s*+([.0-9]+)~', $accept_entry[1], $match)) ? (float) $match[1] : 1; // Populate accept_types array if ( ! isset(request::$accept_types[$type[0]][$type[1]]) OR $q > request::$accept_types[$type[0]][$type[1]]) { request::$accept_types[$type[0]][$type[1]] = $q; } } } } // End request ./kohana/system/helpers/text.php 0000644 0001750 0001750 00000025470 11121324570 016471 0 ustar tokkee tokkee 1) { if (ctype_alpha($str)) { // Add a random digit $str[mt_rand(0, $length - 1)] = chr(mt_rand(48, 57)); } elseif (ctype_digit($str)) { // Add a random letter $str[mt_rand(0, $length - 1)] = chr(mt_rand(65, 90)); } } return $str; } /** * Reduces multiple slashes in a string to single slashes. * * @param string string to reduce slashes of * @return string */ public static function reduce_slashes($str) { return preg_replace('#(? $badword) { $badwords[$key] = str_replace('\*', '\S*?', preg_quote((string) $badword)); } $regex = '('.implode('|', $badwords).')'; if ($replace_partial_words == TRUE) { // Just using \b isn't sufficient when we need to replace a badword that already contains word boundaries itself $regex = '(?<=\b|\s|^)'.$regex.'(?=\b|\s|$)'; } $regex = '!'.$regex.'!ui'; if (utf8::strlen($replacement) == 1) { $regex .= 'e'; return preg_replace($regex, 'str_repeat($replacement, utf8::strlen(\'$1\'))', $str); } return preg_replace($regex, $replacement, $str); } /** * Finds the text that is similar between a set of words. * * @param array words to find similar text of * @return string */ public static function similar(array $words) { // First word is the word to match against $word = current($words); for ($i = 0, $max = strlen($word); $i < $max; ++$i) { foreach ($words as $w) { // Once a difference is found, break out of the loops if ( ! isset($w[$i]) OR $w[$i] !== $word[$i]) break 2; } } // Return the similar text return substr($word, 0, $i); } /** * Converts text email addresses and anchors into links. * * @param string text to auto link * @return string */ public static function auto_link($text) { // Auto link emails first to prevent problems with "www.domain.com@example.com" return text::auto_link_urls(text::auto_link_emails($text)); } /** * Converts text anchors into links. * * @param string text to auto link * @return string */ public static function auto_link_urls($text) { // Finds all http/https/ftp/ftps links that are not part of an existing html anchor if (preg_match_all('~\b(?)(?:ht|f)tps?://\S+(?:/|\b)~i', $text, $matches)) { foreach ($matches[0] as $match) { // Replace each link with an anchor $text = str_replace($match, html::anchor($match), $text); } } // Find all naked www.links.com (without http://) if (preg_match_all('~\b(?|58;)(?!\.)[-+_a-z0-9.]++(? andmarkup to text. Basically nl2br() on steroids. * * @param string subject * @return string */ public static function auto_p($str) { // Trim whitespace if (($str = trim($str)) === '') return ''; // Standardize newlines $str = str_replace(array("\r\n", "\r"), "\n", $str); // Trim whitespace on each line $str = preg_replace('~^[ \t]+~m', '', $str); $str = preg_replace('~[ \t]+$~m', '', $str); // The following regexes only need to be executed if the string contains html if ($html_found = (strpos($str, '<') !== FALSE)) { // Elements that should not be surrounded by p tags $no_p = '(?:p|div|h[1-6r]|ul|ol|li|blockquote|d[dlt]|pre|t[dhr]|t(?:able|body|foot|head)|c(?:aption|olgroup)|form|s(?:elect|tyle)|a(?:ddress|rea)|ma(?:p|th))'; // Put at least two linebreaks before and after $no_p elements $str = preg_replace('~^<'.$no_p.'[^>]*+>~im', "\n$0", $str); $str = preg_replace('~$~im', "$0\n", $str); } // Do the
magic! $str = '
'.trim($str).'
'; $str = preg_replace('~\n{2,}~', "\n\n", $str); // The following regexes only need to be executed if the string contains html if ($html_found !== FALSE) { // Remove p tags around $no_p elements $str = preg_replace('~
(?=]*+>)~i', '', $str); $str = preg_replace('~(]*+>)
~i', '$1', $str); } // Convert single linebreaks to$str = preg_replace('~(?\n", $str); return $str; } /** * Returns human readable sizes. * @see Based on original functions written by: * @see Aidan Lister: http://aidanlister.com/repos/v/function.size_readable.php * @see Quentin Zervaas: http://www.phpriot.com/d/code/strings/filesize-format/ * * @param integer size in bytes * @param string a definitive unit * @param string the return string format * @param boolean whether to use SI prefixes or IEC * @return string */ public static function bytes($bytes, $force_unit = NULL, $format = NULL, $si = TRUE) { // Format string $format = ($format === NULL) ? '%01.2f %s' : (string) $format; // IEC prefixes (binary) if ($si == FALSE OR strpos($force_unit, 'i') !== FALSE) { $units = array('B', 'KiB', 'MiB', 'GiB', 'TiB', 'PiB'); $mod = 1024; } // SI prefixes (decimal) else { $units = array('B', 'kB', 'MB', 'GB', 'TB', 'PB'); $mod = 1000; } // Determine unit to use if (($power = array_search((string) $force_unit, $units)) === FALSE) { $power = ($bytes > 0) ? floor(log($bytes, $mod)) : 0; } return sprintf($format, $bytes / pow($mod, $power), $units[$power]); } /** * Prevents widow words by inserting a non-breaking space between the last two words. * @see http://www.shauninman.com/archive/2006/08/22/widont_wordpress_plugin * * @param string string to remove widows from * @return string */ public static function widont($str) { $str = rtrim($str); $space = strrpos($str, ' '); if ($space !== FALSE) { $str = substr($str, 0, $space).' '.substr($str, $space + 1); } return $str; } } // End text ./kohana/system/helpers/num.php 0000644 0001750 0001750 00000001101 11121324570 016265 0 ustar tokkee tokkee =')) { $str = htmlspecialchars($str, ENT_QUOTES, 'UTF-8', FALSE); } else { $str = preg_replace('/&(?!(?:#\d++|[a-z]++);)/ui', '&', $str); $str = str_replace(array('<', '>', '\'', '"'), array('<', '>', ''', '"'), $str); } } return $str; } /** * Perform a html::specialchars() with additional URL specific encoding. * * @param string string to convert * @param boolean encode existing entities * @return string */ public static function specialurlencode($str, $double_encode = TRUE) { return str_replace(' ', '%20', html::specialchars($str, $double_encode)); } /** * Create HTML link anchors. * * @param string URL or URI string * @param string link text * @param array HTML anchor attributes * @param string non-default protocol, eg: https * @param boolean option to escape the title that is output * @return string */ public static function anchor($uri, $title = NULL, $attributes = NULL, $protocol = NULL, $escape_title = FALSE) { if ($uri === '') { $site_url = url::base(FALSE); } elseif (strpos($uri, '#') === 0) { // This is an id target link, not a URL $site_url = $uri; } elseif (strpos($uri, '://') === FALSE) { $site_url = url::site($uri, $protocol); } else { if (html::$windowed_urls === TRUE AND empty($attributes['target'])) { $attributes['target'] = '_blank'; } $site_url = $uri; } return // Parsed URL '' // Title empty? Use the parsed URL .($escape_title ? html::specialchars((($title === NULL) ? $site_url : $title), FALSE) : (($title === NULL) ? $site_url : $title)).''; } /** * Creates an HTML anchor to a file. * * @param string name of file to link to * @param string link text * @param array HTML anchor attributes * @param string non-default protocol, eg: ftp * @return string */ public static function file_anchor($file, $title = NULL, $attributes = NULL, $protocol = NULL) { return // Base URL + URI = full URL '' // Title empty? Use the filename part of the URI .(($title === NULL) ? end(explode('/', $file)) : $title) .''; } /** * Similar to anchor, but with the protocol parameter first. * * @param string link protocol * @param string URI or URL to link to * @param string link text * @param array HTML anchor attributes * @return string */ public static function panchor($protocol, $uri, $title = NULL, $attributes = FALSE) { return html::anchor($uri, $title, $attributes, $protocol); } /** * Create an array of anchors from an array of link/title pairs. * * @param array link/title pairs * @return array */ public static function anchor_array(array $array) { $anchors = array(); foreach ($array as $link => $title) { // Create list of anchors $anchors[] = html::anchor($link, $title); } return $anchors; } /** * Generates an obfuscated version of an email address. * * @param string email address * @return string */ public static function email($email) { $safe = ''; foreach (str_split($email) as $letter) { switch (($letter === '@') ? rand(1, 2) : rand(1, 3)) { // HTML entity code case 1: $safe .= '&#'.ord($letter).';'; break; // Hex character code case 2: $safe .= '&#x'.dechex(ord($letter)).';'; break; // Raw (no) encoding case 3: $safe .= $letter; } } return $safe; } /** * Creates an email anchor. * * @param string email address to send to * @param string link text * @param array HTML anchor attributes * @return string */ public static function mailto($email, $title = NULL, $attributes = NULL) { if (empty($email)) return $title; // Remove the subject or other parameters that do not need to be encoded if (strpos($email, '?') !== FALSE) { // Extract the parameters from the email address list ($email, $params) = explode('?', $email, 2); // Make the params into a query string, replacing spaces $params = '?'.str_replace(' ', '%20', $params); } else { // No parameters $params = ''; } // Obfuscate email address $safe = html::email($email); // Title defaults to the encoded email address empty($title) and $title = $safe; // Parse attributes empty($attributes) or $attributes = html::attributes($attributes); // Encoded start of the href="" is a static encoded version of 'mailto:' return ''.$title.''; } /** * Generate a "breadcrumb" list of anchors representing the URI. * * @param array segments to use as breadcrumbs, defaults to using Router::$segments * @return string */ public static function breadcrumb($segments = NULL) { empty($segments) and $segments = Router::$segments; $array = array(); while ($segment = array_pop($segments)) { $array[] = html::anchor ( // Complete URI for the URL implode('/', $segments).'/'.$segment, // Title for the current segment ucwords(inflector::humanize($segment)) ); } // Retrun the array of all the segments return array_reverse($array); } /** * Creates a meta tag. * * @param string|array tag name, or an array of tags * @param string tag "content" value * @return string */ public static function meta($tag, $value = NULL) { if (is_array($tag)) { $tags = array(); foreach ($tag as $t => $v) { // Build each tag and add it to the array $tags[] = html::meta($t, $v); } // Return all of the tags as a string return implode("\n", $tags); } // Set the meta attribute value $attr = in_array(strtolower($tag), Kohana::config('http.meta_equiv')) ? 'http-equiv' : 'name'; return ''; } /** * Creates a stylesheet link. * * @param string|array filename, or array of filenames to match to array of medias * @param string|array media type of stylesheet, or array to match filenames * @param boolean include the index_page in the link * @return string */ public static function stylesheet($style, $media = FALSE, $index = FALSE) { return html::link($style, 'stylesheet', 'text/css', '.css', $media, $index); } /** * Creates a link tag. * * @param string|array filename * @param string|array relationship * @param string|array mimetype * @param string specifies suffix of the file * @param string|array specifies on what device the document will be displayed * @param boolean include the index_page in the link * @return string */ public static function link($href, $rel, $type, $suffix = FALSE, $media = FALSE, $index = FALSE) { $compiled = ''; if (is_array($href)) { foreach ($href as $_href) { $_rel = is_array($rel) ? array_shift($rel) : $rel; $_type = is_array($type) ? array_shift($type) : $type; $_media = is_array($media) ? array_shift($media) : $media; $compiled .= html::link($_href, $_rel, $_type, $suffix, $_media, $index); } } else { if (strpos($href, '://') === FALSE) { // Make the URL absolute $href = url::base($index).$href; } $length = strlen($suffix); if ( $length > 0 AND substr_compare($href, $suffix, -$length, $length, FALSE) !== 0) { // Add the defined suffix $href .= $suffix; } $attr = array ( 'rel' => $rel, 'type' => $type, 'href' => $href, ); if ( ! empty($media)) { // Add the media type to the attributes $attr['media'] = $media; } $compiled = '
Rendered in {execution_time} seconds, using {memory_usage} of memory
Copyright ©2007–2008 Kohana Team
render();
}
?>
./kohana/system/views/kohana_error_page.php 0000644 0001750 0001750 00000002077 11166754742 020665 0 ustar tokkee tokkee
: 3): ?> 1 $total_pages) continue ?>
./kohana/system/views/pagination/digg.php 0000644 0001750 0001750 00000005562 11121324570 020243 0 ustar tokkee tokkee« « … $total_pages - 8): /* « Previous 1 2 … 17 18 19 20 21 22 23 24 25 26 Next » */ ?> 1 2 … 1 2 … … » »
./kohana/system/views/pagination/extended.php 0000644 0001750 0001750 00000002062 11121324570 021121 0 ustar tokkee tokkee ./kohana/system/libraries/ 0000755 0001750 0001750 00000000000 11263472441 015306 5 ustar tokkee tokkee ./kohana/system/libraries/Model.php 0000644 0001750 0001750 00000001167 11147406470 017064 0 ustar tokkee tokkee db)) { // Load the default database $this->db = Database::instance($this->db); } } } // End Model ./kohana/system/libraries/Controller.php 0000644 0001750 0001750 00000003714 11207326007 020141 0 ustar tokkee tokkee uri = URI::instance(); // Input should always be available $this->input = Input::instance(); } /** * Handles methods that do not exist. * * @param string method name * @param array arguments * @return void */ public function __call($method, $args) { // Default to showing a 404 page Event::run('system.404'); } /** * Includes a View within the controller scope. * * @param string view filename * @param array array of view variables * @return string */ public function _kohana_load_view($kohana_view_filename, $kohana_input_data) { if ($kohana_view_filename == '') return; // Buffering on ob_start(); // Import the view variables to local namespace extract($kohana_input_data, EXTR_SKIP); // Views are straight HTML pages with embedded PHP, so importing them // this way insures that $this can be accessed as if the user was in // the controller, which gives the easiest access to libraries in views try { include $kohana_view_filename; } catch (Exception $e) { ob_end_clean(); throw $e; } // Fetch the output and close the buffer return ob_get_clean(); } } // End Controller Class ./kohana/system/libraries/drivers/ 0000755 0001750 0001750 00000000000 11263472443 016766 5 ustar tokkee tokkee ./kohana/system/libraries/drivers/Captcha/ 0000755 0001750 0001750 00000000000 11263472442 020330 5 ustar tokkee tokkee ./kohana/system/libraries/drivers/Captcha/Black.php 0000644 0001750 0001750 00000006257 11121324570 022056 0 ustar tokkee tokkee image_create(Captcha::$config['background']); // Add random white/gray arcs, amount depends on complexity setting $count = (Captcha::$config['width'] + Captcha::$config['height']) / 2; $count = $count / 5 * min(10, Captcha::$config['complexity']); for ($i = 0; $i < $count; $i++) { imagesetthickness($this->image, mt_rand(1, 2)); $color = imagecolorallocatealpha($this->image, 255, 255, 255, mt_rand(0, 120)); imagearc($this->image, mt_rand(-Captcha::$config['width'], Captcha::$config['width']), mt_rand(-Captcha::$config['height'], Captcha::$config['height']), mt_rand(-Captcha::$config['width'], Captcha::$config['width']), mt_rand(-Captcha::$config['height'], Captcha::$config['height']), mt_rand(0, 360), mt_rand(0, 360), $color); } // Use different fonts if available $font = Captcha::$config['fontpath'].Captcha::$config['fonts'][array_rand(Captcha::$config['fonts'])]; // Draw the character's white shadows $size = (int) min(Captcha::$config['height'] / 2, Captcha::$config['width'] * 0.8 / strlen($this->response)); $angle = mt_rand(-15 + strlen($this->response), 15 - strlen($this->response)); $x = mt_rand(1, Captcha::$config['width'] * 0.9 - $size * strlen($this->response)); $y = ((Captcha::$config['height'] - $size) / 2) + $size; $color = imagecolorallocate($this->image, 255, 255, 255); imagefttext($this->image, $size, $angle, $x + 1, $y + 1, $color, $font, $this->response); // Add more shadows for lower complexities (Captcha::$config['complexity'] < 10) and imagefttext($this->image, $size, $angle, $x - 1, $y - 1, $color, $font , $this->response); (Captcha::$config['complexity'] < 8) and imagefttext($this->image, $size, $angle, $x - 2, $y + 2, $color, $font , $this->response); (Captcha::$config['complexity'] < 6) and imagefttext($this->image, $size, $angle, $x + 2, $y - 2, $color, $font , $this->response); (Captcha::$config['complexity'] < 4) and imagefttext($this->image, $size, $angle, $x + 3, $y + 3, $color, $font , $this->response); (Captcha::$config['complexity'] < 2) and imagefttext($this->image, $size, $angle, $x - 3, $y - 3, $color, $font , $this->response); // Finally draw the foreground characters $color = imagecolorallocate($this->image, 0, 0, 0); imagefttext($this->image, $size, $angle, $x, $y, $color, $font, $this->response); // Output return $this->image_render($html); } } // End Captcha Black Driver Class ./kohana/system/libraries/drivers/Captcha/Riddle.php 0000644 0001750 0001750 00000001736 11121324570 022242 0 ustar tokkee tokkee riddle = $riddle[0]; // Return the answer return $riddle[1]; } /** * Outputs the Captcha riddle. * * @param boolean html output * @return mixed */ public function render($html) { return $this->riddle; } } // End Captcha Riddle Driver Class ./kohana/system/libraries/drivers/Captcha/Basic.php 0000644 0001750 0001750 00000005374 11121324570 022062 0 ustar tokkee tokkee image $this->image_create(Captcha::$config['background']); // Add a random gradient if (empty(Captcha::$config['background'])) { $color1 = imagecolorallocate($this->image, mt_rand(200, 255), mt_rand(200, 255), mt_rand(150, 255)); $color2 = imagecolorallocate($this->image, mt_rand(200, 255), mt_rand(200, 255), mt_rand(150, 255)); $this->image_gradient($color1, $color2); } // Add a few random lines for ($i = 0, $count = mt_rand(5, Captcha::$config['complexity'] * 4); $i < $count; $i++) { $color = imagecolorallocatealpha($this->image, mt_rand(0, 255), mt_rand(0, 255), mt_rand(100, 255), mt_rand(50, 120)); imageline($this->image, mt_rand(0, Captcha::$config['width']), 0, mt_rand(0, Captcha::$config['width']), Captcha::$config['height'], $color); } // Calculate character font-size and spacing $default_size = min(Captcha::$config['width'], Captcha::$config['height'] * 2) / (strlen($this->response) + 1); $spacing = (int) (Captcha::$config['width'] * 0.9 / strlen($this->response)); // Draw each Captcha character with varying attributes for ($i = 0, $strlen = strlen($this->response); $i < $strlen; $i++) { // Use different fonts if available $font = Captcha::$config['fontpath'].Captcha::$config['fonts'][array_rand(Captcha::$config['fonts'])]; // Allocate random color, size and rotation attributes to text $color = imagecolorallocate($this->image, mt_rand(0, 150), mt_rand(0, 150), mt_rand(0, 150)); $angle = mt_rand(-40, 20); // Scale the character size on image height $size = $default_size / 10 * mt_rand(8, 12); $box = imageftbbox($size, $angle, $font, $this->response[$i]); // Calculate character starting coordinates $x = $spacing / 4 + $i * $spacing; $y = Captcha::$config['height'] / 2 + ($box[2] - $box[5]) / 4; // Write text character to image imagefttext($this->image, $size, $angle, $x, $y, $color, $font, $this->response[$i]); } // Output return $this->image_render($html); } } // End Captcha Basic Driver Class ./kohana/system/libraries/drivers/Captcha/Math.php 0000644 0001750 0001750 00000002373 11121324570 021726 0 ustar tokkee tokkee math_exercice = implode(' + ', $numbers).' = '; // Return the answer return array_sum($numbers); } /** * Outputs the Captcha riddle. * * @param boolean html output * @return mixed */ public function render($html) { return $this->math_exercice; } } // End Captcha Math Driver Class ./kohana/system/libraries/drivers/Captcha/Word.php 0000644 0001750 0001750 00000001702 11121324570 021743 0 ustar tokkee tokkee image $this->image_create(Captcha::$config['background']); // Add a random gradient if (empty(Captcha::$config['background'])) { $color1 = imagecolorallocate($this->image, mt_rand(0, 100), mt_rand(0, 100), mt_rand(0, 100)); $color2 = imagecolorallocate($this->image, mt_rand(0, 100), mt_rand(0, 100), mt_rand(0, 100)); $this->image_gradient($color1, $color2); } // Add a few random circles for ($i = 0, $count = mt_rand(10, Captcha::$config['complexity'] * 3); $i < $count; $i++) { $color = imagecolorallocatealpha($this->image, mt_rand(0, 255), mt_rand(0, 255), mt_rand(0, 255), mt_rand(80, 120)); $size = mt_rand(5, Captcha::$config['height'] / 3); imagefilledellipse($this->image, mt_rand(0, Captcha::$config['width']), mt_rand(0, Captcha::$config['height']), $size, $size, $color); } // Calculate character font-size and spacing $default_size = min(Captcha::$config['width'], Captcha::$config['height'] * 2) / strlen($this->response); $spacing = (int) (Captcha::$config['width'] * 0.9 / strlen($this->response)); // Background alphabetic character attributes $color_limit = mt_rand(96, 160); $chars = 'ABEFGJKLPQRTVY'; // Draw each Captcha character with varying attributes for ($i = 0, $strlen = strlen($this->response); $i < $strlen; $i++) { // Use different fonts if available $font = Captcha::$config['fontpath'].Captcha::$config['fonts'][array_rand(Captcha::$config['fonts'])]; $angle = mt_rand(-40, 20); // Scale the character size on image height $size = $default_size / 10 * mt_rand(8, 12); $box = imageftbbox($size, $angle, $font, $this->response[$i]); // Calculate character starting coordinates $x = $spacing / 4 + $i * $spacing; $y = Captcha::$config['height'] / 2 + ($box[2] - $box[5]) / 4; // Draw captcha text character // Allocate random color, size and rotation attributes to text $color = imagecolorallocate($this->image, mt_rand(150, 255), mt_rand(200, 255), mt_rand(0, 255)); // Write text character to image imagefttext($this->image, $size, $angle, $x, $y, $color, $font, $this->response[$i]); // Draw "ghost" alphabetic character $text_color = imagecolorallocatealpha($this->image, mt_rand($color_limit + 8, 255), mt_rand($color_limit + 8, 255), mt_rand($color_limit + 8, 255), mt_rand(70, 120)); $char = $chars[mt_rand(0, 14)]; imagettftext($this->image, $size * 2, mt_rand(-45, 45), ($x - (mt_rand(5, 10))), ($y + (mt_rand(5, 10))), $text_color, $font, $char); } // Output return $this->image_render($html); } } // End Captcha Alpha Driver Class ./kohana/system/libraries/drivers/Database/ 0000755 0001750 0001750 00000000000 11263472443 020472 5 ustar tokkee tokkee ./kohana/system/libraries/drivers/Database/Mysqli.php 0000644 0001750 0001750 00000017510 11202052503 022445 0 ustar tokkee tokkee db_config = $config; Kohana::log('debug', 'MySQLi Database Driver Initialized'); } /** * Closes the database connection. */ public function __destruct() { is_object($this->link) and $this->link->close(); } public function connect() { // Check if link already exists if (is_object($this->link)) return $this->link; // Import the connect variables extract($this->db_config['connection']); // Build the connection info $host = isset($host) ? $host : $socket; // Make the connection and select the database if ($this->link = new mysqli($host, $user, $pass, $database, $port)) { if ($charset = $this->db_config['character_set']) { $this->set_charset($charset); } // Clear password after successful connect $this->db_config['connection']['pass'] = NULL; return $this->link; } return FALSE; } public function query($sql) { // Only cache if it's turned on, and only cache if it's not a write statement if ($this->db_config['cache'] AND ! preg_match('#\b(?:INSERT|UPDATE|REPLACE|SET|DELETE|TRUNCATE)\b#i', $sql)) { $hash = $this->query_hash($sql); if ( ! isset($this->query_cache[$hash])) { // Set the cached object $this->query_cache[$hash] = new Kohana_Mysqli_Result($this->link, $this->db_config['object'], $sql); } else { // Rewind cached result $this->query_cache[$hash]->rewind(); } // Return the cached query return $this->query_cache[$hash]; } return new Kohana_Mysqli_Result($this->link, $this->db_config['object'], $sql); } public function set_charset($charset) { if ($this->link->set_charset($charset) === FALSE) throw new Kohana_Database_Exception('database.error', $this->show_error()); } public function escape_str($str) { if (!$this->db_config['escape']) return $str; is_object($this->link) or $this->connect(); return $this->link->real_escape_string($str); } public function show_error() { return $this->link->error; } } // End Database_Mysqli_Driver Class /** * MySQLi Result */ class Kohana_Mysqli_Result extends Database_Result { // Database connection protected $link; // Data fetching types protected $fetch_type = 'mysqli_fetch_object'; protected $return_type = MYSQLI_ASSOC; /** * Sets up the result variables. * * @param object database link * @param boolean return objects or arrays * @param string SQL query that was run */ public function __construct($link, $object = TRUE, $sql) { $this->link = $link; if ( ! $this->link->multi_query($sql)) { // SQL error throw new Kohana_Database_Exception('database.error', $this->link->error.' - '.$sql); } else { $this->result = $this->link->store_result(); // If the query is an object, it was a SELECT, SHOW, DESCRIBE, EXPLAIN query if (is_object($this->result)) { $this->current_row = 0; $this->total_rows = $this->result->num_rows; $this->fetch_type = ($object === TRUE) ? 'fetch_object' : 'fetch_array'; } elseif ($this->link->error) { // SQL error throw new Kohana_Database_Exception('database.error', $this->link->error.' - '.$sql); } else { // Its an DELETE, INSERT, REPLACE, or UPDATE query $this->insert_id = $this->link->insert_id; $this->total_rows = $this->link->affected_rows; } } // Set result type $this->result($object); // Store the SQL $this->sql = $sql; } /** * Magic __destruct function, frees the result. */ public function __destruct() { if (is_object($this->result)) { $this->result->free_result(); // this is kinda useless, but needs to be done to avoid the "Commands out of sync; you // can't run this command now" error. Basically, we get all results after the first one // (the one we actually need) and free them. if (is_resource($this->link) AND $this->link->more_results()) { do { if ($result = $this->link->store_result()) { $result->free_result(); } } while ($this->link->next_result()); } } } public function result($object = TRUE, $type = MYSQLI_ASSOC) { $this->fetch_type = ((bool) $object) ? 'fetch_object' : 'fetch_array'; // This check has to be outside the previous statement, because we do not // know the state of fetch_type when $object = NULL // NOTE - The class set by $type must be defined before fetching the result, // autoloading is disabled to save a lot of stupid overhead. if ($this->fetch_type == 'fetch_object') { $this->return_type = (is_string($type) AND Kohana::auto_load($type)) ? $type : 'stdClass'; } else { $this->return_type = $type; } return $this; } public function as_array($object = NULL, $type = MYSQLI_ASSOC) { return $this->result_array($object, $type); } public function result_array($object = NULL, $type = MYSQLI_ASSOC) { $rows = array(); if (is_string($object)) { $fetch = $object; } elseif (is_bool($object)) { if ($object === TRUE) { $fetch = 'fetch_object'; // NOTE - The class set by $type must be defined before fetching the result, // autoloading is disabled to save a lot of stupid overhead. $type = (is_string($type) AND Kohana::auto_load($type)) ? $type : 'stdClass'; } else { $fetch = 'fetch_array'; } } else { // Use the default config values $fetch = $this->fetch_type; if ($fetch == 'fetch_object') { $type = (is_string($type) AND Kohana::auto_load($type)) ? $type : 'stdClass'; } } if ($this->result->num_rows) { // Reset the pointer location to make sure things work properly $this->result->data_seek(0); while ($row = $this->result->$fetch($type)) { $rows[] = $row; } } return isset($rows) ? $rows : array(); } public function list_fields() { $field_names = array(); while ($field = $this->result->fetch_field()) { $field_names[] = $field->name; } return $field_names; } public function seek($offset) { if ($this->offsetExists($offset) AND $this->result->data_seek($offset)) { // Set the current row to the offset $this->current_row = $offset; return TRUE; } return FALSE; } public function offsetGet($offset) { if ( ! $this->seek($offset)) return FALSE; // Return the row $fetch = $this->fetch_type; return $this->result->$fetch($this->return_type); } } // End Mysqli_Result Class /** * MySQLi Prepared Statement (experimental) */ class Kohana_Mysqli_Statement { protected $link = NULL; protected $stmt; protected $var_names = array(); protected $var_values = array(); public function __construct($sql, $link) { $this->link = $link; $this->stmt = $this->link->prepare($sql); return $this; } public function __destruct() { $this->stmt->close(); } // Sets the bind parameters public function bind_params($param_types, $params) { $this->var_names = array_keys($params); $this->var_values = array_values($params); call_user_func_array(array($this->stmt, 'bind_param'), array_merge($param_types, $var_names)); return $this; } public function bind_result($params) { call_user_func_array(array($this->stmt, 'bind_result'), $params); } // Runs the statement public function execute() { foreach ($this->var_names as $key => $name) { $$name = $this->var_values[$key]; } $this->stmt->execute(); return $this->stmt; } } ./kohana/system/libraries/drivers/Database/Pgsql.php 0000644 0001750 0001750 00000030203 11202052503 022247 0 ustar tokkee tokkee db_config = $config; Kohana::log('debug', 'PgSQL Database Driver Initialized'); } public function connect() { // Check if link already exists if (is_resource($this->link)) return $this->link; // Import the connect variables extract($this->db_config['connection']); // Persistent connections enabled? $connect = ($this->db_config['persistent'] == TRUE) ? 'pg_pconnect' : 'pg_connect'; // Build the connection info $port = isset($port) ? 'port=\''.$port.'\'' : ''; $host = isset($host) ? 'host=\''.$host.'\' '.$port : ''; // if no host, connect with the socket $connection_string = $host.' dbname=\''.$database.'\' user=\''.$user.'\' password=\''.$pass.'\''; // Make the connection and select the database if ($this->link = $connect($connection_string)) { if ($charset = $this->db_config['character_set']) { echo $this->set_charset($charset); } // Clear password after successful connect $this->db_config['connection']['pass'] = NULL; return $this->link; } return FALSE; } public function query($sql) { // Only cache if it's turned on, and only cache if it's not a write statement if ($this->db_config['cache'] AND ! preg_match('#\b(?:INSERT|UPDATE|SET)\b#i', $sql)) { $hash = $this->query_hash($sql); if ( ! isset($this->query_cache[$hash])) { // Set the cached object $this->query_cache[$hash] = new Pgsql_Result(pg_query($this->link, $sql), $this->link, $this->db_config['object'], $sql); } else { // Rewind cached result $this->query_cache[$hash]->rewind(); } return $this->query_cache[$hash]; } // Suppress warning triggered when a database error occurs (e.g., a constraint violation) return new Pgsql_Result(@pg_query($this->link, $sql), $this->link, $this->db_config['object'], $sql); } public function set_charset($charset) { $this->query('SET client_encoding TO '.pg_escape_string($this->link, $charset)); } public function escape_table($table) { if (!$this->db_config['escape']) return $table; return '"'.str_replace('.', '"."', $table).'"'; } public function escape_column($column) { if (!$this->db_config['escape']) return $column; if ($column == '*') return $column; // This matches any functions we support to SELECT. if ( preg_match('/(avg|count|sum|max|min)\(\s*(.*)\s*\)(\s*as\s*(.+)?)?/i', $column, $matches)) { if ( count($matches) == 3) { return $matches[1].'('.$this->escape_column($matches[2]).')'; } else if ( count($matches) == 5) { return $matches[1].'('.$this->escape_column($matches[2]).') AS '.$this->escape_column($matches[2]); } } // This matches any modifiers we support to SELECT. if ( ! preg_match('/\b(?:all|distinct)\s/i', $column)) { if (stripos($column, ' AS ') !== FALSE) { // Force 'AS' to uppercase $column = str_ireplace(' AS ', ' AS ', $column); // Runs escape_column on both sides of an AS statement $column = array_map(array($this, __FUNCTION__), explode(' AS ', $column)); // Re-create the AS statement return implode(' AS ', $column); } return preg_replace('/[^.*]+/', '"$0"', $column); } $parts = explode(' ', $column); $column = ''; for ($i = 0, $c = count($parts); $i < $c; $i++) { // The column is always last if ($i == ($c - 1)) { $column .= preg_replace('/[^.*]+/', '"$0"', $parts[$i]); } else // otherwise, it's a modifier { $column .= $parts[$i].' '; } } return $column; } public function regex($field, $match, $type, $num_regexs) { $prefix = ($num_regexs == 0) ? '' : $type; return $prefix.' '.$this->escape_column($field).' ~* \''.$this->escape_str($match).'\''; } public function notregex($field, $match, $type, $num_regexs) { $prefix = $num_regexs == 0 ? '' : $type; return $prefix.' '.$this->escape_column($field).' !~* \''.$this->escape_str($match) . '\''; } public function limit($limit, $offset = 0) { return 'LIMIT '.$limit.' OFFSET '.$offset; } public function compile_select($database) { $sql = ($database['distinct'] == TRUE) ? 'SELECT DISTINCT ' : 'SELECT '; $sql .= (count($database['select']) > 0) ? implode(', ', $database['select']) : '*'; if (count($database['from']) > 0) { $sql .= "\nFROM "; $sql .= implode(', ', $database['from']); } if (count($database['join']) > 0) { foreach($database['join'] AS $join) { $sql .= "\n".$join['type'].'JOIN '.implode(', ', $join['tables']).' ON '.$join['conditions']; } } if (count($database['where']) > 0) { $sql .= "\nWHERE "; } $sql .= implode("\n", $database['where']); if (count($database['groupby']) > 0) { $sql .= "\nGROUP BY "; $sql .= implode(', ', $database['groupby']); } if (count($database['having']) > 0) { $sql .= "\nHAVING "; $sql .= implode("\n", $database['having']); } if (count($database['orderby']) > 0) { $sql .= "\nORDER BY "; $sql .= implode(', ', $database['orderby']); } if (is_numeric($database['limit'])) { $sql .= "\n"; $sql .= $this->limit($database['limit'], $database['offset']); } return $sql; } public function escape_str($str) { if (!$this->db_config['escape']) return $str; is_resource($this->link) or $this->connect(); return pg_escape_string($this->link, $str); } public function list_tables() { $sql = 'SELECT table_schema || \'.\' || table_name FROM information_schema.tables WHERE table_schema NOT IN (\'pg_catalog\', \'information_schema\')'; $result = $this->query($sql)->result(FALSE, PGSQL_ASSOC); $retval = array(); foreach ($result as $row) { $retval[] = current($row); } return $retval; } public function show_error() { return pg_last_error($this->link); } public function list_fields($table) { $result = NULL; foreach ($this->field_data($table) as $row) { // Make an associative array $result[$row->column_name] = $this->sql_type($row->data_type); if (!strncmp($row->column_default, 'nextval(', 8)) { $result[$row->column_name]['sequenced'] = TRUE; } if ($row->is_nullable === 'YES') { $result[$row->column_name]['null'] = TRUE; } } if (!isset($result)) throw new Kohana_Database_Exception('database.table_not_found', $table); return $result; } public function field_data($table) { // http://www.postgresql.org/docs/8.3/static/infoschema-columns.html $result = $this->query(' SELECT column_name, column_default, is_nullable, data_type, udt_name, character_maximum_length, numeric_precision, numeric_precision_radix, numeric_scale FROM information_schema.columns WHERE table_name = \''. $this->escape_str($table) .'\' ORDER BY ordinal_position '); return $result->result_array(TRUE); } } // End Database_Pgsql_Driver Class /** * PostgreSQL Result */ class Pgsql_Result extends Database_Result { // Data fetching types protected $fetch_type = 'pgsql_fetch_object'; protected $return_type = PGSQL_ASSOC; /** * Sets up the result variables. * * @param resource query result * @param resource database link * @param boolean return objects or arrays * @param string SQL query that was run */ public function __construct($result, $link, $object = TRUE, $sql) { $this->link = $link; $this->result = $result; // If the query is a resource, it was a SELECT, SHOW, DESCRIBE, EXPLAIN query if (is_resource($result)) { // Its an DELETE, INSERT, REPLACE, or UPDATE query if (preg_match('/^(?:delete|insert|replace|update)\b/iD', trim($sql), $matches)) { $this->insert_id = (strtolower($matches[0]) == 'insert') ? $this->insert_id() : FALSE; $this->total_rows = pg_affected_rows($this->result); } else { $this->current_row = 0; $this->total_rows = pg_num_rows($this->result); $this->fetch_type = ($object === TRUE) ? 'pg_fetch_object' : 'pg_fetch_array'; } } else { throw new Kohana_Database_Exception('database.error', pg_last_error().' - '.$sql); } // Set result type $this->result($object); // Store the SQL $this->sql = $sql; } /** * Magic __destruct function, frees the result. */ public function __destruct() { if (is_resource($this->result)) { pg_free_result($this->result); } } public function result($object = TRUE, $type = PGSQL_ASSOC) { $this->fetch_type = ((bool) $object) ? 'pg_fetch_object' : 'pg_fetch_array'; // This check has to be outside the previous statement, because we do not // know the state of fetch_type when $object = NULL // NOTE - The class set by $type must be defined before fetching the result, // autoloading is disabled to save a lot of stupid overhead. if ($this->fetch_type == 'pg_fetch_object') { $this->return_type = (is_string($type) AND Kohana::auto_load($type)) ? $type : 'stdClass'; } else { $this->return_type = $type; } return $this; } public function as_array($object = NULL, $type = PGSQL_ASSOC) { return $this->result_array($object, $type); } public function result_array($object = NULL, $type = PGSQL_ASSOC) { $rows = array(); if (is_string($object)) { $fetch = $object; } elseif (is_bool($object)) { if ($object === TRUE) { $fetch = 'pg_fetch_object'; // NOTE - The class set by $type must be defined before fetching the result, // autoloading is disabled to save a lot of stupid overhead. $type = (is_string($type) AND Kohana::auto_load($type)) ? $type : 'stdClass'; } else { $fetch = 'pg_fetch_array'; } } else { // Use the default config values $fetch = $this->fetch_type; if ($fetch == 'pg_fetch_object') { $type = (is_string($type) AND Kohana::auto_load($type)) ? $type : 'stdClass'; } } if ($this->total_rows) { pg_result_seek($this->result, 0); while ($row = $fetch($this->result, NULL, $type)) { $rows[] = $row; } } return $rows; } public function insert_id() { if ($this->insert_id === NULL) { $query = 'SELECT LASTVAL() AS insert_id'; // Disable error reporting for this, just to silence errors on // tables that have no serial column. $ER = error_reporting(0); $result = pg_query($this->link, $query); $insert_id = pg_fetch_array($result, NULL, PGSQL_ASSOC); $this->insert_id = $insert_id['insert_id']; // Reset error reporting error_reporting($ER); } return $this->insert_id; } public function seek($offset) { if ($this->offsetExists($offset) AND pg_result_seek($this->result, $offset)) { // Set the current row to the offset $this->current_row = $offset; return TRUE; } return FALSE; } public function list_fields() { $field_names = array(); $fields = pg_num_fields($this->result); for ($i = 0; $i < $fields; ++$i) { $field_names[] = pg_field_name($this->result, $i); } return $field_names; } /** * ArrayAccess: offsetGet */ public function offsetGet($offset) { if ( ! $this->seek($offset)) return FALSE; // Return the row by calling the defined fetching callback $fetch = $this->fetch_type; return $fetch($this->result, NULL, $this->return_type); } } // End Pgsql_Result Class /** * PostgreSQL Prepared Statement (experimental) */ class Kohana_Pgsql_Statement { protected $link = NULL; protected $stmt; public function __construct($sql, $link) { $this->link = $link; $this->stmt = $this->link->prepare($sql); return $this; } public function __destruct() { $this->stmt->close(); } // Sets the bind parameters public function bind_params() { $argv = func_get_args(); return $this; } // sets the statement values to the bound parameters public function set_vals() { return $this; } // Runs the statement public function execute() { return $this; } } ./kohana/system/libraries/drivers/Database/Mssql.php 0000644 0001750 0001750 00000025540 11211612256 022277 0 ustar tokkee tokkee db_config = $config; Kohana::log('debug', 'MSSQL Database Driver Initialized'); } /** * Closes the database connection. */ public function __destruct() { is_resource($this->link) and mssql_close($this->link); } /** * Make the connection * * @return return connection */ public function connect() { // Check if link already exists if (is_resource($this->link)) return $this->link; // Import the connect variables extract($this->db_config['connection']); // Persistent connections enabled? $connect = ($this->db_config['persistent'] == TRUE) ? 'mssql_pconnect' : 'mssql_connect'; // Build the connection info $host = isset($host) ? $host : $socket; // Windows uses a comma instead of a colon $port = (isset($port) AND is_string($port)) ? (KOHANA_IS_WIN ? ',' : ':').$port : ''; // Make the connection and select the database if (($this->link = $connect($host.$port, $user, $pass, TRUE)) AND mssql_select_db($database, $this->link)) { /* This is being removed so I can use it, will need to come up with a more elegant workaround in the future... * if ($charset = $this->db_config['character_set']) { $this->set_charset($charset); } */ // Clear password after successful connect $this->db_config['connection']['pass'] = NULL; return $this->link; } return FALSE; } public function query($sql) { // Only cache if it's turned on, and only cache if it's not a write statement if ($this->db_config['cache'] AND ! preg_match('#\b(?:INSERT|UPDATE|REPLACE|SET)\b#i', $sql)) { $hash = $this->query_hash($sql); if ( ! isset($this->query_cache[$hash])) { // Set the cached object $this->query_cache[$hash] = new Mssql_Result(mssql_query($sql, $this->link), $this->link, $this->db_config['object'], $sql); } else { // Rewind cached result $this->query_cache[$hash]->rewind(); } // Return the cached query return $this->query_cache[$hash]; } return new Mssql_Result(mssql_query($sql, $this->link), $this->link, $this->db_config['object'], $sql); } public function escape_table($table) { if (stripos($table, ' AS ') !== FALSE) { // Force 'AS' to uppercase $table = str_ireplace(' AS ', ' AS ', $table); // Runs escape_table on both sides of an AS statement $table = array_map(array($this, __FUNCTION__), explode(' AS ', $table)); // Re-create the AS statement return implode(' AS ', $table); } return '['.str_replace('.', '[.]', $table).']'; } public function escape_column($column) { if (!$this->db_config['escape']) return $column; if ($column == '*') return $column; // This matches any functions we support to SELECT. if ( preg_match('/(avg|count|sum|max|min)\(\s*(.*)\s*\)(\s*as\s*(.+)?)?/i', $column, $matches)) { if ( count($matches) == 3) { return $matches[1].'('.$this->escape_column($matches[2]).')'; } else if ( count($matches) == 5) { return $matches[1].'('.$this->escape_column($matches[2]).') AS '.$this->escape_column($matches[2]); } } // This matches any modifiers we support to SELECT. if ( ! preg_match('/\b(?:rand|all|distinct(?:row)?|high_priority|sql_(?:small_result|b(?:ig_result|uffer_result)|no_cache|ca(?:che|lc_found_rows)))\s/i', $column)) { if (stripos($column, ' AS ') !== FALSE) { // Force 'AS' to uppercase $column = str_ireplace(' AS ', ' AS ', $column); // Runs escape_column on both sides of an AS statement $column = array_map(array($this, __FUNCTION__), explode(' AS ', $column)); // Re-create the AS statement return implode(' AS ', $column); } return preg_replace('/[^.*]+/', '[$0]', $column); } $parts = explode(' ', $column); $column = ''; for ($i = 0, $c = count($parts); $i < $c; $i++) { // The column is always last if ($i == ($c - 1)) { $column .= preg_replace('/[^.*]+/', '[$0]', $parts[$i]); } else // otherwise, it's a modifier { $column .= $parts[$i].' '; } } return $column; } /** * Limit in SQL Server 2000 only uses the keyword * 'TOP'; 2007 may have an offset keyword, but * I am unsure - for pagination style limit,offset * functionality, a fancy query needs to be built. * * @param unknown_type $limit * @return unknown */ public function limit($limit, $offset=null) { return 'TOP '.$limit; } public function compile_select($database) { $sql = ($database['distinct'] == TRUE) ? 'SELECT DISTINCT ' : 'SELECT '; $sql .= (count($database['select']) > 0) ? implode(', ', $database['select']) : '*'; if (count($database['from']) > 0) { // Escape the tables $froms = array(); foreach ($database['from'] as $from) $froms[] = $this->escape_column($from); $sql .= "\nFROM "; $sql .= implode(', ', $froms); } if (count($database['join']) > 0) { foreach($database['join'] AS $join) { $sql .= "\n".$join['type'].'JOIN '.implode(', ', $join['tables']).' ON '.$join['conditions']; } } if (count($database['where']) > 0) { $sql .= "\nWHERE "; } $sql .= implode("\n", $database['where']); if (count($database['groupby']) > 0) { $sql .= "\nGROUP BY "; $sql .= implode(', ', $database['groupby']); } if (count($database['having']) > 0) { $sql .= "\nHAVING "; $sql .= implode("\n", $database['having']); } if (count($database['orderby']) > 0) { $sql .= "\nORDER BY "; $sql .= implode(', ', $database['orderby']); } if (is_numeric($database['limit'])) { $sql .= "\n"; $sql .= $this->limit($database['limit']); } return $sql; } public function escape_str($str) { if (!$this->db_config['escape']) return $str; is_resource($this->link) or $this->connect(); //mssql_real_escape_string($str, $this->link); <-- this function doesn't exist $characters = array('/\x00/', '/\x1a/', '/\n/', '/\r/', '/\\\/', '/\'/'); $replace = array('\\\x00', '\\x1a', '\\n', '\\r', '\\\\', "''"); return preg_replace($characters, $replace, $str); } public function list_tables() { $sql = 'SHOW TABLES FROM ['.$this->db_config['connection']['database'].']'; $result = $this->query($sql)->result(FALSE, MSSQL_ASSOC); $retval = array(); foreach ($result as $row) { $retval[] = current($row); } return $retval; } public function show_error() { return mssql_get_last_message($this->link); } public function list_fields($table) { $result = array(); foreach ($this->field_data($table) as $row) { // Make an associative array $result[$row->Field] = $this->sql_type($row->Type); } return $result; } public function field_data($table) { $query = $this->query("SELECT COLUMN_NAME AS Field, DATA_TYPE as Type FROM INFORMATION_SCHEMA.Columns WHERE TABLE_NAME = '".$this->escape_table($table)."'", $this->link); return $query->result_array(TRUE); } } /** * MSSQL Result */ class Mssql_Result extends Database_Result { // Fetch function and return type protected $fetch_type = 'mssql_fetch_object'; protected $return_type = MSSQL_ASSOC; /** * Sets up the result variables. * * @param resource query result * @param resource database link * @param boolean return objects or arrays * @param string SQL query that was run */ public function __construct($result, $link, $object = TRUE, $sql) { $this->result = $result; // If the query is a resource, it was a SELECT, SHOW, DESCRIBE, EXPLAIN query if (is_resource($result)) { $this->current_row = 0; $this->total_rows = mssql_num_rows($this->result); $this->fetch_type = ($object === TRUE) ? 'mssql_fetch_object' : 'mssql_fetch_array'; } elseif (is_bool($result)) { if ($result == FALSE) { // SQL error throw new Kohana_Database_Exception('database.error', mssql_get_last_message($link).' - '.$sql); } else { // Its an DELETE, INSERT, REPLACE, or UPDATE querys $last_id = mssql_query('SELECT @@IDENTITY AS last_id', $link); $result = mssql_fetch_assoc($last_id); $this->insert_id = $result['last_id']; $this->total_rows = mssql_rows_affected($link); } } // Set result type $this->result($object); // Store the SQL $this->sql = $sql; } /** * Destruct, the cleanup crew! */ public function __destruct() { if (is_resource($this->result)) { mssql_free_result($this->result); } } public function result($object = TRUE, $type = MSSQL_ASSOC) { $this->fetch_type = ((bool) $object) ? 'mssql_fetch_object' : 'mssql_fetch_array'; // This check has to be outside the previous statement, because we do not // know the state of fetch_type when $object = NULL // NOTE - The class set by $type must be defined before fetching the result, // autoloading is disabled to save a lot of stupid overhead. if ($this->fetch_type == 'mssql_fetch_object') { $this->return_type = (is_string($type) AND Kohana::auto_load($type)) ? $type : 'stdClass'; } else { $this->return_type = $type; } return $this; } public function as_array($object = NULL, $type = MSSQL_ASSOC) { return $this->result_array($object, $type); } public function result_array($object = NULL, $type = MSSQL_ASSOC) { $rows = array(); if (is_string($object)) { $fetch = $object; } elseif (is_bool($object)) { if ($object === TRUE) { $fetch = 'mssql_fetch_object'; // NOTE - The class set by $type must be defined before fetching the result, // autoloading is disabled to save a lot of stupid overhead. $type = (is_string($type) AND Kohana::auto_load($type)) ? $type : 'stdClass'; } else { $fetch = 'mssql_fetch_array'; } } else { // Use the default config values $fetch = $this->fetch_type; if ($fetch == 'mssql_fetch_object') { $type = (is_string($type) AND Kohana::auto_load($type)) ? $type : 'stdClass'; } } if (mssql_num_rows($this->result)) { // Reset the pointer location to make sure things work properly mssql_data_seek($this->result, 0); while ($row = $fetch($this->result, $type)) { $rows[] = $row; } } return isset($rows) ? $rows : array(); } public function list_fields() { $field_names = array(); while ($field = mssql_fetch_field($this->result)) { $field_names[] = $field->name; } return $field_names; } public function seek($offset) { if ( ! $this->offsetExists($offset)) return FALSE; return mssql_data_seek($this->result, $offset); } } // End mssql_Result Class ./kohana/system/libraries/drivers/Database/Mysql.php 0000644 0001750 0001750 00000026351 11202052503 022277 0 ustar tokkee tokkee db_config = $config; Kohana::log('debug', 'MySQL Database Driver Initialized'); } /** * Closes the database connection. */ public function __destruct() { is_resource($this->link) and mysql_close($this->link); } public function connect() { // Check if link already exists if (is_resource($this->link)) return $this->link; // Import the connect variables extract($this->db_config['connection']); // Persistent connections enabled? $connect = ($this->db_config['persistent'] == TRUE) ? 'mysql_pconnect' : 'mysql_connect'; // Build the connection info $host = isset($host) ? $host : $socket; $port = isset($port) ? ':'.$port : ''; // Make the connection and select the database if (($this->link = $connect($host.$port, $user, $pass, TRUE)) AND mysql_select_db($database, $this->link)) { if ($charset = $this->db_config['character_set']) { $this->set_charset($charset); } // Clear password after successful connect $this->db_config['connection']['pass'] = NULL; return $this->link; } return FALSE; } public function query($sql) { // Only cache if it's turned on, and only cache if it's not a write statement if ($this->db_config['cache'] AND ! preg_match('#\b(?:INSERT|UPDATE|REPLACE|SET|DELETE|TRUNCATE)\b#i', $sql)) { $hash = $this->query_hash($sql); if ( ! isset($this->query_cache[$hash])) { // Set the cached object $this->query_cache[$hash] = new Mysql_Result(mysql_query($sql, $this->link), $this->link, $this->db_config['object'], $sql); } else { // Rewind cached result $this->query_cache[$hash]->rewind(); } // Return the cached query return $this->query_cache[$hash]; } return new Mysql_Result(mysql_query($sql, $this->link), $this->link, $this->db_config['object'], $sql); } public function set_charset($charset) { $this->query('SET NAMES '.$this->escape_str($charset)); } public function escape_table($table) { if (!$this->db_config['escape']) return $table; if (stripos($table, ' AS ') !== FALSE) { // Force 'AS' to uppercase $table = str_ireplace(' AS ', ' AS ', $table); // Runs escape_table on both sides of an AS statement $table = array_map(array($this, __FUNCTION__), explode(' AS ', $table)); // Re-create the AS statement return implode(' AS ', $table); } return '`'.str_replace('.', '`.`', $table).'`'; } public function escape_column($column) { if (!$this->db_config['escape']) return $column; if ($column == '*') return $column; // This matches any functions we support to SELECT. if ( preg_match('/(avg|count|sum|max|min)\(\s*(.*)\s*\)(\s*as\s*(.+)?)?/i', $column, $matches)) { if ( count($matches) == 3) { return $matches[1].'('.$this->escape_column($matches[2]).')'; } else if ( count($matches) == 5) { return $matches[1].'('.$this->escape_column($matches[2]).') AS '.$this->escape_column($matches[2]); } } // This matches any modifiers we support to SELECT. if ( ! preg_match('/\b(?:rand|all|distinct(?:row)?|high_priority|sql_(?:small_result|b(?:ig_result|uffer_result)|no_cache|ca(?:che|lc_found_rows)))\s/i', $column)) { if (stripos($column, ' AS ') !== FALSE) { // Force 'AS' to uppercase $column = str_ireplace(' AS ', ' AS ', $column); // Runs escape_column on both sides of an AS statement $column = array_map(array($this, __FUNCTION__), explode(' AS ', $column)); // Re-create the AS statement return implode(' AS ', $column); } return preg_replace('/[^.*]+/', '`$0`', $column); } $parts = explode(' ', $column); $column = ''; for ($i = 0, $c = count($parts); $i < $c; $i++) { // The column is always last if ($i == ($c - 1)) { $column .= preg_replace('/[^.*]+/', '`$0`', $parts[$i]); } else // otherwise, it's a modifier { $column .= $parts[$i].' '; } } return $column; } public function regex($field, $match, $type, $num_regexs) { $prefix = ($num_regexs == 0) ? '' : $type; return $prefix.' '.$this->escape_column($field).' REGEXP \''.$this->escape_str($match).'\''; } public function notregex($field, $match, $type, $num_regexs) { $prefix = $num_regexs == 0 ? '' : $type; return $prefix.' '.$this->escape_column($field).' NOT REGEXP \''.$this->escape_str($match) . '\''; } public function merge($table, $keys, $values) { // Escape the column names foreach ($keys as $key => $value) { $keys[$key] = $this->escape_column($value); } return 'REPLACE INTO '.$this->escape_table($table).' ('.implode(', ', $keys).') VALUES ('.implode(', ', $values).')'; } public function limit($limit, $offset = 0) { return 'LIMIT '.$offset.', '.$limit; } public function compile_select($database) { $sql = ($database['distinct'] == TRUE) ? 'SELECT DISTINCT ' : 'SELECT '; $sql .= (count($database['select']) > 0) ? implode(', ', $database['select']) : '*'; if (count($database['from']) > 0) { // Escape the tables $froms = array(); foreach ($database['from'] as $from) { $froms[] = $this->escape_column($from); } $sql .= "\nFROM ("; $sql .= implode(', ', $froms).")"; } if (count($database['join']) > 0) { foreach($database['join'] AS $join) { $sql .= "\n".$join['type'].'JOIN '.implode(', ', $join['tables']).' ON '.$join['conditions']; } } if (count($database['where']) > 0) { $sql .= "\nWHERE "; } $sql .= implode("\n", $database['where']); if (count($database['groupby']) > 0) { $sql .= "\nGROUP BY "; $sql .= implode(', ', $database['groupby']); } if (count($database['having']) > 0) { $sql .= "\nHAVING "; $sql .= implode("\n", $database['having']); } if (count($database['orderby']) > 0) { $sql .= "\nORDER BY "; $sql .= implode(', ', $database['orderby']); } if (is_numeric($database['limit'])) { $sql .= "\n"; $sql .= $this->limit($database['limit'], $database['offset']); } return $sql; } public function escape_str($str) { if (!$this->db_config['escape']) return $str; is_resource($this->link) or $this->connect(); return mysql_real_escape_string($str, $this->link); } public function list_tables() { $tables = array(); if ($query = $this->query('SHOW TABLES FROM '.$this->escape_table($this->db_config['connection']['database']))) { foreach ($query->result(FALSE) as $row) { $tables[] = current($row); } } return $tables; } public function show_error() { return mysql_error($this->link); } public function list_fields($table) { $result = NULL; foreach ($this->field_data($table) as $row) { // Make an associative array $result[$row->Field] = $this->sql_type($row->Type); if ($row->Key === 'PRI' AND $row->Extra === 'auto_increment') { // For sequenced (AUTO_INCREMENT) tables $result[$row->Field]['sequenced'] = TRUE; } if ($row->Null === 'YES') { // Set NULL status $result[$row->Field]['null'] = TRUE; } } if (!isset($result)) throw new Kohana_Database_Exception('database.table_not_found', $table); return $result; } public function field_data($table) { $result = $this->query('SHOW COLUMNS FROM '.$this->escape_table($table)); return $result->result_array(TRUE); } } // End Database_Mysql_Driver Class /** * MySQL Result */ class Mysql_Result extends Database_Result { // Fetch function and return type protected $fetch_type = 'mysql_fetch_object'; protected $return_type = MYSQL_ASSOC; /** * Sets up the result variables. * * @param resource query result * @param resource database link * @param boolean return objects or arrays * @param string SQL query that was run */ public function __construct($result, $link, $object = TRUE, $sql) { $this->result = $result; // If the query is a resource, it was a SELECT, SHOW, DESCRIBE, EXPLAIN query if (is_resource($result)) { $this->current_row = 0; $this->total_rows = mysql_num_rows($this->result); $this->fetch_type = ($object === TRUE) ? 'mysql_fetch_object' : 'mysql_fetch_array'; } elseif (is_bool($result)) { if ($result == FALSE) { // SQL error throw new Kohana_Database_Exception('database.error', mysql_error($link).' - '.$sql); } else { // Its an DELETE, INSERT, REPLACE, or UPDATE query $this->insert_id = mysql_insert_id($link); $this->total_rows = mysql_affected_rows($link); } } // Set result type $this->result($object); // Store the SQL $this->sql = $sql; } /** * Destruct, the cleanup crew! */ public function __destruct() { if (is_resource($this->result)) { mysql_free_result($this->result); } } public function result($object = TRUE, $type = MYSQL_ASSOC) { $this->fetch_type = ((bool) $object) ? 'mysql_fetch_object' : 'mysql_fetch_array'; // This check has to be outside the previous statement, because we do not // know the state of fetch_type when $object = NULL // NOTE - The class set by $type must be defined before fetching the result, // autoloading is disabled to save a lot of stupid overhead. if ($this->fetch_type == 'mysql_fetch_object' AND $object === TRUE) { $this->return_type = (is_string($type) AND Kohana::auto_load($type)) ? $type : 'stdClass'; } else { $this->return_type = $type; } return $this; } public function as_array($object = NULL, $type = MYSQL_ASSOC) { return $this->result_array($object, $type); } public function result_array($object = NULL, $type = MYSQL_ASSOC) { $rows = array(); if (is_string($object)) { $fetch = $object; } elseif (is_bool($object)) { if ($object === TRUE) { $fetch = 'mysql_fetch_object'; $type = (is_string($type) AND Kohana::auto_load($type)) ? $type : 'stdClass'; } else { $fetch = 'mysql_fetch_array'; } } else { // Use the default config values $fetch = $this->fetch_type; if ($fetch == 'mysql_fetch_object') { $type = (is_string($this->return_type) AND Kohana::auto_load($this->return_type)) ? $this->return_type : 'stdClass'; } } if (mysql_num_rows($this->result)) { // Reset the pointer location to make sure things work properly mysql_data_seek($this->result, 0); while ($row = $fetch($this->result, $type)) { $rows[] = $row; } } return isset($rows) ? $rows : array(); } public function list_fields() { $field_names = array(); while ($field = mysql_fetch_field($this->result)) { $field_names[] = $field->name; } return $field_names; } public function seek($offset) { if ($this->offsetExists($offset) AND mysql_data_seek($this->result, $offset)) { // Set the current row to the offset $this->current_row = $offset; return TRUE; } else { return FALSE; } } } // End Mysql_Result Class ./kohana/system/libraries/drivers/Database/Pdosqlite.php 0000644 0001750 0001750 00000024760 11172772557 023170 0 ustar tokkee tokkee */ class Database_Pdosqlite_Driver extends Database_Driver { // Database connection link protected $link; protected $db_config; /* * Constructor: __construct * Sets up the config for the class. * * Parameters: * config - database configuration * */ public function __construct($config) { $this->db_config = $config; Kohana::log('debug', 'PDO:Sqlite Database Driver Initialized'); } public function connect() { // Import the connect variables extract($this->db_config['connection']); try { $this->link = new PDO('sqlite:'.$socket.$database, $user, $pass, array(PDO::ATTR_PERSISTENT => $this->db_config['persistent'])); $this->link->setAttribute(PDO::ATTR_CASE, PDO::CASE_NATURAL); //$this->link->query('PRAGMA count_changes=1;'); if ($charset = $this->db_config['character_set']) { $this->set_charset($charset); } } catch (PDOException $e) { throw new Kohana_Database_Exception('database.error', $e->getMessage()); } // Clear password after successful connect $this->db_config['connection']['pass'] = NULL; return $this->link; } public function query($sql) { try { $sth = $this->link->prepare($sql); } catch (PDOException $e) { throw new Kohana_Database_Exception('database.error', $e->getMessage()); } return new Pdosqlite_Result($sth, $this->link, $this->db_config['object'], $sql); } public function set_charset($charset) { $this->link->query('PRAGMA encoding = '.$this->escape_str($charset)); } public function escape_table($table) { if ( ! $this->db_config['escape']) return $table; return '`'.str_replace('.', '`.`', $table).'`'; } public function escape_column($column) { if ( ! $this->db_config['escape']) return $column; if ($column == '*') return $column; // This matches any functions we support to SELECT. if ( preg_match('/(avg|count|sum|max|min)\(\s*(.*)\s*\)(\s*as\s*(.+)?)?/i', $column, $matches)) { if ( count($matches) == 3) { return $matches[1].'('.$this->escape_column($matches[2]).')'; } else if ( count($matches) == 5) { return $matches[1].'('.$this->escape_column($matches[2]).') AS '.$this->escape_column($matches[2]); } } // This matches any modifiers we support to SELECT. if ( ! preg_match('/\b(?:rand|all|distinct(?:row)?|high_priority|sql_(?:small_result|b(?:ig_result|uffer_result)|no_cache|ca(?:che|lc_found_rows)))\s/i', $column)) { if (stripos($column, ' AS ') !== FALSE) { // Force 'AS' to uppercase $column = str_ireplace(' AS ', ' AS ', $column); // Runs escape_column on both sides of an AS statement $column = array_map(array($this, __FUNCTION__), explode(' AS ', $column)); // Re-create the AS statement return implode(' AS ', $column); } return preg_replace('/[^.*]+/', '`$0`', $column); } $parts = explode(' ', $column); $column = ''; for ($i = 0, $c = count($parts); $i < $c; $i++) { // The column is always last if ($i == ($c - 1)) { $column .= preg_replace('/[^.*]+/', '`$0`', $parts[$i]); } else // otherwise, it's a modifier { $column .= $parts[$i].' '; } } return $column; } public function limit($limit, $offset = 0) { return 'LIMIT '.$offset.', '.$limit; } public function compile_select($database) { $sql = ($database['distinct'] == TRUE) ? 'SELECT DISTINCT ' : 'SELECT '; $sql .= (count($database['select']) > 0) ? implode(', ', $database['select']) : '*'; if (count($database['from']) > 0) { $sql .= "\nFROM "; $sql .= implode(', ', $database['from']); } if (count($database['join']) > 0) { foreach($database['join'] AS $join) { $sql .= "\n".$join['type'].'JOIN '.implode(', ', $join['tables']).' ON '.$join['conditions']; } } if (count($database['where']) > 0) { $sql .= "\nWHERE "; } $sql .= implode("\n", $database['where']); if (count($database['groupby']) > 0) { $sql .= "\nGROUP BY "; $sql .= implode(', ', $database['groupby']); } if (count($database['having']) > 0) { $sql .= "\nHAVING "; $sql .= implode("\n", $database['having']); } if (count($database['orderby']) > 0) { $sql .= "\nORDER BY "; $sql .= implode(', ', $database['orderby']); } if (is_numeric($database['limit'])) { $sql .= "\n"; $sql .= $this->limit($database['limit'], $database['offset']); } return $sql; } public function escape_str($str) { if ( ! $this->db_config['escape']) return $str; if (function_exists('sqlite_escape_string')) { $res = sqlite_escape_string($str); } else { $res = str_replace("'", "''", $str); } return $res; } public function list_tables() { $sql = "SELECT `name` FROM `sqlite_master` WHERE `type`='table' ORDER BY `name`;"; try { $result = $this->query($sql)->result(FALSE, PDO::FETCH_ASSOC); $tables = array(); foreach ($result as $row) { $tables[] = current($row); } } catch (PDOException $e) { throw new Kohana_Database_Exception('database.error', $e->getMessage()); } return $tables; } public function show_error() { $err = $this->link->errorInfo(); return isset($err[2]) ? $err[2] : 'Unknown error!'; } public function list_fields($table, $query = FALSE) { static $tables; if (is_object($query)) { if (empty($tables[$table])) { $tables[$table] = array(); foreach ($query->result() as $row) { $tables[$table][] = $row->name; } } return $tables[$table]; } else { $result = $this->link->query( 'PRAGMA table_info('.$this->escape_table($table).')' ); foreach ($result as $row) { $tables[$table][$row['name']] = $this->sql_type($row['type']); } return $tables[$table]; } } public function field_data($table) { Kohana::log('error', 'This method is under developing'); } /** * Version number query string * * @access public * @return string */ function version() { return $this->link->getAttribute(constant("PDO::ATTR_SERVER_VERSION")); } } // End Database_PdoSqlite_Driver Class /* * PDO-sqlite Result */ class Pdosqlite_Result extends Database_Result { // Data fetching types protected $fetch_type = PDO::FETCH_OBJ; protected $return_type = PDO::FETCH_ASSOC; /** * Sets up the result variables. * * @param resource query result * @param resource database link * @param boolean return objects or arrays * @param string SQL query that was run */ public function __construct($result, $link, $object = TRUE, $sql) { if (is_object($result) OR $result = $link->prepare($sql)) { // run the query. Return true if success, false otherwise if( ! $result->execute()) { // Throw Kohana Exception with error message. See PDOStatement errorInfo() method $arr_infos = $result->errorInfo(); throw new Kohana_Database_Exception('database.error', $arr_infos[2]); } if (preg_match('/^SELECT|PRAGMA|EXPLAIN/i', $sql)) { $this->result = $result; $this->current_row = 0; $this->total_rows = $this->sqlite_row_count(); $this->fetch_type = ($object === TRUE) ? PDO::FETCH_OBJ : PDO::FETCH_ASSOC; } elseif (preg_match('/^DELETE|INSERT|UPDATE/i', $sql)) { $this->insert_id = $link->lastInsertId(); $this->total_rows = $result->rowCount(); } } else { // SQL error throw new Kohana_Database_Exception('database.error', $link->errorInfo().' - '.$sql); } // Set result type $this->result($object); // Store the SQL $this->sql = $sql; } private function sqlite_row_count() { $count = 0; while ($this->result->fetch()) { $count++; } // The query must be re-fetched now. $this->result->execute(); return $count; } /* * Destructor: __destruct * Magic __destruct function, frees the result. */ public function __destruct() { if (is_object($this->result)) { $this->result->closeCursor(); $this->result = NULL; } } public function result($object = TRUE, $type = PDO::FETCH_BOTH) { $this->fetch_type = (bool) $object ? PDO::FETCH_OBJ : PDO::FETCH_BOTH; if ($this->fetch_type == PDO::FETCH_OBJ) { $this->return_type = (is_string($type) AND Kohana::auto_load($type)) ? $type : 'stdClass'; } else { $this->return_type = $type; } return $this; } public function as_array($object = NULL, $type = PDO::FETCH_ASSOC) { return $this->result_array($object, $type); } public function result_array($object = NULL, $type = PDO::FETCH_ASSOC) { $rows = array(); if (is_string($object)) { $fetch = $object; } elseif (is_bool($object)) { if ($object === TRUE) { $fetch = PDO::FETCH_OBJ; // NOTE - The class set by $type must be defined before fetching the result, // autoloading is disabled to save a lot of stupid overhead. $type = (is_string($type) AND Kohana::auto_load($type)) ? $type : 'stdClass'; } else { $fetch = PDO::FETCH_OBJ; } } else { // Use the default config values $fetch = $this->fetch_type; if ($fetch == PDO::FETCH_OBJ) { $type = (is_string($type) AND Kohana::auto_load($type)) ? $type : 'stdClass'; } } try { while ($row = $this->result->fetch($fetch)) { $rows[] = $row; } } catch(PDOException $e) { throw new Kohana_Database_Exception('database.error', $e->getMessage()); return FALSE; } return $rows; } public function list_fields() { $field_names = array(); for ($i = 0, $max = $this->result->columnCount(); $i < $max; $i++) { $info = $this->result->getColumnMeta($i); $field_names[] = $info['name']; } return $field_names; } public function seek($offset) { // To request a scrollable cursor for your PDOStatement object, you must // set the PDO::ATTR_CURSOR attribute to PDO::CURSOR_SCROLL when you // prepare the statement. Kohana::log('error', get_class($this).' does not support scrollable cursors, '.__FUNCTION__.' call ignored'); return FALSE; } public function offsetGet($offset) { try { return $this->result->fetch($this->fetch_type, PDO::FETCH_ORI_ABS, $offset); } catch(PDOException $e) { throw new Kohana_Database_Exception('database.error', $e->getMessage()); } } public function rewind() { // Same problem that seek() has, see above. return $this->seek(0); } } // End PdoSqlite_Result Class ./kohana/system/libraries/drivers/Cache.php 0000644 0001750 0001750 00000001455 11154023261 020474 0 ustar tokkee tokkee 'apc', * 'requests' => 10000 * ); * Lifetime does not need to be set as it is * overridden by the session expiration setting. * * $Id: Cache.php 3769 2008-12-15 00:48:56Z zombor $ * * @package Core * @author Kohana Team * @copyright (c) 2007-2008 Kohana Team * @license http://kohanaphp.com/license.html */ class Session_Cache_Driver implements Session_Driver { protected $cache; protected $encrypt; public function __construct() { // Load Encrypt library if (Kohana::config('session.encryption')) { $this->encrypt = new Encrypt; } Kohana::log('debug', 'Session Cache Driver Initialized'); } public function open($path, $name) { $config = Kohana::config('session.storage'); if (empty($config)) { // Load the default group $config = Kohana::config('cache.default'); } elseif (is_string($config)) { $name = $config; // Test the config group name if (($config = Kohana::config('cache.'.$config)) === NULL) throw new Kohana_Exception('cache.undefined_group', $name); } $config['lifetime'] = (Kohana::config('session.expiration') == 0) ? 86400 : Kohana::config('session.expiration'); $this->cache = new Cache($config); return is_object($this->cache); } public function close() { return TRUE; } public function read($id) { $id = 'session_'.$id; if ($data = $this->cache->get($id)) { return Kohana::config('session.encryption') ? $this->encrypt->decode($data) : $data; } // Return value must be string, NOT a boolean return ''; } public function write($id, $data) { $id = 'session_'.$id; $data = Kohana::config('session.encryption') ? $this->encrypt->encode($data) : $data; return $this->cache->set($id, $data); } public function destroy($id) { $id = 'session_'.$id; return $this->cache->delete($id); } public function regenerate() { session_regenerate_id(TRUE); // Return new session id return session_id(); } public function gc($maxlifetime) { // Just return, caches are automatically cleaned up return TRUE; } } // End Session Cache Driver ./kohana/system/libraries/drivers/Session/Cookie.php 0000644 0001750 0001750 00000003134 11121324570 022322 0 ustar tokkee tokkee cookie_name = Kohana::config('session.name').'_data'; if (Kohana::config('session.encryption')) { $this->encrypt = Encrypt::instance(); } Kohana::log('debug', 'Session Cookie Driver Initialized'); } public function open($path, $name) { return TRUE; } public function close() { return TRUE; } public function read($id) { $data = (string) cookie::get($this->cookie_name); if ($data == '') return $data; return empty($this->encrypt) ? base64_decode($data) : $this->encrypt->decode($data); } public function write($id, $data) { $data = empty($this->encrypt) ? base64_encode($data) : $this->encrypt->encode($data); if (strlen($data) > 4048) { Kohana::log('error', 'Session ('.$id.') data exceeds the 4KB limit, ignoring write.'); return FALSE; } return cookie::set($this->cookie_name, $data, Kohana::config('session.expiration')); } public function destroy($id) { return cookie::delete($this->cookie_name); } public function regenerate() { session_regenerate_id(TRUE); // Return new id return session_id(); } public function gc($maxlifetime) { return TRUE; } } // End Session Cookie Driver Class ./kohana/system/libraries/drivers/Session/Database.php 0000644 0001750 0001750 00000006511 11121324570 022617 0 ustar tokkee tokkee encrypt = Encrypt::instance(); } if (is_array($config['storage'])) { if ( ! empty($config['storage']['group'])) { // Set the group name $this->db = $config['storage']['group']; } if ( ! empty($config['storage']['table'])) { // Set the table name $this->table = $config['storage']['table']; } } // Load database $this->db = Database::instance($this->db); Kohana::log('debug', 'Session Database Driver Initialized'); } public function open($path, $name) { return TRUE; } public function close() { return TRUE; } public function read($id) { // Load the session $query = $this->db->from($this->table)->where('session_id', $id)->limit(1)->get()->result(TRUE); if ($query->count() === 0) { // No current session $this->session_id = NULL; return ''; } // Set the current session id $this->session_id = $id; // Load the data $data = $query->current()->data; return ($this->encrypt === NULL) ? base64_decode($data) : $this->encrypt->decode($data); } public function write($id, $data) { $data = array ( 'session_id' => $id, 'last_activity' => time(), 'data' => ($this->encrypt === NULL) ? base64_encode($data) : $this->encrypt->encode($data) ); if ($this->session_id === NULL) { // Insert a new session $query = $this->db->insert($this->table, $data); } elseif ($id === $this->session_id) { // Do not update the session_id unset($data['session_id']); // Update the existing session $query = $this->db->update($this->table, $data, array('session_id' => $id)); } else { // Update the session and id $query = $this->db->update($this->table, $data, array('session_id' => $this->session_id)); // Set the new session id $this->session_id = $id; } return (bool) $query->count(); } public function destroy($id) { // Delete the requested session $this->db->delete($this->table, array('session_id' => $id)); // Session id is no longer valid $this->session_id = NULL; return TRUE; } public function regenerate() { // Generate a new session id session_regenerate_id(); // Return new session id return session_id(); } public function gc($maxlifetime) { // Delete all expired sessions $query = $this->db->delete($this->table, array('last_activity <' => time() - $maxlifetime)); Kohana::log('debug', 'Session garbage collected: '.$query->count().' row(s) deleted.'); return TRUE; } } // End Session Database Driver ./kohana/system/libraries/drivers/Database.php 0000644 0001750 0001750 00000031050 11201063060 021161 0 ustar tokkee tokkee escape_table($table).' WHERE '.implode(' ', $where); } /** * Builds an UPDATE query. * * @param string table name * @param array key => value pairs * @param array where clause * @return string */ public function update($table, $values, $where) { foreach ($values as $key => $val) { $valstr[] = $this->escape_column($key).' = '.$val; } return 'UPDATE '.$this->escape_table($table).' SET '.implode(', ', $valstr).' WHERE '.implode(' ',$where); } /** * Set the charset using 'SET NAMES