Import the newer scripts from DeforaOS configure

This commit is contained in:
Pierre Pronchery 2020-11-19 03:18:16 +01:00
parent 879970ade1
commit e49fd17ab4
2 changed files with 108 additions and 45 deletions

View File

@ -1,6 +1,6 @@
#!/bin/sh #!/bin/sh
#$Id$ #$Id$
#Copyright (c) 2016-2019 Pierre Pronchery <khorben@defora.org> #Copyright (c) 2016-2020 Pierre Pronchery <khorben@defora.org>
# #
#Redistribution and use in source and binary forms, with or without #Redistribution and use in source and binary forms, with or without
#modification, are permitted provided that the following conditions are met: #modification, are permitted provided that the following conditions are met:
@ -25,6 +25,7 @@
#variables #variables
CONFIGSH="${0%/clint.sh}/../config.sh"
CFLAGS= CFLAGS=
CPPFLAGS= CPPFLAGS=
PROGNAME="clint.sh" PROGNAME="clint.sh"
@ -35,16 +36,19 @@ DEBUG="_debug"
FIND="find" FIND="find"
GREP="grep" GREP="grep"
LINT="lint -g" LINT="lint -g"
MKDIR="mkdir -p"
SORT="sort -n" SORT="sort -n"
TR="tr" TR="tr"
[ -f "$CONFIGSH" ] && . "$CONFIGSH"
#functions #functions
#clint #clint
_clint() _clint()
{ {
ret=0 res=0
subdirs="data doc src tests tools" subdirs=
$DATE $DATE
while read line; do while read line; do
@ -58,6 +62,10 @@ _clint()
;; ;;
esac esac
done < "$PROJECTCONF" done < "$PROJECTCONF"
if [ ! -n "$subdirs" ]; then
_error "Could not locate directories to analyze"
return $?
fi
for subdir in $subdirs; do for subdir in $subdirs; do
[ -d "../$subdir" ] || continue [ -d "../$subdir" ] || continue
for filename in $($FIND "../$subdir" -type f | $SORT); do for filename in $($FIND "../$subdir" -type f | $SORT); do
@ -79,13 +87,13 @@ _clint()
if [ $? -ne 0 ]; then if [ $? -ne 0 ]; then
echo "FAIL" echo "FAIL"
echo "$PROGNAME: $filename: FAIL" 1>&2 echo "$PROGNAME: $filename: FAIL" 1>&2
ret=2 res=2
else else
echo "OK" echo "OK"
fi fi
done done
done done
return $ret return $res
} }
_clint_lint() _clint_lint()
@ -117,6 +125,14 @@ _debug()
} }
#error
_error()
{
echo "$PROGNAME: $@" 1>&2
return 2
}
#usage #usage
_usage() _usage()
{ {
@ -125,14 +141,6 @@ _usage()
} }
#warning
_warning()
{
echo "$PROGNAME: $@" 1>&2
return 2
}
#main #main
clean=0 clean=0
while getopts "cO:P:" name; do while getopts "cO:P:" name; do
@ -162,9 +170,15 @@ fi
[ $clean -ne 0 ] && exit 0 [ $clean -ne 0 ] && exit 0
exec 3>&1 exec 3>&1
ret=0
while [ $# -gt 0 ]; do while [ $# -gt 0 ]; do
target="$1" target="$1"
dirname="${target%/*}"
shift shift
_clint > "$target" || exit 2 if [ -n "$dirname" -a "$dirname" != "$target" ]; then
$MKDIR -- "$dirname" || ret=$?
fi
_clint > "$target" || ret=$?
done done
exit $ret

View File

@ -25,17 +25,23 @@
#variables #variables
CONFIGSH="${0%/fixme.sh}/../config.sh"
PROGNAME="fixme.sh" PROGNAME="fixme.sh"
PROJECTCONF="../project.conf" PROJECTCONF="../project.conf"
REGEXP_ERROR="FIXME"
REGEXP_WARNING="\\(TODO\|XXX\\)"
#executables #executables
DATE="date" DATE="date"
DEBUG="_debug" DEBUG="_debug"
FIND="find" FIND="find"
GREP="grep" GREP="grep"
HEAD="head"
MKDIR="mkdir -p" MKDIR="mkdir -p"
SORT="sort -n" SORT="sort -n"
TR="tr" TR="tr"
[ -f "$CONFIGSH" ] && . "$CONFIGSH"
#functions #functions
#fixme #fixme
@ -64,24 +70,7 @@ _fixme()
for subdir in $subdirs; do for subdir in $subdirs; do
[ -d "../$subdir" ] || continue [ -d "../$subdir" ] || continue
for filename in $($FIND "../$subdir" -type f | $SORT); do for filename in $($FIND "../$subdir" -type f | $SORT); do
callback= callback=$(_fixme_callback "$filename")
ext=${filename##*/}
ext=${ext%.in}
ext=${ext##*.}
case "$ext" in
asm|S)
callback="_fixme_asm"
;;
c|cc|cpp|cxx|h|js)
callback="_fixme_c"
;;
conf|sh)
callback="_fixme_sh"
;;
htm|html|xml)
callback="_fixme_xml"
;;
esac
[ -n "$callback" ] || continue [ -n "$callback" ] || continue
($callback "$filename") 2>&1 ($callback "$filename") 2>&1
if [ $? -ne 0 ]; then if [ $? -ne 0 ]; then
@ -93,54 +82,114 @@ _fixme()
return $res return $res
} }
_fixme_asm() _fixme_callback()
{
filename="$1"
ext=${filename##*/}
ext=${ext%.in}
ext=${ext##*.}
callback=
case "$ext" in
asm|S)
echo "_fixme_callback_asm"
return 0
;;
c|cc|cpp|cxx|h|js|v)
echo "_fixme_callback_c"
return 0
;;
conf|sh)
echo "_fixme_callback_sh"
return 0
;;
py)
echo "_fixme_callback_python"
return 0
;;
htm|html|xml|xsl)
echo "_fixme_callback_xml"
return 0
;;
esac
case $($HEAD -n 1 "$filename") in
"#!/bin/sh"*|"#! /bin/sh"*|\
"#!/usr/bin/env bash"*|"#! /usr/bin/env bash"*)
echo "_fixme_callback_sh"
return 0
;;
"#!/usr/bin/env python"*|"#! /usr/bin/env python"*)
echo "_fixme_callback_python"
return 0
;;
"<html"*|"<?xml"*)
echo "_fixme_callback_xml"
return 0
;;
esac
return 2
}
_fixme_callback_asm()
{ {
res=0 res=0
filename="$1" filename="$1"
#warnings #warnings
$GREP -nH '/\*.*\(TODO\|XXX\)' "$filename" $GREP -nH "/\\*.*$REGEXP_WARNING" "$filename"
#failures #failures
$GREP -nH '/\*.*FIXME' "$filename" && res=2 $GREP -nH "/\\*.*$REGEXP_ERROR" "$filename" && res=2
return $res return $res
} }
_fixme_c() _fixme_callback_c()
{ {
res=0 res=0
filename="$1" filename="$1"
#warnings #warnings
$GREP -nH '/\(/\|\*\).*\(TODO\|XXX\)' "$filename" $GREP -nH "/\\(/\\|\\*\\).*$REGEXP_WARNING" "$filename"
#failures #failures
$GREP -nH '/\(/\|\*\).*FIXME' "$filename" && res=2 $GREP -nH "/\\(/\\|\\*\\).*$REGEXP_ERROR" "$filename" && res=2
return $res return $res
} }
_fixme_sh() _fixme_callback_python()
{ {
res=0 res=0
filename="$1" filename="$1"
#XXX avoid matching the regexp
comment="#" comment="#"
#warnings #warnings
$GREP -nH "$comment.*\\(TODO\\|XXX\\)" "$filename" $GREP -nH "$comment.*$REGEXP_WARNING" "$filename"
#failures #failures
$GREP -nH "$comment.*FIXME" "$filename" && res=2 $GREP -nH "$comment.*$REGEXP_ERROR" "$filename" && res=2
return $res return $res
} }
_fixme_xml() _fixme_callback_sh()
{
res=0
filename="$1"
comment="#"
#warnings
$GREP -nH "$comment.*$REGEXP_WARNING" "$filename"
#failures
$GREP -nH "$comment.*$REGEXP_ERROR" "$filename" && res=2
return $res
}
_fixme_callback_xml()
{ {
res=0 res=0
filename="$1" filename="$1"
#XXX limited to a single line #XXX limited to a single line
#warnings #warnings
$GREP -nH '<!--.*\(TODO\|XXX\)' "$filename" $GREP -nH "<!--.*$REGEXP_WARNING" "$filename"
#failures #failures
$GREP -nH '<!--.*FIXME' "$filename" && res=2 $GREP -nH "<!--.*$REGEXP_ERROR" "$filename" && res=2
return $res return $res
} }