85 lines
1.6 KiB
Batchfile
85 lines
1.6 KiB
Batchfile
|
@echo off
|
|||
|
|
|
|||
|
|
if "%1%" == "" goto usage
|
|||
|
|
set email=N
|
|||
|
|
if exist warning.out del warning.out
|
|||
|
|
|
|||
|
|
:loop
|
|||
|
|
if "%1%" == "" goto bottom
|
|||
|
|
if "%1%" == "email" set email=Y
|
|||
|
|
if "%1%" == "email" goto loopX
|
|||
|
|
|
|||
|
|
set TgtEnv=%1%
|
|||
|
|
|
|||
|
|
echo set TgtDesc=%%%TgtEnv%Desc%% > wrntmp.bat
|
|||
|
|
call wrntmp.bat
|
|||
|
|
del wrntmp.bat
|
|||
|
|
|
|||
|
|
if not exist %TgtEnv%???.dat goto noDat
|
|||
|
|
|
|||
|
|
sed -f %TgtEnv%d.sed warning.awk > d.awk
|
|||
|
|
sed -f %TgtEnv%r.sed warning.awk > r.awk
|
|||
|
|
sed -f %TgtEnv%t.sed warning.awk > t.awk
|
|||
|
|
|
|||
|
|
echo @echo off > tmp%TgtEnv%.bat
|
|||
|
|
|
|||
|
|
awk -f d.awk %TgtEnv%d.dat >> tmp%TgtEnv%.bat
|
|||
|
|
awk -f r.awk %TgtEnv%r.dat >> tmp%TgtEnv%.bat
|
|||
|
|
awk -f t.awk %TgtEnv%t.dat >> tmp%TgtEnv%.bat
|
|||
|
|
|
|||
|
|
del d.awk
|
|||
|
|
del r.awk
|
|||
|
|
del t.awk
|
|||
|
|
|
|||
|
|
call tmp%TgtEnv%.bat
|
|||
|
|
cd \strider\toolsbld
|
|||
|
|
del tmp%TgtEnv%.bat
|
|||
|
|
|
|||
|
|
if exist \tmp\warning.out goto wrn
|
|||
|
|
goto wrnX
|
|||
|
|
|
|||
|
|
:wrn
|
|||
|
|
echo The following %TgtEnv% components compiled with warnings:
|
|||
|
|
echo.
|
|||
|
|
type \tmp\warning.out
|
|||
|
|
echo.
|
|||
|
|
echo The following %TgtEnv% components compiled with warnings: >> warning.out
|
|||
|
|
echo. >> warning.out
|
|||
|
|
type \tmp\warning.out >> warning.out
|
|||
|
|
echo. >> warning.out
|
|||
|
|
:wrnX
|
|||
|
|
|
|||
|
|
:loopX
|
|||
|
|
shift
|
|||
|
|
goto loop
|
|||
|
|
|
|||
|
|
|
|||
|
|
:noDat
|
|||
|
|
echo.
|
|||
|
|
echo ERROR: No data file found for %TgtEnv%
|
|||
|
|
goto usage
|
|||
|
|
|
|||
|
|
:usage
|
|||
|
|
echo.
|
|||
|
|
echo usage: wrn Target
|
|||
|
|
echo.
|
|||
|
|
echo Examples:
|
|||
|
|
echo.
|
|||
|
|
echo wrn %TgtEnv%
|
|||
|
|
echo wrn ifs
|
|||
|
|
echo wrn ids
|
|||
|
|
echo.
|
|||
|
|
goto exit
|
|||
|
|
|
|||
|
|
:bottom
|
|||
|
|
if "%email%" == "N" goto exit
|
|||
|
|
set file=warning.out
|
|||
|
|
set name=anthonyr
|
|||
|
|
set subject=Build warnings
|
|||
|
|
call email
|
|||
|
|
|
|||
|
|
:exit
|
|||
|
|
set email=
|
|||
|
|
set TgtEnv=
|
|||
|
|
set TgtDesc=
|