Book a Demo!
CoCalc Logo Icon
StoreFeaturesDocsShareSupportNewsAboutPoliciesSign UpSign In
Download

open-axiom repository from github

24005 views
1
// Copyright (C) 2013-2014, Gabriel Dos Reis.
2
// All rights reserved.
3
// Written by Gabriel Dos Reis.
4
//
5
// Redistribution and use in source and binary forms, with or without
6
// modification, are permitted provided that the following conditions are
7
// met:
8
//
9
// - Redistributions of source code must retain the above copyright
10
// notice, this list of conditions and the following disclaimer.
11
//
12
// - Redistributions in binary form must reproduce the above copyright
13
// notice, this list of conditions and the following disclaimer in
14
// the documentation and/or other materials provided with the
15
// distribution.
16
//
17
// - Neither the name of OpenAxiom. nor the names of its contributors
18
// may be used to endorse or promote products derived from this
19
// software without specific prior written permission.
20
//
21
// THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS
22
// IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
23
// TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A
24
// PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER
25
// OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
26
// EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
27
// PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
28
// PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
29
// LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
30
// NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
31
// SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
32
33
#include "server.h"
34
35
namespace OpenAxiom {
36
static Command
37
process_arguments(int argc, char* argv[]) {
38
Command cmd;
39
preprocess_arguments(&cmd, argc, argv);
40
return cmd;
41
}
42
43
Server::Server(int argc, char* argv[])
44
: cmd(process_arguments(argc, argv)),
45
fs(cmd.root_dir),
46
interp_db(fs.dbdir() + "/interp.daase")
47
{ }
48
49
Server::~Server() {
50
if (state() == QProcess::Running)
51
terminate();
52
}
53
54
void
55
Server::input(const QString& s) {
56
write(s.toLatin1());
57
write("\n");
58
}
59
60
void
61
Server::launch() {
62
QStringList args;
63
for (auto arg : cmd.rt_args)
64
args << arg;
65
args << "--" << "--role=server";
66
for (int i = 1; i < cmd.core.argc; ++i)
67
args << cmd.core.argv[i];
68
start(make_path_for(cmd.root_dir, Driver::core), args);
69
}
70
}
71
72