diff options
author | Jelmer Vernooij <jelmer@samba.org> | 2005-05-20 14:11:25 +0000 |
---|---|---|
committer | Gerald (Jerry) Carter <jerry@samba.org> | 2007-10-10 13:16:57 -0500 |
commit | dfac3f56fb47715349812d48747c4a76cb71294b (patch) | |
tree | 14efcfe5ac7668d370331158b0ce62040c948d7b /source4/build | |
parent | b4d9ff4842f9bac96bc069a46ab25b8e4423dae0 (diff) | |
download | samba-dfac3f56fb47715349812d48747c4a76cb71294b.tar.gz samba-dfac3f56fb47715349812d48747c4a76cb71294b.tar.xz samba-dfac3f56fb47715349812d48747c4a76cb71294b.zip |
r6924: Remove some unused functions.
(This used to be commit a7846183035295c2d60148beb23ddb4ed7d20723)
Diffstat (limited to 'source4/build')
-rw-r--r-- | source4/build/smb_build/config_mk.pm | 200 |
1 files changed, 0 insertions, 200 deletions
diff --git a/source4/build/smb_build/config_mk.pm b/source4/build/smb_build/config_mk.pm index 11ef8cf7b1..464f1674eb 100644 --- a/source4/build/smb_build/config_mk.pm +++ b/source4/build/smb_build/config_mk.pm @@ -238,206 +238,6 @@ sub _fetch_array_from_config_mk($$$) return input::str2array($val); } -########################################################### -# A function for fetching MODULE_<module>_<parameter> -# variables out of a config.mk file -# -# $value = module_get_var($filename,$module,$parameter) -# -# $filename - the path of the config.mk file -# which should be parsed -# -# $module - the middle part of the variable name of which we want the value -# -# $parameter - the last part of the variable name of which we want the value -# -# $value - the value of the variable -sub module_get_var($$$) -{ - my $filename = shift; - my $module = shift; - my $var = shift; - - my $section = "MODULE::".$module; - - return _fetch_var_from_config_mk($filename,$section,$var); -} - -########################################################### -# A function for fetching MODULE_<module>_<parameter> -# variables out of a config.mk file -# -# $array = module_get_array($filename,$module,$parameter) -# -# $filename - the path of the config.mk file -# which should be parsed -# -# $module - the middle part of the variable name of which we want the value -# -# $parameter - the last part of the variable name of which we want the value -# -# $array - the array of values of the variable -sub module_get_array($$$) -{ - my $filename = shift; - my $module = shift; - my $var = shift; - - my $section = "MODULE::".$module; - - return _fetch_array_from_config_mk($filename,$section,$var); -} - -########################################################### -# A function for fetching SUBSYSTEM_<subsystem>_<parameter> -# variables out of a config.mk file -# -# $value = subsystem_get_var($filename,$subsystem,$parameter) -# -# $filename - the path of the config.mk file -# which should be parsed -# -# $subsystem - the middle part of the variable name of which we want the value -# -# $parameter - the last part of the variable name of which we want the value -# -# $value - the value of the variable -sub subsystem_get_var($$$) -{ - my $filename = shift; - my $subsystem = shift; - my $var = shift; - - my $section = "SUBSYSTEM::".$subsystem; - - return _fetch_var_from_config_mk($filename,$section,$var); -} - -########################################################### -# A function for fetching SUBSYSTEM_<subsystem>_<parameter> -# variables out of a config.mk file -# -# $array = subsystem_get_array($filename,$subsystem,$parameter) -# -# $filename - the path of the config.mk file -# which should be parsed -# -# $subsystem - the middle part of the variable name of which we want the value -# -# $parameter - the last part of the variable name of which we want the value -# -# $array - the array of values of the variable -sub subsystem_get_array($$$) -{ - my $filename = shift; - my $subsystem = shift; - my $var = shift; - - my $section = "SUBSYSTEM::".$subsystem; - - return _fetch_array_from_config_mk($filename,$section,$var); -} - -########################################################### -# A function for fetching LIBRARY_<library>_<parameter> -# variables out of a config.mk file -# -# $value = library_get_var($filename,$library,$parameter) -# -# $filename - the path of the config.mk file -# which should be parsed -# -# $library - the middle part of the variable name of which we want the value -# -# $parameter - the last part of the variable name of which we want the value -# -# $value - the value of the variable -sub library_get_var($$$) -{ - my $filename = shift; - my $library = shift; - my $var = shift; - - my $section = "LIBRARY::".$library; - - return _fetch_var_from_config_mk($filename,$section,$var); -} - -########################################################### -# A function for fetching LIBRARY_<library>_<parameter> -# variables out of a config.mk file -# -# $array = library_get_array($filename,$library,$parameter) -# -# $filename - the path of the config.mk file -# which should be parsed -# -# $library - the middle part of the variable name of which we want the value -# -# $parameter - the last part of the variable name of which we want the value -# -# $array - the array of values of the variable -sub library_get_array($$$) -{ - my $filename = shift; - my $library = shift; - my $var = shift; - - my $section = "LIBRARY::".$library; - - return _fetch_array_from_config_mk($filename,$section,$var); -} - -########################################################### -# A function for fetching BINARY_<binary>_<parameter> -# variables out of a config.mk file -# -# $value = binary_get_var($filename,$binary,$parameter) -# -# $filename - the path of the config.mk file -# which should be parsed -# -# $binary - the middle part of the variable name of which we want the value -# -# $parameter - the last part of the variable name of which we want the value -# -# $value - the value of the variable -sub binary_get_var($$$) -{ - my $filename = shift; - my $binary = shift; - my $var = shift; - - my $section = "BINARY::".$binary; - - return _fetch_var_from_config_mk($filename,$section,$var); -} - -########################################################### -# A function for fetching BINARY_<binary>_<parameter> -# variables out of a config.mk file -# -# $array = binary_get_array($filename,$binary,$parameter) -# -# $filename - the path of the config.mk file -# which should be parsed -# -# $binary - the middle part of the variable name of which we want the value -# -# $parameter - the last part of the variable name of which we want the value -# -# $array - the array of values of the variable -sub binary_get_array($$$) -{ - my $filename = shift; - my $binary = shift; - my $var = shift; - - my $section = "BINARY::".$binary; - - return _fetch_array_from_config_mk($filename,$section,$var); -} - sub import_file($$) { my $input = shift; |