Mercurial > prosody-hg
annotate util/session.lua @ 6939:a9ae0c6ac4f4
util.session: What does the session say?
| author | Kim Alvefur <zash@zash.se> |
|---|---|
| date | Tue, 24 Nov 2015 19:04:54 +0100 |
| parents | 9df70e9e006b |
| children | 2be5e19485aa |
| rev | line source |
|---|---|
|
6939
a9ae0c6ac4f4
util.session: What does the session say?
Kim Alvefur <zash@zash.se>
parents:
6938
diff
changeset
|
1 local logger = require "util.logger"; |
| 6937 | 2 |
| 3 local function new_session(typ) | |
| 4 local session = { | |
| 5 type = typ .. "_unauthed"; | |
| 6 }; | |
| 7 return session; | |
| 8 end | |
| 9 | |
|
6938
9df70e9e006b
util.session: What is the identity of a session?
Kim Alvefur <zash@zash.se>
parents:
6937
diff
changeset
|
10 local function set_id(session) |
|
9df70e9e006b
util.session: What is the identity of a session?
Kim Alvefur <zash@zash.se>
parents:
6937
diff
changeset
|
11 local id = typ .. tostring(session):match("%x+$"):lower(); |
|
9df70e9e006b
util.session: What is the identity of a session?
Kim Alvefur <zash@zash.se>
parents:
6937
diff
changeset
|
12 session.id = id; |
|
9df70e9e006b
util.session: What is the identity of a session?
Kim Alvefur <zash@zash.se>
parents:
6937
diff
changeset
|
13 return session; |
|
9df70e9e006b
util.session: What is the identity of a session?
Kim Alvefur <zash@zash.se>
parents:
6937
diff
changeset
|
14 end |
|
9df70e9e006b
util.session: What is the identity of a session?
Kim Alvefur <zash@zash.se>
parents:
6937
diff
changeset
|
15 |
|
6939
a9ae0c6ac4f4
util.session: What does the session say?
Kim Alvefur <zash@zash.se>
parents:
6938
diff
changeset
|
16 local function set_logger(session) |
|
a9ae0c6ac4f4
util.session: What does the session say?
Kim Alvefur <zash@zash.se>
parents:
6938
diff
changeset
|
17 local log = logger.init(id); |
|
a9ae0c6ac4f4
util.session: What does the session say?
Kim Alvefur <zash@zash.se>
parents:
6938
diff
changeset
|
18 session.log = log; |
|
a9ae0c6ac4f4
util.session: What does the session say?
Kim Alvefur <zash@zash.se>
parents:
6938
diff
changeset
|
19 return session; |
|
a9ae0c6ac4f4
util.session: What does the session say?
Kim Alvefur <zash@zash.se>
parents:
6938
diff
changeset
|
20 end |
|
a9ae0c6ac4f4
util.session: What does the session say?
Kim Alvefur <zash@zash.se>
parents:
6938
diff
changeset
|
21 |
| 6937 | 22 return { |
| 23 new = new_session; | |
|
6938
9df70e9e006b
util.session: What is the identity of a session?
Kim Alvefur <zash@zash.se>
parents:
6937
diff
changeset
|
24 set_id = set_id; |
|
6939
a9ae0c6ac4f4
util.session: What does the session say?
Kim Alvefur <zash@zash.se>
parents:
6938
diff
changeset
|
25 set_logger = set_logger; |
| 6937 | 26 } |
