annotate src/lib/Chat.luan @ 41:2a4c83ce3deb

public chat
author Franklin Schmidt <fschmidt@gmail.com>
date Mon, 11 Aug 2025 07:58:32 +0900
parents 2737eeedc1d5
children cc20eebaa74a
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
4
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
1 local Luan = require "luan:Luan.luan"
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
2 local error = Luan.error
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
3 local ipairs = Luan.ipairs or error()
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
4 local Number = require "luan:Number.luan"
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
5 local long = Number.long or error()
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
6 local Time = require "luan:Time.luan"
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
7 local time_now = Time.now or error()
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
8 local Html = require "luan:Html.luan"
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
9 local html_encode = Html.encode or error()
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
10 local Db = require "site:/lib/Db.luan"
5
a970b7a01a74 start ai
Franklin Schmidt <fschmidt@gmail.com>
parents: 4
diff changeset
11 local run_in_transaction = Db.run_in_transaction or error()
25
3a80ddafe5a4 courses work
Franklin Schmidt <fschmidt@gmail.com>
parents: 24
diff changeset
12 local Ai_chat = require "site:/lib/ai/claude/Ai_chat.luan"
16
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents: 13
diff changeset
13 local languages = require "site:/lib/languages.luan"
25
3a80ddafe5a4 courses work
Franklin Schmidt <fschmidt@gmail.com>
parents: 24
diff changeset
14 local Course = require "site:/lib/Course.luan"
3a80ddafe5a4 courses work
Franklin Schmidt <fschmidt@gmail.com>
parents: 24
diff changeset
15 local get_course_by_id = Course.get_by_id or error()
31
Franklin Schmidt <fschmidt@gmail.com>
parents: 29
diff changeset
16 local Shared = require "site:/lib/Shared.luan"
Franklin Schmidt <fschmidt@gmail.com>
parents: 29
diff changeset
17 local voices = Shared.voices or error()
4
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
18
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
19
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
20 local Chat = {}
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
21
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
22 local function from_doc(doc)
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
23 doc.type == "chat" or error "wrong type"
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
24 return Chat.new {
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
25 id = doc.id
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
26 user_id = doc.chat_user_id
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
27 updated = doc.chat_updated
24
87fe70201aa8 courses work
Franklin Schmidt <fschmidt@gmail.com>
parents: 21
diff changeset
28 course_id = doc.course_id
4
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
29 name = doc.name
5
a970b7a01a74 start ai
Franklin Schmidt <fschmidt@gmail.com>
parents: 4
diff changeset
30 ai_thread = doc.ai_thread
16
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents: 13
diff changeset
31 language = doc.language
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents: 13
diff changeset
32 language_region = doc.language_region
31
Franklin Schmidt <fschmidt@gmail.com>
parents: 29
diff changeset
33 voice = doc.voice
34
0fb3488a017d show_text
Franklin Schmidt <fschmidt@gmail.com>
parents: 32
diff changeset
34 show_text = doc.show_text == "true"
36
2737eeedc1d5 autoplay
Franklin Schmidt <fschmidt@gmail.com>
parents: 35
diff changeset
35 autoplay = doc.autoplay == "true"
41
2a4c83ce3deb public chat
Franklin Schmidt <fschmidt@gmail.com>
parents: 36
diff changeset
36 is_private = doc.is_private == "true"
4
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
37 }
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
38 end
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
39
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
40 local function to_doc(chat)
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
41 return {
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
42 type = "chat"
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
43 id = chat.id
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
44 chat_user_id = long(chat.user_id)
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
45 chat_updated = long(chat.updated)
24
87fe70201aa8 courses work
Franklin Schmidt <fschmidt@gmail.com>
parents: 21
diff changeset
46 course_id = long(chat.course_id)
4
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
47 name = chat.name or error()
35
3117876debca ai_first_message in textarea
Franklin Schmidt <fschmidt@gmail.com>
parents: 34
diff changeset
48 ai_thread = chat.ai_thread or error()
16
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents: 13
diff changeset
49 language = chat.language or error()
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents: 13
diff changeset
50 language_region = chat.language_region or error()
31
Franklin Schmidt <fschmidt@gmail.com>
parents: 29
diff changeset
51 voice = chat.voice or error()
34
0fb3488a017d show_text
Franklin Schmidt <fschmidt@gmail.com>
parents: 32
diff changeset
52 show_text = chat.show_text and "true" or "false"
36
2737eeedc1d5 autoplay
Franklin Schmidt <fschmidt@gmail.com>
parents: 35
diff changeset
53 autoplay = chat.autoplay and "true" or "false"
41
2a4c83ce3deb public chat
Franklin Schmidt <fschmidt@gmail.com>
parents: 36
diff changeset
54 is_private = chat.is_private and "true" or nil
4
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
55 }
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
56 end
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
57
16
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents: 13
diff changeset
58 local function first_region(language)
32
Franklin Schmidt <fschmidt@gmail.com>
parents: 31
diff changeset
59 return languages[language].regions[1].code
16
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents: 13
diff changeset
60 end
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents: 13
diff changeset
61
4
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
62 function Chat.new(chat)
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
63 chat.updated = chat.updated or time_now()
16
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents: 13
diff changeset
64 chat.language_region = chat.language_region or first_region(chat.language)
31
Franklin Schmidt <fschmidt@gmail.com>
parents: 29
diff changeset
65 chat.voice = chat.voice or voices[1].code
34
0fb3488a017d show_text
Franklin Schmidt <fschmidt@gmail.com>
parents: 32
diff changeset
66 if chat.show_text==nil then chat.show_text = true end
36
2737eeedc1d5 autoplay
Franklin Schmidt <fschmidt@gmail.com>
parents: 35
diff changeset
67 if chat.autoplay==nil then chat.autoplay = true end
4
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
68
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
69 function chat.save()
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
70 local doc = to_doc(chat)
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
71 Db.save(doc)
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
72 chat.id = doc.id
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
73 end
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
74
5
a970b7a01a74 start ai
Franklin Schmidt <fschmidt@gmail.com>
parents: 4
diff changeset
75 function chat.reload()
a970b7a01a74 start ai
Franklin Schmidt <fschmidt@gmail.com>
parents: 4
diff changeset
76 return Chat.get_by_id(chat.id) or error(chat.id)
a970b7a01a74 start ai
Franklin Schmidt <fschmidt@gmail.com>
parents: 4
diff changeset
77 end
a970b7a01a74 start ai
Franklin Schmidt <fschmidt@gmail.com>
parents: 4
diff changeset
78
4
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
79 function chat.delete()
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
80 Db.delete("id:"..chat.id)
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
81 end
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
82
29
505185272dd7 edit chat
Franklin Schmidt <fschmidt@gmail.com>
parents: 25
diff changeset
83 function chat.info()
505185272dd7 edit chat
Franklin Schmidt <fschmidt@gmail.com>
parents: 25
diff changeset
84 return {
505185272dd7 edit chat
Franklin Schmidt <fschmidt@gmail.com>
parents: 25
diff changeset
85 id = chat.id
505185272dd7 edit chat
Franklin Schmidt <fschmidt@gmail.com>
parents: 25
diff changeset
86 language_region = chat.language_region
31
Franklin Schmidt <fschmidt@gmail.com>
parents: 29
diff changeset
87 voice = chat.voice
29
505185272dd7 edit chat
Franklin Schmidt <fschmidt@gmail.com>
parents: 25
diff changeset
88 name = chat.name
34
0fb3488a017d show_text
Franklin Schmidt <fschmidt@gmail.com>
parents: 32
diff changeset
89 show_text = chat.show_text
36
2737eeedc1d5 autoplay
Franklin Schmidt <fschmidt@gmail.com>
parents: 35
diff changeset
90 autoplay = chat.autoplay
41
2a4c83ce3deb public chat
Franklin Schmidt <fschmidt@gmail.com>
parents: 36
diff changeset
91 is_private = chat.is_private
29
505185272dd7 edit chat
Franklin Schmidt <fschmidt@gmail.com>
parents: 25
diff changeset
92 }
505185272dd7 edit chat
Franklin Schmidt <fschmidt@gmail.com>
parents: 25
diff changeset
93 end
505185272dd7 edit chat
Franklin Schmidt <fschmidt@gmail.com>
parents: 25
diff changeset
94
4
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
95 function chat.name_html()
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
96 return html_encode(chat.name)
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
97 end
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
98
35
3117876debca ai_first_message in textarea
Franklin Schmidt <fschmidt@gmail.com>
parents: 34
diff changeset
99 function chat.init_text() -- return text for textarea
3117876debca ai_first_message in textarea
Franklin Schmidt <fschmidt@gmail.com>
parents: 34
diff changeset
100 if Ai_chat.has_messages(chat.ai_thread) then
3117876debca ai_first_message in textarea
Franklin Schmidt <fschmidt@gmail.com>
parents: 34
diff changeset
101 return ""
25
3a80ddafe5a4 courses work
Franklin Schmidt <fschmidt@gmail.com>
parents: 24
diff changeset
102 end
3a80ddafe5a4 courses work
Franklin Schmidt <fschmidt@gmail.com>
parents: 24
diff changeset
103 local course = get_course_by_id(chat.course_id) or error()
35
3117876debca ai_first_message in textarea
Franklin Schmidt <fschmidt@gmail.com>
parents: 34
diff changeset
104 return course.ai_first_message or error()
25
3a80ddafe5a4 courses work
Franklin Schmidt <fschmidt@gmail.com>
parents: 24
diff changeset
105 end
3a80ddafe5a4 courses work
Franklin Schmidt <fschmidt@gmail.com>
parents: 24
diff changeset
106
3a80ddafe5a4 courses work
Franklin Schmidt <fschmidt@gmail.com>
parents: 24
diff changeset
107 function chat.output_system_prompt()
3a80ddafe5a4 courses work
Franklin Schmidt <fschmidt@gmail.com>
parents: 24
diff changeset
108 Ai_chat.output_system_prompt(chat.ai_thread)
3a80ddafe5a4 courses work
Franklin Schmidt <fschmidt@gmail.com>
parents: 24
diff changeset
109 end
3a80ddafe5a4 courses work
Franklin Schmidt <fschmidt@gmail.com>
parents: 24
diff changeset
110
3a80ddafe5a4 courses work
Franklin Schmidt <fschmidt@gmail.com>
parents: 24
diff changeset
111 function chat.output_messages_html()
34
0fb3488a017d show_text
Franklin Schmidt <fschmidt@gmail.com>
parents: 32
diff changeset
112 Ai_chat.output_messages_html(chat.show_text,chat.ai_thread)
25
3a80ddafe5a4 courses work
Franklin Schmidt <fschmidt@gmail.com>
parents: 24
diff changeset
113 end
3a80ddafe5a4 courses work
Franklin Schmidt <fschmidt@gmail.com>
parents: 24
diff changeset
114
3a80ddafe5a4 courses work
Franklin Schmidt <fschmidt@gmail.com>
parents: 24
diff changeset
115 function chat.ask(input)
3a80ddafe5a4 courses work
Franklin Schmidt <fschmidt@gmail.com>
parents: 24
diff changeset
116 local old_thread = chat.ai_thread
35
3117876debca ai_first_message in textarea
Franklin Schmidt <fschmidt@gmail.com>
parents: 34
diff changeset
117 local ai_thread = Ai_chat.ask(old_thread,input)
25
3a80ddafe5a4 courses work
Franklin Schmidt <fschmidt@gmail.com>
parents: 24
diff changeset
118 run_in_transaction( function()
3a80ddafe5a4 courses work
Franklin Schmidt <fschmidt@gmail.com>
parents: 24
diff changeset
119 chat = chat.reload()
3a80ddafe5a4 courses work
Franklin Schmidt <fschmidt@gmail.com>
parents: 24
diff changeset
120 chat.ai_thread = ai_thread
3a80ddafe5a4 courses work
Franklin Schmidt <fschmidt@gmail.com>
parents: 24
diff changeset
121 chat.save()
3a80ddafe5a4 courses work
Franklin Schmidt <fschmidt@gmail.com>
parents: 24
diff changeset
122 end )
34
0fb3488a017d show_text
Franklin Schmidt <fschmidt@gmail.com>
parents: 32
diff changeset
123 return `Ai_chat.output_messages_html(chat.show_text,ai_thread,old_thread)`
5
a970b7a01a74 start ai
Franklin Schmidt <fschmidt@gmail.com>
parents: 4
diff changeset
124 end
a970b7a01a74 start ai
Franklin Schmidt <fschmidt@gmail.com>
parents: 4
diff changeset
125
21
Franklin Schmidt <fschmidt@gmail.com>
parents: 19
diff changeset
126 function chat.language_name()
Franklin Schmidt <fschmidt@gmail.com>
parents: 19
diff changeset
127 return languages[chat.language].name
Franklin Schmidt <fschmidt@gmail.com>
parents: 19
diff changeset
128 end
Franklin Schmidt <fschmidt@gmail.com>
parents: 19
diff changeset
129
4
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
130 return chat
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
131 end
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
132
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
133 function Chat.search(query,sort,rows)
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
134 rows = rows or 1000000
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
135 local chats = {}
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
136 local docs = Db.search(query,1,rows,{sort=sort})
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
137 for _, doc in ipairs(docs) do
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
138 chats[#chats+1] = from_doc(doc)
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
139 end
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
140 return chats
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
141 end
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
142
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
143 function Chat.get_by_id(id)
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
144 local doc = Db.get_document("id:"..id)
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
145 return doc and doc.type=="chat" and from_doc(doc) or nil
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
146 end
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
147
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
148 return Chat