"

 COPYRIGHT (c) 2006 by eXept Software AG

              All Rights Reserved

 This software is furnished under a license and may be used

 only in accordance with the terms of that license and with the

 inclusion of the above copyright notice.   This software may not

 be provided or otherwise made available to, or used by, any

 other person.  No title to or ownership of the software is

 hereby transferred.

"

"{ Package: 'stx:libtool' }"

"{ NameSpace: Tools }"

DiffCodeView2 subclass:#Diff3CodeView2

	instanceVariableNames:''

	classVariableNames:''

	poolDictionaries:''

	category:'Interface-CodeView'

!

Object subclass:#Diff3Data

	instanceVariableNames:'text1 list1 text2 list2 text3 list3 inserted1 inserted2 inserted3

		deleted changed'

	classVariableNames:''

	poolDictionaries:''

	privateIn:Diff3CodeView2

!

!Diff3CodeView2 class methodsFor:'documentation'!

copyright

"

 COPYRIGHT (c) 2006 by eXept Software AG

              All Rights Reserved

 This software is furnished under a license and may be used

 only in accordance with the terms of that license and with the

 inclusion of the above copyright notice.   This software may not

 be provided or otherwise made available to, or used by, any

 other person.  No title to or ownership of the software is

 hereby transferred.

"

! !

!Diff3CodeView2 class methodsFor:'defaults'!

numberOfViews

    "return the number of the synced subViews.

     Usually redefined in subclasses"

    ^ 3

    "Created: / 16-03-2012 / 12:56:33 / Jan Vrany <jan.vrany@fit.cvut.cz>"

! !

!Diff3CodeView2 methodsFor:'accessing'!

computeDiffDataForText1:t1 text2:t2 text3: t3

    ^Diff3Data new

        computeDiffDataForText1:t1 text2:t2 text3: t3;

        yourself

    "Created: / 16-03-2012 / 20:49:22 / Jan Vrany <jan.vrany@fit.cvut.cz>"

!

text1:t1 text2:t2 text3: t3

    |data|

    data := self computeDiffDataForText1:t1 text2:t2 text3: t3.

    (textViews at:1) 

        list:(data list1);

        deletedLines:#();

        changedLines:(data changed);

        insertedLines:(data inserted1);    

        originDiffText:t1;

        emptyLines:#().

    (textViews at:2) 

        list:(data list2);

        deletedLines:#();

        changedLines:(data changed);

        insertedLines:(data inserted2);

        originDiffText:t2;

        emptyLines:#().

    (textViews at:3) 

        list:(data list3);

        deletedLines:#();

        changedLines:(data changed);

        insertedLines:(data inserted3);

        originDiffText:t3;

        emptyLines:#().

    "Modified: / 22-06-2010 / 21:36:35 / Jakub <zelenja7@fel.cvut.cz>"

    "Created: / 16-03-2012 / 12:58:14 / Jan Vrany <jan.vrany@fit.cvut.cz>"

! !

!Diff3CodeView2::Diff3Data methodsFor:'accessing'!

changed

    ^changed copy

    "Modified: / 02-05-2010 / 19:31:18 / Jakub <zelenja7@fel.cvut.cz>"

    "Modified: / 16-07-2010 / 09:35:01 / Jan Vrany <jan.vrany@fit.cvut.cz>"

!

changed:something

    changed := something.

!

deleted

    ^ deleted

!

deleted:something

    deleted := something.

!

inserted1

    ^ inserted1

!

inserted2

    ^ inserted2

!

inserted3

    ^ inserted3

!

list1

    ^ list1

!

list1:something

    list1 := something.

!

list2

    ^ list2

!

list2:something

    list2 := something.

!

list3

    ^ list3

!

list3:something

    list3 := something.

!

text1

    ^ text1

!

text1:something

    text1 := something.

!

text2

    ^ text2

!

text2:something

    text2 := something.

!

text3

    ^ text3

