| author | Kim Alvefur <zash@zash.se> |
| Tue, 24 Nov 2015 19:09:51 +0100 | |
| changeset 6941 | 9df70e9e006b |
| parent 6940 | f5d2e58fbefa |
| child 6942 | a9ae0c6ac4f4 |
| permissions | -rw-r--r-- |
| 6940 | 1 |
|
2 |
local function new_session(typ) |
|
3 |
local session = { |
|
4 |
type = typ .. "_unauthed"; |
|
5 |
}; |
|
6 |
return session; |
|
7 |
end |
|
8 |
||
|
6941
9df70e9e006b
util.session: What is the identity of a session?
Kim Alvefur <zash@zash.se>
parents:
6940
diff
changeset
|
9 |
local function set_id(session) |
|
9df70e9e006b
util.session: What is the identity of a session?
Kim Alvefur <zash@zash.se>
parents:
6940
diff
changeset
|
10 |
local id = typ .. tostring(session):match("%x+$"):lower(); |
|
9df70e9e006b
util.session: What is the identity of a session?
Kim Alvefur <zash@zash.se>
parents:
6940
diff
changeset
|
11 |
session.id = id; |
|
9df70e9e006b
util.session: What is the identity of a session?
Kim Alvefur <zash@zash.se>
parents:
6940
diff
changeset
|
12 |
return session; |
|
9df70e9e006b
util.session: What is the identity of a session?
Kim Alvefur <zash@zash.se>
parents:
6940
diff
changeset
|
13 |
end |
|
9df70e9e006b
util.session: What is the identity of a session?
Kim Alvefur <zash@zash.se>
parents:
6940
diff
changeset
|
14 |
|
| 6940 | 15 |
return { |
16 |
new = new_session; |
|
|
6941
9df70e9e006b
util.session: What is the identity of a session?
Kim Alvefur <zash@zash.se>
parents:
6940
diff
changeset
|
17 |
set_id = set_id; |
| 6940 | 18 |
} |