New Repository, initial import

3 files changed, 476 insertions, 0 deletions

diff --git a/lib/coderay/encoders/helpers/html_css.rb b/lib/coderay/encoders/helpers/html_css.rb
new file mode 100644
index 0000000..f9cadf7
--- /dev/null
+++ b/lib/coderay/encoders/helpers/html_css.rb
@@ -0,0 +1,168 @@
+module CodeRay module Encoders

+

+	class HTML

+		class CSS

+			

+			def initialize stylesheet = TOKENS

+				@classes = Hash.new

+				parse stylesheet

+			end

+

+			def [] *styles

+				cl = @classes[styles.first]

+				return '' unless cl

+				style = false

+				1.upto(cl.size + 1) do |offset|

+					break if style = cl[styles[offset .. -1]]

+				end

+				return style

+			end

+			

+		private

+			

+			CSS_CLASS = /

+				( (?:                # $1 = classes

+					\s* \. [-\w]+

+				)+ )

+				\s* \{

+				( [^\}]* )           # $2 = style

+				\} \s*

+			|

+				( . )                # $3 = error

+			/mx

+			def parse stylesheet

+				stylesheet.scan CSS_CLASS do |classes, style, error|

+					raise "CSS parse error: '#{error}' not recognized" if error

+					styles = classes.scan(/[-\w]+/)

+					cl = styles.pop

+					@classes[cl] ||= Hash.new

+					@classes[cl][styles] = style.strip

+				end

+			end

+			

+			MAIN = <<-'MAIN'

+.code {

+	background-color: #FAFAFA;

+	border: 1px solid #D1D7DC;

+	font-family: 'Courier New', 'Terminal', monospace;

+	font-size: 10pt;

+	color: black;

+	vertical-align: top;

+	text-align: left;

+	padding: 0px;

+}

+span.code { white-space: pre; }

+.code tt { font-weight: bold; }

+.code pre {

+	font-size: 10pt;

+	margin: 0px 5px;

+}

+.code .code_table {

+	margin: 0px;

+}

+.code .line_numbers {

+	margin: 0px;

+	background-color:#DEF; color: #777;

+	vertical-align: top;

+	text-align: right;

+}

+.code .code_cell {

+	width: 100%;

+	background-color:#FAFAFA;

+	color: black;

+	vertical-align: top;

+	text-align: left;

+}

+.code .no {

+	background-color:#DEF;

+	color: #777;

+	padding: 0px 5px;

+	font-weight: normal;

+	font-style: normal;

+}

+

+.code tt { display: hidden; }

+

+			MAIN

+

+			TOKENS = <<-'TOKENS'

