1
|
|
|
<?php |
2
|
|
|
|
3
|
|
|
namespace Colligator\Jobs; |
4
|
|
|
|
5
|
|
|
use Colligator\Collection; |
6
|
|
|
use Illuminate\Foundation\Bus\DispatchesJobs; |
7
|
|
|
use Log; |
8
|
|
|
use Scriptotek\OaiPmh\BadRequestError; |
9
|
|
|
use Scriptotek\OaiPmh\Client as OaiPmhClient; |
10
|
|
|
use Scriptotek\OaiPmh\ListRecordsResponse; |
11
|
|
|
use Storage; |
12
|
|
|
|
13
|
|
|
class OaiPmhHarvest extends Job |
14
|
|
|
{ |
15
|
|
|
use DispatchesJobs; |
16
|
|
|
|
17
|
|
|
public $name; |
18
|
|
|
public $url; |
19
|
|
|
public $schema; |
20
|
|
|
public $set; |
21
|
|
|
public $start; |
22
|
|
|
public $until; |
23
|
|
|
public $resume; |
24
|
|
|
public $fromDump; |
25
|
|
|
public $maxRetries; |
26
|
|
|
public $sleepTimeOnError; |
27
|
|
|
|
28
|
|
|
/** |
29
|
|
|
* Start time for the full harvest. |
30
|
|
|
* |
31
|
|
|
* @var float |
32
|
|
|
*/ |
33
|
|
|
protected $startTime; |
34
|
|
|
|
35
|
|
|
/** |
36
|
|
|
* Start time for the current batch. |
37
|
|
|
* |
38
|
|
|
* @var float |
39
|
|
|
*/ |
40
|
|
|
protected $batchTime; |
41
|
|
|
|
42
|
|
|
/** |
43
|
|
|
* Harvest position. |
44
|
|
|
* |
45
|
|
|
* @var int |
46
|
|
|
*/ |
47
|
|
|
protected $batchPos = 0; |
48
|
|
|
|
49
|
|
|
/** |
50
|
|
|
* @var Collection |
51
|
|
|
*/ |
52
|
|
|
public $collection; |
53
|
|
|
|
54
|
|
|
/** |
55
|
|
|
* Number of records retrieved between each emitted OaiPmhHarvestStatus event. |
56
|
|
|
* A too small number will cause CPU overhead. |
57
|
|
|
* |
58
|
|
|
* @var int |
59
|
|
|
*/ |
60
|
|
|
protected $statusUpdateEvery = 50; |
61
|
|
|
|
62
|
|
|
/** |
63
|
|
|
* Create a new job instance. |
64
|
|
|
* |
65
|
|
|
* @param string $name Harvest name from config |
66
|
|
|
* @param array $config Harvest config array (url, set, schema) |
67
|
|
|
* @param string $start Start date (optional) |
68
|
|
|
* @param string $until End date (optional) |
69
|
|
|
* @param string $resume Resumption token for continuing an aborted harvest (optional) |
70
|
|
|
* @param bool $fromDump Import from local dump |
71
|
|
|
*/ |
72
|
|
|
public function __construct($name, $config, $start = null, $until = null, $resume = null, $fromDump = false) |
73
|
|
|
{ |
74
|
|
|
$this->name = $name; |
75
|
|
|
$this->url = $config['url']; |
76
|
|
|
$this->schema = $config['schema']; |
77
|
|
|
$this->set = $config['set']; |
78
|
|
|
$this->start = $start; |
79
|
|
|
$this->until = $until; |
80
|
|
|
$this->resume = $resume; |
81
|
|
|
$this->fromDump = $fromDump; |
82
|
|
|
$this->maxRetries = array_get($config, 'max-retries', 1000); |
83
|
|
|
$this->sleepTimeOnError = array_get($config, 'sleep-time-on-error', 60); |
84
|
|
|
} |
85
|
|
|
|
86
|
|
|
/** |
87
|
|
|
* Import local XML dump rather than talking to the OAI-PMH server. |
88
|
|
|
*/ |
89
|
|
|
public function fromDump() |
90
|
|
|
{ |
91
|
|
|
$files = Storage::disk('local')->files('harvests/' . $this->name); |
92
|
|
|
$recordsHarvested = 0; |
93
|
|
|
foreach ($files as $filename) { |
94
|
|
|
if (!preg_match('/.xml$/', $filename)) { |
95
|
|
|
continue; |
96
|
|
|
} |
97
|
|
|
|
98
|
|
|
$response = new ListRecordsResponse(Storage::disk('local')->get($filename)); |
99
|
|
|
foreach ($response->records as $record) { |
100
|
|
|
$this->dispatch(new ImportRecord($this->collection, $record->data->asXML())); |
101
|
|
|
++$recordsHarvested; |
102
|
|
|
if ($recordsHarvested % $this->statusUpdateEvery == 0) { |
103
|
|
|
$this->status($recordsHarvested, $recordsHarvested); |
104
|
|
|
} |
105
|
|
|
} |
106
|
|
|
|
107
|
|
|
} |
108
|
|
|
|
109
|
|
|
return $recordsHarvested; |
110
|
|
|
} |
111
|
|
|
|
112
|
|
|
public function fromNetwork() |
113
|
|
|
{ |
114
|
|
|
$dest_path = 'harvests/' . $this->name . '/'; |
115
|
|
|
|
116
|
|
|
Storage::disk('local')->deleteDir($dest_path); |
117
|
|
|
|
118
|
|
|
$latest = $dest_path . 'latest.xml'; |
119
|
|
|
|
120
|
|
|
$client = new OaiPmhClient($this->url, [ |
121
|
|
|
'schema' => $this->schema, |
122
|
|
|
'user-agent' => 'Colligator/0.1', |
123
|
|
|
'max-retries' => $this->maxRetries, |
124
|
|
|
'sleep-time-on-error' => $this->sleepTimeOnError, |
125
|
|
|
]); |
126
|
|
|
|
127
|
|
|
$client->on('request.error', function ($msg) { |
128
|
|
|
$this->error($msg); |
129
|
|
|
}); |
130
|
|
|
|
131
|
|
|
// Store each response to disk just in case |
132
|
|
|
$client->on('request.complete', function ($verb, $args, $body) use ($latest) { |
133
|
|
|
Storage::disk('local')->put($latest, $body); |
134
|
|
|
}); |
135
|
|
|
|
136
|
|
|
$recordsHarvested = 0; |
137
|
|
|
|
138
|
|
|
// Loop over all records using an iterator that pulls in more data when |
139
|
|
|
// the buffer is exhausted. |
140
|
|
|
$records = $client->records($this->start, $this->until, $this->set, $this->resume); |
141
|
|
|
while (true) { |
142
|
|
|
|
143
|
|
|
// If no records included in the last response |
144
|
|
|
if (!$records->valid()) { |
145
|
|
|
break 1; |
146
|
|
|
} |
147
|
|
|
|
148
|
|
|
$record = $records->current(); |
149
|
|
|
++$recordsHarvested; |
150
|
|
|
|
151
|
|
|
// In case of a crash, it can be useful to have the resumption_token, |
152
|
|
|
// but delete it when the harvest is complete |
153
|
|
|
if ($this->resume != $records->getResumptionToken()) { |
154
|
|
|
$this->resume = $records->getResumptionToken(); |
155
|
|
|
if (is_null($this->resume)) { |
156
|
|
|
Storage::disk('local')->delete($dest_path . '/resumption_token'); |
157
|
|
|
} else { |
158
|
|
|
Storage::disk('local')->put($dest_path . '/resumption_token', $this->resume); |
159
|
|
|
} |
160
|
|
|
} |
161
|
|
|
|
162
|
|
|
// Note that Bibsys doesn't start counting on 0, as given in the spec, |
163
|
|
|
// but it doesn't really matter since we're only interested in a |
164
|
|
|
// fixed order. |
165
|
|
|
$currentIndex = $records->key(); |
166
|
|
|
|
167
|
|
|
// Move to stable location |
168
|
|
|
$destPath = sprintf('%s/response_%08d.xml', $dest_path, $currentIndex); |
169
|
|
|
if (Storage::disk('local')->exists($latest)) { |
170
|
|
|
Storage::disk('local')->move($latest, $destPath); |
171
|
|
|
} |
172
|
|
|
|
173
|
|
|
$this->dispatch(new ImportRecord($this->collection, $record->data->asXML())); |
174
|
|
|
|
175
|
|
|
if ($recordsHarvested % $this->statusUpdateEvery == 0) { |
176
|
|
|
if (is_null($this->start)) { |
177
|
|
|
$this->status($recordsHarvested, $recordsHarvested); |
178
|
|
|
} else { |
179
|
|
|
$this->status($recordsHarvested, $currentIndex); |
180
|
|
|
} |
181
|
|
|
} |
182
|
|
|
|
183
|
|
|
$attempt = 1; |
184
|
|
|
while (true) { |
185
|
|
|
try { |
186
|
|
|
$records->next(); |
187
|
|
|
break 1; |
188
|
|
|
} catch (BadRequestError $e) { |
189
|
|
|
$this->error($e->getMessage()); |
190
|
|
|
$this->error($e->getCode()); |
191
|
|
|
$this->error('Bad request. Attempt ' . $attempt . ' of 100. Sleeping 10 secs.'); |
192
|
|
|
if ($attempt > 100) { |
193
|
|
|
throw $e; |
194
|
|
|
} |
195
|
|
|
++$attempt; |
196
|
|
|
sleep(10); |
197
|
|
|
} |
198
|
|
|
} |
199
|
|
|
} |
200
|
|
|
|
201
|
|
|
return $recordsHarvested; |
202
|
|
|
} |
203
|
|
|
|
204
|
|
|
/** |
205
|
|
|
* Execute the job. |
206
|
|
|
* |
207
|
|
|
* @throws BadRequestError |
208
|
|
|
* @throws \Exception |
209
|
|
|
*/ |
210
|
|
|
public function handle() |
211
|
|
|
{ |
212
|
|
|
Log::info('[OaiPmhHarvest] Starting job. Requesting records from ' . ($this->start ?: '(no limit)') . ' until ' . ($this->until ?: '(no limit)') . '.'); |
213
|
|
|
|
214
|
|
|
// For timing |
215
|
|
|
$this->startTime = $this->batchTime = microtime(true) - 1; |
216
|
|
|
|
217
|
|
|
$this->collection = Collection::where('name', '=', $this->name)->first(); |
218
|
|
|
if (is_null($this->collection)) { |
219
|
|
|
$this->error("Collection '$this->name' not found in DB"); |
220
|
|
|
|
221
|
|
|
return; |
222
|
|
|
} |
223
|
|
|
|
224
|
|
|
if ($this->fromDump) { |
225
|
|
|
$recordsHarvested = $this->fromDump(); |
226
|
|
|
} else { |
227
|
|
|
$recordsHarvested = $this->fromNetwork(); |
228
|
|
|
} |
229
|
|
|
|
230
|
|
|
Log::info('[OaiPmhHarvest] Harvest complete, got ' . $recordsHarvested . ' records.'); |
231
|
|
|
} |
232
|
|
|
|
233
|
|
|
/** |
234
|
|
|
* Output a status message. |
235
|
|
|
* |
236
|
|
|
* @param int $fetched |
237
|
|
|
* @param int $current |
238
|
|
|
*/ |
239
|
|
|
public function status($fetched, $current) |
240
|
|
|
{ |
241
|
|
|
$totalTime = microtime(true) - $this->startTime; |
242
|
|
|
$batchTime = microtime(true) - $this->batchTime; |
243
|
|
|
$mem = round(memory_get_usage() / 1024 / 102.4) / 10; |
244
|
|
|
|
245
|
|
|
$currentSpeed = ($fetched - $this->batchPos) / $batchTime; |
246
|
|
|
$avgSpeed = $fetched / $totalTime; |
247
|
|
|
|
248
|
|
|
$this->batchTime = microtime(true); |
249
|
|
|
$this->batchPos = $fetched; |
250
|
|
|
|
251
|
|
|
Log::debug(sprintf( |
252
|
|
|
'[OaiPmhHarvest] Got %d records so far - Recs/sec: %.1f (current), %.1f (avg) - Mem: %.1f MB.', |
253
|
|
|
$current, |
254
|
|
|
$currentSpeed, |
255
|
|
|
$avgSpeed, |
256
|
|
|
$mem |
257
|
|
|
)); |
258
|
|
|
} |
259
|
|
|
} |
260
|
|
|
|