# Copyright (c) 2002-2005 Cunningham & Cunningham, Inc.
# Released under the terms of the GNU General Public License version 2 or later.
#
# Perl translation by Tony Byrne <fit4perl@byrnehq.com>

package Test::C2FIT::fat::AnnotationFixture;
use base 'Test::C2FIT::ColumnFixture';

use strict;

use Test::C2FIT::Parse;

sub ResultingHTML {
    my $self = shift;

    $self->{'Row'}    = 0 unless $self->{'Row'};
    $self->{'Column'} = 0 unless $self->{'Column'};

    my $table = new Test::C2FIT::Parse( $self->{'OriginalHTML'} );
    my $row   = $table->at( 0, $self->{'Row'} - 1 );
    my $cell  = $row->at( 0, $self->{'Column'} - 1 );

    $cell->{'body'} = $self->{'OverwriteCellBody'}
      if $self->{'OverwriteCellBody'};
    $cell->addToBody( $self->{'AddToCellBody'} ) if $self->{'AddToCellBody'};
    $cell->{'tag'} = $self->{'OverwriteCellTag'} if $self->{'OverwriteCellTag'};
    $cell->{'end'} = $self->{'OverwriteEndCellTag'}
      if $self->{'OverwriteEndCellTag'};
    $cell->addToTag( $self->stripDelimiters( $self->{'AddToCellTag'} ) )
      if $self->{'AddToCellTag'};

    $row->{'tag'} = $self->{'OverwriteRowTag'} if $self->{'OverwriteRowTag'};
    $row->{'end'} = $self->{'OverwriteEndRowTag'}
      if $self->{'OverwriteEndRowTag'};
    $row->addToTag( $self->stripDelimiters( $self->{'AddToRowTag'} ) )
      if $self->{'AddToRowTag'};

    $table->{'tag'} = $self->{'OverwriteTableTag'}
      if $self->{'OverwriteTableTag'};
    $table->{'end'} = $self->{'OverwriteEndTableTag'}
      if $self->{'OverwriteEndTableTag'};
    $table->addToTag( $self->stripDelimiters( $self->{'AddToTableTag'} ) )
      if $self->{'AddToTableTag'};

    $self->addParse( $cell, $self->{'AddCellFollowing'}, ['td'] )
      if $self->{'AddCellFollowing'};
    $self->removeParse($cell) if $self->{'RemoveFollowingCell'};

    $self->addParse( $row, $self->{'AddRowFollowing'}, [ 'tr', 'td' ] )
      if $self->{'AddRowFollowing'};
    $self->removeParse($row) if $self->{'RemoveFollowingRow'};

    $self->addParse(
        $table,
        $self->{'AddTableFollowing'},
        [ 'table', 'tr', 'td' ]
      )
      if $self->{'AddTableFollowing'};

    return $self->GenerateOutput($table);
}

sub addParse {
    my $self = shift;
    my ( $parse, $newString, $tags ) = @_;
    my $newParse = new Test::C2FIT::Parse( $newString, $tags );
    $newParse->{'more'}    = $parse->more();
    $newParse->{'trailer'} = $parse->trailer();
    $parse->{'more'}       = $newParse;
    $parse->{'trailer'}    = undef;
}

sub removeParse {
    my $self  = shift;
    my $parse = shift;
    $parse->{'trailer'} = $parse->more()->trailer();
    $parse->{'more'}    = $parse->more()->more();
}

sub stripDelimiters {
    my $self = shift;
    my $s    = shift;
    $s =~ s/^\[//g;
    $s =~ s/]$//g;
    return $s;
}

# code smell note: copied from DocumentParseFixture
sub GenerateOutput {
    my $self  = shift;
    my $parse = shift;
    return $parse->asString();
}

1;

__END__

package fat;

import fit.*;
import java.io.*;
import java.text.ParseException;

public class AnnotationFixture extends ColumnFixture {
	public String OriginalHTML;
	public int Row;
	public int Column;
	
	public String OverwriteCellBody;
	public String AddToCellBody;
	
	public String OverwriteCellTag;
	public String OverwriteEndCellTag;
	public String AddToCellTag;
	
	public String OverwriteRowTag;
	public String OverwriteEndRowTag;
	public String AddToRowTag;

	public String OverwriteTableTag;
	public String OverwriteEndTableTag;
	public String AddToTableTag;
	
	public String AddCellFollowing;
	public String RemoveFollowingCell;
	
	public String AddRowFollowing;
	public String RemoveFollowingRow;
	
	public String AddTableFollowing;

	public String ResultingHTML() throws Exception {
		Parse table = new Parse(OriginalHTML);
		Parse row = table.at(0, Row - 1);
		Parse cell = row.at(0, Column - 1);
		
		if (OverwriteCellBody != null) cell.body = OverwriteCellBody;
		if (AddToCellBody != null) cell.addToBody(AddToCellBody);
		
        if (OverwriteCellTag != null) cell.tag = OverwriteCellTag;
        if (OverwriteEndCellTag != null) cell.end = OverwriteEndCellTag;
        if (AddToCellTag != null) cell.addToTag(stripDelimiters(AddToCellTag));
        
        if (OverwriteRowTag != null) row.tag = OverwriteRowTag;
        if (OverwriteEndRowTag != null) row.end = OverwriteEndRowTag;
        if (AddToRowTag != null) row.addToTag(stripDelimiters(AddToRowTag));

		if (OverwriteTableTag != null) table.tag = OverwriteTableTag;
		if (OverwriteEndTableTag != null) table.end = OverwriteEndTableTag;
		if (AddToTableTag != null) table.addToTag(stripDelimiters(AddToTableTag));

		if (AddCellFollowing != null) addParse(cell, AddCellFollowing, new String[] {"td"});
		if (RemoveFollowingCell != null) removeParse(cell);
				
		if (AddRowFollowing != null) addParse(row, AddRowFollowing, new String[] {"tr", "td"});
		if (RemoveFollowingRow != null) removeParse(row);
		
		if (AddTableFollowing != null) addParse(table, AddTableFollowing, new String[] {"table", "tr", "td"});

		return GenerateOutput(table);        
	}

    private void addParse(Parse parse, String newString, String[] tags) throws ParseException {
        Parse newParse = new Parse(newString, tags);
        newParse.more = parse.more;
        newParse.trailer = parse.trailer;
        parse.more = newParse;
        parse.trailer = null;
    }

	private void removeParse(Parse parse) {
		parse.trailer = parse.more.trailer;
		parse.more = parse.more.more;
	}
	
	private String stripDelimiters(String s) {
        return s.replaceAll("^\\[", "").replaceAll("]$", "");
    }
	
	// code smell note: copied from DocumentParseFixture	
	private String GenerateOutput(Parse document) throws ParseException {
		StringWriter result = new StringWriter();
		document.print(new PrintWriter(result));
		return result.toString().trim();
	}
}