On Sun, 2010-05-09 at 23:56 +0530, Subrata Modak wrote:
> Hi,
> 
> Recently while running LTP , i found that the system had generated many
> kernel messages worth investigating. However, there was a loose gap to
> find out which test exactly was responsible for that message.
> 
> So, i thought it could be worth to create a framework in LTP to log kernel
> messages for each test, to pinpoint exact messages created per test, for
> better debugging. The following patch adds a option to LTP and runs a
> old style script ;-) to achieve that. All this is done at the runltp level
> without any distrubance to ltp-pan. Messages can be logged at:
> 1) Absolute path(s) as specified by the user, else
> 2) Inside $LTPROOT/output/
> 
> Comments welcome.
> 
> Signed-off-by: Subrata Modak <[email protected]>

Is it that nobody has any objection to this patch ;-)

Regards--
Subrata

> ---
> 
> --- runltp.orig       2010-05-09 23:15:27.000000000 +0530
> +++ runltp    2010-05-09 23:44:53.000000000 +0530
> @@ -131,6 +131,8 @@ usage() 
>      -h              Help. Prints all available options.
>      -i NUM_PROCS    Run LTP under additional background Load on IO Bus
>                      [NUM_PROCS   = no. of processes creating IO Bus Load by 
> spinning over sync()]
> +    -K DMESG_LOG_DIR
> +                     Log Kernel messages generated for each test cases 
> inside this directory 
>      -l LOGFILE      Log results of test in a logfile.
>      -m NUM_PROCS,CHUNKS,BYTES,HANGUP_FLAG
>                      Run LTP under additional background Load on Main memory 
> (Seperate by comma)
> @@ -178,6 +180,7 @@ main()
>      local ALT_DIR_RES=0
>      local ALT_HTML_OUT=0
>      local ALT_EMAIL_OUT=0
> +    local ALT_DMESG_OUT=0
>      local RUN_NETEST=0
>      local RUN_REPEATED=0
>      local QUIET_MODE=""
> @@ -198,6 +201,7 @@ main()
>      local OUTPUTFILE=""
>      local HTMLFILE_NAME=""
>      local HTMLFILE=""
> +    local DMESG_DIR=""
>      local EMAIL_TO=""
>      local SCENFILES=""
>      local TAG_RESTRICT_STRING=""
> @@ -205,7 +209,7 @@ main()
>      local DEFAULT_FILE_NAME_GENERATION_TIME=`date +"%Y_%b_%d-%Hh_%Mm_%Ss"`
>      version_date=$(cat "$LTPROOT/Version")
> 
> -    while getopts a:c:C:d:D:f:F:ehi:g:l:m:M:Nno:pqr:s:S:t:T:w:x:b:B: arg
> +    while getopts a:c:C:d:D:f:F:ehi:K:g:l:m:M:Nno:pqr:s:S:t:T:w:x:b:B: arg
>      do  case $arg in
>          a)  EMAIL_TO=$OPTARG
>              ALT_EMAIL_OUT=1;;
> @@ -308,6 +312,15 @@ main()
>              $LTPROOT/testcases/bin/genload --io $NUM_PROCS >/dev/null 2>&1 &
>              GENLOAD=1 ;;
>      
> +        K)  
> +         case $OPTARG in
> +                /*)
> +                     DMESG_DIR="$OPTARG-dmesg-output-`echo $$-``date +%X | 
> tr -d ' '`";;
> +                 *)
> +                     DMESG_DIR="$LTPROOT/output/$OPTARG-dmesg-output-`echo 
> $$-``date +%X | tr -d ' '`";;
> +         esac
> +            mkdir -p $DMESG_DIR
> +            ALT_DMESG_OUT=1;;
>          l)      
>              LOGFILE_NAME="$OPTARG"
>              case $OPTARG in
> @@ -821,6 +834,13 @@ main()
>               fi
>       fi
> 
> +     if [ $ALT_DMESG_OUT -eq 1 ] ; then
> +             #We want to print dmesg output for each test,lets do the trick 
> inside the script
> +             echo Enabling dmesg output logging for each test...
> +             ${LTPROOT}/bin/create_dmesg_entries_for_each_test.pl 
> ${TMP}/alltests $DMESG_DIR > ${TMP}/alltests.tmp
> +             cp ${TMP}/alltests.tmp ${TMP}/alltests
> +             rm -rf ${TMP}/alltests.tmp
> +     fi
>      # Some tests need to run inside the "bin" directory.
>      cd "${LTPROOT}/testcases/bin"
>      "${LTPROOT}/bin/ltp-pan" $QUIET_MODE -e -S $INSTANCES $DURATION -a $$ -n 
> $$ $PRETTY_PRT -f ${TMP}/alltests $LOGFILE $OUTPUTFILE $FAILCMDFILE
> diff -uprN tools.orig/create_dmesg_entries_for_each_test.pl 
> tools/create_dmesg_entries_for_each_test.pl
> --- tools.orig/create_dmesg_entries_for_each_test.pl  1970-01-01 
> 05:30:00.000000000 +0530
> +++ tools/create_dmesg_entries_for_each_test.pl       2010-05-09 
> 23:38:10.000000000 +0530
> @@ -0,0 +1,74 @@
> +#!/usr/bin/perl
> +################################################################################
> +##                                                                           
>  ##
> +## Copyright (c) International Business Machines  Corp., 2010                
>  ##
> +##                                                                           
>  ##
> +## 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   
>  ##
> +##                                                                           
>  ##
> +################################################################################
> +#                                                                            
>  ##
> +# File :        create_dmesg_entries_for_each_test.pl                        
>       ##
> +#                                                                            
>  ##
> +# Usage:        create_dmesg_entries_for_each_test.pl\                       
>       ##
> +#            <LTP_COMMAND_FILE> <DMESG_DIRECTORY>                          ##
> +#                                                                            
>  ##
> +# Description:  This is a simple perl script which will take ltp command 
> file ##
> +#            as input and then create a final command file which will have ##
> +#            the following entries for each test tag:                      ##
> +#            <tag_name__with_dmesg_entry> <test_binary_name>;\             ##
> +#            <save_dmesg_logs>                                             ##
> +#                                                                            
>  ##
> +# Author:       Subrata Modak <[email protected]>                   
>  ##
> +#                                                                            
>  ##
> +# History:      May 09 2010 - Created - Subrata Modak.                       
>  ##
> +################################################################################
> +
> +my $command_file     = shift (@ARGV) || syntax();
> +my $dmesg_dir                = shift (@ARGV) || syntax();
> +
> +sub syntax() {
> +     print "syntax: create_dmesg_entries_for_each_test.pl <LTP_COMMAND_FILE> 
> <DMESG_DIRECTORY>\n";
> +     exit (1);
> +}
> +
> +
> +open (FILE, $command_file) || die "Cannot open file: $command_file\n";
> +while ($line = <FILE>) {
> +     if ($line =~ /^#/) {
> +             print "$line";
> +             next;
> +     }
> +     if ($line =~ /^\n$/) {
> +             next;
> +     }
> +     chomp $line;
> +     @tag_and_actual_command = split(/\ /, $line);
> +
> +     my $token_counter = 0;
> +     my $tag_name = "";
> +     foreach my $token (@tag_and_actual_command) {
> +             if ($token_counter == 0 ) {
> +                     print $token . "__with_dmesg_entry" . " ";
> +                     print "dmesg -c 1>/dev/null 2>/dev/null;" . " ";
> +                     $token_counter++;
> +                     $tag_name = $token;
> +                     next;
> +             }
> +             print " " . $token . " ";
> +     }
> +     print "; dmesg > $dmesg_dir/$tag_name.dmesg.log \n";
> +}
> +close (FILE);
> +
> 
> ---
> Regards--
> Subrata
> 


------------------------------------------------------------------------------

_______________________________________________
Ltp-list mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/ltp-list

Reply via email to