From 94d2fc1815a919734353c942f224db1de4b4fcb8 Mon Sep 17 00:00:00 2001
From: Tom Willemsen
Date: Mon, 7 Mar 2011 09:04:49 +0100
Subject: Django, org
* Added nxhtml, mostly for django support.
* Changed some org settings.
---
emacs.d/nxhtml/tests/in/bug559772-TextHelper.php | 205 +++++++++++++++++++++++
1 file changed, 205 insertions(+)
create mode 100644 emacs.d/nxhtml/tests/in/bug559772-TextHelper.php
(limited to 'emacs.d/nxhtml/tests/in/bug559772-TextHelper.php')
diff --git a/emacs.d/nxhtml/tests/in/bug559772-TextHelper.php b/emacs.d/nxhtml/tests/in/bug559772-TextHelper.php
new file mode 100644
index 0000000..0d3bffb
--- /dev/null
+++ b/emacs.d/nxhtml/tests/in/bug559772-TextHelper.php
@@ -0,0 +1,205 @@
+
+ * (c) 2004 David Heinemeier Hansson
+ *
+ * For the full copyright and license information, please view the LICENSE
+ * file that was distributed with this source code.
+ */
+
+/**
+ * TextHelper.
+ *
+ * @package symfony
+ * @subpackage helper
+ * @author Fabien Potencier
+ * @author David Heinemeier Hansson
+ * @version SVN: $Id: TextHelper.php 3699 2007-04-02 11:47:32Z fabien $
+ */
+
+/**
+ * Truncates +text+ to the length of +length+ and replaces the last three characters with the +truncate_string+
+ * if the +text+ is longer than +length+.
+ */
+function truncate_text($text, $length = 30, $truncate_string = '...', $truncate_lastspace = false)
+{
+ if ($text == '')
+ {
+ return '';
+ }
+
+ if (strlen($text) > $length)
+ {
+ $truncate_text = substr($text, 0, $length - strlen($truncate_string));
+ if ($truncate_lastspace)
+ {
+ $truncate_text = preg_replace('/\s+?(\S+)?$/', '', $truncate_text);
+ }
+
+ return $truncate_text.$truncate_string;
+ }
+ else
+ {
+ return $text;
+ }
+}
+
+/**
+ * Highlights the +phrase+ where it is found in the +text+ by surrounding it like
+ * I'm a highlight phrase. The highlighter can be specialized by
+ * passing +highlighter+ as single-quoted string with \1 where the phrase is supposed to be inserted.
+ * N.B.: The +phrase+ is sanitized to include only letters, digits, and spaces before use.
+ */
+function highlight_text($text, $phrase, $highlighter = '\\1')
+{
+ if ($text == '')
+ {
+ return '';
+ }
+
+ if ($phrase == '')
+ {
+ return $text;
+ }
+
+ return preg_replace('/('.preg_quote($phrase, '/').')/i', $highlighter, $text);
+}
+
+/**
+ * Extracts an excerpt from the +text+ surrounding the +phrase+ with a number of characters on each side determined
+ * by +radius+. If the phrase isn't found, nil is returned. Ex:
+ * excerpt("hello my world", "my", 3) => "...lo my wo..."
+ */
+function excerpt_text($text, $phrase, $radius = 100, $excerpt_string = '...')
+{
+ if ($text == '' || $phrase == '')
+ {
+ return '';
+ }
+
+ $found_pos = strpos(strtolower($text), strtolower($phrase));
+ if ($found_pos !== false)
+ {
+ $start_pos = max($found_pos - $radius, 0);
+ $end_pos = min($found_pos + strlen($phrase) + $radius, strlen($text));
+
+ $prefix = ($start_pos > 0) ? $excerpt_string : '';
+ $postfix = $end_pos < strlen($text) ? $excerpt_string : '';
+
+ return $prefix.substr($text, $start_pos, $end_pos - $start_pos).$postfix;
+ }
+}
+
+/**
+ * Word wrap long lines to line_width.
+ */
+function wrap_text($text, $line_width = 80)
+{
+ return preg_replace('/(.{1,'.$line_width.'})(\s+|$)/s', "\\1\n", preg_replace("/\n/", "\n\n", $text));
+}
+
+/*
+ # Returns +text+ transformed into html using very simple formatting rules
+ # Surrounds paragraphs with <p> tags, and converts line breaks into <br />
+ # Two consecutive newlines(\n\n) are considered as a paragraph, one newline (\n) is
+ # considered a linebreak, three or more consecutive newlines are turned into two newlines
+*/
+function simple_format_text($text, $options = array())
+{
+ $css = (isset($options['class'])) ? ' class="'.$options['class'].'"' : '';
+
+ $text = sfToolkit::pregtr($text, array("/(\r\n|\r)/" => "\n", // lets make them newlines crossplatform
+ "/\n{3,}/" => "\n\n", // zap dupes
+ "/\n\n/" => "
\\0", // turn two newlines into paragraph
+ "/([^\n])\n([^\n])/" => "\\1\n
\\2")); // turn single newline into
+
+ return '
'.$text.'
'; // wrap the first and last line in paragraphs before we're done
+}
+
+/**
+ * Turns all urls and email addresses into clickable links. The +link+ parameter can limit what should be linked.
+ * Options are :all (default), :email_addresses, and :urls.
+ *
+ * Example:
+ * auto_link("Go to http://www.symfony-project.com and say hello to fabien.potencier@example.com") =>
+ * Go to http://www.symfony-project.com and
+ * say hello to fabien.potencier@example.com
+ */
+function auto_link_text($text, $link = 'all', $href_options = array())
+{
+ if ($link == 'all')
+ {
+ return _auto_link_urls(_auto_link_email_addresses($text), $href_options);
+ }
+ else if ($link == 'email_addresses')
+ {
+ return _auto_link_email_addresses($text);
+ }
+ else if ($link == 'urls')
+ {
+ return _auto_link_urls($text, $href_options);
+ }
+}
+
+/*
+ * Turns all links into words, like "else" to "else".
+ */
+function strip_links_text($text)
+{
+ return preg_replace('/(.*)<\/a>/m', '\\1', $text);
+}
+
+if (!defined('SF_AUTO_LINK_RE'))
+{
+ define('SF_AUTO_LINK_RE', '~
+ ( # leading text
+ <\w+.*?>| # leading HTML tag, or
+ [^=!:\'"/]| # leading punctuation, or
+ ^ # beginning of line
+ )
+ (
+ (?:https?://)| # protocol spec, or
+ (?:www\.) # www.*
+ )
+ (
+ [-\w]+ # subdomain or domain
+ (?:\.[-\w]+)* # remaining subdomains or domain
+ (?::\d+)? # port
+ (?:/(?:(?:[\~\w\+%-]|(?:[,.;:][^\s$]))+)?)* # path
+ (?:\?[\w\+%&=.;-]+)? # query string
+ (?:\#[\w\-]*)? # trailing anchor
+ )
+ ([[:punct:]]|\s|<|$) # trailing text
+ ~x');
+}
+
+/**
+ * Turns all urls into clickable links.
+ */
+function _auto_link_urls($text, $href_options = array())
+{
+ $href_options = _tag_options($href_options);
+ return preg_replace_callback(
+ SF_AUTO_LINK_RE,
+ create_function('$matches', '
+ if (preg_match("/\'.$matches[2].$matches[3].\'\'.$matches[4];
+ }
+ ')
+ , $text);
+}
+
+/**
+ * Turns all email addresses into clickable links.
+ */
+function _auto_link_email_addresses($text)
+{
+ return preg_replace('/([\w\.!#\$%\-+.]+@[A-Za-z0-9\-]+(\.[A-Za-z0-9\-]+)+)/', '\\1', $text);
+}
--
cgit v1.2.3-54-g00ecf