#!/bin/bash

#

# cli_commitRepoChanges.sh -- This function realizes a subversion

# commit command agains the workgin copy in order to send local

# changes up to central repository.

#

# Copyright (C) 2009-2011 Alain Reguera Delgado

#

# This program is free software; you can redistribute it and/or modify

# it under the terms of the GNU General Public License as published by

# the Free Software Foundation; either version 2 of the License, or

# (at your option) any later version.

#

# This program is distributed in the hope that it will be useful, but

# WITHOUT ANY WARRANTY; without even the implied warranty of

# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU

# General Public License for more details.

#

# You should have received a copy of the GNU General Public License

# along with this program; if not, write to the Free Software

# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307

# USA.

# ----------------------------------------------------------------------

# $Id$

# ----------------------------------------------------------------------

function cli_commitRepoChanges {

    # Verify `--dont-commit-changes' option.

    if [[ $FLAG_DONT_COMMIT_CHANGES == 'true' ]];then

        return

    fi

    local -a FILES

    local -a INFO

    local -a FILESNUM

    local COUNT=0

    local STATUSOUT=''

    local PREDICATE=''

    local CHNGTOTAL=0

    local LOCATIONS=''

    # Define source location the subversion status action will take

    # place on. If arguments are provided use them as srouce location.

    # Otherwise use action value as default source location.

    if [[ "$@" != '' ]];then

        LOCATIONS="$@"

    else

        LOCATIONS="$ACTIONVAL"

    fi

    # Verify locations existence. It shoud exist as regular file or

    # directory inside the repository working copy.

    cli_checkFiles "$LOCATIONS" 'fd'

    cli_checkFiles "$LOCATIONS" 'isInWorkingCopy'

    # Outout separator line.

    cli_printMessage '-' 'AsSeparatorLine'

    # Check working copy.

    cli_printMessage "`gettext "Checking changes in the working copy"`" 'AsResponseLine'

    STATUSOUT=$(svn status ${LOCATIONS})

    # Outout separator line.

    cli_printMessage '-' 'AsSeparatorLine'

    # Define path fo files considered recent modifications from

    # working copy up to central repository.

    FILES[0]=$(echo "$STATUSOUT" | egrep "^M.+$(cli_getRepoTLDir "${LOCATIONS}").+$" | sed -r "s,^.+($(cli_getRepoTLDir "${LOCATIONS}").+)$,\1,")

    FILES[1]=$(echo "$STATUSOUT" | egrep "^\?.+$(cli_getRepoTLDir "${LOCATIONS}").+$" | sed -r "s,^.+($(cli_getRepoTLDir "${LOCATIONS}").+)$,\1,")

    FILES[2]=$(echo "$STATUSOUT" | egrep "^D.+$(cli_getRepoTLDir "${LOCATIONS}").+$" | sed -r "s,^.+($(cli_getRepoTLDir "${LOCATIONS}").+)$,\1,")

    FILES[3]=$(echo "$STATUSOUT" | egrep "^A.+$(cli_getRepoTLDir "${LOCATIONS}").+$" | sed -r "s,^.+($(cli_getRepoTLDir "${LOCATIONS}").+)$,\1,")

    # Define description of files considered recent modifications from

    # working copy up to central repository.

    INFO[0]="`gettext "Modified"`"

    INFO[1]="`gettext "Unversioned"`"

    INFO[2]="`gettext "Deleted"`"

    INFO[3]="`gettext "Added"`"

    while [[ $COUNT -ne ${#FILES[*]} ]];do

        # Define total number of files. Avoid counting empty line.

        if [[ "${FILES[$COUNT]}" == '' ]];then

            FILESNUM[$COUNT]=0

        else

            FILESNUM[$COUNT]=$(echo "${FILES[$COUNT]}" | wc -l)

        fi

        # Calculate total amount of changes.

        CHNGTOTAL=$(($CHNGTOTAL + ${FILESNUM[$COUNT]}))

        # Build report predicate. Use report predicate to show any

        # information specific to the number of files found. For

        # example, you can use this section to show warning messages,

        # notes, and so on. By default we use the word `file' or

        # `files' at ngettext's consideration followed by change

        # direction.

        PREDICATE[$COUNT]=`ngettext "file in the working copy" \

            "files in the repository" $((${FILESNUM[$COUNT]} + 1))`

        # Output report line.

        cli_printMessage "${INFO[$COUNT]}: ${FILESNUM[$COUNT]} ${PREDICATE[$COUNT]}" 'AsRegularLine'

        # Increase counter.

        COUNT=$(($COUNT + 1))

    done

    # In case new unversioned files exist, ask the user to add them

    # into the repository. This may happen when new documentation

    # entries are created.

    if [[ ${FILESNUM[1]} -gt 0 ]];then

        # Outout separator line.

        cli_printMessage '-' 'AsSeparatorLine'

        cli_printMessage "`ngettext "The following file is unversioned" \

            "The following files are unversioned" ${FILESNUM[1]}`:"

        for FILE in ${FILES[1]};do

            cli_printMessage $FILE 'AsResponseLine'

        done

        cli_printMessage "`ngettext "Do you want to add it now?" \

            "Do you want to add them now?" ${FILESNUM[2]}`" 'AsYesOrNoRequestLine'

        svn add ${FILES[1]} --quiet

    fi

    # Check total amount of changes and, if any, check differences and

    # commit them up to central repository.

    if [[ $CHNGTOTAL -gt 0 ]];then

        # Outout separator line.

        cli_printMessage '-' 'AsSeparatorLine'

        # Verify changes.

        cli_printMessage "`gettext "Do you want to see changes now?"`" "AsYesOrNoRequestLine"

        svn diff ${FILES[*]} | less

        # Commit changes.

        cli_printMessage "`gettext "Do you want to commit changes now?"`" "AsYesOrNoRequestLine"

        svn commit ${FILES[*]}

    fi

}