forum.lissyara.su

Код: Выделить всё

zg# ls /usr/local/bin/ | grep inno
innochecksum
zg#

Код: Выделить всё

4.6.1. innochecksum — Offline InnoDB File Checksum Utility
innochecksum prints checksums for InnoDB files.

Код: Выделить всё

bash-3.1# innochecksum -d /mnt/mass0/mysql/test/Users.ibd

...
file -d= 9437184 bytes (576 pages)...
checking pages in range 0 to 575
page 0: log sequence number: first = 1575557589; second = 1575557589
page 0: old style: calculated = 2344395615; recorded = 2344395615
page 0: new style: calculated = 1529347311; recorded = 1529347311
page 1: log sequence number: first = 1575560857; second = 1575560857
page 1: old style: calculated = 1583079948; recorded = 1583079948
page 1: new style: calculated = 903018481; recorded = 903018481
page 2: log sequence number: first = 1575557589; second = 1575557589
page 2: old style: calculated = 2172061152; recorded = 2172061152
page 2: new style: calculated = 2385590456; recorded = 2385590456
page 3: log sequence number: first = 1575528218; second = 1575528218
page 3: old style: calculated = 4059698346; recorded = 4059698346
page 3: new style: calculated = 1471387112; recorded = 1471387112
page 4: log sequence number: first = 1575459863; second = 1575459863

...

page 573: old style: calculated = 1371122432; recorded = 0
page 573: new style: calculated = 1575996416; recorded = 0
page 574: log sequence number: first = 0; second = 0
page 574: old style: calculated = 1371122432; recorded = 0
page 574: new style: calculated = 1575996416; recorded = 0
page 575: log sequence number: first = 0; second = 0
page 575: old style: calculated = 1371122432; recorded = 0
page 575: new style: calculated = 1575996416; recorded = 0

Код: Выделить всё

If innodb_force_recovery=6, do not let InnoDB do repair of corrupt pages based on the doublewrite buffer.

Код: Выделить всё

081202 18:26:08081202 18:26:08 [ERROR] Cannot find table database/Users from the internal data dictionary
of InnoDB though the .frm file for the table exists. Maybe you
have deleted and recreated InnoDB data files but have forgotten
to delete the corresponding .frm files of InnoDB tables, or you
have moved .frm files to another database?
See http://dev.mysql.com/doc/refman/5.1/en/innodb-troubleshooting.html
how you can resolve the problem.

Код: Выделить всё

CHECK TABLE tbl_name [, tbl_name] ... [option] ...

option = {FOR UPGRADE | QUICK | FAST | MEDIUM | EXTENDED | CHANGED}

Код: Выделить всё

REPAIR [LOCAL | NO_WRITE_TO_BINLOG] TABLE
    tbl_name [, tbl_name] ... [QUICK] [EXTENDED] [USE_FRM]

Код: Выделить всё

mysql> use privataccess;
Database changed
mysql> show tables;
+------------------------+
| Tables_in_database |
+------------------------+
| CoTypes                |
| Counter                |
| Customers              |
| Dealers                |
| Groups                 |
| Messages               |
| Relations              |
| Sources                |
| Specialities           |
| Users                  |
+------------------------+
10 rows in set (0.00 sec)

Код: Выделить всё

mysql> CHECK TABLE Users;
+----------------+-------+----------+------------------------------------------+
| Table              | Op    | Msg_type | Msg_text                                 |
+----------------+-------+----------+------------------------------------------+
| database.Users | check | Error    | Table 'database.Users' doesn't exist |
| database.Users | check | error    | Corrupt                                  |
+----------------+-------+----------+------------------------------------------+
2 rows in set (0.00 sec)

Код: Выделить всё

use strict;
use DBI qw(:sql_types);

my $dbh = DBI->connect( 'dbi:Oracle:orcl',
                        'jeffrey',
                        'jeffspassword',
                        {
                          RaiseError => 1,
                          AutoCommit => 0
                        }
                      ) || die "Database connection not made: $DBI::errstr";

my @records = (
                [ 0, "Larry Wall",      "Perl Author",  "555-0101" ],
                [ 1, "Tim Bunce",       "DBI Author",   "555-0202" ],
                [ 2, "Randal Schwartz", "Guy at Large", "555-0303" ],
                [ 3, "Doug MacEachern", "Apache Man",   "555-0404" ] 
              );

my $sql = qq{ INSERT INTO employees VALUES ( ?, ?, ?, ? ) };
my $sth = $dbh->prepare( $sql );


for( @records ) {
  eval {
    $sth->bind_param( 1, @$_->[0], SQL_INTEGER );
    $sth->bind_param( 2, @$_->[1], SQL_VARCHAR );
    $sth->bind_param( 3, @$_->[2], SQL_VARCHAR );
    $sth->bind_param( 4, @$_->[3], SQL_VARCHAR );
    $sth->execute();
    $dbh->commit();
  };

  if( $@ ) {
    warn "Database error: $DBI::errstr\n";
    $dbh->rollback(); #just die if rollback is failing
  }
}

$sth->finish();
$dbh->disconnect();

Код: Выделить всё

    if ($dd{'mailbox'} $dd{'mailbox'} > 0) {
      my $sth = $dbh->prepare('SELECT mailbox
                         FROM mailbox
                         WHERE domain = ?
                             ');
    $sth->execute($domain);
             $sth->finish();
      my $n=0; my @mailboxs=();
   while ($mailbox_del = $sth->fetchrow_array() ) {
          $mailboxs[$n++]=$mailbox_del;
          }
       
    my $sth = $dbh->prepare('INSERT INTO delete_mailbox
              (domain,mailbox,created)
              VALUES (?,NOW())
                             ');
     
       eval {
       for ($i=0;$i<@mailboxs;$i++)
       {
         $id=$i+1;
          $sth->bind_param($id, $mailboxs[0]);
          $sth->execute();
         }       
       
        $dbh->do("DELETE FROM mailbox
                         WHERE domain = $domain");
       
        $dbh->commit();
                             ');
       if ($@) {
       warn "Transaction aborted $@";
       eval {$dbh->rollback()};
       $sth->finish();
       $dbh->disconnect();
       exit;
       }
     }

     if ($dd{'alias'} && $dd{'alias'} > 0) {
             my $sth = $dbh->prepare('DELETE FROM alias
                         WHERE domain = ?
                             ');
            $sth->execute($domain);
             $sth->finish();
                 }
      }  $dbh->disconnect();