~ubuntu-branches/ubuntu/vivid/samba/vivid

« back to all changes in this revision

Viewing changes to pcp/mkheader.pl

  • 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:
1
 
#!/usr/bin/perl
2
 
 
3
 
 
4
 
open(PROFILE,"profile.h") || die "Unable to open profile.h\n";
5
 
@profile = <PROFILE>;
6
 
close PROFILE;
7
 
 
8
 
open(METRICS,"> metrics.h") || die "Unable to open metrics.h for output\n";
9
 
 
10
 
print METRICS "#define COUNT_TIME_INDOM 0\n";
11
 
print METRICS "#define BYTE_INDOM       1\n\n";
12
 
print METRICS "#define FIELD_OFF(x) (unsigned)\&(((struct profile_stats *)NULL)->x)\n\n";
13
 
print METRICS "typedef struct {\n";
14
 
print METRICS "\tchar *name;\n";
15
 
print METRICS "\tunsigned offset;\n";
16
 
print METRICS "} samba_instance;\n\n";
17
 
 
18
 
@instnames = grep(/unsigned .*_time;/,@profile);
19
 
foreach $instnames (@instnames) {
20
 
    chomp $instnames;
21
 
    $instnames =~ s/^.*unsigned (.*)_time.*$/$1/;
22
 
}
23
 
 
24
 
print METRICS "static samba_instance samba_counts[] = {";
25
 
$first = 1;
26
 
foreach $1 (@instnames) {
27
 
    if ($first == 1) {
28
 
        $first = 0;
29
 
        print METRICS "\n";
30
 
    } else {
31
 
        print METRICS ",\n";
32
 
    }
33
 
    print METRICS "\t{\"$1\", FIELD_OFF($1_count)}";
34
 
}
35
 
print METRICS "\n};\n\n";
36
 
print METRICS "static samba_instance samba_times[] = {";
37
 
$first = 1;
38
 
foreach $1 (@instnames) {
39
 
    if ($first == 1) {
40
 
        $first = 0;
41
 
        print METRICS "\n";
42
 
    } else {
43
 
        print METRICS ",\n";
44
 
    }
45
 
    print METRICS "\t{\"$1\", FIELD_OFF($1_time)}";
46
 
}
47
 
print METRICS "\n};\n\n";
48
 
print METRICS "static samba_instance samba_bytes[] = {";
49
 
@instnames = grep(/unsigned .*_bytes;/,@profile);
50
 
$first = 1;
51
 
foreach $_ (@instnames) {
52
 
    if ($first == 1) {
53
 
        $first = 0;
54
 
        print METRICS "\n";
55
 
    } else {
56
 
        print METRICS ",\n";
57
 
    }
58
 
    /^.*unsigned (.*)_bytes.*$/;
59
 
    print METRICS "\t{\"$1\", FIELD_OFF($1_bytes)}";
60
 
}
61
 
print METRICS "\n};\n";
62
 
 
63
 
close METRICS