From eba717f95f586d2538007bd18da6e9b32b076c30 Mon Sep 17 00:00:00 2001
From: Bharat Mediratta <bharat@menalto.com>
Date: Fri, 31 Oct 2008 22:12:14 +0000
Subject: Merge over vendor code.

git-svn-id: http://gallery.svn.sourceforge.net/svnroot/gallery/trunk/eval/gx/gallery3/trunk@18408 57fcd75e-5312-0410-8df3-f5eb6fbb1595
---
 kohana/core/utf8/str_split.php | 33 +++++++++++++++++++++++++++++++++
 1 file changed, 33 insertions(+)
 create mode 100644 kohana/core/utf8/str_split.php

(limited to 'kohana/core/utf8/str_split.php')

diff --git a/kohana/core/utf8/str_split.php b/kohana/core/utf8/str_split.php
new file mode 100644
index 00000000..128caa94
--- /dev/null
+++ b/kohana/core/utf8/str_split.php
@@ -0,0 +1,33 @@
+<?php defined('SYSPATH') or die('No direct script access.');
+/**
+ * utf8::str_split
+ *
+ * @package    Core
+ * @author     Kohana Team
+ * @copyright  (c) 2007 Kohana Team
+ * @copyright  (c) 2005 Harry Fuecks
+ * @license    http://www.gnu.org/licenses/old-licenses/lgpl-2.1.txt
+ */
+function _str_split($str, $split_length = 1)
+{
+	$split_length = (int) $split_length;
+
+	if (utf8::is_ascii($str))
+	{
+		return str_split($str, $split_length);
+	}
+
+	if ($split_length < 1)
+	{
+		return FALSE;
+	}
+
+	if (utf8::strlen($str) <= $split_length)
+	{
+		return array($str);
+	}
+
+	preg_match_all('/.{'.$split_length.'}|[^\x00]{1,'.$split_length.'}$/us', $str, $matches);
+
+	return $matches[0];
+}
\ No newline at end of file
-- 
cgit v1.2.3