]> git.lyx.org Git - features.git/blob - src/VCBackend.cpp
Remove unused return values and useless member assignment.
[features.git] / src / VCBackend.cpp
1 /**
2  * \file VCBackend.cpp
3  * This file is part of LyX, the document processor.
4  * Licence details can be found in the file COPYING.
5  *
6  * \author Lars Gullik Bjønnes
7  * \author Pavel Sanda
8  *
9  * Full author contact details are available in file CREDITS.
10  */
11
12 #include <config.h>
13
14 #include "VCBackend.h"
15 #include "Buffer.h"
16 #include "LyX.h"
17 #include "FuncRequest.h"
18
19 #include "frontends/alert.h"
20 #include "frontends/Application.h"
21
22 #include "support/convert.h"
23 #include "support/debug.h"
24 #include "support/filetools.h"
25 #include "support/gettext.h"
26 #include "support/lstrings.h"
27 #include "support/PathChanger.h"
28 #include "support/Systemcall.h"
29 #include "support/TempFile.h"
30
31 #include <fstream>
32 #include <iomanip>
33 #include <regex>
34 #include <sstream>
35
36 using namespace std;
37 using namespace lyx::support;
38
39
40 namespace lyx {
41
42
43 int VCS::doVCCommandCall(string const & cmd, FileName const & path)
44 {
45         LYXERR(Debug::LYXVC, "doVCCommandCall: " << cmd);
46         Systemcall one;
47         support::PathChanger p(path);
48         return one.startscript(Systemcall::Wait, cmd, string(), string(), false);
49 }
50
51
52 int VCS::doVCCommand(string const & cmd, FileName const & path, bool reportError)
53 {
54         if (owner_)
55                 owner_->setBusy(true);
56
57         int const ret = doVCCommandCall(cmd, path);
58
59         if (owner_)
60                 owner_->setBusy(false);
61         if (ret && reportError) {
62                 docstring rcsmsg;
63                 if (prefixIs(cmd, "ci "))
64                         rcsmsg = "\n" + _("Perhaps the RCS package is not installed on your system?");
65                 frontend::Alert::error(_("Revision control error."),
66                         bformat(_("Some problem occurred while running the command:\n"
67                                   "'%1$s'.") + rcsmsg,
68                         from_utf8(cmd)));
69         }
70         return ret;
71 }
72
73
74 bool VCS::makeRCSRevision(string const &version, string &revis) const
75 {
76         string rev = revis;
77
78         if (isStrInt(rev)) {
79                 int back = convert<int>(rev);
80                 // if positive use as the last number in the whole revision string
81                 if (back > 0) {
82                         string base;
83                         rsplit(version, base , '.');
84                         rev = base + '.' + rev;
85                 }
86                 if (back == 0)
87                         rev = version;
88                 // we care about the last number from revision string
89                 // in case of backward indexing
90                 if (back < 0) {
91                         string cur, base;
92                         cur = rsplit(version, base , '.');
93                         if (!isStrInt(cur))
94                                 return false;
95                         int want = convert<int>(cur) + back;
96                         if (want <= 0)
97                                 return false;
98
99                         rev = base + '.' + convert<string>(want);
100                 }
101         }
102
103         revis = rev;
104         return true;
105 }
106
107
108 FileName VCS::checkParentDirs(FileName const & start, std::string const & file)
109 {
110         static FileName empty;
111         FileName dirname = start.onlyPath();
112         do {
113                 FileName tocheck = FileName(addPathName(dirname.absFileName(), file));
114                 LYXERR(Debug::LYXVC, "check file: " << tocheck.absFileName());
115                 if (tocheck.exists())
116                         return tocheck;
117                 // this construct because of #8295
118                 dirname = FileName(dirname.absFileName()).parentPath();
119         } while (!dirname.empty());
120         return empty;
121 }
122
123
124 /////////////////////////////////////////////////////////////////////
125 //
126 // RCS
127 //
128 /////////////////////////////////////////////////////////////////////
129
130 RCS::RCS(FileName const & m, Buffer * b) : VCS(b)
131 {
132         // Here we know that the buffer file is either already in RCS or
133         // about to be registered
134         master_ = m;
135         scanMaster();
136 }
137
138
139 FileName const RCS::findFile(FileName const & file)
140 {
141         // Check if *,v exists.
142         FileName tmp(file.absFileName() + ",v");
143         LYXERR(Debug::LYXVC, "LyXVC: Checking if file is under rcs: " << tmp);
144         if (tmp.isReadableFile()) {
145                 LYXERR(Debug::LYXVC, "Yes, " << file << " is under rcs.");
146                 return tmp;
147         }
148
149         // Check if RCS/*,v exists.
150         tmp = FileName(addName(addPath(onlyPath(file.absFileName()), "RCS"), file.absFileName()) + ",v");
151         LYXERR(Debug::LYXVC, "LyXVC: Checking if file is under rcs: " << tmp);
152         if (tmp.isReadableFile()) {
153                 LYXERR(Debug::LYXVC, "Yes, " << file << " is under rcs.");
154                 return tmp;
155         }
156
157         return FileName();
158 }
159
160
161 bool RCS::retrieve(FileName const & file)
162 {
163         LYXERR(Debug::LYXVC, "LyXVC::RCS: retrieve.\n\t" << file);
164         // The caller ensures that file does not exist, so no need to check that.
165         return doVCCommandCall("co -q -r " + quoteName(file.toFilesystemEncoding()),
166                                FileName()) == 0;
167 }
168
169
170 void RCS::scanMaster()
171 {
172         if (master_.empty())
173                 return;
174
175         LYXERR(Debug::LYXVC, "LyXVC::RCS: scanMaster: " << master_);
176
177         ifstream ifs(master_.toFilesystemEncoding().c_str());
178         // limit the size of strings we read to avoid memory problems
179         ifs >> setw(65636);
180
181         string token;
182         bool read_enough = false;
183
184         while (!read_enough && ifs >> token) {
185                 LYXERR(Debug::LYXVC, "LyXVC::scanMaster: current lex text: `"
186                         << token << '\'');
187
188                 if (token.empty())
189                         continue;
190                 else if (token == "head") {
191                         // get version here
192                         string tmv;
193                         ifs >> tmv;
194                         tmv = rtrim(tmv, ";");
195                         version_ = tmv;
196                         LYXERR(Debug::LYXVC, "LyXVC: version found to be " << tmv);
197                 } else if (contains(token, "access")
198                            || contains(token, "symbols")
199                            || contains(token, "strict")) {
200                         // nothing
201                 } else if (contains(token, "locks")) {
202                         // get locker here
203                         if (contains(token, ';')) {
204                                 locker_ = "Unlocked";
205                                 vcstatus_ = UNLOCKED;
206                                 continue;
207                         }
208                         string tmpt;
209                         string s1;
210                         string s2;
211                         do {
212                                 ifs >> tmpt;
213                                 s1 = rtrim(tmpt, ";");
214                                 // tmp is now in the format <user>:<version>
215                                 s1 = split(s1, s2, ':');
216                                 // s2 is user, and s1 is version
217                                 if (s1 == version_) {
218                                         locker_ = s2;
219                                         vcstatus_ = LOCKED;
220                                         break;
221                                 }
222                         } while (!contains(tmpt, ';'));
223
224                 } else if (token == "comment") {
225                         // we don't need to read any further than this.
226                         read_enough = true;
227                 } else {
228                         // unexpected
229                         LYXERR(Debug::LYXVC, "LyXVC::scanMaster(): unexpected token");
230                 }
231         }
232 }
233
234
235 void RCS::registrer(string const & msg)
236 {
237         string cmd = "ci -q -u -i -t-\"";
238         cmd += msg;
239         cmd += "\" ";
240         cmd += quoteName(onlyFileName(owner_->absFileName()));
241         doVCCommand(cmd, FileName(owner_->filePath()));
242 }
243
244
245 bool RCS::renameEnabled()
246 {
247         return false;
248 }
249
250
251 string RCS::rename(support::FileName const & /*newFile*/, string const & /*msg*/)
252 {
253         // not implemented, since a left-over file.lyx,v would be confusing.
254         return string();
255 }
256
257
258 bool RCS::copyEnabled()
259 {
260         return true;
261 }
262
263
264 string RCS::copy(support::FileName const & newFile, string const & msg)
265 {
266         // RCS has no real copy command, so we create a poor mans version
267         support::FileName const oldFile(owner_->absFileName());
268         if (!oldFile.copyTo(newFile))
269                 return string();
270         FileName path(oldFile.onlyPath());
271         string relFile(to_utf8(newFile.relPath(path.absFileName())));
272         string cmd = "ci -q -u -i -t-\"";
273         cmd += msg;
274         cmd += "\" ";
275         cmd += quoteName(relFile);
276         return doVCCommand(cmd, path) ? string() : "RCS: Proceeded";
277 }
278
279
280 LyXVC::CommandResult RCS::checkIn(string const & msg, string & log)
281 {
282         int ret = doVCCommand("ci -q -u -m\"" + msg + "\" "
283                     + quoteName(onlyFileName(owner_->absFileName())),
284                     FileName(owner_->filePath()));
285         if (ret)
286                 return LyXVC::ErrorCommand;
287         log = "RCS: Proceeded";
288         return LyXVC::VCSuccess;
289 }
290
291
292 bool RCS::checkInEnabled()
293 {
294         return owner_ && !owner_->hasReadonlyFlag();
295 }
296
297
298 bool RCS::isCheckInWithConfirmation()
299 {
300         // FIXME one day common getDiff for all backends
301         // docstring diff;
302         // if (getDiff(file, diff) && diff.empty())
303         //      return false;
304
305         TempFile tempfile("lyxvcout");
306         FileName tmpf = tempfile.name();
307         if (tmpf.empty()) {
308                 LYXERR(Debug::LYXVC, "Could not generate logfile " << tmpf);
309                 return true;
310         }
311
312         doVCCommandCall("rcsdiff " + quoteName(owner_->absFileName())
313                     + " > " + quoteName(tmpf.toFilesystemEncoding()),
314                 FileName(owner_->filePath()));
315
316         docstring diff = tmpf.fileContents("UTF-8");
317
318         if (diff.empty())
319                 return false;
320
321         return true;
322 }
323
324
325 string RCS::checkOut()
326 {
327         owner_->markClean();
328         int ret = doVCCommand("co -q -l " + quoteName(onlyFileName(owner_->absFileName())),
329                     FileName(owner_->filePath()));
330         return ret ? string() : "RCS: Proceeded";
331 }
332
333
334 bool RCS::checkOutEnabled()
335 {
336         return owner_ && owner_->hasReadonlyFlag();
337 }
338
339
340 string RCS::repoUpdate()
341 {
342         lyxerr << "Sorry, not implemented." << endl;
343         return string();
344 }
345
346
347 bool RCS::repoUpdateEnabled()
348 {
349         return false;
350 }
351
352
353 string RCS::lockingToggle()
354 {
355         //FIXME this might be actually possible, study rcs -U, rcs -L.
356         //State should be easy to get inside scanMaster.
357         //It would fix #4370 and make rcs/svn usage even more closer.
358         lyxerr << "Sorry, not implemented." << endl;
359         return string();
360 }
361
362
363 bool RCS::lockingToggleEnabled()
364 {
365         return false;
366 }
367
368
369 bool RCS::revert()
370 {
371         if (doVCCommand("co -f -u" + version_ + ' '
372                     + quoteName(onlyFileName(owner_->absFileName())),
373                     FileName(owner_->filePath())))
374                 return false;
375         // We ignore changes and just reload!
376         owner_->markClean();
377         return true;
378 }
379
380
381 bool RCS::isRevertWithConfirmation()
382 {
383         //FIXME owner && diff ?
384         return true;
385 }
386
387
388 void RCS::undoLast()
389 {
390         LYXERR(Debug::LYXVC, "LyXVC: undoLast");
391         doVCCommand("rcs -o" + version_ + ' '
392                     + quoteName(onlyFileName(owner_->absFileName())),
393                     FileName(owner_->filePath()));
394 }
395
396
397 bool RCS::undoLastEnabled()
398 {
399         return owner_->hasReadonlyFlag();
400 }
401
402
403 void RCS::getLog(FileName const & tmpf)
404 {
405         doVCCommand("rlog " + quoteName(onlyFileName(owner_->absFileName()))
406                     + " > " + quoteName(tmpf.toFilesystemEncoding()),
407                     FileName(owner_->filePath()));
408 }
409
410
411 bool RCS::toggleReadOnlyEnabled()
412 {
413         // This got broken somewhere along lfuns dispatch reorganization.
414         // reloadBuffer would be needed after this, but thats problematic
415         // since we are inside Buffer::dispatch.
416         // return true;
417         return false;
418 }
419
420
421 string RCS::revisionInfo(LyXVC::RevisionInfo const info)
422 {
423         if (info == LyXVC::File)
424                 return version_;
425         // fill the rest of the attributes for a single file
426         if (rev_date_cache_.empty())
427                 if (!getRevisionInfo())
428                         return string();
429
430         switch (info) {
431                 case LyXVC::Author:
432                         return rev_author_cache_;
433                 case LyXVC::Date:
434                         return rev_date_cache_;
435                 case LyXVC::Time:
436                         return rev_time_cache_;
437                 default:
438                         break;
439         }
440
441         return string();
442 }
443
444
445 bool RCS::getRevisionInfo()
446 {
447         TempFile tempfile("lyxvcout");
448         FileName tmpf = tempfile.name();
449         if (tmpf.empty()) {
450                 LYXERR(Debug::LYXVC, "Could not generate logfile " << tmpf);
451                 return false;
452         }
453         doVCCommand("rlog -r " + quoteName(onlyFileName(owner_->absFileName()))
454                 + " > " + quoteName(tmpf.toFilesystemEncoding()),
455                 FileName(owner_->filePath()));
456
457         if (tmpf.empty())
458                 return false;
459
460         ifstream ifs(tmpf.toFilesystemEncoding().c_str());
461         string line;
462
463         // we reached to the entry, i.e. after initial log message
464         bool entry=false;
465         // line with critical info, e.g:
466         //"date: 2011/07/02 11:02:54;  author: sanda;  state: Exp;  lines: +17 -2"
467         string result;
468
469         while (ifs) {
470                 getline(ifs, line);
471                 LYXERR(Debug::LYXVC, line);
472                 if (entry && prefixIs(line, "date:")) {
473                         result = line;
474                         break;
475                 }
476                 if (prefixIs(line, "revision"))
477                         entry = true;
478         }
479         if (result.empty())
480                 return false;
481
482         rev_date_cache_ = token(result, ' ', 1);
483         rev_time_cache_ = rtrim(token(result, ' ', 2), ";");
484         rev_author_cache_ = trim(token(token(result, ';', 1), ':', 1));
485
486         return !rev_author_cache_.empty();
487 }
488
489 bool RCS::prepareFileRevision(string const &revis, string & f)
490 {
491         string rev = revis;
492         if (!VCS::makeRCSRevision(version_, rev))
493                 return false;
494
495         TempFile tempfile("lyxvcrev_" + rev + '_');
496         tempfile.setAutoRemove(false);
497         FileName tmpf = tempfile.name();
498         if (tmpf.empty()) {
499                 LYXERR(Debug::LYXVC, "Could not generate logfile " << tmpf);
500                 return false;
501         }
502
503         doVCCommand("co -p" + rev + ' '
504                       + quoteName(onlyFileName(owner_->absFileName()))
505                       + " > " + quoteName(tmpf.toFilesystemEncoding()),
506                 FileName(owner_->filePath()));
507         tmpf.refresh();
508         if (tmpf.isFileEmpty())
509                 return false;
510
511         f = tmpf.absFileName();
512         return true;
513 }
514
515
516 bool RCS::prepareFileRevisionEnabled()
517 {
518         return true;
519 }
520
521
522 /////////////////////////////////////////////////////////////////////
523 //
524 // CVS
525 //
526 /////////////////////////////////////////////////////////////////////
527
528 CVS::CVS(FileName const & m, Buffer * b) : VCS(b)
529 {
530         // Here we know that the buffer file is either already in CVS or
531         // about to be registered
532         master_ = m;
533         have_rev_info_ = false;
534         scanMaster();
535 }
536
537
538 FileName const CVS::findFile(FileName const & file)
539 {
540         // First we look for the CVS/Entries in the same dir
541         // where we have file.
542         // Note that it is not necessary to search parent directories, since
543         // there will be a CVS/Entries file in every subdirectory.
544         FileName const entries(onlyPath(file.absFileName()) + "/CVS/Entries");
545         string const tmpf = '/' + onlyFileName(file.absFileName()) + '/';
546         LYXERR(Debug::LYXVC, "LyXVC: Checking if file is under cvs in `" << entries
547                              << "' for `" << tmpf << '\'');
548         if (entries.isReadableFile()) {
549                 // Ok we are at least in a CVS dir. Parse the CVS/Entries
550                 // and see if we can find this file. We do a fast and
551                 // dirty parse here.
552                 ifstream ifs(entries.toFilesystemEncoding().c_str());
553                 string line;
554                 while (getline(ifs, line)) {
555                         LYXERR(Debug::LYXVC, "\tEntries: " << line);
556                         if (contains(line, tmpf))
557                                 return entries;
558                 }
559         }
560         return FileName();
561 }
562
563
564 void CVS::scanMaster()
565 {
566         LYXERR(Debug::LYXVC, "LyXVC::CVS: scanMaster. \n     Checking: " << master_);
567         // Ok now we do the real scan...
568         ifstream ifs(master_.toFilesystemEncoding().c_str());
569         string const name = onlyFileName(owner_->absFileName());
570         string const tmpf = '/' + name + '/';
571         LYXERR(Debug::LYXVC, "\tlooking for `" << tmpf << '\'');
572         string line;
573         static regex const reg("/(.*)/(.*)/(.*)/(.*)/(.*)");
574         while (getline(ifs, line)) {
575                 LYXERR(Debug::LYXVC, "\t  line: " << line);
576                 if (contains(line, tmpf)) {
577                         // Ok extract the fields.
578                         smatch sm;
579                         if (!regex_match(line, sm, reg)) {
580                                 LYXERR(Debug::LYXVC, "\t  Cannot parse line. Skipping.");
581                                 continue;
582                         }
583
584                         //sm[0]; // whole matched string
585                         //sm[1]; // filename
586                         version_ = sm.str(2);
587                         string const file_date = sm.str(3);
588
589                         //sm[4]; // options
590                         //sm[5]; // tag or tagdate
591                         FileName file(owner_->absFileName());
592                         if (file.isReadableFile()) {
593                                 time_t const mod = file.lastModified();
594                                 string const mod_date = rtrim(asctime(gmtime(&mod)), "\n");
595                                 LYXERR(Debug::LYXVC, "Date in Entries: `" << file_date
596                                         << "'\nModification date of file: `" << mod_date << '\'');
597                                 if (file.isReadOnly()) {
598                                         // readonly checkout is unlocked
599                                         vcstatus_ = UNLOCKED;
600                                 } else {
601                                         FileName bdir(addPath(master_.onlyPath().absFileName(),"Base"));
602                                         FileName base(addName(bdir.absFileName(),name));
603                                         // if base version is existent "cvs edit" was used to lock
604                                         vcstatus_ = base.isReadableFile() ? LOCKED : NOLOCKING;
605                                 }
606                         } else {
607                                 vcstatus_ = NOLOCKING;
608                         }
609                         break;
610                 }
611         }
612 }
613
614
615 bool CVS::retrieve(FileName const & file)
616 {
617         LYXERR(Debug::LYXVC, "LyXVC::CVS: retrieve.\n\t" << file);
618         // The caller ensures that file does not exist, so no need to check that.
619         return doVCCommandCall("cvs -q update " + quoteName(file.toFilesystemEncoding()),
620                                file.onlyPath()) == 0;
621 }
622
623
624 string const CVS::getTarget(OperationMode opmode) const
625 {
626         switch(opmode) {
627         case Directory:
628                 // in client server mode CVS does not like full path operand for directory operation
629                 // since LyX switches to the repo dir "." is good enough as target
630                 return ".";
631         case File:
632                 return quoteName(onlyFileName(owner_->absFileName()));
633         }
634         return string();
635 }
636
637
638 docstring CVS::toString(CvsStatus status) const
639 {
640         switch (status) {
641         case UpToDate:
642                 return _("Up-to-date");
643         case LocallyModified:
644                 return _("Locally Modified");
645         case LocallyAdded:
646                 return _("Locally Added");
647         case NeedsMerge:
648                 return _("Needs Merge");
649         case NeedsCheckout:
650                 return _("Needs Checkout");
651         case NoCvsFile:
652                 return _("No CVS file");
653         case StatusError:
654                 return _("Cannot retrieve CVS status");
655         }
656         return docstring();
657 }
658
659
660 int CVS::doVCCommandWithOutput(string const & cmd, FileName const & path,
661         FileName const & output, bool reportError)
662 {
663         string redirection = output.empty() ? "" : " > " + quoteName(output.toFilesystemEncoding());
664         return doVCCommand(cmd + redirection, path, reportError);
665 }
666
667
668 int CVS::doVCCommandCallWithOutput(std::string const & cmd,
669         support::FileName const & path,
670         support::FileName const & output)
671 {
672         string redirection = output.empty() ? "" : " > " + quoteName(output.toFilesystemEncoding());
673         return doVCCommandCall(cmd + redirection, path);
674 }
675
676
677 CVS::CvsStatus CVS::getStatus()
678 {
679         TempFile tempfile("lyxvout");
680         FileName tmpf = tempfile.name();
681         if (tmpf.empty()) {
682                 LYXERR(Debug::LYXVC, "Could not generate logfile " << tmpf);
683                 return StatusError;
684         }
685
686         if (doVCCommandCallWithOutput("cvs status " + getTarget(File),
687                 FileName(owner_->filePath()), tmpf)) {
688                 return StatusError;
689         }
690
691         ifstream ifs(tmpf.toFilesystemEncoding().c_str());
692         CvsStatus status = NoCvsFile;
693
694         while (ifs) {
695                 string line;
696                 getline(ifs, line);
697                 LYXERR(Debug::LYXVC, line << '\n');
698                 if (prefixIs(line, "File:")) {
699                         if (contains(line, "Up-to-date"))
700                                 status = UpToDate;
701                         else if (contains(line, "Locally Modified"))
702                                 status = LocallyModified;
703                         else if (contains(line, "Locally Added"))
704                                 status = LocallyAdded;
705                         else if (contains(line, "Needs Merge"))
706                                 status = NeedsMerge;
707                         else if (contains(line, "Needs Checkout"))
708                                 status = NeedsCheckout;
709                 }
710         }
711         return status;
712 }
713
714 void CVS::getRevisionInfo()
715 {
716         if (have_rev_info_)
717                 return;
718         have_rev_info_ = true;
719         TempFile tempfile("lyxvout");
720         FileName tmpf = tempfile.name();
721         if (tmpf.empty()) {
722                 LYXERR(Debug::LYXVC, "Could not generate logfile " << tmpf);
723                 return;
724         }
725
726         int rc = doVCCommandCallWithOutput("cvs log -r" + version_
727                 + ' ' + getTarget(File),
728                 FileName(owner_->filePath()), tmpf);
729         if (rc) {
730                 LYXERR(Debug::LYXVC, "cvs log failed with exit code " << rc);
731                 return;
732         }
733
734         ifstream ifs(tmpf.toFilesystemEncoding().c_str());
735         static regex const reg("date: (.*) (.*) (.*);  author: (.*);  state: (.*);(.*)");
736
737         while (ifs) {
738                 string line;
739                 getline(ifs, line);
740                 LYXERR(Debug::LYXVC, line << '\n');
741                 if (prefixIs(line, "date:")) {
742                         smatch sm;
743                         if (regex_match(line, sm, reg)) {
744                           //sm[0]; // whole matched string
745                           rev_date_cache_ = sm[1];
746                           rev_time_cache_ = sm[2];
747                           //sm[3]; // GMT offset
748                           rev_author_cache_ = sm[4];
749                         } else
750                           LYXERR(Debug::LYXVC, "\tCannot parse line. Skipping."); 
751                         break;
752                 }
753         }
754         if (rev_author_cache_.empty())
755                 LYXERR(Debug::LYXVC,
756                    "Could not retrieve revision info for " << version_ <<
757                    " of " << getTarget(File));
758 }
759
760
761 void CVS::registrer(string const & msg)
762 {
763         doVCCommand("cvs -q add -m \"" + msg + "\" "
764                 + getTarget(File),
765                 FileName(owner_->filePath()));
766 }
767
768
769 bool CVS::renameEnabled()
770 {
771         return true;
772 }
773
774
775 string CVS::rename(support::FileName const & newFile, string const & msg)
776 {
777         // CVS has no real rename command, so we create a poor mans version
778         support::FileName const oldFile(owner_->absFileName());
779         string ret = copy(newFile, msg);
780         if (ret.empty())
781                 return ret;
782         string cmd = "cvs -q remove -m \"" + msg + "\" " +
783                 quoteName(oldFile.onlyFileName());
784         FileName path(oldFile.onlyPath());
785         return doVCCommand(cmd, path) ? string() : ret;
786 }
787
788
789 bool CVS::copyEnabled()
790 {
791         return true;
792 }
793
794
795 string CVS::copy(support::FileName const & newFile, string const & msg)
796 {
797         // CVS has no real copy command, so we create a poor mans version
798         support::FileName const oldFile(owner_->absFileName());
799         if (!oldFile.copyTo(newFile))
800                 return string();
801         FileName path(oldFile.onlyPath());
802         string relFile(to_utf8(newFile.relPath(path.absFileName())));
803         string cmd("cvs -q add -m \"" + msg + "\" " + quoteName(relFile));
804         return doVCCommand(cmd, path) ? string() : "CVS: Proceeded";
805 }
806
807
808 void CVS::getDiff(OperationMode opmode, FileName const & tmpf)
809 {
810         doVCCommandWithOutput("cvs diff " + getTarget(opmode),
811                 FileName(owner_->filePath()), tmpf, false);
812 }
813
814
815 int CVS::edit()
816 {
817         vcstatus_ = LOCKED;
818         return doVCCommand("cvs -q edit " + getTarget(File),
819                 FileName(owner_->filePath()));
820 }
821
822
823 int CVS::unedit()
824 {
825         vcstatus_ = UNLOCKED;
826         return doVCCommand("cvs -q unedit " + getTarget(File),
827                 FileName(owner_->filePath()));
828 }
829
830
831 int CVS::update(OperationMode opmode, FileName const & tmpf)
832 {
833         return doVCCommandWithOutput("cvs -q update "
834                 + getTarget(opmode),
835                 FileName(owner_->filePath()), tmpf, false);
836 }
837
838
839 string CVS::scanLogFile(FileName const & f, string & status)
840 {
841         ifstream ifs(f.toFilesystemEncoding().c_str());
842
843         while (ifs) {
844                 string line;
845                 getline(ifs, line);
846                 LYXERR(Debug::LYXVC, line << '\n');
847                 if (!line.empty())
848                         status += line + "; ";
849                 if (prefixIs(line, "C ")) {
850                         ifs.close();
851                         return line;
852                 }
853         }
854         ifs.close();
855         return string();
856 }
857
858
859 LyXVC::CommandResult CVS::checkIn(string const & msg, string & log)
860 {
861         CvsStatus status = getStatus();
862         switch (status) {
863         case UpToDate:
864                 if (vcstatus_ != NOLOCKING)
865                         if (unedit())
866                                 return LyXVC::ErrorCommand;
867                 log = "CVS: Proceeded";
868                 return LyXVC::VCSuccess;
869         case LocallyModified:
870         case LocallyAdded: {
871                 int rc = doVCCommand("cvs -q commit -m \"" + msg + "\" "
872                         + getTarget(File),
873                     FileName(owner_->filePath()));
874                 if (rc)
875                         return LyXVC::ErrorCommand;
876                 log = "CVS: Proceeded";
877                 return LyXVC::VCSuccess;
878         }
879         case NeedsMerge:
880         case NeedsCheckout:
881                 frontend::Alert::error(_("Revision control error."),
882                         _("The repository version is newer then the current check out.\n"
883                           "You have to update from repository first or revert your changes.")) ;
884                 break;
885         default:
886                 frontend::Alert::error(_("Revision control error."),
887                         bformat(_("Bad status when checking in changes.\n"
888                                           "\n'%1$s'\n\n"),
889                                 toString(status)));
890                 break;
891         }
892         return LyXVC::ErrorBefore;
893 }
894
895
896 bool CVS::isLocked() const
897 {
898         FileName fn(owner_->absFileName());
899         fn.refresh();
900         return !fn.isReadOnly();
901 }
902
903
904 bool CVS::checkInEnabled()
905 {
906         if (vcstatus_ != NOLOCKING)
907                 return isLocked();
908         else
909                 return true;
910 }
911
912
913 bool CVS::isCheckInWithConfirmation()
914 {
915         CvsStatus status = getStatus();
916         return status == LocallyModified || status == LocallyAdded;
917 }
918
919
920 string CVS::checkOut()
921 {
922         if (vcstatus_ != NOLOCKING && edit())
923                 return string();
924         TempFile tempfile("lyxvout");
925         FileName tmpf = tempfile.name();
926         if (tmpf.empty()) {
927                 LYXERR(Debug::LYXVC, "Could not generate logfile " << tmpf);
928                 return string();
929         }
930
931         int rc = update(File, tmpf);
932         string log;
933         string const res = scanLogFile(tmpf, log);
934         if (!res.empty()) {
935                 frontend::Alert::error(_("Revision control error."),
936                         bformat(_("Error when updating from repository.\n"
937                                 "You have to manually resolve the conflicts NOW!\n'%1$s'.\n\n"
938                                 "After pressing OK, LyX will try to reopen the resolved document."),
939                                 from_local8bit(res)));
940                 rc = 0;
941         }
942
943         return rc ? string() : log.empty() ? "CVS: Proceeded" : "CVS: " + log;
944 }
945
946
947 bool CVS::checkOutEnabled()
948 {
949         if (vcstatus_ != NOLOCKING)
950                 return !isLocked();
951         else
952                 return true;
953 }
954
955
956 string CVS::repoUpdate()
957 {
958         TempFile tempfile("lyxvout");
959         FileName tmpf = tempfile.name();
960         if (tmpf.empty()) {
961                 LYXERR(Debug::LYXVC, "Could not generate logfile " << tmpf);
962                 return string();
963         }
964
965         getDiff(Directory, tmpf);
966         docstring res = tmpf.fileContents("UTF-8");
967         if (!res.empty()) {
968                 LYXERR(Debug::LYXVC, "Diff detected:\n" << res);
969                 docstring const file = from_utf8(owner_->filePath());
970                 docstring text = bformat(_("There were detected changes "
971                                 "in the working directory:\n%1$s\n\n"
972                                 "Possible file conflicts must be then resolved manually "
973                                 "or you will need to revert back to the repository version."), file);
974                 int ret = frontend::Alert::prompt(_("Changes detected"),
975                                 text, 0, 1, _("&Continue"), _("&Abort"), _("View &Log ..."));
976                 if (ret == 2) {
977                         dispatch(FuncRequest(LFUN_DIALOG_SHOW, "file " + tmpf.absFileName()));
978                         ret = frontend::Alert::prompt(_("Changes detected"),
979                                 text, 0, 1, _("&Continue"), _("&Abort"));
980                         hideDialogs("file", nullptr);
981                 }
982                 if (ret == 1)
983                         return string();
984         }
985
986         int rc = update(Directory, tmpf);
987         res += "Update log:\n" + tmpf.fileContents("UTF-8");
988         LYXERR(Debug::LYXVC, res);
989
990         string log;
991         string sres = scanLogFile(tmpf, log);
992         if (!sres.empty()) {
993                 docstring const file = owner_->fileName().displayName(20);
994                 frontend::Alert::error(_("Revision control error."),
995                         bformat(_("Error when updating document %1$s from repository.\n"
996                                           "You have to manually resolve the conflicts NOW!\n'%2$s'.\n\n"
997                                           "After pressing OK, LyX will try to reopen the resolved document."),
998                                 file, from_local8bit(sres)));
999                 rc = 0;
1000         }
1001
1002         return rc ? string() : log.empty() ? "CVS: Proceeded" : "CVS: " + log;
1003 }
1004
1005
1006 bool CVS::repoUpdateEnabled()
1007 {
1008         return true;
1009 }
1010
1011
1012 string CVS::lockingToggle()
1013 {
1014         lyxerr << "Sorry, not implemented." << endl;
1015         return string();
1016 }
1017
1018
1019 bool CVS::lockingToggleEnabled()
1020 {
1021         return false;
1022 }
1023
1024
1025 bool CVS::isRevertWithConfirmation()
1026 {
1027         CvsStatus status = getStatus();
1028         return !owner_->isClean() || status == LocallyModified || status == NeedsMerge;
1029 }
1030
1031
1032 bool CVS::revert()
1033 {
1034         // Reverts to the version in CVS repository and
1035         // gets the updated version from the repository.
1036         CvsStatus status = getStatus();
1037         switch (status) {
1038         case UpToDate:
1039                 if (vcstatus_ != NOLOCKING)
1040                         return 0 == unedit();
1041                 break;
1042         case NeedsMerge:
1043         case NeedsCheckout:
1044         case LocallyModified: {
1045                 FileName f(owner_->absFileName());
1046                 f.removeFile();
1047                 update(File, FileName());
1048                 owner_->markClean();
1049                 break;
1050         }
1051         case LocallyAdded: {
1052                 docstring const file = owner_->fileName().displayName(20);
1053                 frontend::Alert::error(_("Revision control error."),
1054                         bformat(_("The document %1$s is not in repository.\n"
1055                                   "You have to check in the first revision before you can revert."),
1056                                 file)) ;
1057                 return false;
1058         }
1059         default: {
1060                 docstring const file = owner_->fileName().displayName(20);
1061                 frontend::Alert::error(_("Revision control error."),
1062                         bformat(_("Cannot revert document %1$s to repository version.\n"
1063                                   "The status '%2$s' is unexpected."),
1064                                 file, toString(status)));
1065                 return false;
1066                 }
1067         }
1068         return true;
1069 }
1070
1071
1072 void CVS::undoLast()
1073 {
1074         // merge the current with the previous version
1075         // in a reverse patch kind of way, so that the
1076         // result is to revert the last changes.
1077         lyxerr << "Sorry, not implemented." << endl;
1078 }
1079
1080
1081 bool CVS::undoLastEnabled()
1082 {
1083         return false;
1084 }
1085
1086
1087 void CVS::getLog(FileName const & tmpf)
1088 {
1089         doVCCommandWithOutput("cvs log " + getTarget(File),
1090                 FileName(owner_->filePath()),
1091                 tmpf);
1092 }
1093
1094
1095 bool CVS::toggleReadOnlyEnabled()
1096 {
1097         return false;
1098 }
1099
1100
1101 string CVS::revisionInfo(LyXVC::RevisionInfo const info)
1102 {
1103         if (!version_.empty()) {
1104                 getRevisionInfo();
1105                 switch (info) {
1106                 case LyXVC::File:
1107                         return version_;
1108                 case LyXVC::Author:
1109                         return rev_author_cache_;
1110                 case LyXVC::Date:
1111                         return rev_date_cache_;
1112                 case LyXVC::Time:
1113                         return rev_time_cache_;
1114                 default:
1115                         break;
1116                 }
1117         }
1118         return string();
1119 }
1120
1121
1122 bool CVS::prepareFileRevision(string const & revis, string & f)
1123 {
1124         string rev = revis;
1125         if (!VCS::makeRCSRevision(version_, rev))
1126                 return false;
1127
1128         TempFile tempfile("lyxvcrev_" + rev + '_');
1129         tempfile.setAutoRemove(false);
1130         FileName tmpf = tempfile.name();
1131         if (tmpf.empty()) {
1132                 LYXERR(Debug::LYXVC, "Could not generate logfile " << tmpf);
1133                 return false;
1134         }
1135
1136         doVCCommandWithOutput("cvs update -p -r" + rev + ' '
1137                 + getTarget(File),
1138                 FileName(owner_->filePath()), tmpf);
1139         tmpf.refresh();
1140         if (tmpf.isFileEmpty())
1141                 return false;
1142
1143         f = tmpf.absFileName();
1144         return true;
1145 }
1146
1147
1148 bool CVS::prepareFileRevisionEnabled()
1149 {
1150         return true;
1151 }
1152
1153
1154 /////////////////////////////////////////////////////////////////////
1155 //
1156 // SVN
1157 //
1158 /////////////////////////////////////////////////////////////////////
1159
1160 SVN::SVN(Buffer * b) : VCS(b)
1161 {
1162         // Here we know that the buffer file is either already in SVN or
1163         // about to be registered
1164         locked_mode_ = false;
1165         scanMaster();
1166 }
1167
1168
1169 bool SVN::findFile(FileName const & file)
1170 {
1171         // First we check the existence of repository meta data.
1172         if (VCS::checkParentDirs(file, ".svn").empty()) {
1173                 LYXERR(Debug::LYXVC, "Cannot find SVN meta data for " << file);
1174                 return false;
1175         }
1176
1177         // Now we check the status of the file.
1178         string const fname = onlyFileName(file.absFileName());
1179         LYXERR(Debug::LYXVC, "LyXVC: Checking if file is under svn control for `" << fname << '\'');
1180         bool found = 0 == doVCCommandCall("svn info " + quoteName(fname),
1181                                                 file.onlyPath());
1182         LYXERR(Debug::LYXVC, "SVN control: " << (found ? "enabled" : "disabled"));
1183         return found;
1184 }
1185
1186
1187 void SVN::scanMaster()
1188 {
1189         // vcstatus code is somewhat superflous,
1190         // until we want to implement read-only toggle for svn.
1191         vcstatus_ = NOLOCKING;
1192         if (checkLockMode()) {
1193                 if (isLocked())
1194                         vcstatus_ = LOCKED;
1195                 else
1196                         vcstatus_ = UNLOCKED;
1197         }
1198 }
1199
1200
1201 bool SVN::checkLockMode()
1202 {
1203         TempFile tempfile("lyxvcout");
1204         FileName tmpf = tempfile.name();
1205         if (tmpf.empty()){
1206                 LYXERR(Debug::LYXVC, "Could not generate logfile " << tmpf);
1207                 return false;
1208         }
1209
1210         LYXERR(Debug::LYXVC, "Detecting locking mode...");
1211         if (doVCCommandCall("svn proplist " + quoteName(onlyFileName(owner_->absFileName()))
1212                     + " > " + quoteName(tmpf.toFilesystemEncoding()),
1213                     FileName(owner_->filePath())))
1214                 return false;
1215
1216         ifstream ifs(tmpf.toFilesystemEncoding().c_str());
1217         string line;
1218         bool ret = false;
1219
1220         while (ifs && !ret) {
1221                 getline(ifs, line);
1222                 LYXERR(Debug::LYXVC, line);
1223                 if (contains(line, "svn:needs-lock"))
1224                         ret = true;
1225         }
1226         LYXERR(Debug::LYXVC, "Locking enabled: " << ret);
1227         ifs.close();
1228         locked_mode_ = ret;
1229         return ret;
1230
1231 }
1232
1233
1234 bool SVN::isLocked() const
1235 {
1236         FileName file(owner_->absFileName());
1237         file.refresh();
1238         return !file.isReadOnly();
1239 }
1240
1241
1242 bool SVN::retrieve(FileName const & file)
1243 {
1244         LYXERR(Debug::LYXVC, "LyXVC::SVN: retrieve.\n\t" << file);
1245         // The caller ensures that file does not exist, so no need to check that.
1246         return doVCCommandCall("svn update -q --non-interactive " + quoteName(file.onlyFileName()),
1247                                file.onlyPath()) == 0;
1248 }
1249
1250
1251 void SVN::registrer(string const & /*msg*/)
1252 {
1253         doVCCommand("svn add -q --parents " + quoteName(onlyFileName(owner_->absFileName())),
1254                     FileName(owner_->filePath()));
1255 }
1256
1257
1258 bool SVN::renameEnabled()
1259 {
1260         return true;
1261 }
1262
1263
1264 string SVN::rename(support::FileName const & newFile, string const & msg)
1265 {
1266         // svn move does not require a log message, since it does not commit.
1267         // In LyX we commit immediately afterwards, otherwise it could be
1268         // confusing to the user to have two uncommitted files.
1269         FileName path(owner_->filePath());
1270         string relFile(to_utf8(newFile.relPath(path.absFileName())));
1271         string cmd("svn move -q " + quoteName(onlyFileName(owner_->absFileName())) +
1272                    ' ' + quoteName(relFile));
1273         if (doVCCommand(cmd, path)) {
1274                 cmd = "svn revert -q " +
1275                         quoteName(onlyFileName(owner_->absFileName())) + ' ' +
1276                         quoteName(relFile);
1277                 doVCCommand(cmd, path);
1278                 if (newFile.exists())
1279                         newFile.removeFile();
1280                 return string();
1281         }
1282         vector<support::FileName> f;
1283         f.push_back(owner_->fileName());
1284         f.push_back(newFile);
1285         string log;
1286         if (checkIn(f, msg, log) != LyXVC::VCSuccess) {
1287                 cmd = "svn revert -q " +
1288                         quoteName(onlyFileName(owner_->absFileName())) + ' ' +
1289                         quoteName(relFile);
1290                 doVCCommand(cmd, path);
1291                 if (newFile.exists())
1292                         newFile.removeFile();
1293                 return string();
1294         }
1295         return log;
1296 }
1297
1298
1299 bool SVN::copyEnabled()
1300 {
1301         return true;
1302 }
1303
1304
1305 string SVN::copy(support::FileName const & newFile, string const & msg)
1306 {
1307         // svn copy does not require a log message, since it does not commit.
1308         // In LyX we commit immediately afterwards, otherwise it could be
1309         // confusing to the user to have an uncommitted file.
1310         FileName path(owner_->filePath());
1311         string relFile(to_utf8(newFile.relPath(path.absFileName())));
1312         string cmd("svn copy -q " + quoteName(onlyFileName(owner_->absFileName())) +
1313                    ' ' + quoteName(relFile));
1314         if (doVCCommand(cmd, path))
1315                 return string();
1316         vector<support::FileName> f(1, newFile);
1317         string log;
1318         if (checkIn(f, msg, log) == LyXVC::VCSuccess)
1319                 return log;
1320         return string();
1321 }
1322
1323
1324 LyXVC::CommandResult SVN::checkIn(string const & msg, string & log)
1325 {
1326         vector<support::FileName> f(1, owner_->fileName());
1327         return checkIn(f, msg, log);
1328 }
1329
1330
1331 LyXVC::CommandResult
1332 SVN::checkIn(vector<support::FileName> const & f, string const & msg, string & log)
1333 {
1334         TempFile tempfile("lyxvcout");
1335         FileName tmpf = tempfile.name();
1336         if (tmpf.empty()){
1337                 LYXERR(Debug::LYXVC, "Could not generate logfile " << tmpf);
1338                 log = N_("Error: Could not generate logfile.");
1339                 return LyXVC::ErrorBefore;
1340         }
1341
1342         ostringstream os;
1343         os << "svn commit -m \"" << msg << '"';
1344         for (size_t i = 0; i < f.size(); ++i)
1345                 os << ' ' << quoteName(f[i].onlyFileName());
1346         os << " > " << quoteName(tmpf.toFilesystemEncoding());
1347         LyXVC::CommandResult ret =
1348                 doVCCommand(os.str(), FileName(owner_->filePath())) ?
1349                         LyXVC::ErrorCommand : LyXVC::VCSuccess;
1350
1351         string res = scanLogFile(tmpf, log);
1352         if (!res.empty()) {
1353                 frontend::Alert::error(_("Revision control error."),
1354                                 _("Error when committing to repository.\n"
1355                                 "You have to manually resolve the problem.\n"
1356                                 "LyX will reopen the document after you press OK."));
1357                 ret = LyXVC::ErrorCommand;
1358         }
1359         else
1360                 if (!fileLock(false, tmpf, log))
1361                         ret = LyXVC::ErrorCommand;
1362
1363         if (!log.empty())
1364                 log.insert(0, "SVN: ");
1365         if (ret == LyXVC::VCSuccess && log.empty())
1366                 log = "SVN: Proceeded";
1367         return ret;
1368 }
1369
1370
1371 bool SVN::checkInEnabled()
1372 {
1373         if (locked_mode_)
1374                 return isLocked();
1375         else
1376                 return true;
1377 }
1378
1379
1380 bool SVN::isCheckInWithConfirmation()
1381 {
1382         // FIXME one day common getDiff and perhaps OpMode for all backends
1383
1384         TempFile tempfile("lyxvcout");
1385         FileName tmpf = tempfile.name();
1386         if (tmpf.empty()) {
1387                 LYXERR(Debug::LYXVC, "Could not generate logfile " << tmpf);
1388                 return true;
1389         }
1390
1391         doVCCommandCall("svn diff " + quoteName(owner_->absFileName())
1392                     + " > " + quoteName(tmpf.toFilesystemEncoding()),
1393                 FileName(owner_->filePath()));
1394
1395         docstring diff = tmpf.fileContents("UTF-8");
1396
1397         if (diff.empty())
1398                 return false;
1399
1400         return true;
1401 }
1402
1403
1404 // FIXME Correctly return code should be checked instead of this.
1405 // This would need another solution than just plain startscript.
1406 // Hint from Andre': QProcess::readAllStandardError()...
1407 string SVN::scanLogFile(FileName const & f, string & status)
1408 {
1409         ifstream ifs(f.toFilesystemEncoding().c_str());
1410         string line;
1411
1412         while (ifs) {
1413                 getline(ifs, line);
1414                 LYXERR(Debug::LYXVC, line << '\n');
1415                 if (!line.empty())
1416                         status += line + "; ";
1417                 if (prefixIs(line, "C ") || prefixIs(line, "CU ")
1418                                          || contains(line, "Commit failed")) {
1419                         ifs.close();
1420                         return line;
1421                 }
1422                 if (contains(line, "svn:needs-lock")) {
1423                         ifs.close();
1424                         return line;
1425                 }
1426         }
1427         ifs.close();
1428         return string();
1429 }
1430
1431
1432 bool SVN::fileLock(bool lock, FileName const & tmpf, string &status)
1433 {
1434         if (!locked_mode_ || (isLocked() == lock))
1435                 return true;
1436
1437         string const arg = lock ? "lock " : "unlock ";
1438         doVCCommand("svn "+ arg + quoteName(onlyFileName(owner_->absFileName()))
1439                     + " > " + quoteName(tmpf.toFilesystemEncoding()),
1440                     FileName(owner_->filePath()));
1441
1442         // Lock error messages go unfortunately on stderr and are unreachable this way.
1443         ifstream ifs(tmpf.toFilesystemEncoding().c_str());
1444         string line;
1445         while (ifs) {
1446                 getline(ifs, line);
1447                 if (!line.empty()) status += line + "; ";
1448         }
1449         ifs.close();
1450
1451         if (isLocked() == lock)
1452                 return true;
1453
1454         if (lock)
1455                 frontend::Alert::error(_("Revision control error."),
1456                         _("Error while acquiring write lock.\n"
1457                         "Another user is most probably editing\n"
1458                         "the current document now!\n"
1459                         "Also check the access to the repository."));
1460         else
1461                 frontend::Alert::error(_("Revision control error."),
1462                         _("Error while releasing write lock.\n"
1463                         "Check the access to the repository."));
1464         return false;
1465 }
1466
1467
1468 string SVN::checkOut()
1469 {
1470         TempFile tempfile("lyxvcout");
1471         FileName tmpf = tempfile.name();
1472         if (tmpf.empty()) {
1473                 LYXERR(Debug::LYXVC, "Could not generate logfile " << tmpf);
1474                 return N_("Error: Could not generate logfile.");
1475         }
1476
1477         doVCCommand("svn update --non-interactive " + quoteName(onlyFileName(owner_->absFileName()))
1478                     + " > " + quoteName(tmpf.toFilesystemEncoding()),
1479                     FileName(owner_->filePath()));
1480
1481         string log;
1482         string const res = scanLogFile(tmpf, log);
1483         if (!res.empty())
1484                 frontend::Alert::error(_("Revision control error."),
1485                         bformat(_("Error when updating from repository.\n"
1486                                 "You have to manually resolve the conflicts NOW!\n'%1$s'.\n\n"
1487                                 "After pressing OK, LyX will try to reopen the resolved document."),
1488                         from_local8bit(res)));
1489
1490         fileLock(true, tmpf, log);
1491
1492         return log.empty() ? string() : "SVN: " + log;
1493 }
1494
1495
1496 bool SVN::checkOutEnabled()
1497 {
1498         if (locked_mode_)
1499                 return !isLocked();
1500         else
1501                 return true;
1502 }
1503
1504
1505 string SVN::repoUpdate()
1506 {
1507         TempFile tempfile("lyxvcout");
1508         FileName tmpf = tempfile.name();
1509         if (tmpf.empty()) {
1510                 LYXERR(Debug::LYXVC, "Could not generate logfile " << tmpf);
1511                 return N_("Error: Could not generate logfile.");
1512         }
1513
1514         doVCCommand("svn diff " + quoteName(owner_->filePath())
1515                     + " > " + quoteName(tmpf.toFilesystemEncoding()),
1516                 FileName(owner_->filePath()));
1517         docstring res = tmpf.fileContents("UTF-8");
1518         if (!res.empty()) {
1519                 LYXERR(Debug::LYXVC, "Diff detected:\n" << res);
1520                 docstring const file = from_utf8(owner_->filePath());
1521                 docstring text = bformat(_("There were detected changes "
1522                                 "in the working directory:\n%1$s\n\n"
1523                                 "In case of file conflict version of the local directory files "
1524                                 "will be preferred."
1525                                 "\n\nContinue?"), file);
1526                 int ret = frontend::Alert::prompt(_("Changes detected"),
1527                                 text, 0, 1, _("&Yes"), _("&No"), _("View &Log ..."));
1528                 if (ret == 2) {
1529                         dispatch(FuncRequest(LFUN_DIALOG_SHOW, "file " + tmpf.absFileName()));
1530                         ret = frontend::Alert::prompt(_("Changes detected"),
1531                                 text, 0, 1, _("&Yes"), _("&No"));
1532                         hideDialogs("file", nullptr);
1533                 }
1534                 if (ret == 1)
1535                         return string();
1536         }
1537
1538         // Reverting looks too harsh, see bug #6255.
1539         // doVCCommand("svn revert -R " + quoteName(owner_->filePath())
1540         // + " > " + quoteName(tmpf.toFilesystemEncoding()),
1541         // FileName(owner_->filePath()));
1542         // res = "Revert log:\n" + tmpf.fileContents("UTF-8");
1543         doVCCommand("svn update --accept mine-full " + quoteName(owner_->filePath())
1544                 + " > " + quoteName(tmpf.toFilesystemEncoding()),
1545                 FileName(owner_->filePath()));
1546         res += "Update log:\n" + tmpf.fileContents("UTF-8");
1547
1548         LYXERR(Debug::LYXVC, res);
1549         return to_utf8(res);
1550 }
1551
1552
1553 bool SVN::repoUpdateEnabled()
1554 {
1555         return true;
1556 }
1557
1558
1559 string SVN::lockingToggle()
1560 {
1561         TempFile tempfile("lyxvcout");
1562         FileName tmpf = tempfile.name();
1563         if (tmpf.empty()) {
1564                 LYXERR(Debug::LYXVC, "Could not generate logfile " << tmpf);
1565                 return N_("Error: Could not generate logfile.");
1566         }
1567
1568         int ret = doVCCommand("svn proplist " + quoteName(onlyFileName(owner_->absFileName()))
1569                     + " > " + quoteName(tmpf.toFilesystemEncoding()),
1570                     FileName(owner_->filePath()));
1571         if (ret)
1572                 return string();
1573
1574         string log;
1575         string res = scanLogFile(tmpf, log);
1576         bool locking = contains(res, "svn:needs-lock");
1577         if (!locking)
1578                 ret = doVCCommand("svn propset svn:needs-lock ON "
1579                     + quoteName(onlyFileName(owner_->absFileName()))
1580                     + " > " + quoteName(tmpf.toFilesystemEncoding()),
1581                     FileName(owner_->filePath()));
1582         else
1583                 ret = doVCCommand("svn propdel svn:needs-lock "
1584                     + quoteName(onlyFileName(owner_->absFileName()))
1585                     + " > " + quoteName(tmpf.toFilesystemEncoding()),
1586                     FileName(owner_->filePath()));
1587         if (ret)
1588                 return string();
1589
1590         frontend::Alert::warning(_("SVN File Locking"),
1591                 (locking ? _("Locking property unset.") : _("Locking property set.")) + '\n'
1592                 + _("Do not forget to commit the locking property into the repository."),
1593                 true);
1594
1595         return string("SVN: ") + (locking ?
1596                 N_("Locking property unset.") : N_("Locking property set."));
1597 }
1598
1599
1600 bool SVN::lockingToggleEnabled()
1601 {
1602         return true;
1603 }
1604
1605
1606 bool SVN::revert()
1607 {
1608         // Reverts to the version in SVN repository and
1609         // gets the updated version from the repository.
1610         string const fil = quoteName(onlyFileName(owner_->absFileName()));
1611
1612         if (doVCCommand("svn revert -q " + fil,
1613                     FileName(owner_->filePath())))
1614                 return false;
1615         owner_->markClean();
1616         return true;
1617 }
1618
1619
1620 bool SVN::isRevertWithConfirmation()
1621 {
1622         //FIXME owner && diff
1623         return true;
1624 }
1625
1626
1627 void SVN::undoLast()
1628 {
1629         // merge the current with the previous version
1630         // in a reverse patch kind of way, so that the
1631         // result is to revert the last changes.
1632         lyxerr << "Sorry, not implemented." << endl;
1633 }
1634
1635
1636 bool SVN::undoLastEnabled()
1637 {
1638         return false;
1639 }
1640
1641
1642 string SVN::revisionInfo(LyXVC::RevisionInfo const info)
1643 {
1644         if (info == LyXVC::Tree) {
1645                 if (rev_tree_cache_.empty())
1646                         if (!getTreeRevisionInfo())
1647                                 rev_tree_cache_ = "?";
1648                 if (rev_tree_cache_ == "?")
1649                         return string();
1650
1651                 return rev_tree_cache_;
1652         }
1653
1654         // fill the rest of the attributes for a single file
1655         if (rev_file_cache_.empty())
1656                 if (!getFileRevisionInfo())
1657                         rev_file_cache_ = "?";
1658
1659         switch (info) {
1660                 case LyXVC::File:
1661                         if (rev_file_cache_ == "?")
1662                                 return string();
1663                         return rev_file_cache_;
1664                 case LyXVC::Author:
1665                         return rev_author_cache_;
1666                 case LyXVC::Date:
1667                         return rev_date_cache_;
1668                 case LyXVC::Time:
1669                         return rev_time_cache_;
1670                 default:
1671                         break;
1672         }
1673
1674         return string();
1675 }
1676
1677
1678 bool SVN::getFileRevisionInfo()
1679 {
1680         TempFile tempfile("lyxvcout");
1681         FileName tmpf = tempfile.name();
1682         if (tmpf.empty()) {
1683                 LYXERR(Debug::LYXVC, "Could not generate logfile " << tmpf);
1684                 return false;
1685         }
1686
1687         doVCCommand("svn info --xml " + quoteName(onlyFileName(owner_->absFileName()))
1688                     + " > " + quoteName(tmpf.toFilesystemEncoding()),
1689                     FileName(owner_->filePath()));
1690
1691         if (tmpf.empty())
1692                 return false;
1693
1694         ifstream ifs(tmpf.toFilesystemEncoding().c_str());
1695         string line;
1696         // commit log part
1697         bool c = false;
1698         string rev;
1699
1700         while (ifs) {
1701                 getline(ifs, line);
1702                 LYXERR(Debug::LYXVC, line);
1703                 if (prefixIs(line, "<commit"))
1704                         c = true;
1705                 if (c && prefixIs(line, "   revision=\"") && suffixIs(line, "\">")) {
1706                         string l1 = subst(line, "revision=\"", "");
1707                         string l2 = trim(subst(l1, "\">", ""));
1708                         if (isStrInt(l2))
1709                                 rev_file_cache_ = rev = l2;
1710                 }
1711                 if (c && prefixIs(line, "<author>") && suffixIs(line, "</author>")) {
1712                         string l1 = subst(line, "<author>", "");
1713                         string l2 = subst(l1, "</author>", "");
1714                         rev_author_cache_ = l2;
1715                 }
1716                 if (c && prefixIs(line, "<date>") && suffixIs(line, "</date>")) {
1717                         string l1 = subst(line, "<date>", "");
1718                         string l2 = subst(l1, "</date>", "");
1719                         l2 = split(l2, l1, 'T');
1720                         rev_date_cache_ = l1;
1721                         l2 = split(l2, l1, '.');
1722                         rev_time_cache_ = l1;
1723                 }
1724         }
1725
1726         ifs.close();
1727         return !rev.empty();
1728 }
1729
1730
1731 bool SVN::getTreeRevisionInfo()
1732 {
1733         TempFile tempfile("lyxvcout");
1734         FileName tmpf = tempfile.name();
1735         if (tmpf.empty()) {
1736                 LYXERR(Debug::LYXVC, "Could not generate logfile " << tmpf);
1737                 return false;
1738         }
1739
1740         doVCCommand("svnversion -n . > " + quoteName(tmpf.toFilesystemEncoding()),
1741                     FileName(owner_->filePath()));
1742
1743         if (tmpf.empty())
1744                 return false;
1745
1746         // only first line in case something bad happens.
1747         ifstream ifs(tmpf.toFilesystemEncoding().c_str());
1748         string line;
1749         getline(ifs, line);
1750         ifs.close();
1751
1752         rev_tree_cache_ = line;
1753         return !line.empty();
1754 }
1755
1756
1757 void SVN::getLog(FileName const & tmpf)
1758 {
1759         doVCCommand("svn log " + quoteName(onlyFileName(owner_->absFileName()))
1760                     + " > " + quoteName(tmpf.toFilesystemEncoding()),
1761                     FileName(owner_->filePath()));
1762 }
1763
1764
1765 bool SVN::prepareFileRevision(string const & revis, string & f)
1766 {
1767         if (!isStrInt(revis))
1768                 return false;
1769
1770         int rev = convert<int>(revis);
1771         if (rev <= 0)
1772                 if (!getFileRevisionInfo())
1773                         return false;
1774         if (rev == 0)
1775                 rev = convert<int>(rev_file_cache_);
1776         // go back for minus rev
1777         else if (rev < 0) {
1778                 rev = rev + convert<int>(rev_file_cache_);
1779                 if (rev < 1)
1780                         return false;
1781         }
1782
1783         string revname = convert<string>(rev);
1784         TempFile tempfile("lyxvcrev_" + revname + '_');
1785         tempfile.setAutoRemove(false);
1786         FileName tmpf = tempfile.name();
1787         if (tmpf.empty()) {
1788                 LYXERR(Debug::LYXVC, "Could not generate logfile " << tmpf);
1789                 return false;
1790         }
1791
1792         doVCCommand("svn cat -r " + revname + ' '
1793                       + quoteName(onlyFileName(owner_->absFileName()))
1794                       + " > " + quoteName(tmpf.toFilesystemEncoding()),
1795                 FileName(owner_->filePath()));
1796         tmpf.refresh();
1797         if (tmpf.isFileEmpty())
1798                 return false;
1799
1800         f = tmpf.absFileName();
1801         return true;
1802 }
1803
1804
1805 bool SVN::prepareFileRevisionEnabled()
1806 {
1807         return true;
1808 }
1809
1810
1811
1812 bool SVN::toggleReadOnlyEnabled()
1813 {
1814         return false;
1815 }
1816
1817
1818 /////////////////////////////////////////////////////////////////////
1819 //
1820 // GIT
1821 //
1822 /////////////////////////////////////////////////////////////////////
1823
1824 GIT::GIT(Buffer * b) : VCS(b)
1825 {
1826         // Here we know that the buffer file is either already in GIT or
1827         // about to be registered
1828         scanMaster();
1829 }
1830
1831
1832 bool GIT::findFile(FileName const & file)
1833 {
1834         // First we check the existence of repository meta data.
1835         if (VCS::checkParentDirs(file, ".git").empty()) {
1836                 LYXERR(Debug::LYXVC, "Cannot find GIT meta data for " << file);
1837                 return false;
1838         }
1839
1840         // Now we check the status of the file.
1841         TempFile tempfile("lyxvcout");
1842         FileName tmpf = tempfile.name();
1843         if (tmpf.empty()) {
1844                 LYXERR(Debug::LYXVC, "Could not generate logfile " << tmpf);
1845                 return false;
1846         }
1847
1848         string const fname = onlyFileName(file.absFileName());
1849         LYXERR(Debug::LYXVC, "LyXVC: Checking if file is under git control for `"
1850                         << fname << '\'');
1851         doVCCommandCall("git ls-files " +
1852                         quoteName(fname) + " > " +
1853                         quoteName(tmpf.toFilesystemEncoding()),
1854                         file.onlyPath());
1855         tmpf.refresh();
1856         bool found = !tmpf.isFileEmpty();
1857         LYXERR(Debug::LYXVC, "GIT control: " << (found ? "enabled" : "disabled"));
1858         return found;
1859 }
1860
1861
1862 void GIT::scanMaster()
1863 {
1864         // vcstatus code is somewhat superflous,
1865         // until we want to implement read-only toggle for git.
1866         vcstatus_ = NOLOCKING;
1867 }
1868
1869
1870 bool GIT::retrieve(FileName const & file)
1871 {
1872         LYXERR(Debug::LYXVC, "LyXVC::GIT: retrieve.\n\t" << file);
1873         // The caller ensures that file does not exist, so no need to check that.
1874         return doVCCommandCall("git checkout -q " + quoteName(file.onlyFileName()),
1875                                file.onlyPath()) == 0;
1876 }
1877
1878
1879 void GIT::registrer(string const & /*msg*/)
1880 {
1881         doVCCommand("git add " + quoteName(onlyFileName(owner_->absFileName())),
1882                     FileName(owner_->filePath()));
1883 }
1884
1885
1886 bool GIT::renameEnabled()
1887 {
1888         return true;
1889 }
1890
1891
1892 string GIT::rename(support::FileName const & newFile, string const & msg)
1893 {
1894         // git mv does not require a log message, since it does not commit.
1895         // In LyX we commit immediately afterwards, otherwise it could be
1896         // confusing to the user to have two uncommitted files.
1897         FileName path(owner_->filePath());
1898         string relFile(to_utf8(newFile.relPath(path.absFileName())));
1899         string cmd("git mv " + quoteName(onlyFileName(owner_->absFileName())) +
1900                    ' ' + quoteName(relFile));
1901         if (doVCCommand(cmd, path)) {
1902                 cmd = "git checkout -q " +
1903                         quoteName(onlyFileName(owner_->absFileName())) + ' ' +
1904                         quoteName(relFile);
1905                 doVCCommand(cmd, path);
1906                 if (newFile.exists())
1907                         newFile.removeFile();
1908                 return string();
1909         }
1910         vector<support::FileName> f;
1911         f.push_back(owner_->fileName());
1912         f.push_back(newFile);
1913         string log;
1914         if (checkIn(f, msg, log) != LyXVC::VCSuccess) {
1915                 cmd = "git checkout -q " +
1916                         quoteName(onlyFileName(owner_->absFileName())) + ' ' +
1917                         quoteName(relFile);
1918                 doVCCommand(cmd, path);
1919                 if (newFile.exists())
1920                         newFile.removeFile();
1921                 return string();
1922         }
1923         return log;
1924 }
1925
1926
1927 bool GIT::copyEnabled()
1928 {
1929         return false;
1930 }
1931
1932
1933 string GIT::copy(support::FileName const & /*newFile*/, string const & /*msg*/)
1934 {
1935         // git does not support copy with history preservation
1936         return string();
1937 }
1938
1939
1940 LyXVC::CommandResult GIT::checkIn(string const & msg, string & log)
1941 {
1942         vector<support::FileName> f(1, owner_->fileName());
1943         return checkIn(f, msg, log);
1944 }
1945
1946
1947 LyXVC::CommandResult
1948 GIT::checkIn(vector<support::FileName> const & f, string const & msg, string & log)
1949 {
1950         TempFile tempfile("lyxvcout");
1951         FileName tmpf = tempfile.name();
1952         if (tmpf.empty()){
1953                 LYXERR(Debug::LYXVC, "Could not generate logfile " << tmpf);
1954                 log = N_("Error: Could not generate logfile.");
1955                 return LyXVC::ErrorBefore;
1956         }
1957
1958         ostringstream os;
1959         os << "git commit -m \"" << msg << '"';
1960         for (size_t i = 0; i < f.size(); ++i)
1961                 os << ' ' << quoteName(f[i].onlyFileName());
1962         os << " > " << quoteName(tmpf.toFilesystemEncoding());
1963         LyXVC::CommandResult ret =
1964                 doVCCommand(os.str(), FileName(owner_->filePath())) ?
1965                         LyXVC::ErrorCommand : LyXVC::VCSuccess;
1966
1967         string res = scanLogFile(tmpf, log);
1968         if (!res.empty()) {
1969                 frontend::Alert::error(_("Revision control error."),
1970                                 _("Error when committing to repository.\n"
1971                                 "You have to manually resolve the problem.\n"
1972                                 "LyX will reopen the document after you press OK."));
1973                 ret = LyXVC::ErrorCommand;
1974         }
1975
1976         if (!log.empty())
1977                 log.insert(0, "GIT: ");
1978         if (ret == LyXVC::VCSuccess && log.empty())
1979                 log = "GIT: Proceeded";
1980         return ret;
1981 }
1982
1983
1984 bool GIT::checkInEnabled()
1985 {
1986         return true;
1987 }
1988
1989
1990 bool GIT::isCheckInWithConfirmation()
1991 {
1992         // FIXME one day common getDiff and perhaps OpMode for all backends
1993
1994         TempFile tempfile("lyxvcout");
1995         FileName tmpf = tempfile.name();
1996         if (tmpf.empty()) {
1997                 LYXERR(Debug::LYXVC, "Could not generate logfile " << tmpf);
1998                 return true;
1999         }
2000
2001         doVCCommandCall("git diff " + quoteName(owner_->absFileName())
2002                     + " > " + quoteName(tmpf.toFilesystemEncoding()),
2003                 FileName(owner_->filePath()));
2004
2005         docstring diff = tmpf.fileContents("UTF-8");
2006
2007         if (diff.empty())
2008                 return false;
2009
2010         return true;
2011 }
2012
2013
2014 // FIXME Correctly return code should be checked instead of this.
2015 // This would need another solution than just plain startscript.
2016 // Hint from Andre': QProcess::readAllStandardError()...
2017 string GIT::scanLogFile(FileName const & f, string & status)
2018 {
2019         ifstream ifs(f.toFilesystemEncoding().c_str());
2020         string line;
2021
2022         while (ifs) {
2023                 getline(ifs, line);
2024                 LYXERR(Debug::LYXVC, line << "\n");
2025                 if (!line.empty())
2026                         status += line + "; ";
2027                 if (prefixIs(line, "C ") || prefixIs(line, "CU ")
2028                                          || contains(line, "Commit failed")) {
2029                         ifs.close();
2030                         return line;
2031                 }
2032         }
2033         ifs.close();
2034         return string();
2035 }
2036
2037
2038 string GIT::checkOut()
2039 {
2040         return string();
2041 }
2042
2043
2044 bool GIT::checkOutEnabled()
2045 {
2046         return false;
2047 }
2048
2049
2050 string GIT::repoUpdate()
2051 {
2052         return string();
2053 }
2054
2055
2056 bool GIT::repoUpdateEnabled()
2057 {
2058         return false;
2059 }
2060
2061
2062 string GIT::lockingToggle()
2063 {
2064         return string();
2065 }
2066
2067
2068 bool GIT::lockingToggleEnabled()
2069 {
2070         return false;
2071 }
2072
2073
2074 bool GIT::revert()
2075 {
2076         // Reverts to the version in GIT repository and
2077         // gets the updated version from the repository.
2078         string const fil = quoteName(onlyFileName(owner_->absFileName()));
2079
2080         if (doVCCommand("git checkout -q " + fil,
2081                     FileName(owner_->filePath())))
2082                 return false;
2083         owner_->markClean();
2084         return true;
2085 }
2086
2087
2088 bool GIT::isRevertWithConfirmation()
2089 {
2090         //FIXME owner && diff
2091         return true;
2092 }
2093
2094
2095 void GIT::undoLast()
2096 {
2097         // merge the current with the previous version
2098         // in a reverse patch kind of way, so that the
2099         // result is to revert the last changes.
2100         lyxerr << "Sorry, not implemented." << endl;
2101 }
2102
2103
2104 bool GIT::undoLastEnabled()
2105 {
2106         return false;
2107 }
2108
2109
2110 string GIT::revisionInfo(LyXVC::RevisionInfo const info)
2111 {
2112         if (info == LyXVC::Tree) {
2113                 if (rev_tree_cache_.empty())
2114                         if (!getTreeRevisionInfo())
2115                                 rev_tree_cache_ = "?";
2116                 if (rev_tree_cache_ == "?")
2117                         return string();
2118
2119                 return rev_tree_cache_;
2120         }
2121
2122         // fill the rest of the attributes for a single file
2123         if (rev_file_cache_.empty())
2124                 if (!getFileRevisionInfo()) {
2125                         rev_file_cache_ = "?";
2126                         rev_file_abbrev_cache_ = "?";
2127     }
2128
2129         switch (info) {
2130                 case LyXVC::File:
2131                         if (rev_file_cache_ == "?")
2132                                 return string();
2133                         return rev_file_cache_;
2134                 case LyXVC::FileAbbrev:
2135                         if (rev_file_abbrev_cache_ == "?")
2136                                 return string();
2137                         return rev_file_abbrev_cache_;
2138                 case LyXVC::Author:
2139                         return rev_author_cache_;
2140                 case LyXVC::Date:
2141                         return rev_date_cache_;
2142                 case LyXVC::Time:
2143                         return rev_time_cache_;
2144                 default:
2145                         break;
2146         }
2147
2148         return string();
2149 }
2150
2151
2152 bool GIT::getFileRevisionInfo()
2153 {
2154         TempFile tempfile("lyxvcout");
2155         FileName tmpf = tempfile.name();
2156         if (tmpf.empty()) {
2157                 LYXERR(Debug::LYXVC, "Could not generate logfile " << tmpf);
2158                 return false;
2159         }
2160
2161         doVCCommand("git log -n 1 --pretty=format:%H%n%h%n%an%n%ai " + quoteName(onlyFileName(owner_->absFileName()))
2162                     + " > " + quoteName(tmpf.toFilesystemEncoding()),
2163                     FileName(owner_->filePath()));
2164
2165         if (tmpf.empty())
2166                 return false;
2167
2168         ifstream ifs(tmpf.toFilesystemEncoding().c_str());
2169
2170         if (ifs)
2171                 getline(ifs, rev_file_cache_);
2172         if (ifs)
2173                 getline(ifs, rev_file_abbrev_cache_);
2174         if (ifs)
2175                 getline(ifs, rev_author_cache_);
2176         if (ifs) {
2177                 string line;
2178                 getline(ifs, line);
2179                 rev_time_cache_ = split(line, rev_date_cache_, ' ');
2180         }
2181
2182         ifs.close();
2183         return !rev_file_cache_.empty();
2184 }
2185
2186
2187 bool GIT::getTreeRevisionInfo()
2188 {
2189         TempFile tempfile("lyxvcout");
2190         FileName tmpf = tempfile.name();
2191         if (tmpf.empty()) {
2192                 LYXERR(Debug::LYXVC, "Could not generate logfile " << tmpf);
2193                 return false;
2194         }
2195
2196         doVCCommand("git describe --abbrev --dirty --long > " + quoteName(tmpf.toFilesystemEncoding()),
2197                     FileName(owner_->filePath()),
2198                     false); //git describe returns $?=128 when no tag found (but git repo still exists)
2199
2200         if (tmpf.empty())
2201                 return false;
2202
2203         // only first line in case something bad happens.
2204         ifstream ifs(tmpf.toFilesystemEncoding().c_str());
2205         getline(ifs, rev_tree_cache_);
2206         ifs.close();
2207
2208         return !rev_tree_cache_.empty();
2209 }
2210
2211
2212 void GIT::getLog(FileName const & tmpf)
2213 {
2214         doVCCommand("git log " + quoteName(onlyFileName(owner_->absFileName()))
2215                     + " > " + quoteName(tmpf.toFilesystemEncoding()),
2216                     FileName(owner_->filePath()));
2217 }
2218
2219
2220 //at this moment we don't accept revision SHA, but just number of revision steps back
2221 //GUI and infrastucture needs to be changed first
2222 bool GIT::prepareFileRevision(string const & revis, string & f)
2223 {
2224         // anything positive means we got hash, not "0" or minus revision
2225         int rev = 1;
2226
2227         // hash is rarely number and should be long
2228         if (isStrInt(revis) && revis.length()<20)
2229                 rev = convert<int>(revis);
2230
2231         // revision and filename
2232         string pointer;
2233
2234         // go back for "minus" revisions
2235         if (rev <= 0)
2236                 pointer = "HEAD~" + convert<string>(-rev);
2237         // normal hash
2238         else
2239                 pointer = revis;
2240
2241         pointer += ':';
2242
2243         TempFile tempfile("lyxvcrev_" + revis + '_');
2244         tempfile.setAutoRemove(false);
2245         FileName tmpf = tempfile.name();
2246         if (tmpf.empty()) {
2247                 LYXERR(Debug::LYXVC, "Could not generate logfile " << tmpf);
2248                 return false;
2249         }
2250
2251         doVCCommand("git show " + pointer + "./"
2252                       + quoteName(onlyFileName(owner_->absFileName()))
2253                       + " > " + quoteName(tmpf.toFilesystemEncoding()),
2254                 FileName(owner_->filePath()));
2255         tmpf.refresh();
2256         if (tmpf.isFileEmpty())
2257                 return false;
2258
2259         f = tmpf.absFileName();
2260         return true;
2261 }
2262
2263
2264 bool GIT::prepareFileRevisionEnabled()
2265 {
2266         return true;
2267 }
2268
2269
2270 bool GIT::toggleReadOnlyEnabled()
2271 {
2272         return true;
2273 }
2274
2275
2276 } // namespace lyx