View | Details | Raw Unified | Return to bug 37318
Collapse All | Expand All

(-)a/misc/bin/connexion_import_daemon.pl (-5 / +13 lines)
Lines 104-110 use MARC::File::XML; Link Here
104
104
105
use constant CLIENT_READ_TIMEOUT     => 5;
105
use constant CLIENT_READ_TIMEOUT     => 5;
106
use constant CLIENT_READ_BUFFER_SIZE => 100000;
106
use constant CLIENT_READ_BUFFER_SIZE => 100000;
107
use constant AUTH_URI       => "/cgi-bin/koha/mainpage.pl";
107
use constant AUTH_URI       => "/cgi-bin/koha/svc/authentication";
108
use constant IMPORT_SVC_URI => "/cgi-bin/koha/svc/import_bib";
108
use constant IMPORT_SVC_URI => "/cgi-bin/koha/svc/import_bib";
109
109
110
sub new {
110
sub new {
Lines 373-379 sub handle_request { Link Here
373
    if ( $status == HTTP_UNAUTHORIZED || $status == HTTP_FORBIDDEN ) {
373
    if ( $status == HTTP_UNAUTHORIZED || $status == HTTP_FORBIDDEN ) {
374
        my $user     = $self->{user};
374
        my $user     = $self->{user};
375
        my $password = $self->{password};
375
        my $password = $self->{password};
376
        $resp = $ua->post( $base_url . AUTH_URI, { userid => $user, password => $password } );
376
        
377
        $resp = $ua->get( $base_url . AUTH_URI );
378
        my $csrf_token = $resp->header('CSRF-TOKEN');
379
        $resp = $ua->post( $base_url . AUTH_URI, { 
380
                userid => $user, 
381
                password => $password, 
382
                csrf_token => $csrf_token 
383
        });    
384
        $csrf_token = $resp->header('CSRF-TOKEN');
377
        $resp = $ua->post(
385
        $resp = $ua->post(
378
            $base_url . IMPORT_SVC_URI,
386
            $base_url . IMPORT_SVC_URI,
379
            {
387
            {
Lines 384-394 sub handle_request { Link Here
384
                'framework'         => $self->{params}->{framework},
392
                'framework'         => $self->{params}->{framework},
385
                'overlay_framework' => $self->{params}->{overlay_framework},
393
                'overlay_framework' => $self->{params}->{overlay_framework},
386
                'item_action'       => $self->{params}->{item_action},
394
                'item_action'       => $self->{params}->{item_action},
387
                'xml'               => $data
395
                'xml'               => $data,
396
                csrf_token          => $csrf_token
388
            }
397
            }
389
        ) if $resp->is_success;
398
        ) if $resp->is_success;
390
    }
399
    }
391
    unless ($resp->is_success) {
400
    unless ($resp->is_success) {  
392
        $self->log("Unsuccessful request", $resp->request->as_string, $resp->as_string);
401
        $self->log("Unsuccessful request", $resp->request->as_string, $resp->as_string);
393
        return $self->error_response("Unsuccessful request");
402
        return $self->error_response("Unsuccessful request");
394
    }
403
    }
395
- 

Return to bug 37318