1
0
mirror of https://github.com/systemd/systemd.git synced 2024-10-28 20:25:38 +03:00
systemd/test/udevd-test/udev-log-amplify.pl
kay.sievers@vrfy.org 98446db553 [PATCH] udevd-test.pl: remove wrong date calculation
A hour wrap during the test run does not work :) Just remove
all the useless date conversions as we are only interested in the
seconds it takes to process.

[root@pim udevd-test]# ./udevd-test.pl 9
   ...
   device: /class/tty/console, action: remove 
   forking udev time:     Sat Dec 11 18:59:57 2004
   the delay time is:     3 s 

   device: /class/tty/ptmx, action: remove 
   forking udev time:     Sat Dec 11 19:00:07 2004
   the delay time is:     4013 s 

   the delay time is: 4013 
   udevd doesn't act properly.
2005-04-26 23:13:48 -07:00

64 lines
1.7 KiB
Perl

#!/usr/bin/perl -w
#
# udev-log-amplify
#
# Copyright (C) Intel Corp, 2004
#
# Author: Yin Hu <hu.yin@intel.com>
#
# This is a script for replacing udev binary during udevsend/udevd testing.
# It first amplifies the execution time ( sleep 5 ) and then logs the event
# information sent by udved in order that test script udevd-test.pl can
# analyze whether udved execute as we expected.
# You should not execute this script directly because it will be invoked by
# udevd automatically.
#
# Before you run your test please modify $log_file to designate where the udev
# log file should be placed, in fact, the default value is ok.
#
#
# 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 version 2 of the License.
#
# 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.,
# 675 Mass Ave, Cambridge, MA 02139, USA.
#
use warnings;
use strict;
# modifiable settings
my $udev_exe_time = 5;
my $log_file = "/tmp/udev_log.txt";
if ($ARGV[0]) {
my $subsystem = $ARGV[0];
my $devpath = $ENV{DEVPATH};
my $action = $ENV{ACTION};
my $time = time();
# Logging
if (open(LOGF, ">>$log_file")) {
print LOGF "$devpath,$action,$subsystem,$time\n";
} else {
print "File open failed. \n";
exit 1;
}
close(LOGF);
# Amplify the execution time of udev
sleep 5;
exit 0;
} else {
print "Too less argument count.\n";
exit 1;
}