here it is...
just run it in the root of the cvs tree.
brad
On Mon, 2002-08-19 at 14:53, Jelmer Vernooij wrote:
> Could you send it ? I'm interested since I now had to do it by hand..
>
> jelmer
> > I have a perl script that does this check (by comparing the smb.conf
> > parsing code to the docbook stuff)
> > Maybe somebody could put it into the release checking list?
>
> > brad
> > On Mon, 2002-08-19 at 13:30, Simo Sorce wrote:
> > > On Mon, 2002-08-19 at 09:55, Jelmer Vernooij wrote:
> > > > Hi,
>
> > > > I've done some work trying to figure out what smb.conf options in HEAD
> > > > are currently not documented. Here they are:
>
> > > > add group script
> > > > add user to group script
> > > > admin log
> > > > ads server
> > > > alternate permissions
> > > > block size
> > > > delete group script
> > > > delete user from group script
> > > > display charset
>
> > > > hide unwriteable
> > > ok this one is the same as hide unreadable, but hides files you cannot
> > > write to. As always it only hides them so if you know the name you will
> > > be able to access them.
>
> > > > hostname lookups
>
> > > > mangling method
> > > This one make you able to select which mangling method is available
> > > Currently we have 'hash' and 'hash2'
> > > 'hash' is the old samba 2.2 compatible mangling algorithm
> > > 'hash2' (the default) is the new much better mangling algorithm
>
> > > > max packet
> > > > name cache timeout
> > > > ntlm auth
> > > > paranoid server security
> > > > realm
> > > > smb ports
> > > > unicode
> > > > unix charset
> > > > wins partners
> > > > disable netbios
> > > > dos charset
> > > > packet size
> > > > vfs path
> > > > wtmp directory
>
> > > > Please either document them or send me a clue about what they should
> > > > do so that I can document them.
>
> > > > jelmer
> > > --
> > > Simo Sorce - [EMAIL PROTECTED]
> > > Xsec s.r.l.
> > > via Durando 10 Ed. G - 20158 - Milano
> > > tel. +39 02 2399 7130 - fax: +39 02 700 442 399
>
>
> --
> Jelmer Vernooij <[EMAIL PROTECTED]> - http://nl.linux.org/~jelmer/
> Development And Underdevelopment: http://library.thinkquest.org/C0110231/
> Listening to Error: The server (moosicd) doesn't seem to be running.
> 20:52:41 up 4 days, 19:17, 5 users, load average: 0.04, 0.01, 0.00
>
>
>
#!/usr/bin/perl -w
#reads in the list of parameters from the source
#compares this list to the list of parms documented in the docbook source
#prints out the names of the parameters that are in need of documentation
my $doc_file = "./docs/docbook/manpages/smb.conf.5.sgml";
my $source_file = "./source/param/loadparm.c";
my $ln;
my %params;
open(SOURCE, "<$source_file") ||
die "Unable to open $source_file for input: $!\n";
open(DOC, "<$doc_file") ||
die "Unable to open $doc_file for input: $!\n";
while ($ln= <SOURCE>) {
last if $ln =~ m/^static\ struct\ parm_struct\ parm_table.*/;
} #burn through the preceding lines
while ($ln = <SOURCE>) {
last if $ln =~ m/^\s*\}\;\s*$/;
#pull in the param names only
next if $ln =~ m/.*P_SEPARATOR.*/;
$ln =~ m/.*\"(.*)\".*/;
$params{lc($1)}='not_found'; #not case sensitive
}
close SOURCE;
#now read in the params list from the docs
@doclines = <DOC>;
foreach $ln (grep (/\<anchor\ id\=/, @doclines)) {
$ln =~ m/^.*\<anchor\ id\=\".*\"\>\s*(?:\<.*?\>)*\s*(.*?)(?:\s*\(?[S,G]?\)?\s*(\<\/term\>)?){1}\s*$/;
#print "got: $1 from: $ln";
if (exists $params{lc($1)}) {
$params{$1} = 'found';
}
}
foreach (keys %params) {
print "$_\n" if $params{$_} eq 'not_found';
}
