From bb756eebdac6fd24e8919e2c43f7d2c8c4091f59 Mon Sep 17 00:00:00 2001 From: RajithaY Date: Tue, 25 Apr 2017 03:31:15 -0700 Subject: Adding qemu as a submodule of KVMFORNFV This Patch includes the changes to add qemu as a submodule to kvmfornfv repo and make use of the updated latest qemu for the execution of all testcase Change-Id: I1280af507a857675c7f81d30c95255635667bdd7 Signed-off-by:RajithaY --- qemu/roms/ipxe/contrib/errdb/.gitignore | 1 - qemu/roms/ipxe/contrib/errdb/errdb.pl | 109 -------------------------------- 2 files changed, 110 deletions(-) delete mode 100644 qemu/roms/ipxe/contrib/errdb/.gitignore delete mode 100755 qemu/roms/ipxe/contrib/errdb/errdb.pl (limited to 'qemu/roms/ipxe/contrib/errdb') diff --git a/qemu/roms/ipxe/contrib/errdb/.gitignore b/qemu/roms/ipxe/contrib/errdb/.gitignore deleted file mode 100644 index 95bf5c3cd..000000000 --- a/qemu/roms/ipxe/contrib/errdb/.gitignore +++ /dev/null @@ -1 +0,0 @@ -errors.db diff --git a/qemu/roms/ipxe/contrib/errdb/errdb.pl b/qemu/roms/ipxe/contrib/errdb/errdb.pl deleted file mode 100755 index 6423d8347..000000000 --- a/qemu/roms/ipxe/contrib/errdb/errdb.pl +++ /dev/null @@ -1,109 +0,0 @@ -#!/usr/bin/perl -w - -=head1 NAME - -errdb.pl - -=head1 SYNOPSIS - -errdb.pl [options] ../../src/bin/errors - -Options: - - -d,--database=db Specify path to errors.db - -h,--help Display brief help message - -v,--verbose Increase verbosity - -q,--quiet Decrease verbosity - -=cut - -use Getopt::Long; -use Pod::Usage; -use DBI; -use strict; -use warnings; - -# Parse command-line options -my $verbosity = 0; -my $errdb = "errors.db"; -Getopt::Long::Configure ( 'bundling', 'auto_abbrev' ); -GetOptions ( - 'database|d=s' => sub { shift; $errdb = shift; }, - 'verbose|v+' => sub { $verbosity++; }, - 'quiet|q+' => sub { $verbosity--; }, - 'help|h' => sub { pod2usage ( 1 ); }, -) or die "Could not parse command-line options\n"; -pod2usage ( 1 ) unless @ARGV >= 1; - -# Open database -my $dbh = DBI->connect ( "dbi:SQLite:dbname=".$errdb, "", "", - { RaiseError => 1, PrintError => 0 } ); -$dbh->begin_work(); - -# Create errors table if necessary -eval { - $dbh->selectall_arrayref ( "SELECT * FROM errors LIMIT 1" ); -}; -if ( $@ ) { - print "Creating errors table\n" if $verbosity >= 1; - $dbh->do ( "CREATE TABLE errors (". - " errno char(8) NOT NULL,". - " description text NOT NULL,". - " PRIMARY KEY ( errno ) )" ); -} - -# Create xrefs table if necessary -eval { - $dbh->selectall_arrayref ( "SELECT * FROM xrefs LIMIT 1" ); -}; -if ( $@ ) { - print "Creating xrefs table\n" if $verbosity >= 1; - $dbh->do ( "CREATE TABLE xrefs (". - " errno char(8) NOT NULL,". - " filename text NOT NULL,". - " line integer NOT NULL,". - " UNIQUE ( errno, filename, line ),". - " FOREIGN KEY ( errno ) REFERENCES errors ( errno ) )" ); - $dbh->do ( "CREATE INDEX xrefs_errno ON xrefs ( errno )" ); -} - -# Parse input file(s) -my $errors = {}; -my $xrefs = {}; -while ( <> ) { - chomp; - ( my $errno, my $filename, my $line, my $description ) = split ( /\t/ ); - $errno = substr ( $errno, 0, 6 ) unless $errno =~ /^7f/; - $errors->{$errno} = $description; - $xrefs->{$errno} ||= {}; - $xrefs->{$errno}->{$filename} ||= {}; - $xrefs->{$errno}->{$filename}->{$line} ||= 1; -} - -# Ensure all errors are present in database -my $error_update = - $dbh->prepare ( "UPDATE errors SET description = ? WHERE errno = ?" ); -my $error_insert = $dbh->prepare ( "INSERT INTO errors VALUES ( ?, ? )" ); -while ( ( my $errno, my $description ) = each %$errors ) { - print "Error ".$errno." is \"".$description."\"\n" if $verbosity >= 2; - if ( $error_update->execute ( $description, $errno ) == 0 ) { - $error_insert->execute ( $errno, $description ); - } -} - -# Replace xrefs in database -$dbh->do ( "DELETE FROM xrefs" ); -my $xref_insert = $dbh->prepare ( "INSERT INTO xrefs VALUES ( ?, ?, ? )" ); -while ( ( my $errno, my $xref_errno ) = each %$xrefs ) { - while ( ( my $filename, my $xref_filename ) = each %$xref_errno ) { - foreach my $line ( keys %$xref_filename ) { - print "Error ".$errno." is used at ".$filename." line ".$line."\n" - if $verbosity >= 2; - $xref_insert->execute ( $errno, $filename, $line ); - } - } -} - -# Close database -$dbh->commit(); -$dbh->disconnect(); -- cgit 1.2.3-korg