1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
|
/******************************************************************************
* *
* Copyright (C) 2006-2009 by Tor Andersson. *
* Copyright (C) 2009 by Baltasar García Perez-Schofield. *
* Copyright (C) 2010 by Ben Cressey. *
* Copyright (C) 2021 by Chris Spiegel. *
* *
* This file is part of Gargoyle. *
* *
* Gargoyle is free software; you can redistribute it and/or modify *
* it under the terms of the GNU General Public License as published by *
* the Free Software Foundation; either version 2 of the License, or *
* (at your option) any later version. *
* *
* Gargoyle is distributed in the hope that it will be useful, *
* but WITHOUT ANY WARRANTY; without even the implied warranty of *
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
* GNU General Public License for more details. *
* *
* You should have received a copy of the GNU General Public License *
* along with Gargoyle; if not, write to the Free Software *
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA *
* *
*****************************************************************************/
#include <algorithm>
#include <cerrno>
#include <cstdio>
#include <cstdlib>
#include <cstring>
#include <sstream>
#include <string>
#include <QApplication>
#include <QDir>
#include <QFileDialog>
#include <QList>
#include <QMessageBox>
#include <QProcess>
#include <QPushButton>
#include <QString>
#include <QStringList>
#include <QVector>
#include "glk.h"
#include "garversion.h"
#include "launcher.h"
static const char *AppName = "Gargoyle " VERSION;
class Filter {
public:
Filter(const QString &name, const QStringList &extensions) : m_name(name), m_extensions(extensions) {}
QString format() const {
return QString("%1 Games (%2)")
.arg(m_name, format_extensions().join(" "));
}
QStringList format_extensions() const {
QList<QString> mapped_extensions;
std::transform(m_extensions.begin(), m_extensions.end(),
std::back_inserter(mapped_extensions),
[](const QString &ext) { return QString("*.") + ext; });
return mapped_extensions;
}
private:
QString m_name;
QStringList m_extensions;
};
void garglk::winmsg(const std::string &msg)
{
QMessageBox::critical(nullptr, "Error", msg.c_str());
}
static QString winbrowsefile()
{
const QVector<Filter> filters = {
Filter("Adrift", {"taf"}),
Filter("AdvSys", {"dat"}),
Filter("AGT", {"agx", "d$$"}),
Filter("Alan", {"acd", "a3c"}),
Filter("Glulx", {"ulx", "blb", "blorb", "glb", "gblorb"}),
Filter("Hugo", {"hex"}),
Filter("JACL", {"jacl", "j2"}),
Filter("Level 9", {"l9", "sna"}),
Filter("Magnetic Scrolls", {"mag"}),
Filter("TADS", {"gam", "t3"}),
Filter("Z-code", {"z1", "z2", "z3", "z4", "z5", "z6", "z7", "z8", "zlb", "zblorb"}),
};
QList<QString> mapped_filters;
std::transform(filters.begin(), filters.end(),
std::back_inserter(mapped_filters),
[](const Filter &filter) { return filter.format(); });
QStringList all_extensions;
for (const auto &filter : filters)
{
all_extensions << filter.format_extensions();
}
QString filter_string = QString("All Games (%1);;All Files (*);;%2")
.arg(all_extensions.join(" "), mapped_filters.join(";;"));
// Hide filter details because the sheer number in "All Games" makes
// the dialog ridiculously wide (Qt probably should cut it off, but
// it doesn't, so try to compensate here).
QFileDialog::Options options(QFileDialog::HideNameFilterDetails);
#ifdef GARGLK_NO_NATIVE_FILE_DIALOGS
options |= QFileDialog::DontUseNativeDialog;
#endif
return QFileDialog::getOpenFileName(nullptr, AppName, "", filter_string, nullptr, options);
}
int garglk::winterp(const std::string &path, const std::string &exe, const std::string &flags, const std::string &game)
{
QString argv0 = QDir(path.c_str()).absoluteFilePath(exe.c_str());
QStringList args;
if (flags.find('-') != std::string::npos)
args = QStringList({flags.c_str(), game.c_str()});
else
args = QStringList({game.c_str()});
QProcess proc;
proc.setProcessChannelMode(QProcess::ForwardedChannels);
proc.start(argv0, args);
if (!proc.waitForStarted(5000))
{
garglk::winmsg("Could not start interpreter " + argv0.toStdString());
return 1;
}
proc.waitForFinished(-1);
if (proc.exitStatus() != QProcess::NormalExit)
return 1;
else
return proc.exitCode();
}
int main(int argc, char **argv)
{
QApplication app(argc, argv);
QString story;
// Find the directory that contains the interpreters. By default
// this is GARGLK_INTERPRETER_DIR but if that is not set, it is the
// containing directory of the gargoyle executable.
//
// For development purposes, the environment variable
// $GARGLK_INTERPRETER_DIR can be set to the interpreter build
// directory to allow the gargoyle binary to load the newly-built
// interpreters instead of the system-wide interpreters (or instead
// of failing if there are no interpreters installed). If this is
// set, the standard directory will *not* be used at all, even if no
// interpreter is found.
QString dir = getenv("GARGLK_INTERPRETER_DIR");
if (dir.isNull())
#ifdef GARGLK_INTERPRETER_DIR
dir = GARGLK_INTERPRETER_DIR;
#else
dir = "/usr/lib/gargoyle";
#endif
/* get story file */
if (argc >= 2)
story = argv[1];
else
story = winbrowsefile();
if (story.isEmpty())
return 1;
/* run story file */
std::string dir_string = dir.toStdString();
std::string story_string = story.toStdString();
return garglk::rungame(dir_string.c_str(), story_string.c_str());
}
|
