Files
webmin/minecraft/save_playtime.cgi
2013-05-22 22:36:02 -07:00

34 lines
985 B
Perl

#!/usr/local/bin/perl
# Save player time limits
use strict;
use warnings;
require './minecraft-lib.pl';
our (%in, %text, %config, $module_config_file);
&ReadParse();
&error_setup($text{'playtime_err'});
# Validate and save inputs
$config{'playtime_enabled'} = $in{'enabled'};
$in{'max_def'} || $in{'max'} =~ /^\d+$/ || &error($text{'playtime_emax'});
$config{'playtime_max'} = $in{'max_def'} ? undef : $in{'max'};
$in{'users_def'} || $in{'users'} =~ /\S/ || &error($text{'playtime_eusers'});
$config{'playtime_users'} = $in{'users_def'} ? undef : $in{'users'};
$in{'days'} =~ /\S/ || &error($text{'playtime_edays'});
$config{'playtime_days'} = join(" ", split(/\0/, $in{'days'}));
$in{'ips_def'} || $in{'ips'} =~ /\S/ || &error($text{'playtime_eips'});
$config{'playtime_ips'} = $in{'ips_def'} ? undef : $in{'ips'};
&lock_file($module_config_file);
&save_module_config(\%config);
&unlock_file($module_config_file);
# XXX setup cron job
&webmin_log("playtime");
&redirect("");