3 * This file is part of LyX, the document processor.
4 * Licence details can be found in the file COPYING.
6 * \author Asger Alstrup
7 * \author Angus Leeming
8 * \author Enrico Forestieri
9 * \author Peter Kuemmel
11 * Full author contact details are available in file CREDITS.
16 #include "support/debug.h"
17 #include "support/lstrings.h"
18 #include "support/qstring_helpers.h"
19 #include "support/Systemcall.h"
20 #include "support/SystemcallPrivate.h"
21 #include "support/os.h"
22 #include "support/ProgressInterface.h"
31 #include <QCoreApplication>
37 struct Sleep : QThread
39 static void millisec(unsigned long ms)
41 QThread::usleep(ms * 1000);
54 class ProgressDummy : public ProgressInterface
59 void processStarted(QString const &) {}
60 void processFinished(QString const &) {}
61 void appendMessage(QString const &) {}
62 void appendError(QString const &) {}
63 void clearMessages() {}
66 void lyxerrConnect() {}
67 void lyxerrDisconnect() {}
69 void warning(QString const &, QString const &) {}
70 void toggleWarning(QString const &, QString const &, QString const &) {}
71 void error(QString const &, QString const &) {}
72 void information(QString const &, QString const &) {}
76 static ProgressInterface* progress_instance = 0;
78 void ProgressInterface::setInstance(ProgressInterface* p)
80 progress_instance = p;
84 ProgressInterface* ProgressInterface::instance()
86 if (!progress_instance) {
87 static ProgressDummy dummy;
90 return progress_instance;
98 int Systemcall::startscript(Starttype how, string const & what,
99 bool /*process_events*/)
101 string command = what;
103 if (how == DontWait) {
104 switch (os::shell()) {
109 command = "start /min " + command;
114 return ::system(command.c_str());
122 * This is a parser that (mostly) mimics the behavior of a posix shell but
123 * its output is tailored for being processed by QProcess.
125 * The escape character is the backslash.
126 * A backslash that is not quoted preserves the literal value of the following
127 * character, with the exception of a double-quote '"'. If a double-quote
128 * follows a backslash, it will be replaced by three consecutive double-quotes
129 * (this is how the QProcess parser recognizes a '"' as a simple character
130 * instead of a quoting character). Thus, for example:
136 * Characters enclosed in single-quotes ('') have their literal value preserved.
137 * A single-quote cannot occur within single-quotes. Indeed, a backslash cannot
138 * be used to escape a single-quote in a single-quoted string. In other words,
139 * anything enclosed in single-quotes is passed as is, but the single-quotes
140 * themselves are eliminated. Thus, for example:
147 * Characters enclosed in double-quotes ("") have their literal value preserved,
148 * with the exception of the backslash. The backslash retains its special
149 * meaning as an escape character only when followed by a double-quote.
150 * Contrarily to the behavior of a posix shell, the double-quotes themselves
151 * are *not* eliminated. Thus, for example:
156 string const parsecmd(string const & inputcmd, string & outfile)
158 bool in_single_quote = false;
159 bool in_double_quote = false;
160 bool escaped = false;
163 for (size_t i = 0; i < inputcmd.length(); ++i) {
164 char c = inputcmd[i];
166 if (in_double_quote || escaped) {
167 if (in_double_quote && escaped)
171 in_single_quote = !in_single_quote;
175 if (in_single_quote) {
185 in_double_quote = !in_double_quote;
187 } else if (c == '\\' && !escaped) {
189 } else if (c == '>' && !(in_double_quote || escaped)) {
190 outfile = trim(inputcmd.substr(i + 1), " \"");
193 if (escaped && in_double_quote)
207 int Systemcall::startscript(Starttype how, string const & what, bool process_events)
210 QString cmd = toqstr(parsecmd(what, outfile));
212 SystemcallPrivate d(outfile);
216 if (!d.waitWhile(SystemcallPrivate::Starting, process_events, -1)) {
217 LYXERR0("Systemcall: '" << cmd << "' did not start!");
218 LYXERR0("error " << d.errorMessage());
222 if (how == DontWait) {
223 QProcess* released = d.releaseProcess();
224 (void) released; // TODO who deletes it?
228 if (!d.waitWhile(SystemcallPrivate::Running, process_events,
229 os::timeout_min() * 60 * 1000)) {
230 LYXERR0("Systemcall: '" << cmd << "' did not finish!");
231 LYXERR0("error " << d.errorMessage());
232 LYXERR0("status " << d.exitStatusMessage());
236 int const exit_code = d.exitCode();
238 LYXERR0("Systemcall: '" << cmd << "' finished with exit code " << exit_code);
245 SystemcallPrivate::SystemcallPrivate(const std::string& of) :
246 process_(new QProcess),
250 process_events_(false)
252 if (!out_file_.empty()) {
253 // Check whether we have to simply throw away the output.
254 if (out_file_ != os::nulldev())
255 process_->setStandardOutputFile(toqstr(out_file_));
258 connect(process_, SIGNAL(readyReadStandardOutput()), SLOT(stdOut()));
259 connect(process_, SIGNAL(readyReadStandardError()), SLOT(stdErr()));
260 connect(process_, SIGNAL(error(QProcess::ProcessError)), SLOT(processError(QProcess::ProcessError)));
261 connect(process_, SIGNAL(started()), this, SLOT(processStarted()));
262 connect(process_, SIGNAL(finished(int, QProcess::ExitStatus)), SLOT(processFinished(int, QProcess::ExitStatus)));
267 void SystemcallPrivate::startProcess(const QString& cmd)
271 state = SystemcallPrivate::Starting;
272 process_->start(cmd_);
277 void SystemcallPrivate::processEvents()
279 if(process_events_) {
280 QCoreApplication::processEvents(/*QEventLoop::ExcludeUserInputEvents*/);
285 void SystemcallPrivate::waitAndProcessEvents()
287 Sleep::millisec(100);
292 bool SystemcallPrivate::waitWhile(State waitwhile, bool process_events, int timeout)
297 process_events_ = process_events;
299 // Block GUI while waiting,
300 // relay on QProcess' wait functions
301 if (!process_events_) {
302 if (waitwhile == Starting)
303 return process_->waitForStarted(timeout);
304 if (waitwhile == Running)
305 return process_->waitForFinished(timeout);
309 // process events while waiting, no timeout
311 while (state == waitwhile && state != Error) {
312 waitAndProcessEvents();
314 return state != Error;
317 // process events while waiting whith timeout
320 while (state == waitwhile && state != Error && timer.elapsed() < timeout) {
321 waitAndProcessEvents();
323 return (state != Error) && (timer.elapsed() < timeout);
327 SystemcallPrivate::~SystemcallPrivate()
330 out_data_[out_index_] = '\0';
336 err_data_[err_index_] = '\0';
346 void SystemcallPrivate::stdOut()
350 process_->setReadChannel(QProcess::StandardOutput);
351 while (process_->getChar(&c)) {
352 out_data_[out_index_++] = c;
353 if (c == '\n' || out_index_ + 1 == buffer_size_) {
354 out_data_[out_index_] = '\0';
356 ProgressInterface::instance()->appendMessage(QString::fromLocal8Bit(out_data_));
364 void SystemcallPrivate::stdErr()
368 process_->setReadChannel(QProcess::StandardError);
369 while (process_->getChar(&c)) {
370 err_data_[err_index_++] = c;
371 if (c == '\n' || err_index_ + 1 == buffer_size_) {
372 err_data_[err_index_] = '\0';
374 ProgressInterface::instance()->appendError(QString::fromLocal8Bit(err_data_));
382 void SystemcallPrivate::processStarted()
384 if (state != Running) {
386 ProgressInterface::instance()->processStarted(cmd_);
391 void SystemcallPrivate::processFinished(int, QProcess::ExitStatus)
393 if (state != Finished) {
395 ProgressInterface::instance()->processFinished(cmd_);
400 void SystemcallPrivate::processError(QProcess::ProcessError)
403 ProgressInterface::instance()->appendError(errorMessage());
407 QString SystemcallPrivate::errorMessage() const
410 return "No QProcess available";
413 switch (process_->error()) {
414 case QProcess::FailedToStart:
415 message = "The process failed to start. Either the invoked program is missing, "
416 "or you may have insufficient permissions to invoke the program.";
418 case QProcess::Crashed:
419 message = "The process crashed some time after starting successfully.";
421 case QProcess::Timedout:
422 message = "The process timed out. It might be restarted automatically.";
424 case QProcess::WriteError:
425 message = "An error occurred when attempting to write to the process-> For example, "
426 "the process may not be running, or it may have closed its input channel.";
428 case QProcess::ReadError:
429 message = "An error occurred when attempting to read from the process-> For example, "
430 "the process may not be running.";
432 case QProcess::UnknownError:
434 message = "An unknown error occured.";
441 QString SystemcallPrivate::exitStatusMessage() const
444 return "No QProcess available";
447 switch (process_->exitStatus()) {
448 case QProcess::NormalExit:
449 message = "The process exited normally.";
451 case QProcess::CrashExit:
452 message = "The process crashed.";
455 message = "Unknown exit state.";
462 int SystemcallPrivate::exitCode()
467 return process_->exitCode();
471 QProcess* SystemcallPrivate::releaseProcess()
473 QProcess* released = process_;
479 void SystemcallPrivate::killProcess()
481 killProcess(process_);
485 void SystemcallPrivate::killProcess(QProcess * p)
489 p->closeReadChannel(QProcess::StandardOutput);
490 p->closeReadChannel(QProcess::StandardError);
498 #include "moc_SystemcallPrivate.cpp"
501 } // namespace support