Changeset 1361
- Timestamp:
- 09/27/08 23:18:17
(2 months ago)
- Author:
- scitech
- Message:
database backup fails afer critical revision 1
-
Files:
-
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
| r1270 |
r1361 |
|
| 144 | 144 | sub err_exit { |
|---|
| 145 | 145 | |
|---|
| 146 | | my $el_data = pop_el(\@main::el); |
|---|
| | 146 | my $el_data = pop_el(\@main::el); |
|---|
| 147 | 147 | |
|---|
| 148 | 148 | $main::el_sep = "\t#\t"; |
|---|
| … | … | |
| 152 | 152 | print STDERR "$msg\n"; |
|---|
| 153 | 153 | |
|---|
| 154 | | exit 1; |
|---|
| | 154 | exit 1; |
|---|
| 155 | 155 | |
|---|
| 156 | 156 | } |
|---|
| … | … | |
| 319 | 319 | # |
|---|
| 320 | 320 | |
|---|
| 321 | | $sql="SELECT sqld_id, sqld_name FROM sql_database WHERE domain_id=$dmn_id"; |
|---|
| | 321 | $sql="SELECT sqld_id, sqld_name FROM sql_database WHERE domain_id=$dmn_id"; |
|---|
| 322 | 322 | ($rs,my $rdata3) = doSQL($sql); |
|---|
| 323 | 323 | |
|---|
| … | … | |
| 333 | 333 | foreach(@$rdata2) { |
|---|
| 334 | 334 | $dbuser = @$_[0]; |
|---|
| 335 | | $dbpass = @$_[1]; |
|---|
| | 335 | if($main::use_crypted_pwd){ |
|---|
| | 336 | $dbpass = decrypt_db_password(@$_[1]); |
|---|
| | 337 | } else { |
|---|
| | 338 | $dbpass = @$_[1]; |
|---|
| | 339 | } |
|---|
| 336 | 340 | } |
|---|
| 337 | 341 | if ($dbuser && $dbpass) { |
|---|
| … | … | |
| 420 | 424 | } |
|---|
| 421 | 425 | |
|---|
| | 426 | sub use_crypted_pwd { |
|---|
| | 427 | |
|---|
| | 428 | my ($rs, $rdata, $sql) = (undef, undef, undef); |
|---|
| | 429 | |
|---|
| | 430 | push_el(\@main::el, 'database_revision()', 'Starting...'); |
|---|
| | 431 | |
|---|
| | 432 | $sql="SELECT `value` FROM `config` WHERE `name`='CRITICAL_UPDATE_REVISION'"; |
|---|
| | 433 | ($rs, $rdata) = doSQL($sql); |
|---|
| | 434 | return $rs if ($rs != 0); |
|---|
| | 435 | |
|---|
| | 436 | if (defined(@$rdata[0]) && defined(@{@$rdata[0]}[0])){ |
|---|
| | 437 | $main::use_crypted_pwd = 1; |
|---|
| | 438 | } else { |
|---|
| | 439 | $main::use_crypted_pwd = 0; |
|---|
| | 440 | } |
|---|
| | 441 | |
|---|
| | 442 | push_el(\@main::el, 'database_revision()', 'Ending...'); |
|---|
| | 443 | return 0; |
|---|
| | 444 | |
|---|
| | 445 | } |
|---|
| 422 | 446 | |
|---|
| 423 | 447 | my $rs = undef; |
|---|
| … | … | |
| 450 | 474 | exit 0 if ($rs == 2); # $rs == 2 when backups are disabled |
|---|
| 451 | 475 | |
|---|
| | 476 | $rs = use_crypted_pwd(); |
|---|
| | 477 | err_exit() if ($rs != 0); |
|---|
| | 478 | |
|---|
| 452 | 479 | $rs = backup_all_engine(); |
|---|
| 453 | 480 | |
|---|
| r1319 |
r1361 |
|
| 132 | 132 | $main::db = undef; |
|---|
| 133 | 133 | |
|---|
| | 134 | $main::use_crypted_pwd = undef; |
|---|
| | 135 | |
|---|
| 134 | 136 | $main::master_name = 'ispcp-rqst-mngr'; |
|---|
| 135 | 137 | |
|---|
|
Download in other formats:
#########################################################################
# Site footer - Contents are automatically inserted after main Trac HTML
?>