Skip to content
Projects
Groups
Snippets
Help
Loading...
Sign in / Register
Toggle navigation
M
mongoose
Project
Project
Details
Activity
Cycle Analytics
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Charts
Issues
0
Issues
0
List
Board
Labels
Milestones
Merge Requests
0
Merge Requests
0
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Charts
Packages
Packages
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Charts
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
submodule
mongoose
Commits
18b1e953
Commit
18b1e953
authored
Jan 06, 2014
by
Sergey Lyubka
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
LSP functionality
parent
407877a4
Show whitespace changes
Inline
Side-by-side
Showing
3 changed files
with
100 additions
and
60 deletions
+100
-60
page.lp
build/test/page.lp
+12
-2
LuaSqlite.md
docs/LuaSqlite.md
+30
-45
mongoose.c
mongoose.c
+58
-13
No files found.
build/test/page.lp
View file @
18b1e953
HTTP/1.0 200 OK
HTTP/1.0 200 OK
Content-Type: text/html
Content-Type: text/html
<html><body>
<html>
<head>
<meta
http-equiv=
"Content-type"
content=
"text/html;charset=UTF-8"
>
</head>
<body>
<p>
This is an example Lua server page served by
<p>
This is an example Lua server page served by
...
@@ -22,6 +26,7 @@ all requests done previously.</p>
...
@@ -22,6 +26,7 @@ all requests done previously.</p>
-- db:trace(function(data, sql) mg.write('Executing: ', sql: '\n') end, nil)
-- db:trace(function(data, sql) mg.write('Executing: ', sql: '\n') end, nil)
-- Create a table if it is not created already
-- Create a table if it is not created already
db:exec('PRAGMA encoding="UTF-8"; ')
db:exec([[
db:exec([[
CREATE TABLE IF NOT EXISTS requests (
CREATE TABLE IF NOT EXISTS requests (
id INTEGER PRIMARY KEY AUTOINCREMENT,
id INTEGER PRIMARY KEY AUTOINCREMENT,
...
@@ -54,4 +59,9 @@ all requests done previously.</p>
...
@@ -54,4 +59,9 @@ all requests done previously.</p>
-- Close database
-- Close database
db:close()
db:close()
?>
?>
</pre></body></html>
</pre>
This is an example on how to include files a-la SSI:
<pre>
<? mg.write(io.open('dll.def'):read('*all')) ?>
</pre>
</body></html>
docs/LuaSqlite.md
View file @
18b1e953
# Mongoose Lua Server Pages
# Mongoose Lua Server Pages
Pre-built Windows and Mac mongoose binaries have built-in Lua Server Pages
Pre-built Windows and Mac mongoose binaries support Lua Server Pages
support. That means it is possible to write PHP-like scripts with mongoose,
functionality.
That means it is possible to write PHP-like scripts with mongoose
using Lua programming language instead of PHP. Lua is known
using Lua programming language instead of PHP. Lua is known
for it's speed and small size. Mongoose uses Lua version 5.2.1, the
for it's speed and small size. Mongoose uses Lua version 5.2.1, the
documentation for it can be found at
documentation for it can be found at
[
Lua 5.2 reference manual
](
http://www.lua.org/manual/5.2/
)
.
[
Lua 5.2 reference manual
](
http://www.lua.org/manual/5.2/
)
.
To create a Lua Page, make sure a file has
`.lp`
extension. For example,
To create a Lua Page, make a file that is called
`<something>.lp`
. For example,
let's say it is going to be
`my_page.lp`
. The contents of the file, just like
let's say it is going to be
`my_page.lp`
. It is important to have a file
with PHP, is HTML with embedded Lua code. Lua code must be enclosed in
name that ends up with
`.lp`
, cause this is the way mongoose recognises
`<? ?>`
blocks, and can appear anywhere on the page. For example, to
Lua Page file. The contents of the file, just like
print current weekday name, one can write:
with PHP, is HTML with embedded Lua code. Lua code must be enclosed within
`<? ?>`
blocks, and can appear anywhere on the page.
<p>
Mongoose does not send HTTP headers for Lua pages. Therefore,
<span>Today is:</span>
every Lua Page must begin with HTTP status line and headers, like this:
<? mg.write(os.date("%A")) ?>
</p>
<? mg.write('HTTP/1.0 200 OK\r\nContent-Type: text/html\r\n\r\n') ?>
<html><body>
<span>Today is:</span> <? mg.write(os.date("%A")) ?>
</body></html>
Note that this example uses function
`mg.write()`
, which prints data to the
Note that this example uses function
`mg.write()`
, which prints data to the
web page. Using function
`mg.write()`
is the way to generate web content from
web page. Using function
`mg.write()`
is the way to generate web content from
inside Lua code. In addition to
`mg.write()`
, all standard library functions
inside Lua code. In addition to
`mg.write()`
, all standard library functions
are accessible from the Lua code (please check reference manual for details)
,
are accessible from the Lua code (please check reference manual for details)
.
and also information about the request is available in
`mg.request_info`
object,
Information about the request is available in
`mg.request_info`
object.
like
request method, all headers, etcetera. Please refer to
I contains
request method, all headers, etcetera. Please refer to
`struct mg_request_info`
definition in
`struct mg_request_info`
definition in
[
mongoose.h
](
https://github.com/cesanta/mongoose/blob/master/mongoose.h
)
[
mongoose.h
](
https://github.com/cesanta/mongoose/blob/master/mongoose.h
)
to see what
kind of information is present in
`mg.request_info`
object
. Also,
to see what
is available in
`mg.request_info`
. Also,
[
page.lp
](
https://github.com/cesanta/mongoose/blob/master/test/page.lp
)
and
[
page.lp
](
https://github.com/cesanta/mongoose/blob/master/test/page.lp
)
and
[
prime_numbers.lp
](
https://github.com/cesanta/mongoose/blob/master/examples/lua/prime_numbers.lp
)
[
prime_numbers.lp
](
https://github.com/cesanta/mongoose/blob/master/examples/lua/prime_numbers.lp
)
contains some example code that uses
`request_info`
and other functions(form submitting for example).
contain some example code that uses
`request_info`
and other functions,
like form submission.
Mongoose exports the following to the Lua server page:
Mongoose exports the following to the Lua server page:
mg.read() -- reads a chunk from POST data, returns it as a string
mg.write(str) -- writes string to the client
mg.write(str) -- writes string to the client
mg.include(path) -- sources another Lua file
mg.redirect(uri) -- internal redirect to a given URI
mg.onerror(msg) -- error handler, can be overridden
mg.onerror(msg) -- error handler, can be overridden
mg.version -- a string that holds Mongoose version
mg.request_info -- a table with request information
mg.request_info -- a table with request information
sqlite3 -- Sqlite3 interface
-- Connect to the remote TCP server. This function is an implementation
slite3 functions are documented at
[
lua.sqlite.org
](
http://lua.sqlite.org/
)
,
-- of simple socket interface. It returns a socket object with three
and usage example is at
-- methods: send, recv, close, which are synchronous (blocking).
[
page.lp
](
https://github.com/cesanta/mongoose/blob/master/test/page.lp
)
.
-- connect() throws an exception on connection error.
connect(host, port, use_ssl)
-- Example of using connect() interface:
Using Lua scripting it is easy to emulate SSI functionality. For example,
local host = 'code.google.com' -- IP address or domain name
to include the content of another file, one can write:
local ok, sock = pcall(connect, host, 80, 1)
if ok then
sock:send('GET /p/mongoose/ HTTP/1.0\r\n' ..
'Host: ' .. host .. '\r\n\r\n')
local reply = sock:recv()
sock:close()
-- reply now contains the web page https://code.google.com/p/mongoose
end
<? mg.write(io.open('MY_FILE.TXT'):read('*all')) ?>
**
IMPORTANT: Mongoose does not send HTTP headers for Lua pages. Therefore,
To serve a Lua Page, mongoose creates Lua context. That context is used for
every Lua Page must begin with HTTP reply line and headers
**
, like this:
<? print('HTTP/1.0 200 OK\r\nContent-Type: text/html\r\n\r\n') ?>
<html><body>
... the rest of the web page ...
To serve Lua Page, mongoose creates Lua context. That context is used for
all Lua blocks within the page. That means, all Lua blocks on the same page
all Lua blocks within the page. That means, all Lua blocks on the same page
share the same context. If one block defines a variable, for example, that
share the same context. If one block defines a variable, for example, that
variable is visible in the block that follows.
variable is visible in the block that follows.
mongoose.c
View file @
18b1e953
...
@@ -156,7 +156,7 @@ struct ll { struct ll *prev, *next; };
...
@@ -156,7 +156,7 @@ struct ll { struct ll *prev, *next; };
#define MAX_REQUEST_SIZE 16384
#define MAX_REQUEST_SIZE 16384
#define IOBUF_SIZE 8192
#define IOBUF_SIZE 8192
#define MAX_PATH_SIZE 8192
#define MAX_PATH_SIZE 8192
#define LUA_SCRIPT_PATTERN "**.
mg.lua
$"
#define LUA_SCRIPT_PATTERN "**.
lp
$"
#define CGI_ENVIRONMENT_SIZE 4096
#define CGI_ENVIRONMENT_SIZE 4096
#define MAX_CGI_ENVIR_VARS 64
#define MAX_CGI_ENVIR_VARS 64
#define ENV_EXPORT_TO_CGI "MONGOOSE_CGI"
#define ENV_EXPORT_TO_CGI "MONGOOSE_CGI"
...
@@ -2802,6 +2802,23 @@ int mg_parse_header(const char *str, const char *var_name, char *buf,
...
@@ -2802,6 +2802,23 @@ int mg_parse_header(const char *str, const char *var_name, char *buf,
#ifdef USE_LUA
#ifdef USE_LUA
#include "lua_5.2.1.h"
#include "lua_5.2.1.h"
#ifdef _WIN32
static
void
*
mmap
(
void
*
addr
,
int64_t
len
,
int
prot
,
int
flags
,
int
fd
,
int
offset
)
{
HANDLE
fh
=
(
HANDLE
)
_get_osfhandle
(
fd
);
HANDLE
mh
=
CreateFileMapping
(
fh
,
0
,
PAGE_READONLY
,
0
,
0
,
0
);
void
*
p
=
MapViewOfFile
(
mh
,
FILE_MAP_READ
,
0
,
0
,
(
size_t
)
len
);
CloseHandle
(
mh
);
return
p
;
}
#define munmap(x, y) UnmapViewOfFile(x)
#define MAP_FAILED NULL
#define MAP_PRIVATE 0
#define PROT_READ 0
#else
#include <sys/mman.h>
#endif
static
void
reg_string
(
struct
lua_State
*
L
,
const
char
*
name
,
const
char
*
val
)
{
static
void
reg_string
(
struct
lua_State
*
L
,
const
char
*
name
,
const
char
*
val
)
{
lua_pushstring
(
L
,
name
);
lua_pushstring
(
L
,
name
);
lua_pushstring
(
L
,
val
);
lua_pushstring
(
L
,
val
);
...
@@ -3003,22 +3020,50 @@ static int lua_error_handler(lua_State *L) {
...
@@ -3003,22 +3020,50 @@ static int lua_error_handler(lua_State *L) {
return
0
;
return
0
;
}
}
static
void
handle_lua_request
(
struct
connection
*
conn
,
const
char
*
path
)
{
static
void
lsp
(
struct
connection
*
conn
,
const
char
*
p
,
int
len
,
lua_State
*
L
)
{
lua_State
*
L
;
int
i
,
j
,
pos
=
0
;
for
(
i
=
0
;
i
<
len
;
i
++
)
{
if
(
p
[
i
]
==
'<'
&&
p
[
i
+
1
]
==
'?'
)
{
for
(
j
=
i
+
1
;
j
<
len
;
j
++
)
{
if
(
p
[
j
]
==
'?'
&&
p
[
j
+
1
]
==
'>'
)
{
mg_write
(
&
conn
->
mg_conn
,
p
+
pos
,
i
-
pos
);
if
(
luaL_loadbuffer
(
L
,
p
+
(
i
+
2
),
j
-
(
i
+
2
),
""
)
==
LUA_OK
)
{
lua_pcall
(
L
,
0
,
LUA_MULTRET
,
0
);
}
pos
=
j
+
2
;
i
=
pos
-
1
;
break
;
}
}
}
}
if
(
i
>
pos
)
mg_write
(
&
conn
->
mg_conn
,
p
+
pos
,
i
-
pos
);
}
if
(
path
!=
NULL
&&
(
L
=
luaL_newstate
())
!=
NULL
)
{
static
void
handle_lsp_request
(
struct
connection
*
conn
,
const
char
*
path
,
file_stat_t
*
st
)
{
void
*
p
=
NULL
;
lua_State
*
L
=
NULL
;
FILE
*
fp
=
NULL
;
if
((
fp
=
fopen
(
path
,
"r"
))
==
NULL
||
(
p
=
mmap
(
NULL
,
st
->
st_size
,
PROT_READ
,
MAP_PRIVATE
,
fileno
(
fp
),
0
))
==
MAP_FAILED
||
(
L
=
luaL_newstate
())
==
NULL
)
{
send_http_error
(
conn
,
500
);
}
else
{
// We're not sending HTTP headers here, Lua page must do it.
prepare_lua_environment
(
&
conn
->
mg_conn
,
L
);
prepare_lua_environment
(
&
conn
->
mg_conn
,
L
);
lua_pushcclosure
(
L
,
&
lua_error_handler
,
0
);
lua_pushcclosure
(
L
,
&
lua_error_handler
,
0
);
lua_pushglobaltable
(
L
);
lua_pushglobaltable
(
L
);
lsp
(
conn
,
p
,
st
->
st_size
,
L
);
if
(
luaL_loadfile
(
L
,
path
)
!=
0
)
{
lua_error_handler
(
L
);
}
lua_pcall
(
L
,
0
,
0
,
-
2
);
lua_close
(
L
);
}
close_local_endpoint
(
conn
);
close_local_endpoint
(
conn
);
}
if
(
L
!=
NULL
)
lua_close
(
L
);
if
(
p
!=
NULL
)
munmap
(
p
,
st
->
st_size
);
if
(
fp
!=
NULL
)
fclose
(
fp
);
}
}
#endif // USE_LUA
#endif // USE_LUA
...
@@ -3090,7 +3135,7 @@ static void open_local_endpoint(struct connection *conn) {
...
@@ -3090,7 +3135,7 @@ static void open_local_endpoint(struct connection *conn) {
}
}
}
else
if
(
match_prefix
(
lua_pat
,
sizeof
(
lua_pat
)
-
1
,
path
)
>
0
)
{
}
else
if
(
match_prefix
(
lua_pat
,
sizeof
(
lua_pat
)
-
1
,
path
)
>
0
)
{
#ifdef USE_LUA
#ifdef USE_LUA
handle_l
ua_request
(
conn
,
path
);
handle_l
sp_request
(
conn
,
path
,
&
st
);
#else
#else
send_http_error
(
conn
,
501
);
send_http_error
(
conn
,
501
);
#endif
#endif
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment