Viewing file:  move.cgi (2.49 KB) -rwxrwxr-x
Select action/file-type:
 (+) |  (+) |  (+) | Code (+) | Session (+) |  (+) | SDB (+) |  (+) |  (+) |  (+) |  (+) |  (+) |
#!/usr/bin/perl
# Actually move a virtual server under a new owner
require './virtual-server-lib.pl';
&ReadParse();
&error_setup($text{'move_err'});
$d = &get_domain($in{'dom'});
&can_move_domain($d) || &error($text{'move_ecannot'});
$oldd = { %$d };
if ($in{'parent'}) {
# Get the selected parent domain object
$parent = &get_domain($in{'parent'});
if ($d->{'parent'}) {
$parent->{'id'} == $d->{'parent'} && &error($text{'move_esame'});
}
else {
$parent->{'id'} == $d->{'id'} && &error($text{'move_eparent'});
}
&can_config_domain($parent) || &error($text{'move_ecannot2'});
# Check if parent has MySQL feature enabled too
&error($text{'setup_edepmysql'})
if ($d->{'mysql'} && !$parent->{'mysql'});
# Check if parent has PostgreSQL feature enabled too
&error($text{'setup_edepmysqlsub'})
if ($d->{'postgres'} && !$parent->{'postgres'});
}
else {
# Turning into a parent domain - check the username for clashes
$in{'newuser'} =~ /^[^\t :]+$/ || &error($text{'setup_euser2'});
$newd = { %$d };
$newd->{'unix'} = 1;
$newd->{'webmin'} = 1;
$newd->{'user'} = $in{'newuser'};
$newd->{'group'} = $in{'newuser'};
$derr = &virtual_server_clashes($newd, undef, 'user') ||
&virtual_server_clashes($newd, undef, 'group');
&error($derr) if ($derr);
# Check if the domain already has a user with that name
@dusers = &list_domain_users($d, 0, 1, 1, 1);
($clash) = grep { $_->{'user'} eq $in{'newuser'} ||
&remove_userdom($_->{'user'}, $d) eq $in{'newuser'} } @dusers;
$clash && &error(&text('move_euserclash', $in{'newuser'}));
# Check if a user with that name exists anywhere
defined(getpwnam($in{'newuser'})) &&
&error(&text('move_euserclash2', $in{'newuser'}));
}
&ui_print_unbuffered_header(&domain_in($d), $text{'move_title'}, "");
if ($parent) {
&$first_print(&text('move_doing', "<tt>$d->{'dom'}</tt>",
"<tt>$parent->{'dom'}</tt>"));
}
else {
&$first_print(&text('move_doing2', "<tt>$d->{'dom'}</tt>"));
}
&$indent_print();
# Do the move
if ($in{'parent'}) {
$ok = &move_virtual_server($d, $parent);
}
else {
$ok = &reparent_virtual_server($d, $in{'newuser'}, $in{'newpass'});
}
&$outdent_print();
if ($ok) {
&$second_print($text{'setup_done'});
}
else {
&$second_print($text{'move_failed'});
}
&run_post_actions();
&webmin_log("move", "domain", $d->{'dom'}, $d);
# Call any theme post command
if (defined(&theme_post_save_domain)) {
&theme_post_save_domain($d, 'modify');
}
&ui_print_footer(&domain_footer_link($d),
"", $text{'index_return'});
|