From f3f0262c480d7e509b008d37c90aed884532bba8 Mon Sep 17 00:00:00 2001 From: andi Date: Wed, 12 Jan 2005 21:24:54 +0100 Subject: Initial revision. darcs-hash:20050112202454-9977f-60936f24fe2092a30223627e0683de2df61d0c4a.gz --- inc/geshi.php | 2413 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 2413 insertions(+) create mode 100644 inc/geshi.php (limited to 'inc/geshi.php') diff --git a/inc/geshi.php b/inc/geshi.php new file mode 100644 index 000000000..c1231fb59 --- /dev/null +++ b/inc/geshi.php @@ -0,0 +1,2413 @@ + 'No source code inputted', + GESHI_ERROR_NO_SUCH_LANG => 'GeSHi could not find the language {LANGUAGE} (using path {PATH})' +); + +// Line numbers - use with enable_line_numbers() +define('GESHI_NO_LINE_NUMBERS', 0); +define('GESHI_NORMAL_LINE_NUMBERS', 1); +define('GESHI_FANCY_LINE_NUMBERS', 2); + +// Strict mode - shouldn't be used by your scripts +define('GESHI_NEVER', 0); +define('GESHI_MAYBE', 1); +define('GESHI_ALWAYS', 2); + +// Container HTML type - use these (added in 1.0.1) +define('GESHI_HEADER_DIV', 1); +define('GESHI_HEADER_PRE', 2); + +// Capatalisation constants - use these (added in 1.0.1) +define('GESHI_CAPS_NO_CHANGE', 0); +define('GESHI_CAPS_UPPER', 1); +define('GESHI_CAPS_LOWER', 2); + +// Link style constants - use these (added in 1.0.2) +define('GESHI_LINK', 0); +define('GESHI_HOVER', 1); +define('GESHI_ACTIVE', 2); +define('GESHI_VISITED', 3); + +// Important string starter/finisher - use these (added in 1.0.2). +// Note that if you change these, they should be as-is: i.e., don't +// write them as if they had been run through htmlentities() +define('GESHI_START_IMPORTANT', ''); +define('GESHI_END_IMPORTANT', ''); + +// Advanced regexp handling - don't use these (added in 1.0.2) +define('GESHI_SEARCH', 0); +define('GESHI_REPLACE', 1); +define('GESHI_MODIFIERS', 2); +define('GESHI_BEFORE', 3); +define('GESHI_AFTER', 4); + +// Begin Class GeSHi +class GeSHi +{ + // + // Data Fields + // + + // Basic fields + var $source = ''; // The source code to highlight + var $language = ''; // The language to use when highlighting + var $language_data = array(); // The data for the language used + var $language_path = 'geshi/'; // The path to the language files + var $error = false; // The error message associated with an error + var $strict_mode = false; // Whether highlighting is strict or not + var $use_classes = false; // Whether to use classes + var $header_type = GESHI_HEADER_PRE; // The type of header to use + var $lexic_permissions = array(); // Array of permissions for which lexics should be highlighted + // Added in 1.0.2 basic fields + var $time = 0; // The time it took to parse the code + var $header_content = ''; // The content of the header block + var $footer_content = ''; // The content of the footer block + var $header_content_style = ''; // The style of the header block + var $footer_content_style = ''; // The style of the footer block + var $link_styles = array(); // The styles for hyperlinks in the code + var $enable_important_blocks = true; // Whether important blocks should be recognised or not + var $important_styles = 'font-weight: bold; color: red;'; // Styles for important parts of the code + var $add_ids = false; // Whether css IDs should be added to the code + var $highlight_extra_lines = array(); // Lines that should be highlighted extra + var $highlight_extra_lines_style = 'color: #cc0; background-color: #ffc;';// Styles of extra-highlighted lines + var $line_numbers_start = 1; // Number at which line numbers should start at + + // Style fields + var $overall_style = ''; // The overall style for this code block + // The style for the actual code + var $code_style = 'font-family: \'Courier New\', Courier, monospace; font-weight: normal;'; + var $overall_class = ''; // The overall class for this code block + var $overall_id = ''; // The overall id for this code block + // Line number styles + var $line_style1 = 'font-family: \'Courier New\', Courier, monospace; color: black; font-weight: normal; font-style: normal;'; + var $line_style2 = 'font-weight: bold;'; + var $line_numbers = GESHI_NO_LINE_NUMBERS; // Flag for how line numbers are displayed + var $line_nth_row = 0; // The "nth" value for fancy line highlighting + + // Misc + var $tab_width = 8; // A value for the size of tab stops. + var $max_tabs = 20; // Maximum number of spaces per tab + var $min_tabs = 0; // Minimum " " " " " + var $link_target = ''; // default target for keyword links + var $encoding = ''; // The encoding to use for htmlentities() calls + + // Deprecated/unused + var $output_format = GESHI_OUTPUT_HTML; + + + /** + * constructor: GeSHi + * ------------------ + * Creates a new GeSHi object, with source and language + */ + function GeSHi ($source, $language, $path = 'geshi/') + { + $this->source = $source; + // Security, just in case :) + $language = preg_replace('#[^a-zA-Z0-9\-\_]#', '', $language); + $this->language = strtolower($language); + $this->language_path = ( substr($path, strlen($path) - 1, 1) == '/' ) ? $path : $path . '/'; + $this->load_language(); + } + + + // + // Error methods + // + + /** + * method: error + * ------------- + * Returns an error message associated with the last GeSHi operation, + * or false if no error has occured + */ + function error() + { + global $_GESHI_ERRORS; + if ( $this->error != 0 ) + { + $msg = $_GESHI_ERRORS[$this->error]; + $debug_tpl_vars = array( + '{LANGUAGE}' => $this->language, + '{PATH}' => $this->language_path + ); + foreach ( $debug_tpl_vars as $tpl => $var ) + { + $msg = str_replace($tpl, $var, $msg); + } + return "
GeSHi Error: $msg (code $this->error)
"; + } + return false; + } + + + // + // Getters + // + + /** + * get_language_name() + * --------------- + * Gets a human-readable language name (thanks to Simon Patterson + * for the idea :)) + */ + function get_language_name() + { + if ( $this->error == GESHI_ERROR_NO_SUCH_LANG ) + { + return $this->language_data['LANG_NAME'] . ' (Unknown Language)'; + } + return $this->language_data['LANG_NAME']; + } + + + // + // Setters + // + + /** + * method: set_source + * ------------------ + * Sets the source code for this object + */ + function set_source ( $source ) + { + $this->source = $source; + } + + + /** + * method: set_language + * -------------------- + * Sets the language for this object + */ + function set_language ( $language ) + { + $language = preg_replace('#[^a-zA-Z0-9\-_]#', '', $language); + $this->language = strtolower($language); + // Load the language for parsing + $this->load_language(); + } + + + /** + * method: set_language_path + * ------------------------- + * Sets the path to the directory containing the language files. NOTE + * that this path is relative to the directory of the script that included + * geshi.php, NOT geshi.php itself. + */ + function set_language_path ( $path ) + { + $this->language_path = ( substr($path, strlen($path) - 1, 1) == '/' ) ? $path : $path . '/'; + } + + + /** + * method: set_header_type + * ----------------------- + * Sets the type of header to be used. If GESHI_HEADER_DIV is used, + * the code is surrounded in a
. This means more source code but + * more control over tab width and line-wrapping. GESHI_HEADER_PRE + * means that a 
 is used - less source, but less control. Default
