#!/usr/bin/perl # # Software Index, Copyright 2010, Software Index Project Team # Link: http://swi.sourceforge.net # # This file is part of Software Index Tool. # # Software Index 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, version 3 of the License. # # Software Index 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 Software Index. If not, see . # =head1 NAME Software Index - the tool measures, reports and validates software statistic, searches for duplications, scans for errors, 'coding style' violations and other configurable patterns. =head1 SYNOPSIS perl swi_main.pl -h perl swi_main.pl -help perl swi_main.pl --help perl swi_main.pl =head1 OPTIONS =over 4 =item -h, -help, --help Prints this help page. =item Full or relative path to the configuration file for the tool. Configuration file should include the predefined set of XML sections and tags. Use swi_config_sample.xml file (from the distributable package) as a 'configration file description' and create new configs using this file as a baseline. The sample explains every section in details and gives several usage examples. =back =head1 ENVIRONMENT The tool requires Perl Runtime Environment. Required Perl version is 5.6.x or later. =head1 INSTALLATION In order to install the distributive, unpack the distributable package to some folder. Software Index has internal tool (dupindex) which should be compiled for the target platform. By default, the distributable archive includes the compiled binary for PC Windows platform. Recompile it if you need (only one file dupindex.cpp), using g++ or some other C++ compiler. There is a project configuration file for users of Microsoft Visual Studio 2008. =head1 COPYRIGHT Software Index, Copyright 2009, 2010, Software Index Project Team, Link: http://swi.sourceforge.net =head1 LICENSE Software Index 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, version 3 of the License. Software Index 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 Software Index. If not, see . =cut use strict; use Cwd qw(abs_path); use Pod::Usage; $0 =~ m/(.*)swi_main.pl$/; my $globalRootDirectory = abs_path($1); push(@INC, "$globalRootDirectory/lib"); require SWI::Launcher; if (!defined($ARGV[0]) || $ARGV[0] eq "-help" || $ARGV[0] eq "--help" || $ARGV[0] eq "-h") { pod2usage(-exitstatus => 0, -verbose => 2); } exit swiLaunch($globalRootDirectory, @ARGV);