+.af { color:#00C; }

+.an { color:#007; }

+.av { color:#700; }

+.aw { color:#C00; }

+.bi { color:#509; font-weight:bold; }

+.c  { color:#888; }

+

+.ch { color:#04D; /* background-color:#f0f0ff; */ }

+.ch .k { color:#04D; }

+.ch .dl { color:#039; }

+

+.cl { color:#B06; font-weight:bold; }

+.co { color:#036; font-weight:bold; }

+.cr { color:#0A0; }

+.cv { color:#369; }

+.df { color:#099; font-weight:bold; }

+.di { color:#088; font-weight:bold; }

+.dl { color:black; }

+.do { color:#970; }

+.ds { color:#D42; font-weight:bold; }

+.e  { color:#666; font-weight:bold; }

+.er { color:#F00; background-color:#FAA; }

+.ex { color:#F00; font-weight:bold; }

+.fl { color:#60E; font-weight:bold; }

+.fu { color:#06B; font-weight:bold; }

+.gv { color:#d70; font-weight:bold; }

+.hx { color:#058; font-weight:bold; }

+.i  { color:#00D; font-weight:bold; }

+.ic { color:#B44; font-weight:bold; }

+.in { color:#B2B; font-weight:bold; }

+.iv { color:#33B; }

+.la { color:#970; font-weight:bold; }

+.lv { color:#963; }

+.oc { color:#40E; font-weight:bold; }

+.on { color:#000; font-weight:bold; }

+.pc { color:#038; font-weight:bold; }

+.pd { color:#369; font-weight:bold; }

+.pp { color:#579; }

+.pt { color:#339; font-weight:bold; }

+.r  { color:#080; font-weight:bold; }

+

+.rx { background-color:#fff0ff; }

+.rx .k { color:#808; }

+.rx .dl { color:#404; }

+.rx .mod { color:#C2C; }

+.rx .fu  { color:#404; font-weight: bold; }

+

+.s  { background-color:#fff0f0; }

+.s  .s { background-color:#ffe0e0; }

+.s  .s  .s { background-color:#ffd0d0; }

+.s  .k { color:#D20; }

+.s  .dl { color:#710; }

+

+.sh { background-color:#f0fff0; }

+.sh .k { color:#2B2; }

+.sh .dl { color:#161; }

+

+.sy { color:#A60; }

+.sy .k { color:#A60; }

+.sy .dl { color:#630; }

+

+.ta { color:#070; }

+.tf { color:#070; font-weight:bold; }

+.ts { color:#D70; font-weight:bold; }

+.ty { color:#339; font-weight:bold; }

+.v  { color:#036; }

+.xt { color:#444; }

+			TOKENS

+			

+			DEFAULT_STYLESHEET = MAIN + TOKENS

+		

+		end

+	end

+	

+end end

+

+if $0 == __FILE__

+	require 'pp'

+	pp CodeRay::Encoders::HTML::CSS.new

+end

diff --git a/lib/coderay/encoders/helpers/html_helper.rb b/lib/coderay/encoders/helpers/html_helper.rb
new file mode 100644
index 0000000..03ea0a2
--- /dev/null
+++ b/lib/coderay/encoders/helpers/html_helper.rb
@@ -0,0 +1,68 @@
+module CodeRay module Encoders

+

+	class HTML

+

+		ClassOfKind = {

+			:attribute_name => 'an',

+			:attribute_name_fat => 'af',

+			:attribute_value => 'av',

+			:attribute_value_fat => 'aw',

+			:bin => 'bi',

+			:char => 'ch',

+			:class => 'cl',

+			:class_variable => 'cv',

+			:color => 'cr',

+			:comment => 'c',

+			:constant => 'co',

+			:content => 'k',

+			:definition => 'df',

+			:delimiter => 'dl',

+			:directive => 'di',

+			:doc => 'do',

+			:doc_string => 'ds',

+			:error => 'er',

+			:escape => 'e',

+			:exception => 'ex',

+			:float => 'fl',

+			:function => 'fu',

+			:global_variable => 'gv',

+			:hex => 'hx',

+			:include => 'ic',

+			:instance_variable => 'iv',

+			:integer => 'i',

+			:interpreted => 'in',

+			:label => 'la',

+			:local_variable => 'lv',

+			:modifier => 'mod',

+			:oct => 'oc',

+			:operator_name => 'on',

+			:pre_constant => 'pc',

+			:pre_type => 'pt',

+			:predefined => 'pd',

+			:preprocessor => 'pp',

+			:regexp => 'rx',

+			:reserved => 'r',

+			:shell => 'sh',

+			:string => 's',

+			:symbol => 'sy',

+			:tag => 'ta',

+			:tag_fat => 'tf',

+			:tag_special => 'ts',

+			:type => 'ty',

+			:variable => 'v',

+			:xml_text => 'xt',

+

+			:ident => :NO_HIGHLIGHT, # 'id'

+			:operator => :NO_HIGHLIGHT,  # 'op'

+			:space => :NO_HIGHLIGHT,  # 'sp'

+			:plain => :NO_HIGHLIGHT,

+		}

+		ClassOfKind[:procedure] = ClassOfKind[:method] = ClassOfKind[:function]

+		ClassOfKind[:open] = ClassOfKind[:close] = ClassOfKind[:delimiter]

+		ClassOfKind[:nesting_delimiter] = ClassOfKind[:delimiter]

+		ClassOfKind[:escape] = ClassOfKind[:delimiter]

+		ClassOfKind.default = ClassOfKind[:error] or raise 'no class found for :error!'

+

+	end

+

+end end

diff --git a/lib/coderay/encoders/helpers/html_output.rb b/lib/coderay/encoders/helpers/html_output.rb
new file mode 100644
index 0000000..e2b26e7
--- /dev/null
+++ b/lib/coderay/encoders/helpers/html_output.rb
@@ -0,0 +1,240 @@
+module CodeRay

+	module Encoders

+

+	class HTML

+		

+		# This module is included in the output String from thew HTML Encoder.

+		#

+		# It provides methods like wrap, div, page etc.

+		#

+		# Remember to use #clone instead of #dup to keep the modules the object was

+		# extended with.

+		#

+		# TODO: more doc.

+		module Output

+

+			class << self

+				

+				# This makes Output look like a class.

+				#

+				# Example:

+				# 

+				#  a = Output.new '<span class="co">Code</span>'

+				#  a.wrap! :page

+				def new string, element = nil

+					output = string.clone.extend self

+					output.wrapped_in = element

+					output

+				end

+				

+				# Raises an exception if an object that doesn't respond to to_str is extended by Output,

+				# to prevent users from misuse. Use Module#remove_method to disable.

+				def extended o

+					warn "The Output module is intended to extend instances of String, not #{o.class}." unless o.respond_to? :to_str

+				end

+

+				def page_template_for_css css = :default

+					css = CSS::DEFAULT_STYLESHEET if css == :default

+					PAGE.apply 'CSS', css

+				end

+

+				# Define a new wrapper. This is meta programming.

+				def wrapper *wrappers

+					wrappers.each do |wrapper|

+						define_method wrapper do |*args|

+							wrap wrapper, *args

+						end

+						define_method(:"#{wrapper}!") do |*args|  

+							wrap! wrapper, *args

+						end

+					end

+				end

+			end

+

+			wrapper :div, :span, :page

+

+			def wrapped_in

+				@wrapped_in || nil

+			end

+			attr_writer :wrapped_in

+			

+			def wrapped_in? element

+				wrapped_in == element

+			end

+			

+			def wrap_in template

+				clone.wrap_in! template

+			end

+

+			def wrap_in! template

+				Template.wrap! self, template, 'CONTENT'

+				self

+			end

+			

+			def wrap! element, *args

+				return self if not element or element == wrapped_in

+				case element

+				when :div

+					raise "Can't wrap %p in %p" % [wrapped_in, element] unless wrapped_in? nil

+					wrap_in! DIV

+				when :span

+					raise "Can't wrap %p in %p" % [wrapped_in, element] unless wrapped_in? nil

+					wrap_in! SPAN

+				when :page

+					wrap! :div if wrapped_in? nil

+					raise "Can't wrap %p in %p" % [wrapped_in, element] unless wrapped_in? :div

+					wrap_in! Output.page_template_for_css

+				when nil

+					return self

+				else

+					raise "Unknown value %p for :wrap" % element

+				end

+				@wrapped_in = element

+				self

+			end

+

+			def wrap *args

+				clone.wrap!(*args)

+			end

+

+			def numerize! mode = :table, options = {}

+				return self unless mode

+

+				offset = options.fetch :line_numbers_offset, DEFAULT_OPTIONS[:line_numbers_offset]

+				unless offset.is_a? Integer

+					raise ArgumentError, "Invalid value %p for :offset; Integer expected." % offset

+				end

+				

+				unless NUMERIZABLE_WRAPPINGS.include? options[:wrap]

+					raise ArgumentError, "Can't numerize, :wrap must be in %p, but is %p" % [NUMERIZABLE_WRAPPINGS, options[:wrap]]

+				end

+				

+				bold_every = options.fetch :bold_every, DEFAULT_OPTIONS[:bold_every]

+				bolding = 

+					if bold_every == :no_bolding or bold_every == 0

+						proc { |line| line.to_s }

+					elsif bold_every.is_a? Integer

+						proc do |line|

+							if line % bold_every == 0

+								"<strong>#{line}</strong>"  # every bold_every-th number in bold

+							else

+								line.to_s

+							end

+						end

+					else

+						raise ArgumentError, "Invalid value %p for :bolding; :no_bolding or Integer expected." % bolding

+					end

+				

+				line_count = count("\n")

+				line_count += 1 if self[-1] != ?\n

+

+				case mode				

+				when :inline

+					max_width = line_count.to_s.size

+					line = offset - 1

+					gsub!(/^/) do

+						line += 1

+						line_number = bolding.call line

+						"<span class=\"no\">#{ line_number.rjust(max_width) }</span>  "

+					end

+					wrap! :div

+					

+				when :table

+					# This is really ugly.

+					# Because even monospace fonts seem to have different heights when bold, 

+					# I make the newline bold, both in the code and the line numbers.

+					# FIXME Still not working perfect for Mr. Internet Exploder

+					line_numbers = (offset ... offset + line_count).to_a.map(&bolding).join("\n")

+					line_numbers << "\n"  # also for Mr. MS Internet Exploder :-/

+					line_numbers.gsub!(/\n/) { "<tt>\n</tt>" }

+					

+					line_numbers_tpl = DIV_TABLE.apply('LINE_NUMBERS', line_numbers)

+					gsub!(/\n/) { "<tt>\n</tt>" }

+					wrap_in! line_numbers_tpl

+					@wrapped_in = :div

+					

+				else

+					raise ArgumentError, "Unknown value %p for mode: :inline or :table expected" % mode

+				end

+

+				self

+			end

+

+			def numerize *args

+				clone.numerize!(*args)

+			end

+

+			class Template < String

+

+				def self.wrap! str, template, target

+					target = Regexp.new(Regexp.escape("<%#{target}%>"))

+					if template =~ target

+						str[0,0] = $`

+						str << $'

+					else

+						raise "Template target <%%%p%%> not found" % target

+					end

+				end

+				

+				def apply target, replacement

+					target = Regexp.new(Regexp.escape("<%#{target}%>"))

+					if self =~ target

+						Template.new($` + replacement + $')

+					else

+						raise "Template target <%%%p%%> not found" % target

+					end

+				end

+

+				module Simple

+					def ` str  #`

+						Template.new str

+					end

+				end

+			end

+			

+			extend Template::Simple

+

+#-- don't include the templates in docu

+			

+			SPAN = `<span class="code"><%CONTENT%></span>`

+

+			DIV, DIV_TABLE, PAGE =

+				<<-`DIV`, <<-`DIV_TABLE`, <<-`PAGE`

+			

+<div class="code">

+<pre><%CONTENT%></pre>

+</div>

+			DIV

+

+<div class="code">

+	<table class="code_table">

+		<tr>

+			<td class="line_numbers"><pre><%LINE_NUMBERS%></pre></td>

+			<td class="code_cell"><div class="nowrap"><pre><%CONTENT%></pre></div></td>

+		</tr>

+	</table>

+</div>			

+			DIV_TABLE

+<?xml version="1.0" encoding="iso-8859-1"?>

+<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN"

+	"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">

+<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="de">

+<head>

+	<meta http-equiv="content-type" content="text/html; charset=iso-8859-1" />

+	<title>CodeRay HTML Encoder Example</title>

+	<style type="text/css">

+<%CSS%>

+	</style>

+</head>

+<body style="background-color: white;">

+<%CONTENT%>

+</body>

+</html>

+			PAGE

+

+		end

+

+	end

+

+end

+end