← Back to branch summary

~ubuntu-branches/ubuntu/precise/samba/precise

« back to all changes in this revision

Viewing changes to selftest/BuildFarm.pm

  • Committer: Package Import Robot
  • Author(s): Chuck Short
  • Date: 2011-12-21 13:18:04 UTC
  • mfrom: (0.39.21 sid)
  • Revision ID: package-import@ubuntu.com-20111221131804-xtlr39wx6njehxxr
Tags: 2:3.6.1-3ubuntu1
* Merge from Debian testing.  Remaining changes:
  + debian/patches/VERSION.patch:
    - set SAMBA_VERSION_SUFFIX to Ubuntu.
  + debian/patches/error-trans.fix-276472:
    - Add the translation of Unix Error code -ENOTSUP to NT Error Code
    - NT_STATUS_NOT_SUPPORTED to prevent the Permission denied error.
  + debian/smb.conf:
    - add "(Samba, Ubuntu)" to server string.
    - comment out the default [homes] share, and add a comment about
      "valid users = %S" to show users how to restrict access to
      \\server\username to only username.
    - Set 'usershare allow guests', so that usershare admins are 
      allowed to create public shares in addition to authenticated
      ones.
    - add map to guest = Bad user, maps bad username to guest access.
  + debian/samba-common.config:
    - Do not change priority to high if dhclient3 is installed.
    - Use priority medium instead of high for the workgroup question.
  + debian/control:
    - Don't build against or suggest ctdb.
    - Add dependency on samba-common-bin to samba.
  + Add ufw integration:
    - Created debian/samba.ufw.profile
    - debian/rules, debian/samba.dirs, debian/samba.files: install
      profile
    - debian/control: have samba suggest ufw
  + Add apport hook:
    - Created debian/source_samba.py.
    - debian/rules, debian/samba.dirs, debian/samba-common-bin.files: install
  + Switch to upstart:
    - Add debian/samba.{nmbd,smbd}.upstart.
  + debian/samba.logrotate, debian/samba-common.dhcp, debian/samba.if-up:
    - Make them upstart compatible
  + debian/samba.postinst: 
    - Avoid scary pdbedit warnings on first import.
  + debian/samba-common.postinst: Add more informative error message for
    the case where smb.conf was manually deleted
  + debian/patches/fix-debuglevel-name-conflict.patch: don't use 'debug_level'
    as a global variable name in an NSS module 
  + Dropped:
    - debian/patches/error-trans.fix-276472
    - debian/patches/fix-debuglevel-name-conflict.patch

Show diffs side-by-side

added added

removed removed

Lines of Context:
selftest/BuildFarm.pm
1
 
#!/usr/bin/perl
2
 
# Convenience functions for writing output expected by the buildfarm
3
 
# Copyright (C) 2009 Jelmer Vernooij <jelmer@samba.org>
4
 
# Published under the GNU GPL, v3 or later
5
 
 
6
 
package BuildFarm;
7
 
 
8
 
use Exporter;
9
 
@ISA = qw(Exporter);
10
 
@EXPORT_OK = qw(start_testsuite end_testsuite skip_testsuite summary);
11
 
 
12
 
use strict;
13
 
 
14
 
sub start_testsuite($$)
15
 
{
16
 
        my ($name, $duration) = @_;
17
 
        my $out = "";
18
 
 
19
 
        $out .= "--==--==--==--==--==--==--==--==--==--==--\n";
20
 
        $out .= "Running test $name (level 0 stdout)\n";
21
 
        $out .= "--==--==--==--==--==--==--==--==--==--==--\n";
22
 
        $out .= scalar(localtime())."\n";
23
 
        $out .= "SELFTEST RUNTIME: " . $duration . "s\n";
24
 
        $out .= "NAME: $name\n";
25
 
 
26
 
        print $out;
27
 
}
28
 
 
29
 
sub end_testsuite($$$$$)
30
 
{
31
 
        my ($name, $duration, $ok, $output, $reason) = @_;
32
 
        my $out = "";
33
 
 
34
 
        $out .= "TEST RUNTIME: " . $duration . "s\n";
35
 
        if ($ok) {
36
 
                $out .= "ALL OK\n";
37
 
        } else {
38
 
                $out .= "ERROR: $reason\n";
39
 
        }
40
 
        $out .= "==========================================\n";
41
 
        if ($ok) {
42
 
                $out .= "TEST PASSED: $name\n";
43
 
        } else {
44
 
                $out .= "TEST FAILED: $name (status $reason)\n";
45
 
        }
46
 
        $out .= "==========================================\n";
47
 
 
48
 
        print $out;
49
 
}
50
 
 
51
 
sub skip_testsuite($)
52
 
{
53
 
        my ($name) = @_;
54
 
 
55
 
        print "SKIPPED: $name\n";
56
 
}
57
 
 
58
 
sub summary($)
59
 
{
60
 
        my ($duration) = @_;
61
 
 
62
 
        print "DURATION: " . $duration . " seconds\n";
63
 
}
64
 
 
65
 
1;