Code:
#
1476 # Default domain page template;
1477 #
1478
1479 # check if htdocs folder not exists
1480 if (!(-e "$sub_dir/htdocs/")) {
1481
1482 ($rs, $rdata) = make_dir(
1483 "$sub_dir/htdocs",
1484 $sys_user,
1485 $sys_group,
1486 0755
1487 );
1488
1489 return $rs if ($rs != 0);
1490
1491 my $index_tpl = '';
1492 my $vhost = $main::cfg{'BASE_SERVER_VHOST'};
1493
1494 ($rs, $index_tpl) = get_file("$root_dir/gui/domain_default_page/index.html");
1495
1496 return $rs if ($rs != 0);
1497
1498 $index_tpl =~ s/{DOMAIN_NAME}/$sub_name/gi;
1499 $index_tpl =~ s/{BASE_SERVER_VHOST}/$vhost/gi;
1500
1501 ($rs, $rdata) = store_file(
1502 "$sub_dir/htdocs/index.html",
1503 $index_tpl,
1504 $sys_user,
1505 $sys_group,
1506 0644
1507 );
1508
1509 return $rs if ($rs != 0);
1510
1511 $rs = sys_command("$main::cfg{'CMD_CP'} -rp $root_dir/gui/domain_default_page/images $sub_dir/htdocs/");
1512 return $rs if ($rs != 0);
1513
1514 $rs = setfmode("$sub_dir/htdocs/images/", $sys_user, $sys_group, 0755);
1515 return $rs if ($rs != 0);
1516
1517 opendir(DIR, "$sub_dir/htdocs/images/");
1518 my @files = readdir(DIR);
1519 closedir(DIR);
1520
1521 foreach (@files) {
1522 # ignore . and .. :
1523 next if ($_ eq "." || $_ eq "..");
1524 $rs = setfmode("$sub_dir/htdocs/images/$_", $sys_user, $sys_group, 0644);
1525 return $rs if ($rs != 0);
1526 }
1527 }
1528
1529 push_el(\@main::el, 'sub_add_httpd_file_data()', 'Ending...');
1530
1531 return 0;
1532
1533 }
1534
Das ist die Funktion beim Ändern das es der User/Kunde machen darf, soll,
kann ich dir nicht helfen kann es nur ausklammern
glaub ich, aber muss jetzt erstmal einkaufen