diff options
author | Garming Sam <garming@catalyst.net.nz> | 2014-01-15 17:18:13 +1300 |
---|---|---|
committer | Andrew Bartlett <abartlet@samba.org> | 2014-02-12 13:17:13 +1300 |
commit | cc6a77835bc286b2e570a05596b3b6acc54c1052 (patch) | |
tree | 7dbcc1a3346d09f5b197af6c9c060fe9a590407b /source4/script | |
parent | 526cf3c119cae83d94d9120ef436482281daaeb4 (diff) | |
download | samba-cc6a77835bc286b2e570a05596b3b6acc54c1052.tar.gz |
lib/param: generate the param_functions.h containing the prototypes
Pair-programmed-with: Andrew Bartlett <abartlet@samba.org>
Signed-off-by: Garming Sam <garming@catalyst.net.nz>
Reviewed-by: Andrew Bartlett <abartlet@samba.org>
Reviewed-by: Michael Adam <obnox@samba.org>
Diffstat (limited to 'source4/script')
-rwxr-xr-x | source4/script/mkproto.pl | 41 |
1 files changed, 0 insertions, 41 deletions
diff --git a/source4/script/mkproto.pl b/source4/script/mkproto.pl index 348f150e6da..2c3ebac0f99 100755 --- a/source4/script/mkproto.pl +++ b/source4/script/mkproto.pl @@ -124,45 +124,6 @@ sub print_footer($$) $file->("\n#endif /* $header_name */\n\n"); } -sub handle_loadparm($$) -{ - my ($file,$line) = @_; - my $scope; - my $type; - my $name; - my $var; - - if ($line =~ /^FN_(GLOBAL|LOCAL)_(CONST_STRING|STRING|BOOL|bool|CHAR|INTEGER|LIST)\((\w+),(.*)\)/o) { - $scope = $1; - $type = $2; - $name = $3; - $var = $4; - } elsif ($line =~ /^FN_(GLOBAL|LOCAL)_PARM_(CONST_STRING|STRING|BOOL|bool|CHAR|INTEGER|LIST)\((\w+),(.*)\)/o) { - $scope = $1; - $type = $2; - $name = $3; - $var = $4; - } else { - return; - } - - my %tmap = ( - "BOOL" => "bool ", - "CONST_STRING" => "const char *", - "STRING" => "const char *", - "INTEGER" => "int ", - "CHAR" => "char ", - "LIST" => "const char **", - ); - - my %smap = ( - "GLOBAL" => "struct loadparm_context *", - "LOCAL" => "struct loadparm_service *, struct loadparm_service *" - ); - - $file->("$tmap{$type}lpcfg_$name($smap{$scope});\n"); -} - sub process_file($$$) { my ($public_file, $private_file, $filename) = @_; @@ -203,8 +164,6 @@ sub process_file($$$) next if ($line =~ /^\/|[;]/); if ($line =~ /^FN_/) { - handle_loadparm($public_file, $line); - handle_loadparm($private_file, $line); next; } |