#!/bin/bash

 #set -x

 export LC_ALL=C

 my_name="$( basename "${0}" )"

 usage() {

     cat <<-_EOF_

 		Usage:

 		    ${my_name} <repos_dir> <M.m.p>

 	_EOF_

 }

 repos="${1}"

 version="${2}"

 [ -n "${repos}"   ] || { usage; exit 1; }

 [ -d "${repos}"   ] || { printf "${my_name}: ${repos}: no such file or directory\n"; exit 1; }

 [ -n "${version}" ] || { usage; exit 1; }

 _hg() {

     HGPLAIN=1 hg --config progress.disabled=true "$@"

 }

 gen_bound_revs() {

     r1=$( _hg log   \

           |awk 'BEGIN {

                   found=0;

                 }

                 $1=="'"${label}"':" {

                   split($2,a,":"); rev=a[1];

                 }

                 $0~/^summary:[[:space:]]*[[:digit:]]+\.[[:digit:]]+: '"${msg}"'/ \

                 && found==0 {

                   printf( "%d\n", rev ); found=1;

                 }'

         )

     r2=$( _hg log -b "${branch}" \

           |awk '$1=="changeset:" {

                   split($2,a,":");

                   printf( "%d\n", a[1] );

                   nextfile;

                 }'

         )

     r1_log=$((r1+log_offset))

     if [ ${#r1_log} -gt ${#r2} ]; then

         rev_w=${#r1_log}

     else

         rev_w=${#r2}

     fi

 }

 print_intro_mail() {

     cat <<-_EOF_

 		Hello all!

 		I'm pleased to announce the release of crosstool-NG ${version}!

 		As usual, there has been quite a number of improvements, new features,

 		and bug fixes all around. The most notable changes are listed below:

 		YEM:

 		YEM: PUT YOUR MESSAGE HERE

 		YEM:

 		This marks the beginning of the ${ver_M}.${ver_m} maintenance branch, and the end of

 		the previous maintenance branch. As always, comments and suggestions

 		are most welcome!

 		The release can be found at the following URLs:

 		Changelog: http://crosstool-ng.org/download/crosstool-ng/crosstool-ng-${version}.changelog

 		Tarball:   http://crosstool-ng.org/download/crosstool-ng/crosstool-ng-${version}.tar.bz2

 		Patches:   http://crosstool-ng.org/download/crosstool-ng/01-fixes/${version}/

 		As a reminder, the home for crosstool-NG is:

 		http://crosstool-ng.org/

 		Crosstool-NG also has a Freshmeat page:

 		http://freshmeat.net/projects/crosstool-ng

 	_EOF_

 }

 print_intro_changelog_full_release() {

     cat <<-_EOF_

 		crosstool-NG ${version} -- ${date}

 		This is a feature-release. Significant changes are:

 		YEM:

 		YEM: PUT YOUR MESSAGE HERE

 		YEM:

 	_EOF_

 }

 print_intro_changelog_bug_fix() {

     cat <<-_EOF_

 		crosstool-NG ${version} -- ${date}

 		This is a bug-fix-only release.

 	_EOF_

 }

 print_author_stats() {

     printf "\nMany thanks to the people who contributed to this release:\n\n"

     prev_author=""

     template='{author|person}\n'

     _hg log -b "${branch}" -r "${r1_log}:${r2}"                 \

            --template "${template}"                             \

     |sed -r -e 's/"//g;'                                        \

     |awk -F '' '{

                   nb[$0]++;

                 }

                 END {

                   for( author in nb ) {

                     printf( "   %4d  %s\n", nb[author], author );

                   }

                 }'                                              \

     |sort -s -k1nr -k2

 }

 print_author_shortlog() {

     printf "\nHere is the per-author shortlog:\n"

     prev_author=""

     template='{author|person}|{rev}|{branches}|{desc|firstline}\n'

     _hg log -b "${branch}" -r "${r1_log}:${r2}"             \

            --template "${template}"                         \

     |awk -F '' '{

                   n=split( $0,a,"|" );

                   printf( "%s", gensub("\"","","g",a[1]) );

                   printf( "|%0*d", '${rev_w}', a[2] );

                   for(i=3;i<=n;i++) {

                     printf( "|%s", a[i] );

                   }

                   printf( "\n" );

                 }'                                          \

     |sort                                                   \

     |while read line; do

         author="$( echo "${line}" |cut -d \| -f 1 )"

         rev="$( echo "${line}" |cut -d \| -f 2 )"

         br="$( echo "${line}" |cut -d \| -f 3 )"

         desc="$( echo "${line}" |cut -d \| -f 4- )"

         case "${br}" in

             ${branch})  ;;

             [0-9]*.*)    continue;;

             *) ;;

         esac

         case "${desc}" in

             Merge.)                 continue;;

             *": close "*" branch"*) continue;;

 #           *\(merged\))            continue;;

         esac

         author="$( echo "${author}" |sed -r -e 's/"//g;' )"

         if [ ! "${prev_author}" = "${author}" ]; then

             printf "\n"

             printf "    ${author}:\n"

             prev_author="${author}"

         fi

         rev="$( echo "${rev}" |sed -r -e 's/^0*//;' )"

         printf "%s\n" "${desc}"     \

         |fmt -w 65                  \

         |(first=1; while read l; do

             if [ -n "${first}" ]; then

                 printf "        [%*d] %s\n" ${rev_w} ${rev} "${l}"

                 first=

             else

                 printf "         %*.*s  %s\n" ${rev_w} ${rev_w} '' "${l}"

             fi

         done)

     done

 }

 print_diffstat() {

     printf "\nThe diffstat follows:\n\n"

     _hg diff -r "${r1}:${r2}" --color=never \

     |diffstat -r 2 -p 1 -w 10               \

     |tail -n 1                              \

     |sed -r -e 's/^ */    /;'

     _hg diff -r "${r1}:${r2}" --color=never \

     |diffstat -f 1 -r 2 -p 1 -w 10          \

     |head -n -1                             \

     |while read file line; do

         if [ ${#file} -gt 57 ]; then

             file="$( echo "${file}" |sed -r -e 's/^(.{,24}).*(.{28})$/\1.....\2/;' )"

         fi

         printf "    %-57s %s\n" "${file}" "${line}"

     done

 }

 print_short_diffstat() {

     printf "\nThe short diffstat follows:\n\n"

     eval total=$(( $(

         _hg diff -r "${r1}:${r2}" --color=never "${i}"                              \

         |diffstat -r 2 -p 1 -w 10                                                   \

         |tail -n 1                                                                  \

         |sed -r -e 's/^[[:space:]]*[[:digit:]]+ files? changed(,[[:space:]]+|$)//;' \

                 -e 's/([[:digit:]]+)[^-\+]+\((-|\+)\)/\1/g;'                        \

                 -e 's/,//g; s/ /+/; s/^$/0/;'

     ) ))

     printf "    %-24.24s %5d(+/-)\n" "Total" ${total}

     others=${total}

     { for i in              \

         kconfig/            \

         patches/            \

         config/*/           \

         scripts/build/*/    \

         samples/            \

         ; do

         eval val=$(( $(

             _hg diff -r "${r1}:${r2}" --color=never "${i}"                              \

             |diffstat -r 2 -p 1 -w 10                                                   \

             |tail -n 1                                                                  \

             |sed -r -e 's/^[[:space:]]*[[:digit:]]+ files? changed(,[[:space:]]+|$)//;' \

                     -e 's/([[:digit:]]+)[^-\+]+\((-|\+)\)/\1/g;'                        \

                     -e 's/,//g; s/ /+/; s/^$/0/;'

         ) ))

         if [ ${val} -gt $((total/100)) ]; then

             printf "%d %s\n" $(((1000*val)/total)) "${i}"

             others=$((others-val))

         fi

     done; printf "%d Others\n" $(((1000*others)/total)); }  \

     |sort -nr                                               \

     |{ while read v i; do

         if [ "${i}" = "Others" ]; then

             others=${v}

         else

             printf "    %-24.24s %3d.%d%%\n" "${i}" $((v/10)) $((v%10))

         fi

        done; printf "    %-24.24s %3d.%d%%\n" "Others" $((others/10)) $((others%10)); }

 }

 ver_M="$( printf "${version}" |cut -d . -f 1 )"

 ver_m="$( printf "${version}" |cut -d . -f 2 )"

 ver_p="$( printf "${version}" |cut -d . -f 3 )"

 prefix="$(pwd)/crosstool-ng-${version}"

 pushd "${repos}" >/dev/null 2>&1

 printf "Checking for existing tag: "

 if _hg tags |grep -E '^'"crosstool-ng-${version}"'\>' >/dev/null; then

     printf "already tagged\n"

     exit 1

 fi

 printf "no\n"

 if [ ${ver_p} -eq 0 ]; then

     print_mail="yes"

     print_intro_changelog="print_intro_changelog_full_release"

     label="parent"

     msg="create maintenance branch, (update|bump) version to [[:digit:]]+"'\'".[[:digit:]]+"'\'".0"'$'

     branch="default"

     log_offset=0

 else

     print_mail="no"

     print_intro_changelog="print_intro_changelog_bug_fix"

     label="changeset"

     msg="(update|bump) version to ${ver_M}"'\'".${ver_m}"'\'".$((ver_p-1))"'\+hg$'

     branch="${ver_M}.${ver_m}"

     log_offset=1

 fi

 printf "Computing boundary revisions:"

 gen_bound_revs

 printf " %d:%d\n" ${r1} ${r2}

 printf "Tagging release:"

 _hg up "${branch}" >/dev/null

 if [ ${ver_p} -eq 0 ]; then

     printf " update version"

     _hg branch "${ver_M}.${ver_m}" >/dev/null

     echo "${version}" >".version"

     _hg ci -m "${ver_M}.${ver_m}: create maintenance branch, update version to ${version}"

 else

     printf " update version"

     echo "${version}" >".version"

     _hg ci -m "${ver_M}.${ver_m}: update version to ${version}"

 fi

 printf ", tag"

 _hg tag -m "Tagging release ${version}" crosstool-ng-${version}

 printf ", update version"

 echo "${version}+hg" >".version"

 _hg ci -m "${ver_M}.${ver_m}: update version to ${version}+hg"

 printf ", date"

 date="$( _hg log -r crosstool-ng-${version} --template '{date|isodate}\n'    \

          |sed -r -e 's/-|://g; s/ /./; s/ //;'                              \

        )"

 printf ", done.\n"

 if [ ${ver_p} -eq 0 ]; then

     printf "Generating release mail:"

     printf " intro"

     print_intro_mail        > "${prefix}.mail"

     printf ", stats"

     print_author_stats      >>"${prefix}.mail"

     printf ", shortlog"

     print_author_shortlog   >>"${prefix}.mail"

     printf ", diffstat"

     print_short_diffstat    >>"${prefix}.mail"

     printf ", done.\n"

 fi

 printf "Generating release changelog:"

 printf " intro"

 ${print_intro_changelog}    > "${prefix}.changelog"

 printf ", stats"

 print_author_stats          >>"${prefix}.changelog"

 printf ", shortlog"

 print_author_shortlog       >>"${prefix}.changelog"

 printf ", diffstat"

 print_diffstat              >>"${prefix}.changelog"

 printf ", done.\n"

 popd >/dev/null 2>&1

 printf "Creating tarball:"

 prefix="crosstool-ng-${version}"

 printf " extract"

 date="$( _hg log -R "${repos}" -r "${prefix}" --template '{date|rfc822date}\n' )"

 tmpdir="$( mktemp -d --tmpdir XXXXXX )"

 _hg archive --cwd "${repos}" -r "${prefix}" -X '.hg*' --type files "${tmpdir}/${prefix}"

 printf ", bootstrap"

 pushd "${tmpdir}/${prefix}" >/dev/null 2>&1

 ./bootstrap >/dev/null

 rm -rf autom4te.cache

 popd >/dev/null 2>&1

 printf ", tarball"

 tar cjf "$(pwd)/${prefix}.tar.bz2" -C "${tmpdir}" "${prefix}"

 rm -rf "${tmpdir}"

 printf ", sum"

 for s in md5 sha1 sha512; do

     ${s}sum "${prefix}.tar.bz2" >"${prefix}.tar.bz2.${s}"

 done

 printf ", touch"

 touch -d "${date}" "${prefix}"*

 printf ", done.\n"

 if [ ${ver_p} -eq 0 ]; then

     printf "\nAn editor will be launched for you to edit the mail.\n"

     read -p "Press enter when ready..." foo

     cp "${prefix}.mail"{,.orig}

     vi "${prefix}.mail"

     diff -du -U 1 "${prefix}.mail"{.orig,} |patch -p0 "${prefix}.changelog" >/dev/null

     rm -f "${prefix}".{mail,changelog}.orig

 fi

 printf "\nAn editor will be launched for you to review the changelog.\n"

 read -p "Press enter when ready..." foo

 vi "${prefix}.changelog"

 printf "\nNow, you can push the changes with:   hg push -R '${repos}'\n"