ZaneYork
/
zoneminder
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Added dynamic bits from configure. 

git-svn-id: http://svn.zoneminder.com/svn/zm/trunk@330 e3e1d417-86f3-4887-817a-d78f3d33393f
This commit is contained in:
stan 2003-01-15 14:27:42 +00:00
parent e6e88b2de0
commit 0999bc2197
1 changed files with 31 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

31
zmconfig.pl.in
View File

@ -72,8 +72,37 @@ my %types =
include => { hint => 'local/path/to/file', parse => sub { return( (int($_[0] =~ /^(.*)?$/ ) && -s $1), $1 ) } },
);
# Minor hack to get the right values out of configure.
my $prefix = "@prefix@";
my $exec_prefix = ${prefix};
my $bindir = "${exec_prefix}/bin";
my @options =
(
{
name => "ZM_PATH",
default => "$bindir",
description => "Path to the ZoneMinder executables, autogenerated do not change",
help => "The path where the ZoneMinder executables are installed is set at configure time. This is a readonly option for the purposes of distributing this information around the various binaries and scripts that need to know it. Changing this option here will tend to break things. Instead re-run configure to regenerate the path."
type => $types{abs_path},
readonly => 1,
},
{
name => "ZM_WEB_USER",
default => "@WEB_USER@",
description => "User name of your httpd daemon user, autogenerated do not change",
help => "The user name of your httpd daemon user is set at configure time. This is a readonly option for the purposes of distributing this information around the various binaries and scripts that need to know it. Changing this option here will tend to break things. Instead re-run configure to regenerate the user name."
type => $types{string},
readonly => 1,
},
{
name => "ZM_WEB_GROUP",
default => "@WEB_GROUP@",
description => "User group of your httpd daemon user, autogenerated do not change",
help => "The user group of your httpd daemon user is set at configure time. This is a readonly option for the purposes of distributing this information around the various binaries and scripts that need to know it. Changing this option here will tend to break things. Instead re-run configure to regenerate the user group."
type => $types{string},
readonly => 1,
},
{
name => "ZM_DB_SERVER",
default => "localhost",
@ -693,6 +722,7 @@ Press enter to continue: " );
foreach my $option ( @options )
{
next if ( $option->{readonly} );
if ( my $requires = $option->{requires} )
{
my $do_option;
@ -789,6 +819,7 @@ sub saveOptions
open( CONFIG, ">$config_file" ) or die( "Can't open options file: $!" );
foreach my $option ( @options )
{
next if ( $option->{readonly} );
print( CONFIG "Name: $option->{name}\n" );
print( CONFIG "Value: $option->{value}\n" );
print( CONFIG "Description: $option->{description}\n" );