← Back to branch summary

~ubuntu-branches/ubuntu/trusty/qemu/trusty

« back to all changes in this revision

Viewing changes to scripts/cleanup-trace-events.pl

  • Committer: Package Import Robot
  • Author(s): Serge Hallyn
  • Date: 2013-10-22 22:47:07 UTC
  • mfrom: (1.8.3) (10.1.42 sid)
  • Revision ID: package-import@ubuntu.com-20131022224707-1lya34fw3k3f24tv
Tags: 1.6.0+dfsg-2ubuntu1
http://bugs.debian.org/709241
* Merge 1.6.0~rc0+dfsg-2exp from debian experimental.  Remaining changes:
  - debian/control
    * update maintainer
    * remove libiscsi, usb-redir, vde, vnc-jpeg, and libssh2-1-dev
      from build-deps
    * enable rbd
    * add qemu-system and qemu-common B/R to qemu-keymaps
    * add D:udev, R:qemu, R:qemu-common and B:qemu-common to
      qemu-system-common
    * qemu-system-arm, qemu-system-ppc, qemu-system-sparc:
      - add qemu-kvm to Provides
      - add qemu-common, qemu-kvm, kvm to B/R
      - remove openbios-sparc from qemu-system-sparc D
      - drop openbios-ppc and openhackware Depends to Suggests (for now)
    * qemu-system-x86:
      - add qemu-common to Breaks/Replaces.
      - add cpu-checker to Recommends.
    * qemu-user: add B/R:qemu-kvm
    * qemu-kvm:
      - add armhf armel powerpc sparc to Architecture
      - C/R/P: qemu-kvm-spice
    * add qemu-common package
    * drop qemu-slof which is not packaged in ubuntu
  - add qemu-system-common.links for tap ifup/down scripts and OVMF link.
  - qemu-system-x86.links:
    * remove pxe rom links which are in kvm-ipxe
    * add symlink for kvm.1 manpage
  - debian/rules
    * add kvm-spice symlink to qemu-kvm
    * call dh_installmodules for qemu-system-x86
    * update dh_installinit to install upstart script
    * run dh_installman (Closes: #709241) (cherrypicked from 1.5.0+dfsg-2)
  - Add qemu-utils.links for kvm-* symlinks.
  - Add qemu-system-x86.qemu-kvm.upstart and .default
  - Add qemu-system-x86.modprobe to set nesting=1
  - Add qemu-system-common.preinst to add kvm group
  - qemu-system-common.postinst: remove bad group acl if there, then have
    udev relabel /dev/kvm.
  - New linaro patches from qemu-linaro rebasing branch
  - Dropped patches:
    * xen-simplify-xen_enabled.patch
    * sparc-linux-user-fix-missing-symbols-in-.rel-.rela.plt-sections.patch
    * main_loop-do-not-set-nonblocking-if-xen_enabled.patch
    * xen_machine_pv-do-not-create-a-dummy-CPU-in-machine-.patch
    * virtio-rng-fix-crash
  - Kept patches:
    * expose_vms_qemu64cpu.patch - updated
    * linaro arm patches from qemu-linaro rebasing branch
  - New patches:
    * fix-pci-add: change CONFIG variable in ifdef to make sure that
      pci_add is defined.
* Add linaro patches
* Add experimental mach-virt patches for arm virtualization.
* qemu-system-common.install: add debian/tmp/usr/lib to install the
  qemu-bridge-helper

Show diffs side-by-side

added added

removed removed

Lines of Context:
scripts/cleanup-trace-events.pl
 
1
#!/usr/bin/perl
 
2
# Copyright (C) 2013 Red Hat, Inc.
 
3
#
 
4
# Authors:
 
5
#  Markus Armbruster <armbru@redhat.com>
 
6
#
 
7
# This work is licensed under the terms of the GNU GPL, version 2 or
 
8
# later.  See the COPYING file in the top-level directory.
 
9
 
 
10
# Usage: cleanup-trace-events.pl trace-events
 
11
#
 
12
# Print cleaned up trace-events to standard output.
 
13
 
 
14
use warnings;
 
15
use strict;
 
16
 
 
17
my $buf = '';
 
18
my %seen = ();
 
19
 
 
20
sub out {
 
21
    print $buf;
 
22
    $buf = '';
 
23
    %seen = ();
 
24
}
 
25
 
 
26
while (<>) {
 
27
    if (/^(disable )?([a-z_0-9]+)\(/) {
 
28
        open GREP, '-|', 'git', 'grep', '-l', "trace_$2"
 
29
            or die "run git grep: $!";
 
30
        my $fname;
 
31
        while ($fname = <GREP>) {
 
32
            chomp $fname;
 
33
            next if $seen{$fname} || $fname eq 'trace-events';
 
34
            $seen{$fname} = 1;
 
35
            $buf = "# $fname\n" . $buf;
 
36
        }
 
37
        unless (close GREP) {
 
38
            die "close git grep: $!"
 
39
                if $!;
 
40
            next;
 
41
        }
 
42
    } elsif (/^# ([^ ]*\.[ch])$/) {
 
43
        out;
 
44
        next;
 
45
    } elsif (!/^#|^$/) {
 
46
        warn "unintelligible line";
 
47
    }
 
48
    $buf .= $_;
 
49
}
 
50
 
 
51
out;