Changeset 769

Show
Ignore:
Timestamp:
03/15/07 20:02:44 (2 years ago)
Author:
hachi
Message:

Plugin args passing.

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • branches/filepaths-20070306/api/perl/lib/MogileFS/Client.pm

    r747 r769  
    138138    $opts ||= {}; 
    139139 
     140    # Takes plugin args like { 'meta.keys' => 1, 'meta.key1' => 'mtime', 'meta.value1' => time(), } 
     141    my $plugin_args = $opts->{plugin_args} || {}; 
     142    my $create_close_args = {}; 
     143 
     144    while (my ($key, $value) = each %$plugin_args) { 
     145        $create_close_args->{"plugin.$key"} = $value; 
     146    } 
     147 
    140148    $self->run_hook('new_file_start', $self, $key, $class, $opts); 
    141149 
     
    179187                                key   => $key, 
    180188                                content_length => $bytes+0, 
     189                                create_close_args => $create_close_args, 
    181190                                ); 
    182191} 
  • branches/filepaths-20070306/api/perl/lib/MogileFS/NewHTTPFile.pm

    r451 r769  
    3232            'bytes_out',      # count of how many bytes we've written to the socket 
    3333            'data_in',        # storage for data we've read from the socket 
     34            'create_close_args',  # Extra arguments hashref for the do_request of create_close during CLOSE 
    3435            ); 
    3536 
     
    6364    $self->{bytes_out} = 0; 
    6465    $self->{data_in} = ''; 
     66    $self->{create_close_args} = $args{create_close_args} || {}; 
    6567 
    6668    return $self; 
     
    327329    my $path  = $self->{path}; 
    328330 
     331    my $raw_args = $self->{create_close_args}; 
     332 
    329333    my $key = shift || $self->{key}; 
    330334 
    331335    my $rv = $mg->{backend}->do_request 
    332336        ("create_close", { 
     337            %$raw_args, 
    333338            fid    => $fid, 
    334339            devid  => $devid,