| 2381 | | my @errordocs = (401, 403, 404, 500, 503); |
|---|
| 2382 | | |
|---|
| 2383 | | my ($i, $key) = ('', ''); |
|---|
| 2384 | | |
|---|
| 2385 | | for($i = 0; $i < scalar(@errordocs); $i++) { |
|---|
| 2386 | | $key = $errordocs[$i]; |
|---|
| 2387 | | |
|---|
| 2388 | | if (-e "$root_dir/gui/errordocs/$key.html") { |
|---|
| 2389 | | |
|---|
| 2390 | | $rs = sys_command("$main::cfg{'CMD_CP'} -p $root_dir/gui/errordocs/$key.html $www_dir/$dmn_name/errors/"); |
|---|
| 2391 | | return $rs if ($rs != 0); |
|---|
| 2392 | | $rs = setfmode("$www_dir/$dmn_name/errors/$key.html", $sys_user, $sys_group, 0644); |
|---|
| 2393 | | return $rs if ($rs != 0); |
|---|
| 2394 | | } |
|---|
| 2395 | | } |
|---|
| 2396 | | $rs = sys_command("$main::cfg{'CMD_CP'} -p $root_dir/gui/errordocs/inc/error_top.jpg $www_dir/$dmn_name/errors/inc/"); |
|---|
| 2397 | | return $rs if ($rs != 0); |
|---|
| 2398 | | $rs = sys_command("$main::cfg{'CMD_CP'} -p $root_dir/gui/errordocs/inc/valid_css.jpg $www_dir/$dmn_name/errors/inc/"); |
|---|
| 2399 | | return $rs if ($rs != 0); |
|---|
| 2400 | | $rs = sys_command("$main::cfg{'CMD_CP'} -p $root_dir/gui/errordocs/inc/valid_xhtml.jpg $www_dir/$dmn_name/errors/inc/"); |
|---|
| 2401 | | return $rs if ($rs != 0); |
|---|
| 2402 | | $rs = sys_command("$main::cfg{'CMD_CP'} -p $root_dir/gui/errordocs/inc/errordocs.js $www_dir/$dmn_name/errors/inc/"); |
|---|
| 2403 | | return $rs if ($rs != 0); |
|---|
| 2404 | | $rs = sys_command("$main::cfg{'CMD_CP'} -p $root_dir/gui/errordocs/inc/errordocs.css $www_dir/$dmn_name/errors/inc/"); |
|---|
| 2405 | | return $rs if ($rs != 0); |
|---|
| 2406 | | $rs = setfmode("$www_dir/$dmn_name/errors/inc/error_top.jpg", $sys_user, $sys_group, 0644); |
|---|
| 2407 | | return $rs if ($rs != 0); |
|---|
| 2408 | | $rs = setfmode("$www_dir/$dmn_name/errors/inc/valid_css.jpg", $sys_user, $sys_group, 0644); |
|---|
| 2409 | | return $rs if ($rs != 0); |
|---|
| 2410 | | $rs = setfmode("$www_dir/$dmn_name/errors/inc/valid_xhtml.jpg", $sys_user, $sys_group, 0644); |
|---|
| 2411 | | return $rs if ($rs != 0); |
|---|
| 2412 | | $rs = setfmode("$www_dir/$dmn_name/errors/inc/errordocs.js", $sys_user, $sys_group, 0644); |
|---|
| 2413 | | return $rs if ($rs != 0); |
|---|
| 2414 | | $rs = setfmode("$www_dir/$dmn_name/errors/inc/errordocs.css", $sys_user, $sys_group, 0644); |
|---|
| 2415 | | return $rs if ($rs != 0); |
|---|
| | 2376 | $rs = make_dir("$www_dir/$dmn_name/backups", $sys_user, $httpd_gid, 0770); |
|---|
| | 2377 | return $rs if ($rs != 0); |
|---|
| | 2378 | |
|---|
| | 2379 | $rs = make_dir("$www_dir/$dmn_name/errors", $sys_user, $sys_group, 0775); |
|---|
| | 2380 | return $rs if ($rs != 0); |
|---|
| | 2381 | |
|---|
| | 2382 | $rs = make_dir("$www_dir/$dmn_name/errors/inc", $sys_user, $sys_group, 0775); |
|---|
| | 2383 | return $rs if ($rs != 0); |
|---|
| | 2384 | |
|---|
| | 2385 | my @errordocs = (401, 403, 404, 500, 503); |
|---|
| | 2386 | |
|---|
| | 2387 | my ($i, $key) = ('', ''); |
|---|
| | 2388 | |
|---|
| | 2389 | for($i = 0; $i < scalar(@errordocs); $i++) { |
|---|
| | 2390 | $key = $errordocs[$i]; |
|---|
| | 2391 | |
|---|
| | 2392 | if (-e "$root_dir/gui/errordocs/$key.html") { |
|---|
| | 2393 | $rs = sys_command("$main::cfg{'CMD_CP'} -p $root_dir/gui/errordocs/$key.html $www_dir/$dmn_name/errors/"); |
|---|
| | 2394 | return $rs if ($rs != 0); |
|---|
| | 2395 | $rs = setfmode("$www_dir/$dmn_name/errors/$key.html", $sys_user, $sys_group, 0644); |
|---|
| | 2396 | return $rs if ($rs != 0); |
|---|
| | 2397 | } |
|---|
| | 2398 | } |
|---|
| | 2399 | |
|---|
| | 2400 | $rs = sys_command("$main::cfg{'CMD_CP'} -p $root_dir/gui/errordocs/inc/error_top.jpg $www_dir/$dmn_name/errors/inc/"); |
|---|
| | 2401 | return $rs if ($rs != 0); |
|---|
| | 2402 | $rs = sys_command("$main::cfg{'CMD_CP'} -p $root_dir/gui/errordocs/inc/valid_css.jpg $www_dir/$dmn_name/errors/inc/"); |
|---|
| | 2403 | return $rs if ($rs != 0); |
|---|
| | 2404 | $rs = sys_command("$main::cfg{'CMD_CP'} -p $root_dir/gui/errordocs/inc/valid_xhtml.jpg $www_dir/$dmn_name/errors/inc/"); |
|---|
| | 2405 | return $rs if ($rs != 0); |
|---|
| | 2406 | $rs = sys_command("$main::cfg{'CMD_CP'} -p $root_dir/gui/errordocs/inc/errordocs.js $www_dir/$dmn_name/errors/inc/"); |
|---|
| | 2407 | return $rs if ($rs != 0); |
|---|
| | 2408 | $rs = sys_command("$main::cfg{'CMD_CP'} -p $root_dir/gui/errordocs/inc/errordocs.css $www_dir/$dmn_name/errors/inc/"); |
|---|
| | 2409 | return $rs if ($rs != 0); |
|---|
| | 2410 | $rs = setfmode("$www_dir/$dmn_name/errors/inc/error_top.jpg", $sys_user, $sys_group, 0644); |
|---|
| | 2411 | return $rs if ($rs != 0); |
|---|
| | 2412 | $rs = setfmode("$www_dir/$dmn_name/errors/inc/valid_css.jpg", $sys_user, $sys_group, 0644); |
|---|
| | 2413 | return $rs if ($rs != 0); |
|---|
| | 2414 | $rs = setfmode("$www_dir/$dmn_name/errors/inc/valid_xhtml.jpg", $sys_user, $sys_group, 0644); |
|---|
| | 2415 | return $rs if ($rs != 0); |
|---|
| | 2416 | $rs = setfmode("$www_dir/$dmn_name/errors/inc/errordocs.js", $sys_user, $sys_group, 0644); |
|---|
| | 2417 | return $rs if ($rs != 0); |
|---|
| | 2418 | $rs = setfmode("$www_dir/$dmn_name/errors/inc/errordocs.css", $sys_user, $sys_group, 0644); |
|---|
| | 2419 | return $rs if ($rs != 0); |
|---|