octave-nkf: libgui/src/qtinfo/parser.cc annotate

annotate libgui/src/qtinfo/parser.cc @ 19558:ffc339cea115

maint: Periodic merge of gui-release to default.

author	John W. Eaton <jwe@octave.org>
date	Fri, 02 Jan 2015 17:27:33 -0500
parents	7934b56c8b7b 17e6c770e6ac
children	4197fc428c7d

rev	line source
16768 e2de3c8882be copyright notice fixes John W. Eaton <jwe@octave.org> parents: 15368 diff changeset	1 /*
e2de3c8882be copyright notice fixes John W. Eaton <jwe@octave.org> parents: 15368 diff changeset	2
e2de3c8882be copyright notice fixes John W. Eaton <jwe@octave.org> parents: 15368 diff changeset	3 Copyright (C) 2009 P. L. Lucas
17744 d63878346099 maint: Update copyright notices for release. John W. Eaton <jwe@octave.org> parents: 17729 diff changeset	4 Copyright (C) 2012-2013 Jacob Dawid
16768 e2de3c8882be copyright notice fixes John W. Eaton <jwe@octave.org> parents: 15368 diff changeset	5
e2de3c8882be copyright notice fixes John W. Eaton <jwe@octave.org> parents: 15368 diff changeset	6 This file is part of Octave.
e2de3c8882be copyright notice fixes John W. Eaton <jwe@octave.org> parents: 15368 diff changeset	7
e2de3c8882be copyright notice fixes John W. Eaton <jwe@octave.org> parents: 15368 diff changeset	8 Octave is free software; you can redistribute it and/or modify it
e2de3c8882be copyright notice fixes John W. Eaton <jwe@octave.org> parents: 15368 diff changeset	9 under the terms of the GNU General Public License as published by the
e2de3c8882be copyright notice fixes John W. Eaton <jwe@octave.org> parents: 15368 diff changeset	10 Free Software Foundation; either version 3 of the License, or (at your
e2de3c8882be copyright notice fixes John W. Eaton <jwe@octave.org> parents: 15368 diff changeset	11 option) any later version.
e2de3c8882be copyright notice fixes John W. Eaton <jwe@octave.org> parents: 15368 diff changeset	12
e2de3c8882be copyright notice fixes John W. Eaton <jwe@octave.org> parents: 15368 diff changeset	13 Octave is distributed in the hope that it will be useful, but WITHOUT
e2de3c8882be copyright notice fixes John W. Eaton <jwe@octave.org> parents: 15368 diff changeset	14 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
e2de3c8882be copyright notice fixes John W. Eaton <jwe@octave.org> parents: 15368 diff changeset	15 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
e2de3c8882be copyright notice fixes John W. Eaton <jwe@octave.org> parents: 15368 diff changeset	16 for more details.
e2de3c8882be copyright notice fixes John W. Eaton <jwe@octave.org> parents: 15368 diff changeset	17
e2de3c8882be copyright notice fixes John W. Eaton <jwe@octave.org> parents: 15368 diff changeset	18 You should have received a copy of the GNU General Public License
e2de3c8882be copyright notice fixes John W. Eaton <jwe@octave.org> parents: 15368 diff changeset	19 along with Octave; see the file COPYING. If not, see
e2de3c8882be copyright notice fixes John W. Eaton <jwe@octave.org> parents: 15368 diff changeset	20 <http://www.gnu.org/licenses/>.
e2de3c8882be copyright notice fixes John W. Eaton <jwe@octave.org> parents: 15368 diff changeset	21
e2de3c8882be copyright notice fixes John W. Eaton <jwe@octave.org> parents: 15368 diff changeset	22 */
e2de3c8882be copyright notice fixes John W. Eaton <jwe@octave.org> parents: 15368 diff changeset	23
e2de3c8882be copyright notice fixes John W. Eaton <jwe@octave.org> parents: 15368 diff changeset	24 // Author: P. L. Lucas
18674 a25bbe8c954c Update Jacob Dawid's email address Jordi Gutiérrez Hermoso <jordigh@octave.org> parents: 18100 diff changeset	25 // Author: Jacob Dawid <jacob.dawid@cybercatalyst.com>
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	26
15286 ae9079bbc627 Add '#include <config.h>' to C++ files in libgui/src Rik <rik@octave.org> parents: 15196 diff changeset	27 #ifdef HAVE_CONFIG_H
ae9079bbc627 Add '#include <config.h>' to C++ files in libgui/src Rik <rik@octave.org> parents: 15196 diff changeset	28 #include <config.h>
ae9079bbc627 Add '#include <config.h>' to C++ files in libgui/src Rik <rik@octave.org> parents: 15196 diff changeset	29 #endif
ae9079bbc627 Add '#include <config.h>' to C++ files in libgui/src Rik <rik@octave.org> parents: 15196 diff changeset	30
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	31 #include "parser.h"
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	32 #include <QFileInfo>
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	33 #include <QDir>
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	34 #include <QFile>
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	35 #include <QUrl>
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	36 #include <QRegExp>
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	37 #include <QProcess>
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	38 #include <QBuffer>
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	39
15368 36ececf69385 avoid some GCC warnings in the libgui code John W. Eaton <jwe@octave.org> parents: 15300 diff changeset	40 parser::parser(QObject *p)
36ececf69385 avoid some GCC warnings in the libgui code John W. Eaton <jwe@octave.org> parents: 15300 diff changeset	41 : QObject(p)
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	42 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	43 _compressors_map.insert ("bz2", "bzip2 -dc \"%1\"");
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	44 _compressors_map.insert ("gz", "gzip -dc \"%1\"");
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	45 _compressors_map.insert ("lzma", "lzma -dc \"%1\"");
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	46 _compressors_map.insert ("xz", "xz -dc \"%1\"");
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	47 _compressors_map.insert ("Z", "gunzip -c \"%1\"");
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	48 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	49
19495 17e6c770e6ac check existence of uncompressed or compressed info files for doc viewer Torsten <ttl@justmail.de> parents: 19479 diff changeset	50 bool
15300 fd27e10b9b05 pass QString by const reference instead of value John W. Eaton <jwe@octave.org> parents: 15286 diff changeset	51 parser::set_info_path (const QString& infoPath)
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	52 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	53 this->_info_path = infoPath;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	54
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	55 _info_files.clear ();
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	56
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	57 QFileInfo info (infoPath);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	58
19495 17e6c770e6ac check existence of uncompressed or compressed info files for doc viewer Torsten <ttl@justmail.de> parents: 19479 diff changeset	59 bool info_file_exists = info.exists ();
17e6c770e6ac check existence of uncompressed or compressed info files for doc viewer Torsten <ttl@justmail.de> parents: 19479 diff changeset	60 QHash<QString, QString>::iterator it;
17e6c770e6ac check existence of uncompressed or compressed info files for doc viewer Torsten <ttl@justmail.de> parents: 19479 diff changeset	61 for (it = _compressors_map.begin (); it != _compressors_map.end (); it++)
17e6c770e6ac check existence of uncompressed or compressed info files for doc viewer Torsten <ttl@justmail.de> parents: 19479 diff changeset	62 {
17e6c770e6ac check existence of uncompressed or compressed info files for doc viewer Torsten <ttl@justmail.de> parents: 19479 diff changeset	63 if (info_file_exists)
17e6c770e6ac check existence of uncompressed or compressed info files for doc viewer Torsten <ttl@justmail.de> parents: 19479 diff changeset	64 break;
17e6c770e6ac check existence of uncompressed or compressed info files for doc viewer Torsten <ttl@justmail.de> parents: 19479 diff changeset	65 info_file_exists = QFileInfo (info.absoluteFilePath () + "." + it.key ()).exists ();
17e6c770e6ac check existence of uncompressed or compressed info files for doc viewer Torsten <ttl@justmail.de> parents: 19479 diff changeset	66 }
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	67
19495 17e6c770e6ac check existence of uncompressed or compressed info files for doc viewer Torsten <ttl@justmail.de> parents: 19479 diff changeset	68 if (info_file_exists)
17e6c770e6ac check existence of uncompressed or compressed info files for doc viewer Torsten <ttl@justmail.de> parents: 19479 diff changeset	69 {
17e6c770e6ac check existence of uncompressed or compressed info files for doc viewer Torsten <ttl@justmail.de> parents: 19479 diff changeset	70 QString path = info.absolutePath ();
17e6c770e6ac check existence of uncompressed or compressed info files for doc viewer Torsten <ttl@justmail.de> parents: 19479 diff changeset	71 QString fileName = info.fileName ();
17e6c770e6ac check existence of uncompressed or compressed info files for doc viewer Torsten <ttl@justmail.de> parents: 19479 diff changeset	72
17e6c770e6ac check existence of uncompressed or compressed info files for doc viewer Torsten <ttl@justmail.de> parents: 19479 diff changeset	73 QDir infoDir (path);
17e6c770e6ac check existence of uncompressed or compressed info files for doc viewer Torsten <ttl@justmail.de> parents: 19479 diff changeset	74 QStringList filter;
17e6c770e6ac check existence of uncompressed or compressed info files for doc viewer Torsten <ttl@justmail.de> parents: 19479 diff changeset	75 filter.append (fileName + "*");
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	76
19495 17e6c770e6ac check existence of uncompressed or compressed info files for doc viewer Torsten <ttl@justmail.de> parents: 19479 diff changeset	77 _info_files = infoDir.entryInfoList (filter, QDir::Files);
17e6c770e6ac check existence of uncompressed or compressed info files for doc viewer Torsten <ttl@justmail.de> parents: 19479 diff changeset	78
17e6c770e6ac check existence of uncompressed or compressed info files for doc viewer Torsten <ttl@justmail.de> parents: 19479 diff changeset	79 parse_info_map ();
17e6c770e6ac check existence of uncompressed or compressed info files for doc viewer Torsten <ttl@justmail.de> parents: 19479 diff changeset	80
17e6c770e6ac check existence of uncompressed or compressed info files for doc viewer Torsten <ttl@justmail.de> parents: 19479 diff changeset	81 return true;
17e6c770e6ac check existence of uncompressed or compressed info files for doc viewer Torsten <ttl@justmail.de> parents: 19479 diff changeset	82 }
17e6c770e6ac check existence of uncompressed or compressed info files for doc viewer Torsten <ttl@justmail.de> parents: 19479 diff changeset	83 else
17e6c770e6ac check existence of uncompressed or compressed info files for doc viewer Torsten <ttl@justmail.de> parents: 19479 diff changeset	84 return false;
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	85 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	86
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	87 QString
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	88 parser::get_info_path ()
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	89 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	90 return _info_path;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	91 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	92
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	93 QIODevice *
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	94 parser::open_file (QFileInfo & file_info)
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	95 {
17898 8c33abdd2f9a maint: Avoid using NULL in C++ code. John W. Eaton <jwe@octave.org> parents: 17790 diff changeset	96 QIODevice *iodevice = 0;
18712 6113e0c6920b maint: Clean up extra spaces before/after parentheses. Rik <rik@octave.org> parents: 18674 diff changeset	97 if (_compressors_map.contains (file_info.suffix ()))
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	98 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	99 QProcess gzip;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	100 gzip.start (_compressors_map.value (file_info.suffix ()).arg (file_info.absoluteFilePath ()));
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	101
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	102 if (!gzip.waitForFinished ())
17898 8c33abdd2f9a maint: Avoid using NULL in C++ code. John W. Eaton <jwe@octave.org> parents: 17790 diff changeset	103 return 0;
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	104
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	105 QByteArray result = gzip.readAll ();
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	106
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	107 QBuffer *io = new QBuffer (this);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	108 io->setData (result);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	109
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	110 if (!io->open (QIODevice::ReadOnly \| QIODevice::Text))
17898 8c33abdd2f9a maint: Avoid using NULL in C++ code. John W. Eaton <jwe@octave.org> parents: 17790 diff changeset	111 return 0;
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	112
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	113 iodevice = io;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	114 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	115 else
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	116 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	117 QFile *io = new QFile (file_info.absoluteFilePath ());
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	118 if (!io->open (QIODevice::ReadOnly \| QIODevice::Text))
17898 8c33abdd2f9a maint: Avoid using NULL in C++ code. John W. Eaton <jwe@octave.org> parents: 17790 diff changeset	119 return 0;
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	120 iodevice = io;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	121 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	122
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	123 return iodevice;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	124 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	125
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	126 int
15300 fd27e10b9b05 pass QString by const reference instead of value John W. Eaton <jwe@octave.org> parents: 15286 diff changeset	127 parser::is_ref (const QString& node)
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	128 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	129 if (_ref_map.contains (node))
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	130 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	131 node_position ref = _ref_map [node];
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	132
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	133 return ref.pos-_node_map [ref._node_name].pos;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	134 }
19479 8c47eb286151 open doc browser for keywords correctly (bug #41110) Torsten <ttl@justmail.de> parents: 17898 diff changeset	135 if (_node_map.contains (node))
8c47eb286151 open doc browser for keywords correctly (bug #41110) Torsten <ttl@justmail.de> parents: 17898 diff changeset	136 {
8c47eb286151 open doc browser for keywords correctly (bug #41110) Torsten <ttl@justmail.de> parents: 17898 diff changeset	137 return 0; // node: show from the beginning
8c47eb286151 open doc browser for keywords correctly (bug #41110) Torsten <ttl@justmail.de> parents: 17898 diff changeset	138 }
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	139 return -1;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	140 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	141
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	142 QString
15300 fd27e10b9b05 pass QString by const reference instead of value John W. Eaton <jwe@octave.org> parents: 15286 diff changeset	143 parser::search_node (const QString& node_arg)
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	144 {
15300 fd27e10b9b05 pass QString by const reference instead of value John W. Eaton <jwe@octave.org> parents: 15286 diff changeset	145 QString node = node_arg;
fd27e10b9b05 pass QString by const reference instead of value John W. Eaton <jwe@octave.org> parents: 15286 diff changeset	146
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	147 QFileInfo file_info;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	148 QString ref;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	149
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	150 if (_ref_map.contains (node))
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	151 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	152 ref = node;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	153 node = _ref_map [ref]._node_name;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	154 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	155
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	156 if (_node_map.contains (node))
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	157 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	158 int pos = _node_map [node].pos;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	159 int realPos;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	160
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	161 real_position (pos, file_info, realPos);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	162
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	163 QIODevice *io = open_file (file_info);
17898 8c33abdd2f9a maint: Avoid using NULL in C++ code. John W. Eaton <jwe@octave.org> parents: 17790 diff changeset	164 if (! io)
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	165 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	166 return QString ();
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	167 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	168
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	169 seek (io, realPos);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	170
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	171 QString text = get_next_node (io);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	172 if (!text.isEmpty())
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	173 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	174 return text;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	175 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	176
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	177 io->close ();
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	178 delete io;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	179 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	180
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	181 return QString ();
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	182 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	183
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	184 QString
15300 fd27e10b9b05 pass QString by const reference instead of value John W. Eaton <jwe@octave.org> parents: 15286 diff changeset	185 parser::search_node (const QString& node, QIODevice *io)
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	186 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	187 while (!io->atEnd ())
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	188 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	189 QString text = get_next_node (io);
17790 86c6ae5f969e Use GNU style coding conventions for code in libgui/ Rik <rik@octave.org> parents: 17775 diff changeset	190 if (node == get_node_name (text))
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	191 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	192 return text;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	193 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	194 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	195
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	196 return QString ();
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	197 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	198
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	199 QString
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	200 parser::get_next_node (QIODevice *io)
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	201 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	202 QString text;
17035 08f0e372d006 doc viewer: correct the anchor position of the desired doc entry Torsten <ttl@justmail.de> parents: 17029 diff changeset	203 QByteArray line, line_buffer;
08f0e372d006 doc viewer: correct the anchor position of the desired doc entry Torsten <ttl@justmail.de> parents: 17029 diff changeset	204 char c;
08f0e372d006 doc viewer: correct the anchor position of the desired doc entry Torsten <ttl@justmail.de> parents: 17029 diff changeset	205 int i;
08f0e372d006 doc viewer: correct the anchor position of the desired doc entry Torsten <ttl@justmail.de> parents: 17029 diff changeset	206
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	207 while (!io->atEnd ())
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	208 {
17035 08f0e372d006 doc viewer: correct the anchor position of the desired doc entry Torsten <ttl@justmail.de> parents: 17029 diff changeset	209 io->getChar (&c);
08f0e372d006 doc viewer: correct the anchor position of the desired doc entry Torsten <ttl@justmail.de> parents: 17029 diff changeset	210 if (c)
17790 86c6ae5f969e Use GNU style coding conventions for code in libgui/ Rik <rik@octave.org> parents: 17775 diff changeset	211 {
86c6ae5f969e Use GNU style coding conventions for code in libgui/ Rik <rik@octave.org> parents: 17775 diff changeset	212 // first char is not equal 0
17035 08f0e372d006 doc viewer: correct the anchor position of the desired doc entry Torsten <ttl@justmail.de> parents: 17029 diff changeset	213 io->ungetChar (c);
08f0e372d006 doc viewer: correct the anchor position of the desired doc entry Torsten <ttl@justmail.de> parents: 17029 diff changeset	214 line = io->readLine ();
08f0e372d006 doc viewer: correct the anchor position of the desired doc entry Torsten <ttl@justmail.de> parents: 17029 diff changeset	215 }
08f0e372d006 doc viewer: correct the anchor position of the desired doc entry Torsten <ttl@justmail.de> parents: 17029 diff changeset	216 else
17790 86c6ae5f969e Use GNU style coding conventions for code in libgui/ Rik <rik@octave.org> parents: 17775 diff changeset	217 {
86c6ae5f969e Use GNU style coding conventions for code in libgui/ Rik <rik@octave.org> parents: 17775 diff changeset	218 // 0 was read -> image -> text length changes
17035 08f0e372d006 doc viewer: correct the anchor position of the desired doc entry Torsten <ttl@justmail.de> parents: 17029 diff changeset	219 line_buffer = io->readLine (); // image tag that is not needed
08f0e372d006 doc viewer: correct the anchor position of the desired doc entry Torsten <ttl@justmail.de> parents: 17029 diff changeset	220 line = io->readLine (); // firsts line of text message
08f0e372d006 doc viewer: correct the anchor position of the desired doc entry Torsten <ttl@justmail.de> parents: 17029 diff changeset	221 for (i=1; i<line_buffer.size ()+6; i++) // correct the size
08f0e372d006 doc viewer: correct the anchor position of the desired doc entry Torsten <ttl@justmail.de> parents: 17029 diff changeset	222 line.insert (line.size ()-1,QByteArray(" ")); // by adding blanks
08f0e372d006 doc viewer: correct the anchor position of the desired doc entry Torsten <ttl@justmail.de> parents: 17029 diff changeset	223 }
08f0e372d006 doc viewer: correct the anchor position of the desired doc entry Torsten <ttl@justmail.de> parents: 17029 diff changeset	224
08f0e372d006 doc viewer: correct the anchor position of the desired doc entry Torsten <ttl@justmail.de> parents: 17029 diff changeset	225 if (line.at (0) == '"' && line.size () == 5) // end of image construct
08f0e372d006 doc viewer: correct the anchor position of the desired doc entry Torsten <ttl@justmail.de> parents: 17029 diff changeset	226 line = " ";
08f0e372d006 doc viewer: correct the anchor position of the desired doc entry Torsten <ttl@justmail.de> parents: 17029 diff changeset	227
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	228 if (line.at(0) == 31)
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	229 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	230 break;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	231 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	232 else
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	233 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	234 text.append (line);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	235 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	236 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	237 return text;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	238 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	239
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	240 static QString
15300 fd27e10b9b05 pass QString by const reference instead of value John W. Eaton <jwe@octave.org> parents: 15286 diff changeset	241 get_first_line (const QString& text)
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	242 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	243 int n = text.indexOf ("\n");
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	244
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	245 if (n < 0)
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	246 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	247 return QString ();
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	248 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	249
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	250 QString first_line = text.left (n);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	251 return first_line;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	252 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	253
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	254 static QString
15300 fd27e10b9b05 pass QString by const reference instead of value John W. Eaton <jwe@octave.org> parents: 15286 diff changeset	255 parser_node (const QString& text, const QString& node_name)
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	256 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	257 QString firstLine = get_first_line (text);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	258 QStringList nodes = firstLine.split (",");
17790 86c6ae5f969e Use GNU style coding conventions for code in libgui/ Rik <rik@octave.org> parents: 17775 diff changeset	259 for (int i = 0; i < nodes.size (); i++)
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	260 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	261 QString node = nodes.at (i).trimmed ();
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	262
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	263 if (node.startsWith (node_name))
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	264 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	265 return node.remove (0, node_name.size ()).trimmed ();
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	266 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	267 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	268 return QString ();
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	269 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	270
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	271 QString
15300 fd27e10b9b05 pass QString by const reference instead of value John W. Eaton <jwe@octave.org> parents: 15286 diff changeset	272 parser::get_node_name (const QString& text)
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	273 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	274 return parser_node (text, "Node:");
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	275 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	276
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	277 QString
15300 fd27e10b9b05 pass QString by const reference instead of value John W. Eaton <jwe@octave.org> parents: 15286 diff changeset	278 parser::get_node_up (const QString& text)
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	279 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	280 return parser_node (text, "Up:");
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	281 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	282
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	283 QString
15300 fd27e10b9b05 pass QString by const reference instead of value John W. Eaton <jwe@octave.org> parents: 15286 diff changeset	284 parser::get_node_next (const QString& text)
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	285 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	286 return parser_node (text, "Next:");
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	287 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	288
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	289 QString
15300 fd27e10b9b05 pass QString by const reference instead of value John W. Eaton <jwe@octave.org> parents: 15286 diff changeset	290 parser::get_node_prev (const QString& text)
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	291 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	292 return parser_node (text, "Prev:");
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	293 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	294
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	295 static void
15300 fd27e10b9b05 pass QString by const reference instead of value John W. Eaton <jwe@octave.org> parents: 15286 diff changeset	296 replace_links (QString& text)
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	297 {
17768 271c0cce0f64 remove XREF from the links in the docuemntation Torsten <ttl@justmail.de> parents: 17744 diff changeset	298 QRegExp re ("(\\[N\|n]ote\|\n\\)([ \|\n]+)([^:]+):([^:\\.,]*)([:,\\.]+)");
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	299 int i = 0, f;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	300
18712 6113e0c6920b maint: Clean up extra spaces before/after parentheses. Rik <rik@octave.org> parents: 18674 diff changeset	301 while ((i = re.indexIn (text,i)) != -1)
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	302 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	303 QString type = re.cap (1);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	304 QString note = re.cap (3);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	305 QString url_link = re.cap (4);
17768 271c0cce0f64 remove XREF from the links in the docuemntation Torsten <ttl@justmail.de> parents: 17744 diff changeset	306 QString term = re.cap (5);
271c0cce0f64 remove XREF from the links in the docuemntation Torsten <ttl@justmail.de> parents: 17744 diff changeset	307
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	308 if (url_link.isEmpty ())
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	309 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	310 url_link = note;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	311 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	312
17775 016634fb3de7 imrpove conversion of link formats in documentation browser Torsten <ttl@justmail.de> parents: 17768 diff changeset	313 term.replace(":","");
016634fb3de7 imrpove conversion of link formats in documentation browser Torsten <ttl@justmail.de> parents: 17768 diff changeset	314 note.replace(":","");
016634fb3de7 imrpove conversion of link formats in documentation browser Torsten <ttl@justmail.de> parents: 17768 diff changeset	315 note.replace (QRegExp ("`([^']+)'"),"\\1"); // no extra format in links
016634fb3de7 imrpove conversion of link formats in documentation browser Torsten <ttl@justmail.de> parents: 17768 diff changeset	316
016634fb3de7 imrpove conversion of link formats in documentation browser Torsten <ttl@justmail.de> parents: 17768 diff changeset	317 QRegExp re_break ("(\n[ ]*)");
016634fb3de7 imrpove conversion of link formats in documentation browser Torsten <ttl@justmail.de> parents: 17768 diff changeset	318
016634fb3de7 imrpove conversion of link formats in documentation browser Torsten <ttl@justmail.de> parents: 17768 diff changeset	319 if (note == "fig" \|\| note == "tab")
016634fb3de7 imrpove conversion of link formats in documentation browser Torsten <ttl@justmail.de> parents: 17768 diff changeset	320 url_link.prepend("#");
016634fb3de7 imrpove conversion of link formats in documentation browser Torsten <ttl@justmail.de> parents: 17768 diff changeset	321
016634fb3de7 imrpove conversion of link formats in documentation browser Torsten <ttl@justmail.de> parents: 17768 diff changeset	322 QString href;
016634fb3de7 imrpove conversion of link formats in documentation browser Torsten <ttl@justmail.de> parents: 17768 diff changeset	323 if (type == "\n*")
016634fb3de7 imrpove conversion of link formats in documentation browser Torsten <ttl@justmail.de> parents: 17768 diff changeset	324 href="\n";
016634fb3de7 imrpove conversion of link formats in documentation browser Torsten <ttl@justmail.de> parents: 17768 diff changeset	325
016634fb3de7 imrpove conversion of link formats in documentation browser Torsten <ttl@justmail.de> parents: 17768 diff changeset	326 if (re_break.indexIn (url_link) != -1)
016634fb3de7 imrpove conversion of link formats in documentation browser Torsten <ttl@justmail.de> parents: 17768 diff changeset	327 term += re_break.cap (1);
016634fb3de7 imrpove conversion of link formats in documentation browser Torsten <ttl@justmail.de> parents: 17768 diff changeset	328 else if (re_break.indexIn (re.cap (2)) != -1)
016634fb3de7 imrpove conversion of link formats in documentation browser Torsten <ttl@justmail.de> parents: 17768 diff changeset	329 href = re_break.cap (1) + " ";
016634fb3de7 imrpove conversion of link formats in documentation browser Torsten <ttl@justmail.de> parents: 17768 diff changeset	330 else if (re_break.indexIn (note) != -1)
016634fb3de7 imrpove conversion of link formats in documentation browser Torsten <ttl@justmail.de> parents: 17768 diff changeset	331 term += re_break.cap (1);
016634fb3de7 imrpove conversion of link formats in documentation browser Torsten <ttl@justmail.de> parents: 17768 diff changeset	332 note.replace(re_break," ");
016634fb3de7 imrpove conversion of link formats in documentation browser Torsten <ttl@justmail.de> parents: 17768 diff changeset	333
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	334 url_link = url_link.trimmed ();
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	335 url_link.replace ("\n"," ");
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	336 url_link.replace (QRegExp (" +")," ");
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	337 url_link.replace ("<b>","");
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	338 url_link.replace ("</b>","");
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	339 url_link = QUrl::toPercentEncoding (url_link, "", "'");
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	340
17775 016634fb3de7 imrpove conversion of link formats in documentation browser Torsten <ttl@justmail.de> parents: 17768 diff changeset	341 href += "<img src=':/actions/icons/bookmark.png' width=10/>";
17768 271c0cce0f64 remove XREF from the links in the docuemntation Torsten <ttl@justmail.de> parents: 17744 diff changeset	342 href += " <a href='" + url_link + "'>" + note + "</a>" + term;
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	343 f = re.matchedLength ();
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	344 text.replace (i,f,href);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	345 i += href.size ();
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	346 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	347 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	348
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	349 static void
15300 fd27e10b9b05 pass QString by const reference instead of value John W. Eaton <jwe@octave.org> parents: 15286 diff changeset	350 replace_colons (QString& text)
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	351 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	352 QRegExp re ("`([^']+)'");
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	353 int i = 0, f;
18712 6113e0c6920b maint: Clean up extra spaces before/after parentheses. Rik <rik@octave.org> parents: 18674 diff changeset	354 while ((i = re.indexIn (text, i)) != -1)
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	355 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	356 QString t = re.cap (1);
17790 86c6ae5f969e Use GNU style coding conventions for code in libgui/ Rik <rik@octave.org> parents: 17775 diff changeset	357 QString bold = "<font style=\"color:SteelBlue;font-weight:bold\">" + t +
86c6ae5f969e Use GNU style coding conventions for code in libgui/ Rik <rik@octave.org> parents: 17775 diff changeset	358 "</font>";
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	359
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	360 f = re.matchedLength ();
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	361 text.replace (i,f,bold);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	362 i += bold.size ();
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	363 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	364 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	365
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	366 static void
15300 fd27e10b9b05 pass QString by const reference instead of value John W. Eaton <jwe@octave.org> parents: 15286 diff changeset	367 info_to_html (QString& text)
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	368 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	369 text.replace ("&", "&");
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	370 text.replace ("<", "<");
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	371 text.replace (">", ">");
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	372
17790 86c6ae5f969e Use GNU style coding conventions for code in libgui/ Rik <rik@octave.org> parents: 17775 diff changeset	373 text.replace ("\n* Menu:",
86c6ae5f969e Use GNU style coding conventions for code in libgui/ Rik <rik@octave.org> parents: 17775 diff changeset	374 "\n<font style=\"color:DarkRed;font-weight:bold\">Menu:</font>");
86c6ae5f969e Use GNU style coding conventions for code in libgui/ Rik <rik@octave.org> parents: 17775 diff changeset	375 text.replace ("See also:",
86c6ae5f969e Use GNU style coding conventions for code in libgui/ Rik <rik@octave.org> parents: 17775 diff changeset	376 "<font style=\"color:DarkRed;font-style:italic;font-weight:bold\">See also:</font>");
17775 016634fb3de7 imrpove conversion of link formats in documentation browser Torsten <ttl@justmail.de> parents: 17768 diff changeset	377 replace_links (text);
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	378 replace_colons (text);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	379 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	380
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	381 QString
15300 fd27e10b9b05 pass QString by const reference instead of value John W. Eaton <jwe@octave.org> parents: 15286 diff changeset	382 parser::node_text_to_html (const QString& text_arg, int anchorPos,
fd27e10b9b05 pass QString by const reference instead of value John W. Eaton <jwe@octave.org> parents: 15286 diff changeset	383 const QString& anchor)
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	384 {
15300 fd27e10b9b05 pass QString by const reference instead of value John W. Eaton <jwe@octave.org> parents: 15286 diff changeset	385 QString text = text_arg;
fd27e10b9b05 pass QString by const reference instead of value John W. Eaton <jwe@octave.org> parents: 15286 diff changeset	386
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	387 QString nodeName = get_node_name (text);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	388 QString nodeUp = get_node_up (text);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	389 QString nodeNext = get_node_next (text);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	390 QString nodePrev = get_node_prev (text);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	391
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	392 if (anchorPos > -1)
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	393 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	394 QString text1 = text.left (anchorPos);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	395 QString text2 = text.mid (anchorPos);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	396
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	397 int n = text1.indexOf ("\n");
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	398 text1.remove (0, n);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	399
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	400 info_to_html (text1);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	401 info_to_html (text2);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	402
17035 08f0e372d006 doc viewer: correct the anchor position of the desired doc entry Torsten <ttl@justmail.de> parents: 17029 diff changeset	403 text = text1 + "<a name='" + anchor
17790 86c6ae5f969e Use GNU style coding conventions for code in libgui/ Rik <rik@octave.org> parents: 17775 diff changeset	404 + "'/><img src=':/actions/icons/arrow_down.png'><br> "
86c6ae5f969e Use GNU style coding conventions for code in libgui/ Rik <rik@octave.org> parents: 17775 diff changeset	405 + text2;
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	406 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	407 else
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	408 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	409 int n = text.indexOf ("\n");
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	410 text.remove (0, n);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	411 info_to_html (text);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	412 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	413
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	414 QString navigationLinks = QString (
17768 271c0cce0f64 remove XREF from the links in the docuemntation Torsten <ttl@justmail.de> parents: 17744 diff changeset	415 "<b>Section:</b> <font style=\"color:DarkRed\">%1</font><br>"
17699 1be2993d3656 improve appearance of gui's dcoumentation browser Torsten <ttl@justmail.de> parents: 17097 diff changeset	416 "<img src=':/actions/icons/arrow_left.png'/> <b>Previous Section:</b> <a href='%2'>%3</a><br>"
1be2993d3656 improve appearance of gui's dcoumentation browser Torsten <ttl@justmail.de> parents: 17097 diff changeset	417 "<img src=':/actions/icons/arrow_right.png'/> <b>Next Section:</b> <a href='%4'>%5</a><br>"
1be2993d3656 improve appearance of gui's dcoumentation browser Torsten <ttl@justmail.de> parents: 17097 diff changeset	418 "<img src=':/actions/icons/arrow_up.png'/> <b>Up:</b> <a href='%6'>%7</a><br>\n"
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	419 )
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	420 .arg (nodeName)
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	421 .arg (QString (QUrl::toPercentEncoding (nodePrev, "", "'")))
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	422 .arg (nodePrev)
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	423 .arg (QString (QUrl::toPercentEncoding (nodeNext, "", "'")))
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	424 .arg (nodeNext)
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	425 .arg (QString (QUrl::toPercentEncoding (nodeUp, "", "'")))
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	426 .arg (nodeUp);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	427
17699 1be2993d3656 improve appearance of gui's dcoumentation browser Torsten <ttl@justmail.de> parents: 17097 diff changeset	428 text.prepend ("<hr>\n<pre style=\"font-family:monospace\">");
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	429 text.append ("</pre>\n<hr><hr>\n");
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	430 text.prepend (navigationLinks);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	431 text.append (navigationLinks);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	432 text.prepend ("<html><body>\n");
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	433 text.append ("</body></html>\n");
17035 08f0e372d006 doc viewer: correct the anchor position of the desired doc entry Torsten <ttl@justmail.de> parents: 17029 diff changeset	434
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	435 return text;
17035 08f0e372d006 doc viewer: correct the anchor position of the desired doc entry Torsten <ttl@justmail.de> parents: 17029 diff changeset	436
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	437 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	438
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	439 void
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	440 parser::parse_info_map ()
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	441 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	442 QRegExp re ("(Node\|Ref): ([^\\0177]+)\\0177(\\d+)\n");
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	443 QRegExp re_files ("([^:]+): (\\d+)\n");
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	444 int foundCount = 0;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	445
17790 86c6ae5f969e Use GNU style coding conventions for code in libgui/ Rik <rik@octave.org> parents: 17775 diff changeset	446 for (int i = 0; i < _info_files.size (); i++)
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	447 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	448 QFileInfo fileInfo = _info_files.at (i);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	449
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	450 QIODevice *io = open_file (fileInfo);
17898 8c33abdd2f9a maint: Avoid using NULL in C++ code. John W. Eaton <jwe@octave.org> parents: 17790 diff changeset	451 if (! io)
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	452 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	453 continue;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	454 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	455
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	456 QString nodeText;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	457 while (! (nodeText=get_next_node (io)).isEmpty () && foundCount < 2)
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	458 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	459 QString first_line = get_first_line (nodeText);
18712 6113e0c6920b maint: Clean up extra spaces before/after parentheses. Rik <rik@octave.org> parents: 18674 diff changeset	460 if (first_line.startsWith ("Tag"))
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	461 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	462 foundCount++;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	463 int pos = 0;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	464 QString last_node;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	465
17790 86c6ae5f969e Use GNU style coding conventions for code in libgui/ Rik <rik@octave.org> parents: 17775 diff changeset	466 while ((pos = re.indexIn (nodeText, pos)) != -1)
86c6ae5f969e Use GNU style coding conventions for code in libgui/ Rik <rik@octave.org> parents: 17775 diff changeset	467 {
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	468 QString type = re.cap (1);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	469 QString node = re.cap (2);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	470 int index = re.cap (3).toInt ();
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	471
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	472 if (type == "Node")
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	473 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	474 node_map_item item;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	475 item.pos = index;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	476 _node_map [node] = item;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	477 last_node = node;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	478 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	479 else if (type == "Ref")
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	480 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	481 node_position item;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	482 item._node_name = last_node;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	483 item.pos = index;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	484 _ref_map [node] = item;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	485 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	486 pos += re.matchedLength ();
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	487 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	488 break;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	489 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	490 else if (first_line.startsWith ("Indirect:"))
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	491 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	492 foundCount++;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	493 int pos = 0;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	494
18712 6113e0c6920b maint: Clean up extra spaces before/after parentheses. Rik <rik@octave.org> parents: 18674 diff changeset	495 while ((pos = re_files.indexIn (nodeText, pos)) != -1)
17790 86c6ae5f969e Use GNU style coding conventions for code in libgui/ Rik <rik@octave.org> parents: 17775 diff changeset	496 {
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	497 QString fileCap = re_files.cap (1).trimmed ();
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	498 int index = re_files.cap (2).toInt ();
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	499
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	500 info_file_item item;
17790 86c6ae5f969e Use GNU style coding conventions for code in libgui/ Rik <rik@octave.org> parents: 17775 diff changeset	501 for (int j = 0; j < _info_files.size (); j++)
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	502 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	503 QFileInfo info = _info_files.at (j);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	504 if (info.fileName ().startsWith (fileCap))
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	505 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	506 item.file_info = info;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	507 break;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	508 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	509 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	510 item.real_size = index;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	511 _info_file_real_size_list.append (item);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	512 pos += re_files.matchedLength ();
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	513 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	514
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	515 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	516 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	517 io->close ();
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	518 delete io;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	519 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	520 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	521
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	522 void
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	523 parser::real_position (int pos, QFileInfo & file_info, int & real_pos)
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	524 {
18100 36063e43c511 Follow coding convention of defining and initializing only 1 variable per line in libgui. Rik <rik@octave.org> parents: 17898 diff changeset	525 int header = -1;
36063e43c511 Follow coding convention of defining and initializing only 1 variable per line in libgui. Rik <rik@octave.org> parents: 17898 diff changeset	526 int sum = 0;
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	527 for (int i = 0; i < _info_file_real_size_list.size (); i++)
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	528 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	529 info_file_item item = _info_file_real_size_list.at (i);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	530 if (header == -1)
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	531 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	532 file_info = item.file_info;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	533 header = item.real_size;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	534 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	535
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	536 if (pos < item.real_size)
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	537 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	538 break;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	539 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	540
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	541 file_info = item.file_info;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	542 sum = item.real_size;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	543 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	544 real_pos = pos - sum + header + 2;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	545 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	546
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	547 void
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	548 parser::seek (QIODevice *io, int pos)
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	549 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	550 char ch;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	551 while (!io->atEnd () && pos > 0)
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	552 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	553 io->getChar (&ch);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	554 pos--;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	555 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	556 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	557
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	558 static void
15300 fd27e10b9b05 pass QString by const reference instead of value John W. Eaton <jwe@octave.org> parents: 15286 diff changeset	559 replace (QString& text, const QRegExp& re, const QString& after)
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	560 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	561 int pos = 0;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	562
18712 6113e0c6920b maint: Clean up extra spaces before/after parentheses. Rik <rik@octave.org> parents: 18674 diff changeset	563 while ((pos = re.indexIn (text, pos)) != -1)
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	564 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	565 QString cap = text.mid (pos,re.matchedLength ());
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	566 QString a (after);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	567 a = a.arg (cap);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	568 text.remove (pos, re.matchedLength ());
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	569 text.insert (pos, a);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	570 pos += a.size ();
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	571 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	572 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	573
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	574 QString
15300 fd27e10b9b05 pass QString by const reference instead of value John W. Eaton <jwe@octave.org> parents: 15286 diff changeset	575 parser::global_search (const QString& text, int max_founds)
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	576 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	577 QString results;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	578 QStringList words = text.split (" ",QString::SkipEmptyParts);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	579
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	580 QString re_program ("(" + words.at (0));
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	581 for (int i = 1; i < words.size (); i++)
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	582 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	583 re_program += "\|" + words.at (i);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	584 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	585 re_program += ")";
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	586
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	587 QRegExp re (re_program, Qt::CaseInsensitive);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	588
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	589 results.append ("<html><body>\n<h1>Search results</h1>\n<b>Results for:</b> ");
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	590 results.append (text);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	591 results.append ("<br>\n");
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	592
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	593 for (int i = 0; i < _info_files.size (); i++)
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	594 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	595 QFileInfo file_info = _info_files.at (i);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	596 QIODevice *io = open_file (file_info);
17898 8c33abdd2f9a maint: Avoid using NULL in C++ code. John W. Eaton <jwe@octave.org> parents: 17790 diff changeset	597 if (! io)
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	598 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	599 continue;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	600 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	601
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	602 QString node_text;
18712 6113e0c6920b maint: Clean up extra spaces before/after parentheses. Rik <rik@octave.org> parents: 18674 diff changeset	603 while (! (node_text = get_next_node (io)).isEmpty ())
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	604 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	605 QString firstLine = get_first_line (node_text);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	606 QString node = get_node_name (node_text);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	607 if (node.isEmpty ())
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	608 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	609 continue;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	610 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	611
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	612 int n = node_text.indexOf ("\n");
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	613 node_text.remove (0, n);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	614
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	615 int pos = 0;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	616 int founds = 0;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	617
17790 86c6ae5f969e Use GNU style coding conventions for code in libgui/ Rik <rik@octave.org> parents: 17775 diff changeset	618 for (; founds < words.size ()
86c6ae5f969e Use GNU style coding conventions for code in libgui/ Rik <rik@octave.org> parents: 17775 diff changeset	619 && node_text.indexOf (words.at (founds)) >= 0; founds++)
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	620 { }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	621
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	622 if (founds<words.size ())
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	623 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	624 continue;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	625 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	626 founds = 0;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	627
17790 86c6ae5f969e Use GNU style coding conventions for code in libgui/ Rik <rik@octave.org> parents: 17775 diff changeset	628 while ((pos = re.indexIn (node_text, pos)) != -1
86c6ae5f969e Use GNU style coding conventions for code in libgui/ Rik <rik@octave.org> parents: 17775 diff changeset	629 && founds < max_founds)
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	630 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	631 int line_start, line_end;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	632 line_start = node_text.lastIndexOf ("\n", pos);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	633 line_end = node_text.indexOf ("\n", pos);
17790 86c6ae5f969e Use GNU style coding conventions for code in libgui/ Rik <rik@octave.org> parents: 17775 diff changeset	634 QString line = node_text.mid (line_start,
86c6ae5f969e Use GNU style coding conventions for code in libgui/ Rik <rik@octave.org> parents: 17775 diff changeset	635 line_end - line_start).trimmed ();
17729 76d6a523aae6 fix display of global search in doc browser (bug #40348) Torsten <ttl@justmail.de> parents: 17699 diff changeset	636 pos += re.matchedLength ();
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	637
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	638 if (founds == 0)
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	639 {
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	640 results.append(
17790 86c6ae5f969e Use GNU style coding conventions for code in libgui/ Rik <rik@octave.org> parents: 17775 diff changeset	641 "<br>\n<img src=':/actions/icons/bookmark.png' width=10> <a href='"
86c6ae5f969e Use GNU style coding conventions for code in libgui/ Rik <rik@octave.org> parents: 17775 diff changeset	642 + QString(QUrl::toPercentEncoding(node,"","'")) +
86c6ae5f969e Use GNU style coding conventions for code in libgui/ Rik <rik@octave.org> parents: 17775 diff changeset	643 "'>");
15055 48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	644 results.append (node);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	645 results.append ("</a><br>\n");
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	646 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	647
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	648 replace (line, re, "<i>%1</i>");
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	649 results.append (line);
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	650 results.append ("<br>\n");
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	651
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	652 founds++;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	653 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	654 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	655 io->close ();
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	656 delete io;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	657 }
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	658
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	659 results.append ("</body></html>");
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	660 return results;
48ae6a7c69c1 Integrated texinfo browser from QtOctave. Jacob Dawid <jacob.dawid@gmail.com> parents: diff changeset	661 }
17029 359c5ca795cd Display doc info pages using documentation browser when in GUI mode (Bug #39451) John Donoghue <john.donoghue@ieee.org> parents: 16768 diff changeset	662
17790 86c6ae5f969e Use GNU style coding conventions for code in libgui/ Rik <rik@octave.org> parents: 17775 diff changeset	663 QString
17029 359c5ca795cd Display doc info pages using documentation browser when in GUI mode (Bug #39451) John Donoghue <john.donoghue@ieee.org> parents: 16768 diff changeset	664 parser::find_ref (const QString &ref_name)
359c5ca795cd Display doc info pages using documentation browser when in GUI mode (Bug #39451) John Donoghue <john.donoghue@ieee.org> parents: 16768 diff changeset	665 {
359c5ca795cd Display doc info pages using documentation browser when in GUI mode (Bug #39451) John Donoghue <john.donoghue@ieee.org> parents: 16768 diff changeset	666 QString text = "";
359c5ca795cd Display doc info pages using documentation browser when in GUI mode (Bug #39451) John Donoghue <john.donoghue@ieee.org> parents: 16768 diff changeset	667
359c5ca795cd Display doc info pages using documentation browser when in GUI mode (Bug #39451) John Donoghue <john.donoghue@ieee.org> parents: 16768 diff changeset	668 QHash<QString,node_position>::iterator it;
17790 86c6ae5f969e Use GNU style coding conventions for code in libgui/ Rik <rik@octave.org> parents: 17775 diff changeset	669 for (it=_ref_map.begin (); it!=_ref_map.end (); ++it)
17029 359c5ca795cd Display doc info pages using documentation browser when in GUI mode (Bug #39451) John Donoghue <john.donoghue@ieee.org> parents: 16768 diff changeset	670 {
359c5ca795cd Display doc info pages using documentation browser when in GUI mode (Bug #39451) John Donoghue <john.donoghue@ieee.org> parents: 16768 diff changeset	671 QString k = it.key ();
359c5ca795cd Display doc info pages using documentation browser when in GUI mode (Bug #39451) John Donoghue <john.donoghue@ieee.org> parents: 16768 diff changeset	672 node_position p = it.value ();
359c5ca795cd Display doc info pages using documentation browser when in GUI mode (Bug #39451) John Donoghue <john.donoghue@ieee.org> parents: 16768 diff changeset	673
17097 e7a059a9a644 doc: Use XREF as anchor prefix in documentation for clearer results in Info viewer. Rik <rik@octave.org> parents: 17035 diff changeset	674 if (k == "XREF" + ref_name)
17029 359c5ca795cd Display doc info pages using documentation browser when in GUI mode (Bug #39451) John Donoghue <john.donoghue@ieee.org> parents: 16768 diff changeset	675 {
359c5ca795cd Display doc info pages using documentation browser when in GUI mode (Bug #39451) John Donoghue <john.donoghue@ieee.org> parents: 16768 diff changeset	676 // found ref, so return its name
17097 e7a059a9a644 doc: Use XREF as anchor prefix in documentation for clearer results in Info viewer. Rik <rik@octave.org> parents: 17035 diff changeset	677 text = "XREF" + ref_name;
19479 8c47eb286151 open doc browser for keywords correctly (bug #41110) Torsten <ttl@justmail.de> parents: 17898 diff changeset	678 break;
17029 359c5ca795cd Display doc info pages using documentation browser when in GUI mode (Bug #39451) John Donoghue <john.donoghue@ieee.org> parents: 16768 diff changeset	679 }
359c5ca795cd Display doc info pages using documentation browser when in GUI mode (Bug #39451) John Donoghue <john.donoghue@ieee.org> parents: 16768 diff changeset	680 }
19479 8c47eb286151 open doc browser for keywords correctly (bug #41110) Torsten <ttl@justmail.de> parents: 17898 diff changeset	681
8c47eb286151 open doc browser for keywords correctly (bug #41110) Torsten <ttl@justmail.de> parents: 17898 diff changeset	682 if (text.isEmpty ()) // try the statement-nodes
8c47eb286151 open doc browser for keywords correctly (bug #41110) Torsten <ttl@justmail.de> parents: 17898 diff changeset	683 {
8c47eb286151 open doc browser for keywords correctly (bug #41110) Torsten <ttl@justmail.de> parents: 17898 diff changeset	684 QHash<QString, node_map_item>::iterator itn;
8c47eb286151 open doc browser for keywords correctly (bug #41110) Torsten <ttl@justmail.de> parents: 17898 diff changeset	685 for (itn=_node_map.begin (); itn!=_node_map.end (); ++itn)
8c47eb286151 open doc browser for keywords correctly (bug #41110) Torsten <ttl@justmail.de> parents: 17898 diff changeset	686 {
8c47eb286151 open doc browser for keywords correctly (bug #41110) Torsten <ttl@justmail.de> parents: 17898 diff changeset	687 QString k = itn.key ();
8c47eb286151 open doc browser for keywords correctly (bug #41110) Torsten <ttl@justmail.de> parents: 17898 diff changeset	688 if (k == "The " + ref_name + " Statement")
8c47eb286151 open doc browser for keywords correctly (bug #41110) Torsten <ttl@justmail.de> parents: 17898 diff changeset	689 {
8c47eb286151 open doc browser for keywords correctly (bug #41110) Torsten <ttl@justmail.de> parents: 17898 diff changeset	690 // found ref, so return its name
8c47eb286151 open doc browser for keywords correctly (bug #41110) Torsten <ttl@justmail.de> parents: 17898 diff changeset	691 text = k;
8c47eb286151 open doc browser for keywords correctly (bug #41110) Torsten <ttl@justmail.de> parents: 17898 diff changeset	692 break;
8c47eb286151 open doc browser for keywords correctly (bug #41110) Torsten <ttl@justmail.de> parents: 17898 diff changeset	693 }
8c47eb286151 open doc browser for keywords correctly (bug #41110) Torsten <ttl@justmail.de> parents: 17898 diff changeset	694 }
8c47eb286151 open doc browser for keywords correctly (bug #41110) Torsten <ttl@justmail.de> parents: 17898 diff changeset	695 }
8c47eb286151 open doc browser for keywords correctly (bug #41110) Torsten <ttl@justmail.de> parents: 17898 diff changeset	696
17029 359c5ca795cd Display doc info pages using documentation browser when in GUI mode (Bug #39451) John Donoghue <john.donoghue@ieee.org> parents: 16768 diff changeset	697 return text;
359c5ca795cd Display doc info pages using documentation browser when in GUI mode (Bug #39451) John Donoghue <john.donoghue@ieee.org> parents: 16768 diff changeset	698 }
359c5ca795cd Display doc info pages using documentation browser when in GUI mode (Bug #39451) John Donoghue <john.donoghue@ieee.org> parents: 16768 diff changeset	699

Mercurial > octave-nkf

annotate libgui/src/qtinfo/parser.cc @ 19558:ffc339cea115