<?php
$win = new GtkWindow();
$win->set_title('GtkDiff');
$win->connect_simple('destroy', array('gtk', 'main_quit'));
$vbox = new GtkVBox();
$filehbox = new gtkhbox();
$filevbox1 = new gtkvbox();
$filevbox2 = new gtkvbox();
$filevbox3 = new gtkvbox();
$oldlabel = new GtkLabel('Old file');
$oldfile = new GtkEntry();
$oldlocate = new GtkButton('Locate');
$oldlocate->connect_simple('clicked','open',$oldfile);
$newlabel = new GtkLabel('New file');
$newfile = new GtkEntry();
$newlocate = new GtkButton('Locate');
$newlocate->connect_simple('clicked','open',$newfile);
$filehbox->pack_start($filevbox1,false,false);
$filehbox->pack_start($filevbox2);
$filehbox->pack_start($filevbox3,false,false);
$filevbox1->pack_start($oldlabel);
$filevbox1->pack_start($newlabel);
$filevbox2->pack_start($oldfile);
$filevbox2->pack_start($newfile);
$filevbox3->pack_start($oldlocate);
$filevbox3->pack_start($newlocate);
$patchscroll = new GtkScrolledWindow();
$patch = new GtkTextView();
$patchscroll->add_with_viewport($patch);
$vbox->pack_start($filehbox,false,false);
$vbox->pack_start($patchscroll);
$create = new GtkButton('Create');
$create->connect_simple('clicked', 'create_patch',$oldfile,$newfile,$patch);
$save = new GtkButton('Save');
$bhbox = new GtkHBox();
$bhbox->pack_start($create);
$bhbox->pack_start($save);
$save->set_sensitive(false);
$vbox->pack_start($bhbox,false,false);
$win->add($vbox);
$win->show_all();
Gtk::main();
function create_patch($oldfile,$newfile,$patch){
$old = $oldfile->get_text();
$new = $newfile->get_text();
if (file_exists($old) && file_exists($new)) {
$old = file_get_contents($old);
$new = file_get_contents($new);
$buffer = $patch->get_buffer();
$buffer->set_text(PHPDiff($old,$new));
}
}
function open($file) {
$dialog = new GtkFileChooserDialog("File Open", null, Gtk::FILE_CHOOSER_ACTION_OPEN,
array(Gtk::STOCK_OK, Gtk::RESPONSE_OK), null);
$dialog->show_all();
if ($dialog->run() == Gtk::RESPONSE_OK) {
$selected_file = $dialog->get_filename();
$file->set_text($selected_file);
}
$dialog->destroy();
}
function PHPDiff($old,$new) {
# split the source text into arrays of lines
$t1 = explode("\n",$old);
$x=array_pop($t1);
if ($x>'') $t1[]="$x\n\\ No newline at end of file";
$t2 = explode("\n",$new);
$x=array_pop($t2);
if ($x>'') $t2[]="$x\n\\ No newline at end of file";
# build a reverse-index array using the line as key and line number as value
# don't store blank lines, so they won't be targets of the shortest distance
# search
foreach($t1 as $i=>$x) if ($x>'') $r1[$x][]=$i;
foreach($t2 as $i=>$x) if ($x>'') $r2[$x][]=$i;
$a1=0; $a2=0; # start at beginning of each list
$actions=array();
# walk this loop until we reach the end of one of the lists
while ($a1<count($t1) && $a2<count($t2)) {
# if we have a common element, save it and go to the next
if ($t1[$a1]==$t2[$a2]) { $actions[]=4; $a1++; $a2++; continue; }
# otherwise, find the shortest move (Manhattan-distance) from the
# current location
$best1=count($t1); $best2=count($t2);
$s1=$a1; $s2=$a2;
while(($s1+$s2-$a1-$a2) < ($best1+$best2-$a1-$a2)) {
$d=-1;
foreach((array)@$r1[$t2[$s2]] as $n)
if ($n>=$s1) { $d=$n; break; }
if ($d>=$s1 && ($d+$s2-$a1-$a2)<($best1+$best2-$a1-$a2))
{ $best1=$d; $best2=$s2; }
$d=-1;
foreach((array)@$r2[$t1[$s1]] as $n)
if ($n>=$s2) { $d=$n; break; }
if ($d>=$s2 && ($s1+$d-$a1-$a2)<($best1+$best2-$a1-$a2))
{ $best1=$s1; $best2=$d; }
$s1++; $s2++;
}
while ($a1<$best1) { $actions[]=1; $a1++; } # deleted elements
while ($a2<$best2) { $actions[]=2; $a2++; } # added elements
}
# we've reached the end of one list, now walk to the end of the other
while($a1<count($t1)) { $actions[]=1; $a1++; } # deleted elements
while($a2<count($t2)) { $actions[]=2; $a2++; } # added elements
# and this marks our ending point
$actions[]=8;
# now, let's follow the path we just took and report the added/deleted
# elements into $out.
$op = 0;
$x0=$x1=0; $y0=$y1=0;
$out = array();
foreach($actions as $act) {
if ($act==1) { $op|=$act; $x1++; continue; }
if ($act==2) { $op|=$act; $y1++; continue; }
if ($op>0) {
$xstr = ($x1==($x0+1)) ? $x1 : ($x0+1).",$x1";
$ystr = ($y1==($y0+1)) ? $y1 : ($y0+1).",$y1";
if ($op==1) $out[] = "{$xstr}d{$y1}";
elseif ($op==3) $out[] = "{$xstr}c{$ystr}";
while ($x0<$x1) { $out[] = '< '.$t1[$x0]; $x0++; } # deleted elems
if ($op==2) $out[] = "{$x1}a{$ystr}";
elseif ($op==3) $out[] = '---';
while ($y0<$y1) { $out[] = '> '.$t2[$y0]; $y0++; } # added elems
}
$x1++; $x0=$x1;
$y1++; $y0=$y1;
$op=0;
}
$out[] = '';
return join("\n",$out);
}
?>