Changeset 3186 for trunk/engine/setup/ispcp-update
- Timestamp:
- 08/11/10 11:24:56 (22 months ago)
- Location:
- trunk
- Files:
-
- 2 edited
-
. (modified) (1 prop)
-
engine/setup/ispcp-update (modified) (7 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk
- Property svn:mergeinfo changed
/branches/omega-1.0.4/language-files (added) merged: 2611-2639,2641-2645 /branches/omega-1.0.5/language-files (added) merged: 2656
- Property svn:mergeinfo changed
-
trunk/engine/setup/ispcp-update
r3010 r3186 546 546 push_el(\@main::el, 'check_ispcp_cfg_file()', 'Starting...'); 547 547 548 # Ref to an array of settings names that have aunallowed empty value548 # Reference to an array of settings that have unallowed empty value 549 549 my $settings = shift; 550 550 551 my ($rs, $msg, $rdata, $warn_msg) = (undef, undef, undef, undef); 552 553 # Map each setting to appropriate dialog subroutine and mainua key name 554 # TODO: Add a trigger to check database connection if related setting values 555 # are changed && add a subroutine for the 'BASE_SERVER_VHOST' to prevent 556 # errors if a dns file doesn't exist for him 551 my ($rs, $msg, $rdata, $warn_msg); 552 553 # Map each setting to the appropriate dialog subroutine and the corresponding 554 # main::ua key name 555 # 556 # TODO: 557 # - Add a trigger to check database connection if related settings are 558 # changed 559 # - Add a subroutine for the 'BASE_SERVER_VHOST' to prevent errors if the 560 # DNS file doesn't exist 557 561 my $recovery_dispatcher = { 558 562 DEFAULT_ADMIN_ADDRESS => [\&ask_admin_email, 'admin_email'], … … 563 567 DATABASE_NAME => [\&ask_db_name, 'db_name'], 564 568 DATABASE_USER => [\&ask_db_user, 'db_user'], 565 PHP_FASTCGI => [\&ask_fastcgi, 'php_fastcgi'] 569 PHP_FASTCGI => [\&ask_fastcgi, 'php_fastcgi'], 570 PHP_TIMEZONE => [\&ask_timezone, 'php_timezone'] 566 571 }; 567 572 568 # If several parameters are set to an empty value, we ensure569 # that the user has installed ispCP by asking th equestion570 if (scalar(@$settings) >= 2) {573 # If several parameters are set to an empty value, we should ensure 574 # that the user has installed ispCP by asking this question 575 if (scalar(@$settings) >= 2) { 571 576 572 577 print colored(['bold yellow'], "\n\n\tWARNING:"). 573 578 " Your ispCP configuration file has several settings set\n" . 574 "\tto an empty value !\n";579 "\tto an empty value!\n"; 575 580 576 581 do { … … 580 585 581 586 $msg = colored(['bold blue'], "\n\tNOTICE:") . 582 " The program will end now!\n" .583 "\tPlease, run '$main::cfg{'ROOT_DIR'}/engine/setup/ispcp-setup' instead !\n";587 " The program ends now!\n" . 588 "\tPlease, run '$main::cfg{'ROOT_DIR'}/engine/setup/ispcp-setup' instead!\n"; 584 589 585 590 ($rdata !~ /^n$/i) or exit_msg(1, $msg); … … 587 592 588 593 print STDOUT colored(['bold yellow'], "\n\n\tWARNING:") . 589 " Your ispCP configuration file is not valid!\n" .590 "\tThe program will switch to recoverymode now...\n";594 " Your ispCP configuration file has missing parameters!\n" . 595 "\tThe update script will switch to recovery/upgrade mode now...\n"; 591 596 592 597 do { … … 595 600 } while($rdata !~ /^(|y|n)$/i); 596 601 597 # Exit with a notice message if the user choose 598 # to abort the recovery process 602 # Exit with a notice if the user chooses to abort the recovery/update process 599 603 ($rdata !~ /^n$/i) or exit_msg(1, 600 604 colored(['bold blue'], "\n\tNOTICE:") . 601 " The recovery process was aborted by user...\n"605 " The recovery/upgrade process was aborted by user...\n" 602 606 ); 603 607 604 # For each setting, call s the dialog subroutine if it isavailable,605 # OTHERWISE saves the value salready changed and stops the program608 # For each setting, call the subroutine dialouge if available, 609 # OTHERWISE saves the value already changed and stops the program 606 610 # with an specific message. 607 611 foreach(@$settings) { … … 644 648 } 645 649 646 # Store new configuration settings values and reload it650 # Store new configuration settings values and reload the ispcp.conf 647 651 $rs = store_conf(); 648 652 return $rs if($rs != 0); … … 655 659 656 660 print STDOUT colored(['bold blue'], "\n\tNOTICE:") . 657 " The recovery process was end successfully!\n" .658 "\tThe update process will continue normal ly now...\n\n";661 " The recovery/upgrade process ended successfully!\n" . 662 "\tThe update process will continue normal...\n\n"; 659 663 660 664 push_el(\@main::el, 'check_ispcp_cfg_file()', 'Ending...');
Note: See TracChangeset
for help on using the changeset viewer.
