annotate OrthancServer/Scheduler/StoreScuCommand.cpp @ 1099:060e8918d7a4

More fault-tolerant commands in Lua scripts
author Sebastien Jodogne <s.jodogne@gmail.com>
date Thu, 07 Aug 2014 10:02:22 +0200
parents 871c49c9b11d
children 0561f2087cc9
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
999
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
1 /**
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
2 * Orthanc - A Lightweight, RESTful DICOM Store
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
3 * Copyright (C) 2012-2014 Medical Physics Department, CHU of Liege,
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
4 * Belgium
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
5 *
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
6 * This program is free software: you can redistribute it and/or
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
7 * modify it under the terms of the GNU General Public License as
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
8 * published by the Free Software Foundation, either version 3 of the
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
9 * License, or (at your option) any later version.
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
10 *
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
11 * In addition, as a special exception, the copyright holders of this
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
12 * program give permission to link the code of its release with the
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
13 * OpenSSL project's "OpenSSL" library (or with modified versions of it
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
14 * that use the same license as the "OpenSSL" library), and distribute
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
15 * the linked executables. You must obey the GNU General Public License
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
16 * in all respects for all of the code used other than "OpenSSL". If you
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
17 * modify file(s) with this exception, you may extend this exception to
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
18 * your version of the file(s), but you are not obligated to do so. If
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
19 * you do not wish to do so, delete this exception statement from your
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
20 * version. If you delete this exception statement from all source files
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
21 * in the program, then also delete it here.
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
22 *
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
23 * This program is distributed in the hope that it will be useful, but
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
24 * WITHOUT ANY WARRANTY; without even the implied warranty of
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
25 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
26 * General Public License for more details.
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
27 *
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
28 * You should have received a copy of the GNU General Public License
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
29 * along with this program. If not, see <http://www.gnu.org/licenses/>.
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
30 **/
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
31
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
32
1000
13e230bbd882 rename filter to command
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 999
diff changeset
33 #include "StoreScuCommand.h"
999
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
34
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
35 #include <glog/logging.h>
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
36
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
37 namespace Orthanc
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
38 {
1000
13e230bbd882 rename filter to command
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 999
diff changeset
39 StoreScuCommand::StoreScuCommand(ServerContext& context,
999
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
40 const RemoteModalityParameters& modality) :
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
41 context_(context),
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
42 modality_(modality)
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
43 {
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
44 }
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
45
1000
13e230bbd882 rename filter to command
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 999
diff changeset
46 bool StoreScuCommand::Apply(ListOfStrings& outputs,
999
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
47 const ListOfStrings& inputs)
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
48 {
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
49 ReusableDicomUserConnection::Locker locker(context_.GetReusableDicomUserConnection(), modality_);
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
50
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
51 for (ListOfStrings::const_iterator
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
52 it = inputs.begin(); it != inputs.end(); ++it)
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
53 {
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
54 LOG(INFO) << "Sending resource " << *it << " to modality \""
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
55 << modality_.GetApplicationEntityTitle() << "\"";
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
56
1099
060e8918d7a4 More fault-tolerant commands in Lua scripts
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1007
diff changeset
57 try
060e8918d7a4 More fault-tolerant commands in Lua scripts
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1007
diff changeset
58 {
060e8918d7a4 More fault-tolerant commands in Lua scripts
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1007
diff changeset
59 std::string dicom;
060e8918d7a4 More fault-tolerant commands in Lua scripts
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1007
diff changeset
60 context_.ReadFile(dicom, *it, FileContentType_Dicom);
060e8918d7a4 More fault-tolerant commands in Lua scripts
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1007
diff changeset
61 locker.GetConnection().Store(dicom);
1001
f3929718ea7e autorouting primitives
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1000
diff changeset
62
1099
060e8918d7a4 More fault-tolerant commands in Lua scripts
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1007
diff changeset
63 // Only chain with other commands if this command succeeds
060e8918d7a4 More fault-tolerant commands in Lua scripts
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1007
diff changeset
64 outputs.push_back(*it);
060e8918d7a4 More fault-tolerant commands in Lua scripts
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1007
diff changeset
65 }
060e8918d7a4 More fault-tolerant commands in Lua scripts
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1007
diff changeset
66 catch (OrthancException& e)
060e8918d7a4 More fault-tolerant commands in Lua scripts
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1007
diff changeset
67 {
060e8918d7a4 More fault-tolerant commands in Lua scripts
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1007
diff changeset
68 // Ignore transmission errors (e.g. if the remote modality is
060e8918d7a4 More fault-tolerant commands in Lua scripts
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1007
diff changeset
69 // powered off)
060e8918d7a4 More fault-tolerant commands in Lua scripts
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1007
diff changeset
70 LOG(ERROR) << "Unable to forward to a modality in a Lua script (instance "
060e8918d7a4 More fault-tolerant commands in Lua scripts
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1007
diff changeset
71 << *it << "): " << e.What();
060e8918d7a4 More fault-tolerant commands in Lua scripts
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1007
diff changeset
72 }
999
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
73 }
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
74
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
75 return true;
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
76 }
db18c071fbd7 store-scu filter
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
77 }