summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/luatexdir/lua/lepdflib.cc
diff options
context:
space:
mode:
Diffstat (limited to 'Build/source/texk/web2c/luatexdir/lua/lepdflib.cc')
-rw-r--r--Build/source/texk/web2c/luatexdir/lua/lepdflib.cc58
1 files changed, 58 insertions, 0 deletions
diff --git a/Build/source/texk/web2c/luatexdir/lua/lepdflib.cc b/Build/source/texk/web2c/luatexdir/lua/lepdflib.cc
new file mode 100644
index 00000000000..551cc2d1ee3
--- /dev/null
+++ b/Build/source/texk/web2c/luatexdir/lua/lepdflib.cc
@@ -0,0 +1,58 @@
+/* lepdflib.cc
+
+ Copyright 2009-2010 Taco Hoekwater <taco@luatex.org>
+
+ This file is part of LuaTeX.
+
+ LuaTeX 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.
+
+ LuaTeX 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 Lesser General Public
+ License for more details.
+
+ You should have received a copy of the GNU General Public License along
+ with LuaTeX; if not, see <http://www.gnu.org/licenses/>. */
+
+static const char _svn_version[] =
+ "$Id: lepdflib.cc 3366 2010-01-20 14:49:31Z taco $ "
+ "$URL: http://foundry.supelec.fr/svn/luatex/tags/beta-0.60.0/source/texk/web2c/luatexdir/lua/lepdflib.cc $";
+
+#include "image/epdf.h"
+
+//**********************************************************************
+
+int l_new_pdfdoc(lua_State * L)
+{
+ PdfDocument *pdf_doc;
+ char *file_path;
+ if (lua_gettop(L) != 1)
+ luaL_error(L, "epdf.new() needs exactly 1 argument");
+ if (!lua_isstring(L, -1))
+ luaL_error(L, "epdf.new() needs filename (string)");
+ file_path = (char *) lua_tostring(L, -1);
+
+ printf("\n======================== 1 <%s>\n", file_path);
+
+ pdf_doc = refPdfDocument(file_path);
+
+ return 0;
+}
+
+//**********************************************************************
+
+static const struct luaL_Reg epdflib[] = {
+ // {"new", l_new_pdfdoc},
+ {NULL, NULL} /* sentinel */
+};
+
+int luaopen_epdf(lua_State * L)
+{
+ luaL_register(L, "epdf", epdflib);
+ return 1;
+}
+
+//**********************************************************************