Adding upstream version 8.4.4.upstream/8.4.4upstream

Signed-off-by: Daniel Baumann <daniel.baumann@progress-linux.org>

1 files changed, 121 insertions, 0 deletions

diff --git a/lib/clippy.c b/lib/clippy.c
new file mode 100644
index 0000000..7ca99c9
--- /dev/null
+++ b/lib/clippy.c
@@ -0,0 +1,121 @@
+/*
+ * clippy (CLI preparator in python) main executable
+ * Copyright (C) 2016-2017  David Lamparter for NetDEF, Inc.
+ *
+ * This program 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.
+ *
+ * This program 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 this program; see the file COPYING; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
+ */
+
+#include "config.h"
+#include <Python.h>
+#include <string.h>
+#include <stdlib.h>
+#include <wchar.h>
+#include "getopt.h"
+
+#include "command_graph.h"
+#include "clippy.h"
+
+#if PY_MAJOR_VERSION >= 3
+#define pychar wchar_t
+static wchar_t *wconv(const char *s)
+{
+	size_t outlen = s ? mbstowcs(NULL, s, 0) : 0;
+	wchar_t *out = malloc((outlen + 1) * sizeof(wchar_t));
+
+	if (outlen > 0)
+		mbstowcs(out, s, outlen);
+	out[outlen] = 0;
+	return out;
+}
+#else
+#define pychar char
+#define wconv(x) x
+#endif
+
+int main(int argc, char **argv)
+{
+	pychar **wargv;
+
+#if PY_VERSION_HEX >= 0x03040000 /* 3.4 */
+	Py_SetStandardStreamEncoding("UTF-8", NULL);
+#endif
+	wchar_t *name = wconv(argv[0]);
+	Py_SetProgramName(name);
+	PyImport_AppendInittab("_clippy", command_py_init);
+
+	Py_Initialize();
+
+	wargv = malloc(argc * sizeof(pychar *));
+	for (int i = 1; i < argc; i++)
+		wargv[i - 1] = wconv(argv[i]);
+	PySys_SetArgv(argc - 1, wargv);
+
+	const char *pyfile = argc > 1 ? argv[1] : NULL;
+	FILE *fp;
+	if (pyfile) {
+		fp = fopen(pyfile, "r");
+		if (!fp) {
+			fprintf(stderr, "%s: %s\n", pyfile, strerror(errno));
+
+			free(name);
+			return 1;
+		}
+	} else {
+		fp = stdin;
+		char *ver = strdup(Py_GetVersion());
+		char *cr = strchr(ver, '\n');
+		if (cr)
+			*cr = ' ';
+		fprintf(stderr, "clippy interactive shell\n(Python %s)\n", ver);
+		free(ver);
+		PyRun_SimpleString(
+			"import rlcompleter, readline\n"
+			"readline.parse_and_bind('tab: complete')");
+	}
+
+	if (PyRun_AnyFile(fp, pyfile)) {
+		if (PyErr_Occurred())
+			PyErr_Print();
+
+		free(name);
+		return 1;
+	}
+	Py_Finalize();
+
+#if PY_MAJOR_VERSION >= 3
+	for (int i = 1; i < argc; i++)
+		free(wargv[i - 1]);
+#endif
+	free(name);
+	free(wargv);
+	return 0;
+}
+
+/* and now for the ugly part... provide simplified logging functions so we
+ * don't need to link libzebra (which would be a circular build dep) */
+
+#include "log.h"
+
+void vzlogx(const struct xref_logmsg *xref, int prio,
+	    const char *format, va_list args)
+{
+	vfprintf(stderr, format, args);
+	fputs("\n", stderr);
+}
+
+void memory_oom(size_t size, const char *name)
+{
+	abort();
+}