1 #

     2 # Copyright (c) 2009 Nokia Corporation and/or its subsidiary(-ies).

     3 # All rights reserved.

     4 # This component and the accompanying materials are made available

     5 # under the terms of "Eclipse Public License v1.0"

     6 # which accompanies this distribution, and is available

     7 # at the URL "http://www.eclipse.org/legal/epl-v10.html".

     8 #

     9 # Initial Contributors:

    10 # Nokia Corporation - initial contribution.

    11 #

    12 # Contributors:

    13 #

    14 # Description: Script for running branch coverage test

    15 #

    16 

    17 #USAGE:

    18 #    Usage: decision_cov.pl [-make=command]

    19 #    -make=instrument || run || ctcpost

    20 

    21 # import module

    22 use Getopt::Long;

    23 

    24 # read options

    25 my $make = "all";

    26 my $success = GetOptions ("make=s"   => \$make);

    27 

    28 if($make) {

    29     if (($make eq "instrument") || ($make eq "all")) {

    30         system("del mon.sym");

    31         system("del mon.dat");

    32         system("del profile.txt");

    33         system("rmdir /s /q CTCFUNCTION");

    34         system("rmdir /s /q CTCDECISION");

    35 

    36         system("call qmake -config coverage");

    37         system("call sbs clean -c winscw_udeb");

    38         system("call sbs clean -c winscw_udeb.test");

    39         system("ctcwrap -i fd -2comp -C EXCLUDE=* -C \"NO_EXCLUDE=../../srvsrc/casrvengutils.cpp*\" sbs -j 4 -c winscw_udeb");

    40 

    41         }

    42     if (($make eq "run") || ($make eq "all")) {

    43         system("call \\epoc32\\release\\winscw\\udeb\\t_casrv -o c:\\t_casrv.log");

    44     }

    45     if (($make eq "ctcpost") || ($make eq "all")) {

    46         system("call ctcpost -ff -p profile.txt");

    47         system("call ctc2html -nsb -i profile.txt -o CTCFUNCTION");

    48         system("call del profile.txt");

    49         system("call ctcpost -fd -p profile.txt");

    50         system("call ctc2html -nsb -i profile.txt -o CTCDECISION");

    51         system("call del profile.txt");

    52     }

    53 }

    54 

    55 print "END.\n";