1
+ − 1
<?php
+ − 2
+ − 3
/**
+ − 4
* "Inline" diff renderer.
+ − 5
*
+ − 6
* This class renders diffs in the Wiki-style "inline" format.
+ − 7
*
+ − 8
* $Horde: framework/Text_Diff/Diff/Renderer/inline.php,v 1.16 2006/01/08 00:06:57 jan Exp $
+ − 9
*
+ − 10
* @author Ciprian Popovici
+ − 11
* @package Text_Diff
+ − 12
*/
+ − 13
class Text_Diff_Renderer_inline extends Text_Diff_Renderer {
+ − 14
+ − 15
/**
+ − 16
* Number of leading context "lines" to preserve.
+ − 17
*/
+ − 18
var $_leading_context_lines = 10000;
+ − 19
+ − 20
/**
+ − 21
* Number of trailing context "lines" to preserve.
+ − 22
*/
+ − 23
var $_trailing_context_lines = 10000;
+ − 24
+ − 25
/**
+ − 26
* Prefix for inserted text.
+ − 27
*/
+ − 28
var $_ins_prefix = '<ins>';
+ − 29
+ − 30
/**
+ − 31
* Suffix for inserted text.
+ − 32
*/
+ − 33
var $_ins_suffix = '</ins>';
+ − 34
+ − 35
/**
+ − 36
* Prefix for deleted text.
+ − 37
*/
+ − 38
var $_del_prefix = '<del>';
+ − 39
+ − 40
/**
+ − 41
* Suffix for deleted text.
+ − 42
*/
+ − 43
var $_del_suffix = '</del>';
+ − 44
+ − 45
/**
+ − 46
* Header for each change block.
+ − 47
*/
+ − 48
var $_block_header = '';
+ − 49
+ − 50
/**
+ − 51
* What are we currently splitting on? Used to recurse to show word-level
+ − 52
* changes.
+ − 53
*/
+ − 54
var $_split_level = 'words';
+ − 55
+ − 56
function _blockHeader($xbeg, $xlen, $ybeg, $ylen)
+ − 57
{
+ − 58
return $this->_block_header;
+ − 59
}
+ − 60
+ − 61
function _startBlock($header)
+ − 62
{
+ − 63
return $header;
+ − 64
}
+ − 65
+ − 66
function _lines($lines, $prefix = ' ', $encode = true)
+ − 67
{
+ − 68
if ($encode) {
+ − 69
array_walk($lines, array(&$this, '_encode'));
+ − 70
}
+ − 71
+ − 72
if ($this->_split_level == 'words') {
+ − 73
return implode('', $lines);
+ − 74
} else {
+ − 75
return implode("\n", $lines) . "\n";
+ − 76
}
+ − 77
}
+ − 78
+ − 79
function _added($lines)
+ − 80
{
+ − 81
array_walk($lines, array(&$this, '_encode'));
+ − 82
$lines[0] = $this->_ins_prefix . $lines[0];
+ − 83
$lines[count($lines) - 1] .= $this->_ins_suffix;
+ − 84
return $this->_lines($lines, ' ', false);
+ − 85
}
+ − 86
+ − 87
function _deleted($lines, $words = false)
+ − 88
{
+ − 89
array_walk($lines, array(&$this, '_encode'));
+ − 90
$lines[0] = $this->_del_prefix . $lines[0];
+ − 91
$lines[count($lines) - 1] .= $this->_del_suffix;
+ − 92
return $this->_lines($lines, ' ', false);
+ − 93
}
+ − 94
+ − 95
function _context($lines)
+ − 96
{
+ − 97
return "<!-- Start context -->\n<tr><td></td><td class=\"diff-context\">".$this->_lines($lines).'</td></tr>'."\n<!-- End context -->\n\n";
+ − 98
}
+ − 99
+ − 100
function _changed($orig, $final)
+ − 101
{
+ − 102
/* If we've already split on words, don't try to do so again - just
+ − 103
* display. */
+ − 104
if ($this->_split_level == 'words') {
+ − 105
$prefix = '';
+ − 106
while ($orig[0] !== false && $final[0] !== false &&
+ − 107
substr($orig[0], 0, 1) == ' ' &&
+ − 108
substr($final[0], 0, 1) == ' ') {
+ − 109
$prefix .= substr($orig[0], 0, 1);
+ − 110
$orig[0] = substr($orig[0], 1);
+ − 111
$final[0] = substr($final[0], 1);
+ − 112
}
+ − 113
return $prefix . $this->_deleted($orig) . $this->_added($final);
+ − 114
}
+ − 115
+ − 116
$text1 = implode("\n", $orig);
+ − 117
$text2 = implode("\n", $final);
+ − 118
+ − 119
/* Non-printing newline marker. */
+ − 120
$nl = "\0";
+ − 121
+ − 122
/* We want to split on word boundaries, but we need to
+ − 123
* preserve whitespace as well. Therefore we split on words,
+ − 124
* but include all blocks of whitespace in the wordlist. */
+ − 125
$diff = &new Text_Diff($this->_splitOnWords($text1, $nl),
+ − 126
$this->_splitOnWords($text2, $nl));
+ − 127
+ − 128
/* Get the diff in inline format. */
+ − 129
$renderer = &new Text_Diff_Renderer_inline(array_merge($this->getParams(),
+ − 130
array('split_level' => 'words')));
+ − 131
+ − 132
/* Run the diff and get the output. */
+ − 133
return str_replace($nl, "\n", $renderer->render($diff)) . "\n";
+ − 134
}
+ − 135
+ − 136
function _splitOnWords($string, $newlineEscape = "\n")
+ − 137
{
+ − 138
$words = array();
+ − 139
$length = strlen($string);
+ − 140
$pos = 0;
+ − 141
+ − 142
while ($pos < $length) {
+ − 143
// Eat a word with any preceding whitespace.
+ − 144
$spaces = strspn(substr($string, $pos), " \n");
+ − 145
$nextpos = strcspn(substr($string, $pos + $spaces), " \n");
+ − 146
$words[] = str_replace("\n", $newlineEscape, substr($string, $pos, $spaces + $nextpos));
+ − 147
$pos += $spaces + $nextpos;
+ − 148
}
+ − 149
+ − 150
return $words;
+ − 151
}
+ − 152
+ − 153
function _encode(&$string)
+ − 154
{
+ − 155
$string = htmlspecialchars($string);
+ − 156
}
+ − 157
+ − 158
}