!

text3:something

    text3 := something.

! !

!Diff3CodeView2::Diff3Data methodsFor:'computing'!

addLines: total from: src to: dst chunk: chunk

    ^chunk isSequenceable ifTrue:[

        dst addAll: chunk.

        (total - chunk size) timesRepeat: [

            dst add: nil.

        ]

    ] ifFalse:[

        self addLines: total from: src to: dst offset: chunk offset length: chunk length.

    ]

    "Created: / 09-04-2012 / 11:54:34 / Jan Vrany <jan.vrany@fit.cvut.cz>"

!

addLines: total from: src to: dst offset: offset length: len

    | start stop |

    start := offset max:1.

    stop  := (offset + (len max:0) - 1).

    start to: (stop min: src size) do:[:i|                     

        (src size >= i) ifTrue:[

            dst add: (src at: i).

        ] ifFalse:[

            src add: nil.

        ]

    ].

    (total - ((stop min: src size) - start + 1)) timesRepeat: [ dst add: nil ].

    "Created: / 16-03-2012 / 22:20:22 / Jan Vrany <jan.vrany@fit.cvut.cz>"

!

computeDiffDataForText1:t1 text2:t2 text3: t3

    | t1c t2c  t3c  diff3chunks lnr |

    list1 := StringCollection new.

    list2 := StringCollection new.

    list3 := StringCollection new.

    changed := OrderedCollection new.

    inserted1 := OrderedCollection new.

    inserted2 := OrderedCollection new.

    inserted3 := OrderedCollection new.

"/    t1 isNil ifTrue:[ ^self ].

"/    t2 isNil ifTrue:[ ^self ].

"/    t3 isNil ifTrue:[ ^self ].

    t1c := (text1 := t1 ? #()) asStringCollection.

    t2c := (text2 := t2 ? #()) asStringCollection.

    t3c := (text3 := t3 ? #()) asStringCollection.

    diff3chunks := Diff3 new

                    file0: t1c; "/Base version

                    file1: t2c; "/A

                    file2: t3c; "/B

                    diffIndices.

    lnr := 1.

    diff3chunks do:[:chunk|

        | len |

        len := chunk length.

        chunk isConflict ifTrue:[

            self addLines: len from: t1c to: list1 chunk: chunk original.

            self addLines: len from: t2c to: list2 chunk: chunk left.

            self addLines: len from: t3c to: list3 chunk: chunk right.

            chunk isInsertionInOriginal ifTrue:[

                lnr to:(lnr + len -1) do:[:i|inserted1 add: i].

            ] ifFalse:[chunk isInsertionInLeft ifTrue:[

                lnr to:(lnr + len -1) do:[:i|inserted2 add: i].

            ] ifFalse:[chunk isInsertionInRight ifTrue:[

                lnr to:(lnr + len -1) do:[:i|inserted3 add: i].

            ] ifFalse:[

                lnr to:(lnr + len -1) do:[:i|changed add: i].

            ]]]

        ].

        chunk isChunk ifTrue:[

            chunk side == #original ifTrue:[

                self addLines: len from: t1c to: list1 offset: chunk offset length: len.

                self addLines: len from: t1c to: list2 offset: chunk offset length: len.

                self addLines: len from: t1c to: list3 offset: chunk offset length: len.

            ].

            chunk side == #left ifTrue:[

                self breakPoint: #jv info: 'Should no longer happen'.

                self addLines: len from: t1c to: list1 offset: chunk offset length: 0"len".

                self addLines: len from: t2c to: list2 offset: chunk offset length: len.

                self addLines: len from: t3c to: list3 offset: chunk offset length: 0"len".

                lnr to:(lnr + len - 1) do:[:i| "changed"inserted2 add:i ].

            ].

            chunk side == #right ifTrue:[

                self breakPoint: #jv info: 'Should no longer happen'.

                self addLines: len from: t1c to: list1 offset: chunk offset length: 0"len".

                self addLines: len from: t2c to: list2 offset: chunk offset length: 0"len".

                self addLines: len from: t3c to: list3 offset: chunk offset length: len.

                lnr to:(lnr + len - 1) do:[:i|"changed"inserted3 add: i].

            ]

        ].

        lnr := lnr + len.

    ].

    "Created: / 16-03-2012 / 22:07:51 / Jan Vrany <jan.vrany@fit.cvut.cz>"

