scripts/unify-sources.sh
author Peter Kovacs <kpeter@inf.elte.hu>
Wed, 06 May 2009 14:46:05 +0200
changeset 649 76cbcb3e9bbb
parent 554 6b9c1f6eb1e5
parent 498 a76f55d7d397
child 655 c706534d4740
permissions -rwxr-xr-x
Add a test file for the connectivity functions (#285)
The Euler tools have a separate test file.
alpar@38
     1
#!/bin/bash
alpar@38
     2
alpar@498
     3
YEAR=`date +%Y`
alpar@38
     4
HGROOT=`hg root`
alpar@38
     5
alpar@498
     6
function hg_year() {
alpar@498
     7
    if [ -n "$(hg st $1)" ]; then
alpar@498
     8
        echo $YEAR
alpar@628
     9
}
alpar@628
    10
deba@324
    11
# file enumaration modes
deba@324
    12
deba@324
    13
function all_files() {
deba@324
    14
    hg status -a -m -c |
deba@324
    15
    cut -d ' ' -f 2 | grep -E '(\.(cc|h|dox)$|Makefile\.am$)' |
deba@324
    16
    while read file; do echo $HGROOT/$file; done
deba@324
    17
}
deba@324
    18
deba@324
    19
function modified_files() {
deba@324
    20
    hg status -a -m |
deba@324
    21
    cut -d ' ' -f 2 | grep -E  '(\.(cc|h|dox)$|Makefile\.am$)' |
deba@324
    22
    while read file; do echo $HGROOT/$file; done
deba@324
    23
}
deba@324
    24
deba@324
    25
function changed_files() {
deba@324
    26
    {
deba@324
    27
        if [ -n "$HG_PARENT1" ]
deba@324
    28
        then
deba@324
    29
            hg status --rev $HG_PARENT1:$HG_NODE -a -m
deba@324
    30
        fi
deba@324
    31
        if [ -n "$HG_PARENT2" ]
deba@324
    32
        then
deba@324
    33
            hg status --rev $HG_PARENT2:$HG_NODE -a -m
deba@324
    34
        fi
deba@324
    35
    } | cut -d ' ' -f 2 | grep -E '(\.(cc|h|dox)$|Makefile\.am$)' | 
deba@324
    36
    sort | uniq |
deba@324
    37
    while read file; do echo $HGROOT/$file; done
deba@324
    38
}
deba@324
    39
deba@324
    40
function given_files() {
deba@324
    41
    for file in $GIVEN_FILES
deba@324
    42
    do
deba@324
    43
	echo $file
deba@324
    44
    done
deba@324
    45
}
deba@324
    46
deba@324
    47
# actions
deba@324
    48
deba@324
    49
function update_action() {
deba@324
    50
    if ! diff -q $1 $2 >/dev/null
deba@324
    51
    then
deba@324
    52
	echo -n " [$3 updated]"
deba@324
    53
	rm $2
deba@324
    54
	mv $1 $2
deba@324
    55
	CHANGED=YES
alpar@498
    56
    fi
alpar@498
    57
}
alpar@498
    58
deba@324
    59
function update_warning() {
deba@324
    60
    echo -n " [$2 warning]"
deba@324
    61
    WARNED=YES
deba@324
    62
}
deba@324
    63
deba@324
    64
function update_init() {
deba@324
    65
    echo Update source files...
deba@324
    66
    TOTAL_FILES=0
deba@324
    67
    CHANGED_FILES=0
deba@324
    68
    WARNED_FILES=0
deba@324
    69
}
deba@324
    70
deba@324
    71
function update_done() {
deba@324
    72
    echo $CHANGED_FILES out of $TOTAL_FILES files has been changed.
alpar@325
    73
    echo $WARNED_FILES out of $TOTAL_FILES files triggered warnings.
deba@324
    74
}
deba@324
    75
deba@324
    76
function update_begin() {
deba@324
    77
    ((TOTAL_FILES++))
deba@324
    78
    CHANGED=NO
deba@324
    79
    WARNED=NO
deba@324
    80
}
deba@324
    81
deba@324
    82
function update_end() {
deba@324
    83
    if [ $CHANGED == YES ]
deba@324
    84
    then
deba@324
    85
	((++CHANGED_FILES))
deba@324
    86
    fi
deba@324
    87
    if [ $WARNED == YES ]
deba@324
    88
    then
deba@324
    89
	((++WARNED_FILES))
deba@324
    90
    fi
deba@324
    91
}
deba@324
    92
deba@324
    93
function check_action() {
kpeter@341
    94
    if [ "$3" == 'tabs' ]
kpeter@341
    95
    then
kpeter@554
    96
        if echo $2 | grep -q -v -E 'Makefile\.am$'
kpeter@554
    97
        then
kpeter@554
    98
            PATTERN=$(echo -e '\t')
kpeter@554
    99
        else
kpeter@554
   100
            PATTERN='        '
kpeter@554
   101
        fi
kpeter@341
   102
    elif [ "$3" == 'trailing spaces' ]
kpeter@341
   103
    then
kpeter@341
   104
        PATTERN='\ +$'
kpeter@341
   105
    else
kpeter@341
   106
        PATTERN='*'
kpeter@341
   107
    fi
kpeter@341
   108
deba@324
   109
    if ! diff -q $1 $2 >/dev/null
deba@324
   110
    then
kpeter@341
   111
        if [ "$PATTERN" == '*' ]
kpeter@341
   112
        then
kpeter@341
   113
            diff $1 $2 | grep '^[0-9]' | sed "s|^\(.*\)c.*$|$2:\1: check failed: $3|g" |
kpeter@341
   114
              sed "s/:\([0-9]*\),\([0-9]*\):\(.*\)$/:\1:\3 (until line \2)/g"
kpeter@341
   115
        else
kpeter@341
   116
            grep -n -E "$PATTERN" $2 | sed "s|^\([0-9]*\):.*$|$2:\1: check failed: $3|g"
kpeter@341
   117
        fi
kpeter@341
   118
        FAILED=YES
deba@324
   119
    fi
deba@324
   120
}
deba@324
   121
deba@324
   122
function check_warning() {
kpeter@329
   123
    if [ "$2" == 'long lines' ]
kpeter@329
   124
    then
kpeter@341
   125
        grep -n -E '.{81,}' $1 | sed "s|^\([0-9]*\):.*$|$1:\1: warning: $2|g"
kpeter@329
   126
    else
kpeter@341
   127
        echo "$1: warning: $2"
kpeter@329
   128
    fi
deba@324
   129
    WARNED=YES
deba@324
   130
}
deba@324
   131
deba@324
   132
function check_init() {
deba@324
   133
    echo Check source files...
deba@324
   134
    FAILED_FILES=0
deba@324
   135
    WARNED_FILES=0
deba@324
   136
    TOTAL_FILES=0
deba@324
   137
}
deba@324
   138
deba@324
   139
function check_done() {
deba@324
   140
    echo $FAILED_FILES out of $TOTAL_FILES files has been failed.
alpar@325
   141
    echo $WARNED_FILES out of $TOTAL_FILES files triggered warnings.
deba@324
   142
kpeter@396
   143
    if [ $WARNED_FILES -gt 0 -o $FAILED_FILES -gt 0 ]
deba@324
   144
    then
deba@324
   145
	if [ "$WARNING" == 'INTERACTIVE' ]
deba@324
   146
	then
kpeter@396
   147
	    echo -n "Are the files with errors/warnings acceptable? (yes/no) "
deba@324
   148
	    while read answer
deba@324
   149
	    do
deba@324
   150
		if [ "$answer" == 'yes' ]
deba@324
   151
		then
deba@324
   152
		    return 0
deba@324
   153
		elif [ "$answer" == 'no' ]
deba@324
   154
		then
deba@324
   155
		    return 1
deba@324
   156
		fi
kpeter@396
   157
		echo -n "Are the files with errors/warnings acceptable? (yes/no) "
deba@324
   158
	    done
deba@324
   159
	elif [ "$WARNING" == 'WERROR' ]
deba@324
   160
	then
deba@324
   161
	    return 1
deba@324
   162
	fi
deba@324
   163
    fi
deba@324
   164
}
deba@324
   165
deba@324
   166
function check_begin() {
deba@324
   167
    ((TOTAL_FILES++))
deba@324
   168
    FAILED=NO
deba@324
   169
    WARNED=NO
deba@324
   170
}
deba@324
   171
deba@324
   172
function check_end() {
deba@324
   173
    if [ $FAILED == YES ]
deba@324
   174
    then
deba@324
   175
	((++FAILED_FILES))
deba@324
   176
    fi
deba@324
   177
    if [ $WARNED == YES ]
deba@324
   178
    then
deba@324
   179
	((++WARNED_FILES))
deba@324
   180
    fi
deba@324
   181
}
deba@324
   182
deba@324
   183
deba@324
   184
deba@324
   185
# checks
deba@324
   186
deba@324
   187
function header_check() {
deba@324
   188
    if echo $1 | grep -q -E 'Makefile\.am$'
deba@324
   189
    then
deba@324
   190
	return
deba@324
   191
    fi
deba@324
   192
alpar@38
   193
    TMP_FILE=`mktemp`
alpar@38
   194
alpar@208
   195
    (echo "/* -*- mode: C++; indent-tabs-mode: nil; -*-
alpar@38
   196
 *
alpar@208
   197
 * This file is a part of LEMON, a generic C++ optimization library.
alpar@38
   198
 *
alpar@498
   199
 * Copyright (C) 2003-"$(hg_year $1)"
alpar@38
   200
 * Egervary Jeno Kombinatorikus Optimalizalasi Kutatocsoport
alpar@38
   201
 * (Egervary Research Group on Combinatorial Optimization, EGRES).
alpar@38
   202
 *
alpar@38
   203
 * Permission to use, modify and distribute this software is granted
alpar@38
   204
 * provided that this copyright notice appears in all copies. For
alpar@38
   205
 * precise terms see the accompanying LICENSE file.
alpar@38
   206
 *
alpar@38
   207
 * This software is provided \"AS IS\" with no warranty of any kind,
alpar@38
   208
 * express or implied, and with no claim as to its suitability for any
alpar@38
   209
 * purpose.
alpar@38
   210
 *
alpar@38
   211
 */
alpar@38
   212
"
deba@324
   213
    awk 'BEGIN { pm=0; }
alpar@38
   214
     pm==3 { print }
alpar@38
   215
     /\/\* / && pm==0 { pm=1;}
alpar@38
   216
     /[^:blank:]/ && (pm==0 || pm==2) { pm=3; print;}
alpar@38
   217
     /\*\// && pm==1 { pm=2;}
alpar@38
   218
    ' $1
deba@324
   219
    ) >$TMP_FILE
alpar@208
   220
deba@324
   221
    "$ACTION"_action "$TMP_FILE" "$1" header
alpar@38
   222
}
alpar@38
   223
deba@324
   224
function tabs_check() {
deba@324
   225
    if echo $1 | grep -q -v -E 'Makefile\.am$'
deba@324
   226
    then
deba@324
   227
        OLD_PATTERN=$(echo -e '\t')
deba@324
   228
        NEW_PATTERN='        '
deba@324
   229
    else
deba@324
   230
        OLD_PATTERN='        '
deba@324
   231
        NEW_PATTERN=$(echo -e '\t')
deba@324
   232
    fi
alpar@208
   233
    TMP_FILE=`mktemp`
deba@324
   234
    cat $1 | sed -e "s/$OLD_PATTERN/$NEW_PATTERN/g" >$TMP_FILE
alpar@38
   235
deba@324
   236
    "$ACTION"_action "$TMP_FILE" "$1" 'tabs'
alpar@208
   237
}
alpar@208
   238
deba@324
   239
function spaces_check() {
alpar@208
   240
    TMP_FILE=`mktemp`
deba@324
   241
    cat $1 | sed -e 's/ \+$//g' >$TMP_FILE
alpar@208
   242
kpeter@328
   243
    "$ACTION"_action "$TMP_FILE" "$1" 'trailing spaces'
alpar@208
   244
}
alpar@208
   245
deba@324
   246
function long_lines_check() {
deba@324
   247
    if cat $1 | grep -q -E '.{81,}'
alpar@208
   248
    then
deba@324
   249
	"$ACTION"_warning $1 'long lines'
alpar@208
   250
    fi
alpar@208
   251
}
alpar@208
   252
deba@324
   253
# process the file
deba@324
   254
deba@324
   255
function process_file() {
kpeter@341
   256
    if [ "$ACTION" == 'update' ]
kpeter@341
   257
    then
kpeter@341
   258
        echo -n "    $ACTION $1..."
kpeter@341
   259
    else
kpeter@341
   260
        echo "	  $ACTION $1..."
kpeter@341
   261
    fi
deba@324
   262
deba@324
   263
    CHECKING="header tabs spaces long_lines"
deba@324
   264
deba@324
   265
    "$ACTION"_begin $1
deba@324
   266
    for check in $CHECKING
alpar@38
   267
    do
deba@324
   268
	"$check"_check $1
alpar@38
   269
    done
deba@324
   270
    "$ACTION"_end $1
kpeter@341
   271
    if [ "$ACTION" == 'update' ]
kpeter@341
   272
    then
kpeter@341
   273
        echo
kpeter@341
   274
    fi
deba@324
   275
}
deba@324
   276
deba@324
   277
function process_all {
deba@324
   278
    "$ACTION"_init
deba@324
   279
    while read file
alpar@38
   280
    do
deba@324
   281
	process_file $file
deba@324
   282
    done < <($FILES)
deba@324
   283
    "$ACTION"_done
deba@324
   284
}
deba@324
   285
deba@324
   286
while [ $# -gt 0 ]
deba@324
   287
do
deba@324
   288
    
deba@324
   289
    if [ "$1" == '--help' ] || [ "$1" == '-h' ]
deba@324
   290
    then
deba@324
   291
	echo -n \
deba@324
   292
"Usage:
deba@324
   293
  $0 [OPTIONS] [files]
deba@324
   294
Options:
deba@324
   295
  --dry-run|-n
alpar@325
   296
     Check the files, but do not modify them.
deba@324
   297
  --interactive|-i
alpar@325
   298
     If --dry-run is specified and the checker emits warnings,
alpar@325
   299
     then the user is asked if the warnings should be considered
alpar@325
   300
     errors.
deba@324
   301
  --werror|-w
alpar@325
   302
     Make all warnings into errors.
deba@324
   303
  --all|-a
kpeter@328
   304
     Check all source files in the repository.
deba@324
   305
  --modified|-m
alpar@325
   306
     Check only the modified (and new) source files. This option is
alpar@325
   307
     useful to check the modification before making a commit.
deba@324
   308
  --changed|-c
deba@324
   309
     Check only the changed source files compared to the parent(s) of
alpar@325
   310
     the current hg node.  This option is useful as hg hook script.
alpar@325
   311
     To automatically check all your changes before making a commit,
alpar@325
   312
     add the following section to the appropriate .hg/hgrc file.
deba@324
   313
deba@324
   314
       [hooks]
deba@324
   315
       pretxncommit.checksources = scripts/unify-sources.sh -c -n -i
deba@324
   316
deba@324
   317
  --help|-h
deba@324
   318
     Print this help message.
deba@324
   319
  files
kpeter@328
   320
     The files to check/unify. If no file names are given, the modified
kpeter@328
   321
     source files will be checked/unified (just like using the
kpeter@328
   322
     --modified|-m option).
deba@324
   323
"
deba@324
   324
        exit 0
deba@324
   325
    elif [ "$1" == '--dry-run' ] || [ "$1" == '-n' ]
deba@324
   326
    then
kpeter@328
   327
	[ -n "$ACTION" ] && echo "Conflicting action options" >&2 && exit 1
deba@324
   328
	ACTION=check
deba@324
   329
    elif [ "$1" == "--all" ] || [ "$1" == '-a' ]
deba@324
   330
    then
kpeter@328
   331
	[ -n "$FILES" ] && echo "Conflicting target options" >&2 && exit 1
deba@324
   332
	FILES=all_files
deba@324
   333
    elif [ "$1" == "--changed" ] || [ "$1" == '-c' ]
deba@324
   334
    then
kpeter@328
   335
	[ -n "$FILES" ] && echo "Conflicting target options" >&2 && exit 1
deba@324
   336
	FILES=changed_files
deba@324
   337
    elif [ "$1" == "--modified" ] || [ "$1" == '-m' ]
deba@324
   338
    then
kpeter@328
   339
	[ -n "$FILES" ] && echo "Conflicting target options" >&2 && exit 1
deba@324
   340
	FILES=modified_files
deba@324
   341
    elif [ "$1" == "--interactive" ] || [ "$1" == "-i" ]
deba@324
   342
    then
kpeter@328
   343
	[ -n "$WARNING" ] && echo "Conflicting warning options" >&2 && exit 1
deba@324
   344
	WARNING='INTERACTIVE'
deba@324
   345
    elif [ "$1" == "--werror" ] || [ "$1" == "-w" ]
deba@324
   346
    then
kpeter@328
   347
	[ -n "$WARNING" ] && echo "Conflicting warning options" >&2 && exit 1
deba@324
   348
	WARNING='WERROR'
kpeter@328
   349
    elif [ $(echo x$1 | cut -c 2) == '-' ]
deba@324
   350
    then
deba@324
   351
	echo "Invalid option $1" >&2 && exit 1
deba@324
   352
    else
deba@324
   353
	[ -n "$FILES" ] && echo "Invalid option $1" >&2 && exit 1
deba@324
   354
	GIVEN_FILES=$@
deba@324
   355
	FILES=given_files
deba@324
   356
	break
deba@324
   357
    fi
deba@324
   358
    
deba@324
   359
    shift
deba@324
   360
done
deba@324
   361
deba@324
   362
if [ -z $FILES ]
deba@324
   363
then
deba@324
   364
    FILES=modified_files
alpar@38
   365
fi
deba@324
   366
deba@324
   367
if [ -z $ACTION ]
deba@324
   368
then
deba@324
   369
    ACTION=update
alpar@208
   370
fi
deba@324
   371
deba@324
   372
process_all