[Koha-bugs] [Bug 11998] Syspref caching issues

[bugzilla-daemon at bugs.koha-community.org]

https://bugs.koha-community.org/bugzilla3/show_bug.cgi?id=11998

--- Comment #115 from Jonathan Druart <jonathan.druart at bugs.koha-community.org> ---
(In reply to Jacek Ablewicz from comment #114)
> I'm unable to test this patch set with fastmmap caching system - it seems to
> break it somehow.. With patch, and fastmmap cache enabled, anything (?) that
> uses Koha::Cache results with:
> 
> Use of uninitialized value $db_name in concatenation (.) or string at
> /home/koha/devkohaclone/Koha/Database.pm line 73.
> Use of uninitialized value $db_host in concatenation (.) or string at
> /home/koha/devkohaclone/Koha/Database.pm line 73.
> DBI connect('database=;host=;port=','',...) failed: Access denied for user
> 'koha'@'localhost' (using password: NO) at
> /usr/share/perl5/DBIx/Class/Storage/DBI.pm line 1249
> DBIx::Class::Storage::DBI::dbh(): DBI Connection failed: Access denied for
> user 'koha'@'localhost' (using password: NO) at
> /usr/share/perl5/DBIx/Class/Storage/DBI.pm line 1253. at
> /home/koha/devkohaclone/Koha/Database.pm line 90
> 
> To reproduce (on command line)
> 
> 0) ensure that you have fastmmap perl module installed
> (libcache-fastmmap-perl in debian)
> 1) apply patch (without patch: no error in current master)
> 2) export CACHING_SYSTEM=fastmmap
> 3) export GATEWAY_INTERFACE=1
> 4) try to run this simple script:
> 
> #!/usr/bin/perl
> 
> use Modern::Perl;
> use C4::Biblio;
> GetMarcStructure();

I don't get the error. I don't know if I did something wrong, I don't use
fastmmap (I thought we agree it does not have good results).

% git diff
diff --git a/Koha/Cache.pm b/Koha/Cache.pm
index 9856e80..e0f406f 100644
--- a/Koha/Cache.pm
+++ b/Koha/Cache.pm
@@ -123,6 +123,7 @@ sub new {

     $ENV{DEBUG} && carp "Selected caching system: " . ($self->{'cache'} //
'none');

+    use Data::Dumper;warn Dumper $self;
     return
       bless $self,
       $class;

% more t.pl
#!/usr/bin/perl
use Modern::Perl;
use C4::Biblio;
GetMarcStructure();

% perl t.pl
$VAR1 = {
          'memory_cache' => bless( {
                                     'size_limit' => undef,
                                     'namespace' => 'koha',
                                     'load_callback' => undef,
                                     'default_expires' => '0 sec',
                                     'removal_strategy' => bless( {},
'Cache::RemovalStrategy::LRU' ),
                                     'validate_callback' => undef
                                   }, 'Cache::Memory' ),
          'timeout' => 0,
          'namespace' => 'koha',
          'Cache::Memory_get' => sub { "DUMMY" },
          'cache' => bless( {
                              'Cache' => \205625248,
                              'allow_recursive' => undef,
                              'share_file' =>
'/tmp/sharefile-koha-koha-localhost-koha',
                              'write_back' => '',
                              'context' => undef,
                              'delete_cb' => undef,
                              'empty_on_exit' => 0,
                              'num_pages' => 89,
                              'compress' => 0,
                              'enable_stats' => 0,
                              'raw_values' => 0,
                              'write_cb' => undef,
                              'read_cb' => undef,
                              'cache_not_found' => undef,
                              'pid' => 17602,
                              'expire_time' => 0,
                              'page_size' => 65536,
                              'unlink_on_exit' => 0,
                              'cache_size' => 5832704
                            }, 'Cache::FastMmap' ),
          'fastmmap_cache' => $VAR1->{'cache'},
          'Cache::Memory_set' => sub { "DUMMY" },
          'default_type' => 'fastmmap'

-- 
You are receiving this mail because:
You are watching all bug changes.