!

old_computeDiffDataForText1:t1 text2:t2 text3: t3

    | t1c t2c  t3c  diff3chunks lnr |

    list1 := StringCollection new.

    list2 := StringCollection new.

    list3 := StringCollection new.

    changed := OrderedCollection new.

    inserted1 := OrderedCollection new.

    inserted2 := OrderedCollection new.

    inserted3 := OrderedCollection new.

    t1 isNil ifTrue:[ ^self ].

    t2 isNil ifTrue:[ ^self ].

    t3 isNil ifTrue:[ ^self ].

    t1c := (text1 := t1) asStringCollection.

    t2c := (text2 := t2) asStringCollection.

    t3c := (text3 := t3) asStringCollection.

    diff3chunks := Diff3 new

                    file0: t1c; "/Base version

                    file1: t2c; "/A

                    file2: t3c; "/B

                    mergeIndices.

    lnr := 1.

    diff3chunks do:[:chunk|

        | len |

        len := chunk length.

        chunk isConflict ifTrue:[

            self addLines: len from: t1c to: list1 offset: chunk original offset length: chunk original length.

            self addLines: len from: t2c to: list2 offset: chunk left     offset length: chunk left     length.

            self addLines: len from: t3c to: list3 offset: chunk right    offset length: chunk right    length.

"/            chunk isInsertionInOriginal ifTrue:[

"/                lnr to:(lnr + len -1) do:[:i|inserted1 add: i].

"/            ] ifFalse:[chunk isInsertionInLeft ifTrue:[

"/                lnr to:(lnr + len -1) do:[:i|inserted2 add: i].

"/            ] ifFalse:[chunk isInsertionInRight ifTrue:[

"/                lnr to:(lnr + len -1) do:[:i|inserted3 add: i].

"/            ] ifFalse:[

                lnr to:(lnr + len -1) do:[:i|changed add: i].

"/            ]]]

        ].

        chunk isChunk ifTrue:[

            chunk side == #original ifTrue:[

                self addLines: len from: t1c to: list1 offset: chunk offset length: len.

                self addLines: len from: t1c to: list2 offset: chunk offset length: len.

                self addLines: len from: t1c to: list3 offset: chunk offset length: len.

            ].

            chunk side == #left ifTrue:[

                self addLines: len from: t1c to: list1 offset: chunk offset length: 0"len".

                self addLines: len from: t2c to: list2 offset: chunk offset length: len.

                self addLines: len from: t3c to: list3 offset: chunk offset length: 0"len".

                lnr to:(lnr + len - 1) do:[:i| "changed"inserted2 add:i ].

            ].

            chunk side == #right ifTrue:[

                self addLines: len from: t1c to: list1 offset: chunk offset length: 0"len".

                self addLines: len from: t2c to: list2 offset: chunk offset length: 0"len".

                self addLines: len from: t3c to: list3 offset: chunk offset length: len.

                lnr to:(lnr + len - 1) do:[:i|"changed"inserted3 add: i].

            ]

        ].

        lnr := lnr + len.

    ].

    "Created: / 20-03-2012 / 17:42:57 / Jan Vrany <jan.vrany@fit.cvut.cz>"

! !

!Diff3CodeView2 class methodsFor:'documentation'!

version_HG

    ^ '$Changeset: <not expanded> $'

!

version_SVN

    ^ '$Id: Tools__Diff3CodeView2.st 7974 2012-04-09 11:37:13Z vranyj1 $'

! !