| Server IP : 49.231.201.246 / Your IP : 216.73.216.149 Web Server : Apache/2.4.18 (Ubuntu) System : User : root ( 0) PHP Version : 7.0.33-0ubuntu0.16.04.16 Disable Function : exec,passthru,mail,shell_exec,system,proc_open,popen,ini_alter,dl,proc_close,curl_exec,curl_multi_exec,readfile,parse_ini_file,escapeshellarg,escapeshellcmd,show_source,pcntl_alarm,pcntl_fork,pcntl_waitpid,pcntl_wait,pcntl_wifexited,pcntl_wifstopped,pcntl_wifsignaled,pcntl_wifcontinued,pcntl_wexitstatus,pcntl_wtermsig,pcntl_wstopsig,pcntl_signal,pcntl_signal_get_handler,pcntl_signal_dispatch,pcntl_get_last_error,pcntl_strerror,pcntl_sigprocmask,pcntl_sigwaitinfo,pcntl_sigtimedwait,pcntl_exec,pcntl_getpriority,pcntl_setpriority,pcntl_async_signals,pcntl_unshare,mail,php_uname,phpinfo MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : ON | Sudo : ON | Pkexec : ON Directory : /usr/share/webmin/postgresql/ |
Upload File : |
#!/usr/bin/perl
# Create, modify or delete a sequence
require './postgresql-lib.pl';
&ReadParse();
&error_setup($text{'seq_err'});
&can_edit_db($in{'db'}) || &error($text{'dbase_ecannot'});
$access{'edonly'} && &error($text{'dbase_ecannot'});
$access{'seqs'} || &error($text{'seq_ecannot'});
if ($in{'delete'}) {
# Just drop the sequence
$sql = "drop sequence "."e_table($in{'old'});
&execute_sql_logged($in{'db'}, $sql);
&webmin_log("delete", "seq", $in{'old'}, \%in);
}
else {
# Validate inputs
$in{'old'} || $in{'name'} =~ /^\S+$/ || &error($text{'seq_ename'});
if (!$in{'old'}) {
@seqs = &list_sequences($in{'db'});
&indexof($in{'name'}, @seqs) >= 0 &&
&error($text{'seq_eclash'});
}
$in{'min_def'} || $in{'min'} =~ /^\d+$/ ||
&error($text{'seq_emin'});
$in{'max_def'} || $in{'max'} =~ /^\d+$/ ||
&error($text{'seq_emax'});
$in{'inc'} =~ /^\d+$/ || &error($text{'seq_einc'});
$in{'cache_def'} || $in{'cache'} =~ /^\d+$/ ||
&error($text{'seq_ecache'});
if (&supports_sequences() == 2 && $in{'old'}) {
# Need to drop and re-create
if (&indexof($in{'old'}, &list_sequences($in{'db'})) >= 0) {
$sql = "drop sequence "."e_table($in{'old'});
&execute_sql_logged($in{'db'}, $sql);
}
$sql = "create sequence "."e_table($in{'old'}).
" increment ".$in{'inc'}.
($in{'min_def'} ? "" : " minvalue ".$in{'min'}).
($in{'max_def'} ? "" : " maxvalue ".$in{'max'}).
" start ".$in{'last'}.
($in{'cache_def'} ? "" : " cache ".$in{'cache'}).
($in{'cycle'} ? " cycle" : "");
}
elsif ($in{'old'} && !$recreate) {
# Alter the current sequence
$sql = "alter sequence "."e_table($in{'old'}).
" increment ".$in{'inc'}.
($in{'min_def'} ? " no minvalue"
: " minvalue ".$in{'min'}).
($in{'max_def'} ? " no maxvalue"
: " maxvalue ".$in{'max'}).
($in{'last_def'} ? "" : " restart ".$in{'last'}).
" cache ".$in{'cache'}.
($in{'cycle'} ? " cycle" : " no cycle");
}
else {
# Create a new one
$sql = "create sequence "."e_table($in{'name'}).
" increment ".$in{'inc'}.
($in{'min_def'} ? "" : " minvalue ".$in{'min'}).
($in{'max_def'} ? "" : " maxvalue ".$in{'max'}).
" start ".$in{'last'}.
($in{'cache_def'} ? "" : " cache ".$in{'cache'}).
($in{'cycle'} ? " cycle" : "");
}
&execute_sql_logged($in{'db'}, $sql);
if ($in{'old'}) {
&webmin_log("modify", "view", $in{'old'}, \%in);
}
else {
&webmin_log("create", "view", $in{'name'}, \%in);
}
}
&redirect("edit_dbase.cgi?db=$in{'db'}");