+	 * is GESHI_HEADER_PRE
+	 */
+	function set_header_type ( $type )
+	{
+		$this->header_type = $type;
+	}
+
+
+	/**
+	 * method: set_overall_style
+	 * -------------------------
+	 * Sets the styles for the code that will be outputted
+	 * when this object is parsed. The style should be a
+	 * string of valid stylesheet declarations
+	 */
+	function set_overall_style ( $style, $preserve_defaults = false )
+	{
+		if ( $preserve_defaults )
+		{
+			$this->overall_style .= $style;
+		}
+		else
+		{
+			$this->overall_style = $style;
+		}
+	}
+
+
+	/**
+	 * method: set_overall_class
+	 * -------------------------
+	 * Sets the overall classname for this block of code. This
+	 * class can then be used in a stylesheet to style this object's
+	 * output
+	 */
+	function set_overall_class ( $class )
+	{
+		$this->overall_class = $class;
+	}
+
+
+	/**
+	 * method: set_overall_id
+	 * ----------------------
+	 * Sets the overall id for this block of code. This id can then
+	 * be used in a stylesheet to style this object's output
+	 */
+	function set_overall_id ( $id )
+	{
+		$this->overall_id = $id;
+	}
+
+
+	/**
+	 * method: enable_classes
+	 * ----------------------
+	 * Sets whether CSS classes should be used to highlight the source. Default
+	 * is off, calling this method with no arguments will turn it on
+	 */
+	function enable_classes ( $flag = true )
+	{
+		$this->use_classes = ( $flag ) ? true : false;
+	}
+
+
+	/**
+	 * method: set_code_style
+	 * ----------------------
+	 * Sets the style for the actual code. This should be a string
+	 * containing valid stylesheet declarations. If $preserve_defaults is
+	 * true, then styles are merged with the default styles, with the
+	 * user defined styles having priority
+	 *
+	 * NOTE: Use this method to override any style changes you made to
+	 * the line numbers if you are using line numbers, else the line of
+	 * code will have the same style as the line number! Consult the
+	 * GeSHi documentation for more information about this.
+	 */
+	function set_code_style ( $style, $preserve_defaults )
+	{
+		if ( $preserve_defaults )
+		{
+			$this->code_style .= $style;
+		}
+		else
+		{
+			$this->code_style = $style;
+		}
+	}
+
+
+	/**
+	 * method: set_line_style
+	 * ----------------------
+	 * Sets the styles for the line numbers. This should be a string
+	 * containing valid stylesheet declarations. If $preserve_defaults is
+	 * true, then styles are merged with the default styles, with the
+	 * user defined styles having priority
+	 */
+	function set_line_style ( $style1, $style2 = '', $preserve_defaults = false )
+	{
+		if ( is_bool($style2) )
+		{
+			$preserve_defaults = $style2;
+			$style2 = '';
+		}
+		if ( $preserve_defaults )
+		{
+			$this->line_style1 .= $style1;
+			$this->line_style2 .= $style2;
+		}
+		else
+		{
+			$this->line_style1 = $style1;
+			$this->line_style2 = $style2;
+		}
+	}
+
+
+	/**
+	 * method: enable_line_numbers
+	 * ---------------------------
+	 * Sets whether line numbers should be displayed. GESHI_NO_LINE_NUMBERS = not displayed,
+	 * GESHI_NORMAL_LINE_NUMBERS = displayed, GESHI_FANCY_LINE_NUMBERS = every nth line a
+	 * different class. Default is for no line numbers to be used
+	 */
+	function enable_line_numbers ( $flag, $nth_row = 5 )
+	{
+		$this->line_numbers = $flag;
+		$this->line_nth_row = $nth_row;
+	}
+
+
+	/**
+	 * method: set_keyword_group_style
+	 * -------------------------------
+	 * Sets the style for a keyword group. If $preserve_defaults is
+	 * true, then styles are merged with the default styles, with the
+	 * user defined styles having priority
+	 */
+	function set_keyword_group_style ( $key, $style, $preserve_defaults = false )
+	{
+		if ( $preserve_defaults )
+		{
+			$this->language_data['STYLES']['KEYWORDS'][$key] .= $style;
+		}
+		else
+		{
+			$this->language_data['STYLES']['KEYWORDS'][$key] = $style;
+		}
+	}
+
+
+	/**
+	 * method: set_keyword_group_highlighting
+	 * --------------------------------------
+	 * Turns highlighting on/off for a keyword group
+	 */
+	function set_keyword_group_highlighting ( $key, $flag = true )
+	{
+		$this->lexic_permissions['KEYWORDS'][$key] = ( $flag ) ? true : false;
+	}
+
+
+	/**
+	 * method: set_comments_style
+	 * --------------------------
+	 * Sets the styles for comment groups.  If $preserve_defaults is
+	 * true, then styles are merged with the default styles, with the
+	 * user defined styles having priority
+	 */
+	function set_comments_style ( $key, $style, $preserve_defaults = false )
+	{
+		if ( $preserve_defaults )
+		{
+			$this->language_data['STYLES']['COMMENTS'][$key] .= $style;
+		}
+		else
+		{
+			$this->language_data['STYLES']['COMMENTS'][$key] = $style;
+		}
+	}
+
+
+	/**
+	 * method: set_comments_highlighting
+	 * ---------------------------------
+	 * Turns highlighting on/off for comment groups
+	 */
+	function set_comments_highlighting ( $key, $flag = true )
+	{
+		$this->lexic_permissions['COMMENTS'][$key] = ( $flag ) ? true : false;
+	}
+
+
+	/**
+	 * method: set_escape_characters_style
+	 * -----------------------------------
+	 * Sets the styles for escaped characters. If $preserve_defaults is
+	 * true, then styles are merged with the default styles, with the
+	 * user defined styles having priority
+	 */
+	function set_escape_characters_style ( $style, $preserve_defaults = false )
+	{
+		if ( $preserve_defaults )
+		{
+			$this->language_data['STYLES']['ESCAPE_CHAR'][0] .= $style;
+		}
+		else
+		{
+			$this->language_data['STYLES']['ESCAPE_CHAR'][0] = $style;
+		}
+	}
+
+
+	/**
+	 * method: set_escape_characters_highlighting
+	 * ------------------------------------------
+	 * Turns highlighting on/off for escaped characters
+	 */
+	function set_escape_characters_highlighting ( $flag = true )
+	{
+		$this->lexic_permissions['ESCAPE_CHAR'] = ( $flag ) ? true : false;
+	}
+
+
+	/**
+	 * method: set_brackets_style
+	 * --------------------------
+	 * Sets the styles for brackets. If $preserve_defaults is
+	 * true, then styles are merged with the default styles, with the
+	 * user defined styles having priority
+	 *
+	 * This method is DEPRECATED: use set_symbols_style instead.
+	 * This method will be removed in 1.2.X
+	 */
+	function set_brackets_style ( $style, $preserve_defaults = false )
+	{
+		if ( $preserve_defaults )
+		{
+			$this->language_data['STYLES']['BRACKETS'][0] .= $style;
+		}
+		else
+		{
+			$this->language_data['STYLES']['BRACKETS'][0] = $style;
+		}
+	}
+
+
+	/**
+	 * method: set_brackets_highlighting
+	 * ---------------------------------
+	 * Turns highlighting on/off for brackets
+	 *
+	 * This method is DEPRECATED: use set_symbols_highlighting instead.
+	 * This method will be remove in 1.2.X
+	 */
+	function set_brackets_highlighting ( $flag )
+	{
+		$this->lexic_permissions['BRACKETS'] = ( $flag ) ? true : false;
+	}
+
+
+	/**
+	 * method: set_symbols_style
+	 * --------------------------
+	 * Sets the styles for symbols. If $preserve_defaults is
+	 * true, then styles are merged with the default styles, with the
+	 * user defined styles having priority
+	 */
+	function set_symbols_style ( $style, $preserve_defaults = false )
+	{
+		if ( $preserve_defaults )
+		{
+			$this->language_data['STYLES']['SYMBOLS'][0] .= $style;
+		}
+		else
+		{
+			$this->language_data['STYLES']['SYMBOLS'][0] = $style;
+		}
+		// For backward compatibility
+		$this->set_brackets_style ( $style, $preserve_defaults );
+	}
+
+
+	/**
+	 * method: set_symbols_highlighting
+	 * ---------------------------------
+	 * Turns highlighting on/off for symbols
+	 */
+	function set_symbols_highlighting ( $flag )
+	{
+		$this->lexic_permissions['SYMBOLS'] = ( $flag ) ? true : false;
+		// For backward compatibility
+		$this->set_brackets_highlighting ( $flag );
+	}
+
+
+	/**
+	 * method: set_strings_style
+	 * -------------------------
+	 * Sets the styles for strings. If $preserve_defaults is
+	 * true, then styles are merged with the default styles, with the
+	 * user defined styles having priority
+	 */
+	function set_strings_style ( $style, $preserve_defaults = false )
+	{
+		if ( $preserve_defaults )
+		{
+			$this->language_data['STYLES']['STRINGS'][0] .= $style;
+		}
+		else
+		{
+			$this->language_data['STYLES']['STRINGS'][0] = $style;
+		}
+	}
+
+
+	/**
+	 * method: set_strings_highlighting
+	 * --------------------------------
+	 * Turns highlighting on/off for strings
+	 */
+	function set_strings_highlighting ( $flag )
+	{
+		$this->lexic_permissions['STRINGS'] = ( $flag ) ? true : false;
+	}
+
+
+	/**
+	 * method: set_numbers_style
+	 * -------------------------
+	 * Sets the styles for numbers. If $preserve_defaults is
+	 * true, then styles are merged with the default styles, with the
+	 * user defined styles having priority
+	 */
+	function set_numbers_style ( $style, $preserve_defaults = false )
+	{
+		if ( $preserve_defaults )
+		{
+			$this->language_data['STYLES']['NUMBERS'][0] .= $style;
+		}
+		else
+		{
+			$this->language_data['STYLES']['NUMBERS'][0] = $style;
+		}
+	}
+
+
+	/**
+	 * method: set_numbers_highlighting
+	 * --------------------------------
+	 * Turns highlighting on/off for numbers
+	 */
+	function set_numbers_highlighting ( $flag )
+	{
+		$this->lexic_permissions['NUMBERS'] = ( $flag ) ? true : false;
+	}
+
+
+	/**
+	 * method: set_methods_style
+	 * -------------------------
+	 * Sets the styles for methods. $key is a number that references the
+	 * appropriate "object splitter" - see the language file for the language
+	 * you are highlighting to get this number. If $preserve_defaults is
+	 * true, then styles are merged with the default styles, with the
+	 * user defined styles having priority
+	 */
+	function set_methods_style ( $key, $style, $preserve_defaults = false )
+	{
+		if ( $preserve_defaults )
+		{
+			$this->language_data['STYLES']['METHODS'][$key] .= $style;
+		}
+		else
+		{
+			$this->language_data['STYLES']['METHODS'][$key] = $style;
+		}
+	}
+
+
+	/**
+	 * method: set_methods_highlighting
+	 * --------------------------------
+	 * Turns highlighting on/off for methods
+	 */
+	function set_methods_highlighting ( $flag )
+	{
+		$this->lexic_permissions['METHODS'] = ( $flag ) ? true : false;
+	}
+
+
+	/**
+	 * method: set_regexps_style
+	 * -------------------------
+	 * Sets the styles for regexps. If $preserve_defaults is
+	 * true, then styles are merged with the default styles, with the
+	 * user defined styles having priority
+	 */
+	function set_regexps_style ( $key, $style, $preserve_defaults = false )
+	{
+		if ( $preserve_defaults )
+		{
+			$this->language_data['STYLES']['REGEXPS'][$key] .= $style;
+		}
+		else
+		{
+			$this->language_data['STYLES']['REGEXPS'][$key] = $style;
+		}
+	}
+
+
+	/**
+	 * method: set_regexps_highlighting
+	 * --------------------------------
+	 * Turns highlighting on/off for regexps
+	 */
+	function set_regexps_highlighting ( $key, $flag )
+	{
+		$this->lexic_permissions['REGEXPS'][$key] = ( $flag ) ? true : false;
+	}
+
+
+	/**
+	 * method: set_case_sensitivity
+	 * ----------------------------
+	 * Sets whether a set of keywords are checked for in a case sensitive manner
+	 */
+	function set_case_sensitivity ( $key, $case )
+	{
+		$this->language_data['CASE_SENSITIVE'][$key] = ( $case ) ? true : false;
+	}
+
+
+	/**
+	 * method: set_case_keywords
+	 * -------------------------
+	 * Sets the case that keywords should use when found. Use the constants:
+	 *   GESHI_CAPS_NO_CHANGE: leave keywords as-is
+	 *   GESHI_CAPS_UPPER: convert all keywords to uppercase where found
+	 *   GESHI_CAPS_LOWER: convert all keywords to lowercase where found
+	 * Method added in 1.0.1
+	 */
+	function set_case_keywords ( $case )
+	{
+		$this->language_data['CASE_KEYWORDS'] = $case;
+	}
+
+
+	/**
+	 * method: set_tab_width
+	 * ---------------------
+	 * Sets how many spaces a tab is substituted for
+	 * This method will probably be re-engineered later to allow customisability
+	 * in the maximum and minimum number of tabs without mutulating data fields.
+	 */
+	function set_tab_width ( $width )
+	{
+		if ( $width > $this->max_tabs ) $width = $this->max_tabs;
+		if ( $width < $this->min_tabs ) $width = $this->min_tabs;
+		$this->tab_width = $width;
+	}
+
+
+	/**
+	 * method: enable_strict_mode
+	 * --------------------------
+	 * Enables/disables strict highlighting. Default is off, calling this
+	 * method without parameters will turn it on. See documentation
+	 * for more details on strict mode and where to use it
+	 */
+	function enable_strict_mode ( $mode = true )
+	{
+		$this->strict_mode = ( $mode ) ? true : false;
+		// Turn on strict mode no matter what if language should always
+		// be in strict mode
+		if ( $this->language_data['STRICT_MODE_APPLIES'] == GESHI_ALWAYS )
+		{
+			$this->strict_mode = true;
+		}
+		// Turn off strict mode no matter what if language should never
+		// be in strict mode
+		elseif ( $this->language_data['STRICT_MODE_APPLIES'] == GESHI_NEVER )
+		{
+			$this->strict_mode = false;
+		}
+	}
+
+
+	/**
+	 * method: disable_highlighting
+	 * ----------------------------
+	 * Disables all highlighting
+	 */
+	function disable_highlighting ()
+	{
+		foreach ( $this->language_data['KEYWORDS'] as $key => $words )
+		{
+			$this->lexic_permissions['KEYWORDS'][$key] = false;
+		}
+		foreach ( $this->language_data['COMMENT_SINGLE'] as $key => $comment )
+		{
+			$this->lexic_permissions['COMMENTS'][$key] = false;
+		}
+		// Multiline comments
+		$this->lexic_permissions['COMMENTS']['MULTI'] = false;
+		// Escape characters
+		$this->lexic_permissions['ESCAPE_CHAR'] = false;
+		// Brackets
+		$this->lexic_permissions['BRACKETS'] = false;
+		// Strings
+		$this->lexic_permissions['STRINGS'] = false;
+		// Numbers
+		$this->lexic_permissions['NUMBERS'] = false;
+		// Methods
+		$this->lexic_permissions['METHODS'] = false;
+		// Symbols
+		$this->lexic_permissions['SYMBOLS'] = false;
+		// Script
+		$this->lexic_permissions['SCRIPT'] = false;
+		// Regexps
+		foreach ( $this->language_data['REGEXPS'] as $key => $regexp )
+		{
+			$this->lexic_permissions['REGEXPS'][$key] = false;
+		}
+		// Context blocks
+		$this->enable_important_blocks = false;
+	}
+
+
+	/**
+	 * method: enable_highlighting
+	 * ---------------------------
+	 * Enables all highlighting
+	 */
+	function enable_highlighting ()
+	{
+		foreach ( $this->language_data['KEYWORDS'] as $key => $words )
+		{
+			$this->lexic_permissions['KEYWORDS'][$key] = true;
+		}
+		foreach ( $this->language_data['COMMENT_SINGLE'] as $key => $comment )
+		{
+			$this->lexic_permissions['COMMENTS'][$key] = true;
+		}
+		// Multiline comments
+		$this->lexic_permissions['COMMENTS']['MULTI'] = true;
+		// Escape characters
+		$this->lexic_permissions['ESCAPE_CHAR'] = true;
+		// Brackets
+		$this->lexic_permissions['BRACKETS'] = true;
+		// Strings
+		$this->lexic_permissions['STRINGS'] = true;
+		// Numbers
+		$this->lexic_permissions['NUMBERS'] = true;
+		// Methods
+		$this->lexic_permissions['METHODS'] = true;
+		// Symbols
+		$this->lexic_permissions['SYMBOLS'] = true;
+		// Script
+		$this->lexic_permissions['SCRIPT'] = true;
+		// Regexps
+		foreach ( $this->language_data['REGEXPS'] as $key => $regexp )
+		{
+			$this->lexic_permissions['REGEXPS'][$key] = true;
+		}
+		// Context blocks
+		$this->enable_important_blocks = true;
+	}
+
+
+	/**
+	 * method: add_keyword
+	 * -------------------
+	 * Adds a keyword to a keyword group for highlighting
+	 */
+	function add_keyword( $key, $word )
+	{
+		$this->language_data['KEYWORDS'][$key][] = $word;
+	}
+
+
+	/**
+	 * method: remove_keyword
+	 * ----------------------
+	 * Removes a keyword from a keyword group
+	 */
+	function remove_keyword ( $key, $word )
+	{
+		$this->language_data['KEYWORDS'][$key] = array_diff($this->language_data['KEYWORDS'][$key], array($word));
+	}
+
+
+	/**
+	 * method: add_keyword_group
+	 * -------------------------
+	 * Creates a new keyword group
+	 */
+	function add_keyword_group ( $key, $styles, $case_sensitive = true, $words = array() )
+	{
+		if ( !is_array($words) )
+		{
+			$words = array($words);
+		}
+		$this->language_data['KEYWORDS'][$key] = $words;
+		$this->lexic_permissions['KEYWORDS'][$key] = true;
+		$this->language_data['CASE_SENSITIVE'][$key] = $case_sensitive;
+		$this->language_data['STYLES']['KEYWORDS'][$key] = $styles;
+	}
+
+
+	/**
+	 * method: remove_keyword_group
+	 * ----------------------------
+	 * Removes a keyword group
+	 */
+	function remove_keyword_group ( $key )
+	{
+		unset($this->language_data['KEYWORDS'][$key]);
+		unset($this->lexic_permissions['KEYWORDS'][$key]);
+		unset($this->language_data['CASE_SENSITIVE'][$key]);
+		unset($this->language_data['STYLES']['KEYWORDS'][$key]);
+	}
+
+
+	/**
+	 * method: set_header_content
+	 * --------------------------
+	 * Sets the content of the header block
+	 */
+	function set_header_content ( $content )
+	{
+		$this->header_content = $content;
+	}
+
+
+	/**
+	 * method: set_footer_content
+	 * --------------------------
+	 * Sets the content of the footer block
+	 */
+	function set_footer_content ( $content )
+	{
+		$this->footer_content = $content;
+	}
+
+
+	/**
+	 * method: set_header_content_style
+	 * --------------------------------
+	 * Sets the style for the header content
+	 */
+	function set_header_content_style ( $style )
+	{
+		$this->header_content_style = $style;
+	}
+
+
+	/**
+	 * method: set_footer_content_style
+	 * --------------------------------
+	 * Sets the style for the footer content
+	 */
+	function set_footer_content_style ( $style )
+	{
+		$this->footer_content_style = $style;
+	}
+
+
+	/**
+	 * method: set_url_for_keyword_group
+	 * ---------------------------------
+	 * Sets the base URL to be used for keywords
+	 */
+	function set_url_for_keyword_group ( $group, $url )
+	{
+		$this->language_data['URLS'][$group] = $url;
+	}
+
+
+	/**
+	 * method: set_link_styles
+	 * -----------------------
+	 * Sets styles for links in code
+	 */
+	function set_link_styles ( $type, $styles )
+	{
+		$this->link_styles[$type] = $styles;
+	}
+
+
+	/**
+	* method: set_link_target
+	* -----------------------
+	* Sets the target for links in code
+	*/
+	function set_link_target ( $target )
+	{
+		if ( empty( $target ) )
+		{
+			$this->link_target = '';
+		}
+		else
+		{
+			$this->link_target = ' target="' . $target . '" ';
+		}
+	}
+
+
+	/**
+	 * method: set_important_styles
+	 * ----------------------------
+	 * Sets styles for important parts of the code
+	 */
+	function set_important_styles ( $styles )
+	{
+		$this->important_styles = $styles;
+	}
+
+
+	/**
+	 * method: enable_important_blocks
+	 * -------------------------------
+	 * Sets whether context-important blocks are highlighted
+	 */
+	function enable_important_blocks ( $flag )
+	{
+		$this->enable_important_blocks = ( $flag ) ? true : false;
+	}
+
+
+	/**
+	 * method: enable_ids
+	 * ------------------
+	 * Whether CSS IDs should be added to each line
+	 */
+	function enable_ids ( $flag = true )
+	{
+		$this->add_ids = ( $flag ) ? true : false;
+	}
+
+
+	/**
+	 * method: highlight_lines_extra
+	 * -----------------------------
+	 * Specifies which lines to highlight extra
+	 */
+	function highlight_lines_extra ( $lines )
+	{
+		if ( is_array($lines) )
+		{
+			foreach ( $lines as $line )
+			{
+				$this->highlight_extra_lines[intval($line)] = intval($line);
+			}
+		}
+		else
+		{
+			$this->highlight_extra_lines[intval($lines)] = intval($lines);
+		}
+	}
+
+
+	/**
+	 * method: set_highlight_lines_extra_style
+	 * ---------------------------------------
+	 * Sets the style for extra-highlighted lines
+	 */
+	function set_highlight_lines_extra_style ( $styles )
+	{
+		$this->highlight_extra_lines_style = $styles;
+	}
+
+
+	/**
+	 * method: start_line_numbers_at
+	 * -----------------------------
+	 * Sets what number line numbers should start at. Should
+	 * be a positive integer, and will be converted to one.
+	 */
+	function start_line_numbers_at ( $number )
+	{
+		$this->line_numbers_start = abs(intval($number));
+	}
+
+
+	/**
+	 * method: set_encoding
+	 * --------------------
+	 * Sets the encoding used for htmlentities(), for international
+	 * support.
+	 */
+	function set_encoding ( $encoding )
+	{
+		$this->encoding = $encoding;
+	}
+
+
+	/**
+	 * method: parse_code()
+	 * --------------------
+	 * Returns the code in $this->source, highlighted and surrounded by the
+	 * nessecary HTML. This should only be called ONCE, cos it's SLOW!
+	 * If you want to highlight the same source multiple times, you're better
+	 * off doing a whole lot of str_replaces to replace the s
+	 */
+	function parse_code()
+	{
+		// Start the timer
+		$start_time = microtime();
+
+		// Firstly, if there is an error, we won't highlight
+		// FUTURE: maybe an option to try to force highlighting anyway?
+		if ( $this->error )
+		{
+			$result = $this->header();
+			if ( $this->header_type != GESHI_HEADER_PRE )
+			{
+				$result .= $this->indent(htmlentities($this->source, ENT_COMPAT, $this->encoding));
+			}
+			else
+			{
+				$result .= htmlentities($this->source, ENT_COMPAT, $this->encoding);
+			}
+			// Stop Timing
+			$this->set_time($start_time, microtime());
+			return $result . $this->footer();
+		}
+
+		// Add spaces for regular expression matching and line numbers
+		$code = ' ' . $this->source . ' ';
+		// Replace all newlines to a common form.
+		$code = str_replace("\r\n", "\n", $code);
+		$code = str_replace("\r", "\n", $code);
+
+		// Initialise various stuff
+		$length = strlen($code);
+		$STRING_OPEN = '';
+		$CLOSE_STRING = false;
+		$ESCAPE_CHAR_OPEN = false;
+		$COMMENT_MATCHED = false;
+		// Turn highlighting on if strict mode doesn't apply to this language
+		$HIGHLIGHTING_ON = ( !$this->strict_mode ) ? true : '';
+		// Whether to highlight inside a block of code
+		$HIGHLIGHT_INSIDE_STRICT = false;
+		$stuff_to_parse = '';
+		$result = '';
+
+		// "Important" selections are handled like multiline comments
+		if ( $this->enable_important_blocks )
+		{
+			$this->language_data['COMMENT_MULTI'][GESHI_START_IMPORTANT] = GESHI_END_IMPORTANT;
+		}
+
+
+		if ( $this->strict_mode )
+		{
+			// Break the source into bits. Each bit will be a portion of the code
+			// within script delimiters - for example, HTML between < and >
+			$parts = array(0 => array(0 => ''));
+			$k = 0;
+			for ( $i = 0; $i < $length; $i++ )
+			{
+				$char = substr($code, $i, 1);
+				if ( !$HIGHLIGHTING_ON )
+				{
+					foreach ( $this->language_data['SCRIPT_DELIMITERS'] as $key => $delimiters )
+					{
+						foreach ( $delimiters as $open => $close )
+						{
+							// Get the next little bit for this opening string
+							$check = substr($code, $i, strlen($open));
+							// If it matches...
+							if ( $check == $open )
+							{
+								// We start a new block with the highlightable
+								// code in it
+								$HIGHLIGHTING_ON = $open;
+								$i += strlen($open) - 1;
+								++$k;
+								$char = $open;
+								$parts[$k][0] = $char;
+
+								// No point going around again...
+								break(2);
+							}
+						}
+					}
+				}
+				else
+				{
+					foreach ( $this->language_data['SCRIPT_DELIMITERS'] as $key => $delimiters )
+					{
+						foreach ( $delimiters as $open => $close )
+						{
+							if ( $open == $HIGHLIGHTING_ON )
+							{
+								// Found the closing tag
+								break(2);
+							}
+						}
+					}
+					// We check code from our current position BACKWARDS. This is so
+					// the ending string for highlighting can be included in the block
+					$check = substr($code, $i - strlen($close) + 1, strlen($close));
+					if ( $check == $close )
+					{
+						$HIGHLIGHTING_ON = '';
+						// Add the string to the rest of the string for this part
+						$parts[$k][1] = ( isset($parts[$k][1]) ) ? $parts[$k][1] . $char : $char;
+						++$k;
+						$parts[$k][0] = '';
+						$char = '';
+					}
+				}
+				$parts[$k][1] = ( isset($parts[$k][1]) ) ? $parts[$k][1] . $char : $char;
+			}
+			$HIGHLIGHTING_ON = '';
+		}
+		else
+		{
+			// Not strict mode - simply dump the source into
+			// the array at index 1 (the first highlightable block)
+			$parts = array(
+				1 => array(
+					0 => '',
+					1 => $code
+				)
+			);
+		}
+
+		// Now we go through each part. We know that even-indexed parts are
+		// code that shouldn't be highlighted, and odd-indexed parts should
+		// be highlighted
+		foreach ( $parts as $key => $data )
+		{
+			$part = $data[1];
+			// If this block should be highlighted...
+			if ( $key % 2 )
+			{
+				if ( $this->strict_mode )
+				{
+					// Find the class key for this block of code
+					foreach ( $this->language_data['SCRIPT_DELIMITERS'] as $script_key => $script_data )
+					{
+						foreach ( $script_data as $open => $close )
+						{
+							if ( $data[0] == $open )
+							{
+								break(2);
+							}
+						}
+					}
+
+					if ( $this->language_data['STYLES']['SCRIPT'][$script_key] != '' && $this->lexic_permissions['SCRIPT'] )
+					{
+						// Add a span element around the source to
+						// highlight the overall source block
+						if ( !$this->use_classes && $this->language_data['STYLES']['SCRIPT'][$script_key] != '' )
+						{
+							$attributes = ' style="' . $this->language_data['STYLES']['SCRIPT'][$script_key] . '"';
+						}
+						else
+						{
+							$attributes = ' class="sc' . $script_key . '"';
+						}
+						$result .= "";
+					}
+				}
+
+				if ( !$this->strict_mode || $this->language_data['HIGHLIGHT_STRICT_BLOCK'][$script_key] )
+				{
+					// Now, highlight the code in this block. This code
+					// is really the engine of GeSHi (along with the method
+					// parse_non_string_part).
+					$length = strlen($part);
+					for ( $i = 0; $i < $length; $i++ )
+					{
+						// Get the next char
+						$char = substr($part, $i, 1);
+						// Is this char the newline and line numbers being used?
+						if ( ($this->line_numbers != GESHI_NO_LINE_NUMBERS || count($this->highlight_extra_lines) > 0) && $char == "\n" )
+						{
+							// If so, is there a string open? If there is, we should end it before
+							// the newline and begin it again (so when 
  • s are put in the source
+							// remains XHTML compliant)
+							// NOTE TO SELF: This opens up possibility of config files specifying
+							// that languages can/cannot have multiline strings???
+							if ( $STRING_OPEN )
+							{
+								if ( !$this->use_classes )
+								{
+									$attributes = ' style="' . $this->language_data['STYLES']['STRINGS'][0] . '"';
+								}
+								else
+								{
+									$attributes = ' class="st0"';
+								}
+								$char = '' . $char . "";
+							}
+						}
+						// Is this a match of a string delimiter?
+						elseif ( $char == $STRING_OPEN )
+						{
+							if ( ($this->lexic_permissions['ESCAPE_CHAR'] && $ESCAPE_CHAR_OPEN) || ($this->lexic_permissions['STRINGS'] && !$ESCAPE_CHAR_OPEN) )
+							{
+								$char .= '';
+							}
+							if ( !$ESCAPE_CHAR_OPEN )
+							{
+								$STRING_OPEN = '';
+								$CLOSE_STRING = true;
+							}
+							$ESCAPE_CHAR_OPEN = false;
+						}
+						// Is this the start of a new string?
+						elseif ( in_array( $char, $this->language_data['QUOTEMARKS'] ) && ($STRING_OPEN == '') && $this->lexic_permissions['STRINGS'] )
+						{
+							$STRING_OPEN = $char;
+							if ( !$this->use_classes )
+							{
+								$attributes = ' style="' . $this->language_data['STYLES']['STRINGS'][0] . '"';
+							}
+							else
+							{
+								$attributes = ' class="st0"';
+							}
+							$char = "" . $char;
+
+							$result .= $this->parse_non_string_part( $stuff_to_parse );
+							$stuff_to_parse = '';
+						}
+						// Is this an escape char?
+						elseif ( ($char == $this->language_data['ESCAPE_CHAR']) && ($STRING_OPEN != '') )
+						{
+							if ( !$ESCAPE_CHAR_OPEN )
+							{
+								$ESCAPE_CHAR_OPEN = true;
+								if ( $this->lexic_permissions['ESCAPE_CHAR'] )
+								{
+									if ( !$this->use_classes )
+									{
+										$attributes = ' style="' . $this->language_data['STYLES']['ESCAPE_CHAR'][0] . '"';
+									}
+									else
+									{
+										$attributes = ' class="es0"';
+									}
+									$char = "" . $char;
+								}
+							}
+							else
+							{
+								$ESCAPE_CHAR_OPEN = false;
+								if ( $this->lexic_permissions['ESCAPE_CHAR'] )
+								{
+									$char .= '';
+								}
+							}
+						}
+						elseif ( $ESCAPE_CHAR_OPEN )
+						{
+							if ( $this->lexic_permissions['ESCAPE_CHAR'] )
+							{
+								$char .= '';
+							}
+							$ESCAPE_CHAR_OPEN = false;
+							$test_str = $char;
+						}
+						elseif ( $STRING_OPEN == '' )
+						{
+							// Is this a multiline comment?
+							foreach ( $this->language_data['COMMENT_MULTI'] as $open => $close )
+							{
+								$com_len = strlen($open);
+								$test_str = substr( $part, $i, $com_len );
+								$test_str_match = $test_str;
+								if ( $open == $test_str )
+								{
+									$COMMENT_MATCHED = true;
+									if ( $this->lexic_permissions['COMMENTS']['MULTI'] || $test_str == GESHI_START_IMPORTANT )
+									{
+										if ( $test_str != GESHI_START_IMPORTANT )
+										{
+											if ( !$this->use_classes )
+											{
+												$attributes = ' style="' . $this->language_data['STYLES']['COMMENTS']['MULTI'] . '"';
+											}
+											else
+											{
+												$attributes = ' class="coMULTI"';
+											}
+											$test_str = "" . htmlentities($test_str, ENT_COMPAT, $this->encoding);
+										}
+										else
+										{
+											if ( !$this->use_classes )
+											{
+												$attributes = ' style="' . $this->important_styles . '"';
+											}
+											else
+											{
+												$attributes = ' class="imp"';
+											}
+											// We don't include the start of the comment if it's an
+											// "important" part
+											$test_str = "";
+										}
+									}
+									else
+									{
+										$test_str = htmlentities($test_str, ENT_COMPAT, $this->encoding);
+									}
+
+									$close_pos = strpos( $part, $close, $i + strlen($close) );
+
+									if ( $close_pos === false )
+									{
+										$close_pos = strlen($part);
+									}
+
+									// Short-cut through all the multiline code
+									$rest_of_comment = htmlentities(substr($part, $i + $com_len, $close_pos - $i), ENT_COMPAT, $this->encoding);
+									if ( ($this->lexic_permissions['COMMENTS']['MULTI'] || $test_str_match == GESHI_START_IMPORTANT) && ($this->line_numbers != GESHI_NO_LINE_NUMBERS || count($this->highlight_extra_lines) > 0) )
+									{
+										// strreplace to put close span and open span around multiline newlines
+										$test_str .= str_replace("\n", "\n", $rest_of_comment);
+									}
+									else
+									{
+										$test_str .= $rest_of_comment;
+									}
+
+									if ( $this->lexic_permissions['COMMENTS']['MULTI'] || $test_str_match == GESHI_START_IMPORTANT )
+									{
+										$test_str .= '';
+									}
+									$i = $close_pos + $com_len - 1;
+									// parse the rest
+									$result .= $this->parse_non_string_part( $stuff_to_parse );
+									$stuff_to_parse = '';
+									break;
+								}
+							}
+							// If we haven't matched a multiline comment, try single-line comments
+							if ( !$COMMENT_MATCHED )
+							{
+								foreach ( $this->language_data['COMMENT_SINGLE'] as $comment_key => $comment_mark )
+								{
+									$com_len = strlen($comment_mark);
+									$test_str = substr( $part, $i, $com_len );
+									if ( $this->language_data['CASE_SENSITIVE'][GESHI_COMMENTS] )
+									{
+										$match = ( $comment_mark == $test_str );
+									}
+									else
+									{
+										$match = ( strtolower($comment_mark) == strtolower($test_str) );
+									}
+									if ( $match )
+									{
+										$COMMENT_MATCHED = true;
+										if ( $this->lexic_permissions['COMMENTS'][$comment_key] )
+										{
+											if ( !$this->use_classes )
+											{
+												$attributes = ' style="' . $this->language_data['STYLES']['COMMENTS'][$comment_key] . '"';
+											}
+											else
+											{
+												$attributes = ' class="co' . $comment_key . '"';
+											}
+											$test_str = "" . htmlentities($this->change_case($test_str), ENT_COMPAT, $this->encoding);
+										}
+										else
+										{
+											$test_str = htmlentities($test_str, ENT_COMPAT, $this->encoding);
+										}
+										$close_pos = strpos( $part, "\n", $i );
+										if ( $close_pos === false )
+										{
+											$close_pos = strlen($part);
+										}
+										$test_str .= htmlentities(substr($part, $i + $com_len, $close_pos - $i - $com_len), ENT_COMPAT, $this->encoding);
+										if ( $this->lexic_permissions['COMMENTS'][$comment_key] )
+										{
+											$test_str .= "";
+										}
+										$test_str .= "\n";
+										$i = $close_pos;
+										// parse the rest
+										$result .= $this->parse_non_string_part( $stuff_to_parse );
+										$stuff_to_parse = '';
+										break;
+									}
+								}
+							}
+						}
+						// Otherwise, convert it to HTML form
+						elseif ( $STRING_OPEN != '' )
+						{
+							$char = htmlentities($char, ENT_COMPAT, $this->encoding);
+						}
+						// Where are we adding this char?
+						if ( !$COMMENT_MATCHED )
+						{
+							if ( ($STRING_OPEN == '') && !$CLOSE_STRING )
+							{
+								$stuff_to_parse .= $char;
+							}
+							else
+							{
+								$result .= $char;
+								$CLOSE_STRING = false;
+							}
+						}
+						else
+						{
+							$result .= $test_str;
+							$COMMENT_MATCHED = false;
+						}
+					}
+					// Parse the last bit
+					$result .= $this->parse_non_string_part( $stuff_to_parse );
+					$stuff_to_parse = '';
+				}
+				else
+				{
+					$result .= htmlentities($part, ENT_COMPAT, $this->encoding);
+				}
+				// Close the  that surrounds the block
+				if ( $this->strict_mode && $this->lexic_permissions['SCRIPT'] )
+				{
+					$result .= '';
+				}
+			}
+			// Else not a block to highlight
+			else
+			{
+				$result .= htmlentities($part, ENT_COMPAT, $this->encoding);
+			}
+		}
+
+		// Parse the last stuff (redundant?)
+		$result .= $this->parse_non_string_part( $stuff_to_parse );
+
+		// Lop off the very first and last spaces
+		$result = substr($result, 1, strlen($result) - 1);
+
+		// Are we still in a string?
+		if ( $STRING_OPEN )
+		{
+			$result .= '';
+		}
+
+		// We're finished: stop timing
+		$this->set_time($start_time, microtime());
+
+		return $this->finalise($result);
+	}
+
+	/**
+	 * method: indent
+	 * --------------
+	 * Swaps out spaces and tabs for HTML indentation. Not needed if
+	 * the code is in a pre block...
+	 */
+	function indent ( $result )
+	{
+		$result = str_replace('  ', '  ', $result);
+		$result = str_replace('  ', '  ', $result);
+		$result = str_replace("\n ", "\n ", $result);
+		$result = str_replace("\t", $this->get_tab_replacement(), $result);
+		if ( $this->line_numbers == GESHI_NO_LINE_NUMBERS )
+		{
+			$result = nl2br($result);
+		}
+		return $result;
+	}
+
+	/**
+	 * method: change_case
+	 * -------------------
+	 * Changes the case of a keyword for those languages where a change is asked for
+	 */
+	function change_case ( $instr )
+	{
+		if ( $this->language_data['CASE_KEYWORDS'] == GESHI_CAPS_UPPER )
+		{
+			return strtoupper($instr);
+		}
+		elseif ( $this->language_data['CASE_KEYWORDS'] == GESHI_CAPS_LOWER )
+		{
+			return strtolower($instr);
+		}
+		return $instr;
+	}
+
+
+	/**
+	 * method: add_url_to_keyword
+	 * --------------------------
+	 * Adds a url to a keyword where needed.
+	 * Added in 1.0.2
+	 */
+	function add_url_to_keyword ( $keyword, $group, $start_or_end )
+	{
+		if ( isset($this->language_data['URLS'][$group]) && $this->language_data['URLS'][$group] != '' && substr($keyword, 0, 5) != '</' )
+		{
+			// There is a base group for this keyword
+
+			if ( $start_or_end == 'BEGIN' )
+			{
+				// HTML workaround... not good form (tm) but should work for 1.0.X
+				$keyword = ( substr($keyword, 0, 4) == '<' ) ? substr($keyword, 4) : $keyword;
+				$keyword = ( substr($keyword, -4) == '>' ) ? substr($keyword, 0, strlen($keyword) - 4) : $keyword;
+				if ( $keyword != '' )
+				{
+					$keyword = ( $this->language_data['CASE_SENSITIVE'][$group] ) ? $keyword : strtolower($keyword);
+					return '<|UR1|"' . str_replace(array('{FNAME}', '.'), array(htmlentities($keyword, ENT_COMPAT, $this->encoding), ''), $this->language_data['URLS'][$group]) . '">';
+				}
+				return '';
+			}
+			else
+			{
+				return '';
+			}
+		}
+	}
+
+
+	/**
+	 * method: parse_non_string_part
+	 * -----------------------------
+	 * Takes a string that has no strings or comments in it, and highlights
+	 * stuff like keywords, numbers and methods.
+	 */
+	function parse_non_string_part ( &$stuff_to_parse )
+	{
+		$stuff_to_parse = ' ' . quotemeta(htmlentities($stuff_to_parse, ENT_COMPAT, $this->encoding));
+		// These vars will disappear in the future
+		$func = '$this->change_case';
+		$func2 = '$this->add_url_to_keyword';
+
+
+		//
+		// Regular expressions
+		//
+		foreach ( $this->language_data['REGEXPS'] as $key => $regexp )
+		{
+			if ( $this->lexic_permissions['REGEXPS'][$key] )
+			{
+				if ( is_array($regexp) )
+				{
+					$stuff_to_parse = preg_replace( "#" . $regexp[GESHI_SEARCH] . "#{$regexp[GESHI_MODIFIERS]}", "{$regexp[GESHI_BEFORE]}<|!REG3XP$key!>{$regexp[GESHI_REPLACE]}|>{$regexp[GESHI_AFTER]}", $stuff_to_parse);
+				}
+				else
+				{
+					$stuff_to_parse = preg_replace( "#(" . $regexp . ")#", "<|!REG3XP$key!>\\1|>", $stuff_to_parse);
+				}
+			}
+		}
+
+		//
+		// Highlight numbers. This regexp sucks... anyone with a regexp that WORKS
+		// here wins a cookie if they send it to me. At the moment there's two doing
+		// almost exactly the same thing, except the second one prevents a number
+		// being highlighted twice (eg 5)
+		// Put /NUM!/ in for the styles, which gets replaced at the end.
+		//
+		if ( $this->lexic_permissions['NUMBERS'] && preg_match('#[0-9]#', $stuff_to_parse ) )
+		{
+			$stuff_to_parse = preg_replace('#([^a-zA-Z0-9\#])([0-9]+)([^a-zA-Z0-9])#', "\\1<|/NUM!/>\\2|>\\3", $stuff_to_parse);
+			$stuff_to_parse = preg_replace('#([^a-zA-Z0-9\#>])([0-9]+)([^a-zA-Z0-9])#', "\\1<|/NUM!/>\\2|>\\3", $stuff_to_parse);
+		}
+
+		// Highlight keywords
+		// if there is a couple of alpha symbols there *might* be a keyword
+		if ( preg_match('#[a-zA-Z]{2,}#', $stuff_to_parse) )
+		{
+			foreach ( $this->language_data['KEYWORDS'] as $k => $keywordset )
+			{
+				if ( $this->lexic_permissions['KEYWORDS'][$k] )
+				{
+					foreach ( $keywordset as $keyword )
+					{
+						$keyword = quotemeta($keyword);
+						//
+						// This replacement checks the word is on it's own (except if brackets etc
+						// are next to it), then highlights it. We don't put the color=" for the span
+						// in just yet - otherwise languages with the keywords "color" or "or" have
+						// a fit.
+						//
+						if ( false !== stristr($stuff_to_parse, $keyword ) )
+						{
+							$stuff_to_parse .= ' ';
+							// Might make a more unique string for putting the number in soon
+							// Basically, we don't put the styles in yet because then the styles themselves will
+							// get highlighted if the language has a CSS keyword in it (like CSS, for example ;))
+							$styles = "/$k/";
+							$keyword = quotemeta($keyword);
+							if ( $this->language_data['CASE_SENSITIVE'][$k] )
+							{
+								$stuff_to_parse = preg_replace("#([^a-zA-Z0-9\$_\|\.\#;>])($keyword)([^a-zA-Z0-9_<\|%\-&])#e", "'\\1' . $func2('\\2', '$k', 'BEGIN') . '<|$styles>' . $func('\\2') . '|>' . $func2('\\2', '$k', 'END') . '\\3'", $stuff_to_parse);
+							}
+							else
+							{
+								// Change the case of the word.
+								$stuff_to_parse = preg_replace("#([^a-zA-Z0-9\$_\|\.\#;>])($keyword)([^a-zA-Z0-9_<\|%\-&])#ie", "'\\1' . $func2('\\2', '$k', 'BEGIN') . '<|$styles>' . $func('\\2') . '|>' . $func2('\\2', '$k', 'END') . '\\3'", $stuff_to_parse);
+							}
+							$stuff_to_parse = substr($stuff_to_parse, 0, strlen($stuff_to_parse) - 1);
+						}
+					}
+				}
+			}
+		}
+
+		//
+		// Now that's all done, replace /[number]/ with the correct styles
+		//
+		foreach ( $this->language_data['KEYWORDS'] as $k => $kws )
+		{
+			if ( !$this->use_classes )
+			{
+				$attributes = ' style="' . $this->language_data['STYLES']['KEYWORDS'][$k] . '"';
+			}
+			else
+			{
+				$attributes = ' class="kw' . $k . '"';
+			}
+			$stuff_to_parse = str_replace("/$k/", $attributes, $stuff_to_parse);
+		}
+
+		// Put number styles in
+		if ( !$this->use_classes && $this->lexic_permissions['NUMBERS'] )
+		{
+			$attributes = ' style="' . $this->language_data['STYLES']['NUMBERS'][0] . '"';
+		}
+		else
+		{
+			$attributes = ' class="nu0"';
+		}
+		$stuff_to_parse = str_replace('/NUM!/', $attributes, $stuff_to_parse);
+
+		//
+		// Highlight methods and fields in objects
+		//
+		if ( $this->lexic_permissions['METHODS'] && $this->language_data['OOLANG'] )
+		{
+			foreach ( $this->language_data['OBJECT_SPLITTERS'] as $key => $splitter )
+			{
+				if ( false !== stristr($stuff_to_parse, $this->language_data['OBJECT_SPLITTERS'][$key]) )
+				{
+					if ( !$this->use_classes )
+					{
+						$attributes = ' style="' . $this->language_data['STYLES']['METHODS'][$key] . '"';
+					}
+					else
+					{
+						$attributes = ' class="me' . $key . '"';
+					}
+					$stuff_to_parse = preg_replace("#(" . quotemeta($this->language_data['OBJECT_SPLITTERS'][$key]) . "[\s]*)([a-zA-Z\*\(][a-zA-Z0-9_\*]*)#", "\\1<|$attributes>\\2|>", $stuff_to_parse);
+				}
+			}
+		}
+
+		//
+		// Highlight brackets. Yes, I've tried adding a semi-colon to this list.
+		// You try it, and see what happens ;)
+		// TODO: Fix lexic permissions not converting entities if shouldn't
+		// be highlighting regardless
+		//
+		if ( $this->lexic_permissions['BRACKETS'] )
+		{
+			$code_entities_match = array('[', ']', '(', ')', '{', '}');
+			if ( !$this->use_classes )
+			{
+				$code_entities_replace = array(
+					'<| style="' . $this->language_data['STYLES']['BRACKETS'][0] . '">[|>',
+					'<| style="' . $this->language_data['STYLES']['BRACKETS'][0] . '">]|>',
+					'<| style="' . $this->language_data['STYLES']['BRACKETS'][0] . '">(|>',
+					'<| style="' . $this->language_data['STYLES']['BRACKETS'][0] . '">)|>',
+					'<| style="' . $this->language_data['STYLES']['BRACKETS'][0] . '">{|>',
+					'<| style="' . $this->language_data['STYLES']['BRACKETS'][0] . '">}|>',
+				);
+			}
+			else
+			{
+				$code_entities_replace = array(
+					'<| class="br0">[|>',
+					'<| class="br0">]|>',
+					'<| class="br0">(|>',
+					'<| class="br0">)|>',
+					'<| class="br0">{|>',
+					'<| class="br0">}|>',
+				);
+			}
+			$stuff_to_parse = str_replace( $code_entities_match,  $code_entities_replace, $stuff_to_parse );
+		}
+
+		//
+		// Add class/style for regexps
+		//
+		foreach ( $this->language_data['REGEXPS'] as $key => $regexp )
+		{
+			if ( $this->lexic_permissions['REGEXPS'][$key] )
+			{
+				if ( !$this->use_classes )
+				{
+					$attributes = ' style="' . $this->language_data['STYLES']['REGEXPS'][$key] . '"';
+				}
+				else
+				{
+					$attributes = ' class="re' . $key . '"';
+				}
+				$stuff_to_parse = str_replace("!REG3XP$key!", "$attributes", $stuff_to_parse);
+			}
+		}
+
+		// Replace  with . for urls
+		$stuff_to_parse = str_replace('', '.', $stuff_to_parse);
+		// Replace <|UR1| with link_styles[GESHI_LINK]) )
+		{
+			if ( $this->use_classes )
+			{
+				$stuff_to_parse = str_replace('<|UR1|', 'link_target . ' href=', $stuff_to_parse);
+			}
+			else
+			{
+				$stuff_to_parse = str_replace('<|UR1|', 'link_target . ' style="' . $this->link_styles[GESHI_LINK] . '" href=', $stuff_to_parse);
+			}
+		}
+		else
+		{
+			$stuff_to_parse = str_replace('<|UR1|', 'link_target . ' href=', $stuff_to_parse);
+		}
+
+		//
+		// NOW we add the span thingy ;)
+		//
+
+		$stuff_to_parse = str_replace('<|', '', '', $stuff_to_parse );
+
+		return substr(stripslashes($stuff_to_parse), 1);
+	}
+
+	/**
+	 * method: set_time
+	 * ----------------
+	 * Sets the time taken to parse the code
+	 */
+	function set_time ( $start_time, $end_time )
+	{
+		$start = explode(' ', $start_time);
+		$end = explode(' ', $end_time);
+		$this->time = $end[0] + $end[1] - $start[0] - $start[1];
+	}
+
+	/**
+	 * method: get_time
+	 * ----------------
+	 * Gets the time taken to parse the code
+	 */
+	function get_time ()
+	{
+		return $this->time;
+	}
+
+	/**
+	 * method: load_language
+	 * ---------------------
+	 * Gets language information and stores it for later use
+	 */
+	function load_language ()
+	{
+		$file_name = $this->language_path . $this->language . '.php';
+		if ( !is_readable($file_name))
+		{
+			$this->error = GESHI_ERROR_NO_SUCH_LANG;
+			return;
+		}
+		require($file_name);
+		// Perhaps some checking might be added here later to check that
+		// $language data is a valid thing but maybe not
+		$this->language_data = $language_data;
+		// Set strict mode if should be set
+		if ( $this->language_data['STRICT_MODE_APPLIES'] == GESHI_ALWAYS )
+		{
+			$this->strict_mode = true;
+		}
+		// Set permissions for all lexics to true
+		// so they'll be highlighted by default
+		$this->enable_highlighting();
+		// Set default class for CSS
+		$this->overall_class = $this->language;
+	}
+
+	/**
+	 * method: get_tab_replacement
+	 * ---------------------------
+	 * Gets the replacement string for tabs in the source code. Useful for
+	 * HTML highlighting, where tabs don't mean anything to a browser.
+	 */
+	function get_tab_replacement ()
+	{
+		$i = 0;
+		$result = '';
+		while ( $i < $this->tab_width )
+		{
+			$i++;
+			if ( $i % 2 == 0 )
+			{
+				$result .= ' ';
+			}
+			else
+			{
+				$result .= ' ';
+			}
+		}
+		return $result;
+	}
+
+	/**
+	 * method: finalise
+	 * ----------------
+	 * Takes the parsed code and various options, and creates the HTML
+	 * surrounding it to make it look nice.
+	 */
+	function finalise ( $parsed_code )
+	{
+		// Remove end parts of important declarations
+		// This is BUGGY!! My fault for bad code: fix coming in 1.2
+		if ( $this->enable_important_blocks && (strstr($parsed_code, htmlentities(GESHI_START_IMPORTANT, ENT_COMPAT, $this->encoding)) === false) )
+		{
+			$parsed_code = str_replace(htmlentities(GESHI_END_IMPORTANT, ENT_COMPAT, $this->encoding), '', $parsed_code);
+		}
+
+		// Add HTML whitespace stuff if we're using the 
     header
+		if ( $this->header_type == GESHI_HEADER_DIV )
+		{
+			$parsed_code = $this->indent($parsed_code);
+		}
+
+		// If we're using line numbers, we insert 
  • s and appropriate
+		// markup to style them (otherwise we don't need to do anything)
+		if ( $this->line_numbers != GESHI_NO_LINE_NUMBERS )
+		{
+			// If we're using the 
     header, we shouldn't add newlines because
+			// the 
     will line-break them (and the 
  • s already do this for us)
+			$ls = ( $this->header_type != GESHI_HEADER_PRE ) ? "\n" : '';
+			// Get code into lines
+			$code = explode("\n", $parsed_code);
+			// Set vars to defaults for following loop
+			$parsed_code = '';
+			$i = 0;
+			// Foreach line...
+			foreach ( $code as $line )
+			{
+				$line = ( $line ) ? $line : ' ';
+				// If this is a "special line"...
+				if ( $this->line_numbers == GESHI_FANCY_LINE_NUMBERS && $i % $this->line_nth_row == ($this->line_nth_row - 1) )
+				{
+					// Set the attributes to style the line
+					if ( $this->use_classes )
+					{
+						$attr = ' class="li2"';
+						$def_attr = ' class="de2"';
+					}
+					else
+					{
+						$attr = ' style="' . $this->line_style2 . '"';
+						// This style "covers up" the special styles set for special lines
+						// so that styles applied to special lines don't apply to the actual
+						// code on that line
+						$def_attr = ' style="' . $this->code_style . '"';
+					}
+					// Span or div?
+					$start = "";
+					$end = '
    • '; + } + else + { + if ( $this->use_classes ) + { + $def_attr = ' class="de1"'; + } + else + { + $def_attr = ' style="' . $this->code_style . '"'; + } + // Reset everything + $attr = ''; + // Span or div? + $start = ""; + $end = ''; + } + + ++$i; + // Are we supposed to use ids? If so, add them + if ( $this->add_ids ) + { + $attr .= " id=\"{$this->overall_id}-{$i}\""; + } + if ( $this->use_classes && in_array($i, $this->highlight_extra_lines) ) + { + $attr .= " class=\"ln-xtra\""; + } + if ( !$this->use_classes && in_array($i, $this->highlight_extra_lines) ) + { + $attr .= " style=\"{$this->highlight_extra_lines_style}\""; + } + + // Add in the line surrounded by appropriate list HTML + $parsed_code .= "$start$line$end$ls"; + } + } + else + { + // No line numbers, but still need to handle highlighting lines extra. + // Have to use divs so the full width of the code is highlighted + $code = explode("\n", $parsed_code); + $parsed_code = ''; + $i = 0; + foreach ( $code as $line ) + { + // Make lines have at least one space in them if they're empty + $line = ( $line ) ? $line : ' '; + if ( in_array(++$i, $this->highlight_extra_lines) ) + { + if ( $this->use_classes ) + { + //$id = ( $this->overall_id != '' ) ? $this->overall_id . "-$i" : $this->overall_class . "-$i"; + $parsed_code .= '
    '; + } + else + { + $parsed_code .= "
    highlight_extra_lines_style}\">"; + } + $parsed_code .= $line . "
    \n"; + } + else + { + $parsed_code .= $line . "\n"; + } + } + } + + return $this->header() . chop($parsed_code) . $this->footer(); + } + + + /** + * method: header + * -------------- + * Creates the header for the code block (with correct attributes) + */ + function header () + { + // Get attributes needed + $attributes = $this->get_attributes(); + + if ( $this->use_classes ) + { + $ol_attributes = ''; + } + else + { + $ol_attributes = ' style="margin: 0;"'; + } + + if ( $this->line_numbers_start != 1 ) + { + $ol_attributes .= ' start="' . $this->line_numbers_start . '"'; + } + + // Get the header HTML + $header = $this->format_header_content(); + + // Work out what to return and do it + if ( $this->line_numbers != GESHI_NO_LINE_NUMBERS ) + { + if ( $this->header_type == GESHI_HEADER_PRE ) + { + return "$header"; + } + elseif ( $this->header_type == GESHI_HEADER_DIV ) + { + return "$header"; + } + } + else + { + if ( $this->header_type == GESHI_HEADER_PRE ) + { + return "$header"; + } + elseif ( $this->header_type == GESHI_HEADER_DIV ) + { + return "$header"; + } + } + } + + + /** + * method: format_header_content + * ----------------------------- + * Returns the header content, formatted for output + */ + function format_header_content () + { + $header = $this->header_content; + if ( $header ) + { + if ( $this->header_type == GESHI_HEADER_PRE ) + { + $header = str_replace("\n", '', $header); + } + $header = $this->replace_keywords($header); + + if ( $this->use_classes ) + { + $attr = ' class="head"'; + } + else + { + $attr = " style=\"{$this->header_content_style}\""; + } + return "$header
    "; + } + } + + + /** + * method: footer + * -------------- + * Returns the footer for the code block. Ending newline removed in 1.0.2 + */ + function footer () + { + $footer_content = $this->format_footer_content(); + + if ( $this->header_type == GESHI_HEADER_DIV ) + { + if ( $this->line_numbers != GESHI_NO_LINE_NUMBERS ) + { + return "$footer_content"; + } + return "$footer_content"; + } + else + { + if ( $this->line_numbers != GESHI_NO_LINE_NUMBERS ) + { + return "$footer_content"; + } + return "$footer_content"; + } + } + + + /** + * method: format_footer_content + * ----------------------------- + * Returns the footer content, formatted for output + */ + function format_footer_content () + { + $footer = $this->footer_content; + if ( $footer ) + { + if ( $this->header_type == GESHI_HEADER_PRE ) + { + $footer = str_replace("\n", '', $footer);; + } + $footer = $this->replace_keywords($footer); + + if ( $this->use_classes ) + { + $attr = ' class="foot"'; + } + else + { + $attr = " style=\"{$this->footer_content_style}\">"; + } + return "$footer"; + } + } + + + /** + * method: replace_keywords + * ---------------------- + * Replaces certain keywords in the header and footer with + * certain configuration values + */ + function replace_keywords ( $instr ) + { + $keywords = $replacements = array(); + + $keywords[] = '