[ViewVC] Diff of: cvs/deliantra/Deliantra-Client/DC/DB.pm

Comparing deliantra/Deliantra-Client/DC/DB.pm (file contents):
Revision 1.10 by root, Fri Jul 13 05:31:31 2007 UTC vs.
Revision 1.13 by root, Sun Jul 29 04:14:45 2007 UTC

 use CFPlus;
 our $DB_HOME = "$Crossfire::VARDIR/cfplus-$BerkeleyDB::db_version-$Config{archname}";
-sub path_of($) {
+sub path_of_res($) {
+   utf8::downgrade $_[0]; # bug in unpack "H*"
-   "$DB_HOME/res-data-$_[0]"
+   "$DB_HOME/res-data-" . unpack "H*", $_[0]
 }
 sub sync {
    # for debugging
    #CFPlus::DB::Server::req (sync => sub { });
    CFPlus::DB::Server::req (unlink => @_);
 }
 sub write_file($$$) {
    CFPlus::DB::Server::req (write_file => @_);
+}
+sub prefetch_file($$$) {
+   CFPlus::DB::Server::req (prefetch_file => @_);
 }
 our $tilemap;
 sub get_tile_id_sync($) {
 sub do_write_file {
    my ($file, $data) = @_;
    utf8::downgrade $file;
    utf8::downgrade $data;
-   open my $fh, ">:raw", CFPlus::DB::path_of $file
+   open my $fh, ">:raw", $file
       or return;
    print $fh $data;
    close $fh;
+   1
+}
+sub do_prefetch_file {
+   my ($file, $size) = @_;
+   utf8::downgrade $file;
+   open my $fh, "<:raw", $file
+      or return;
+   sysread $fh, my $buf, $size;
    1
 }
 sub run {
    close $fh;
    CFPlus::fh_nonblocking $FH, 1;
    $CB{die} = sub { die shift };
-   $fh_r_watcher = AnyEvent->io (fh => $FH, poll => 'r', cb => \&fh_read);
+   $fh_r_watcher = AnyEvent->io (fh => $FH, poll => 'r', nice => 1, cb => \&fh_read);
    sync_tick;
 }
 sub stop {

-–
+Removed lines
-+
+Added lines
-<
+Changed lines
->
+Changed lines