annotate src/lib/Chat.luan @ 24:87fe70201aa8

courses work
author Franklin Schmidt <fschmidt@gmail.com>
date Thu, 31 Jul 2025 22:30:26 -0600
parents f551d19da80d
children 3a80ddafe5a4
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()
a970b7a01a74 start ai
Franklin Schmidt <fschmidt@gmail.com>
parents: 4
diff changeset
12 local Ai = require "site:/lib/ai/Ai.luan"
16
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents: 13
diff changeset
13 local languages = require "site:/lib/languages.luan"
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents: 13
diff changeset
14 local Utils = require "site:/lib/Utils.luan"
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents: 13
diff changeset
15 local get_first = Utils.get_first or error()
4
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
16
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
17
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
18 local Chat = {}
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 function from_doc(doc)
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
21 doc.type == "chat" or error "wrong type"
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
22 return Chat.new {
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
23 id = doc.id
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
24 user_id = doc.chat_user_id
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
25 updated = doc.chat_updated
24
87fe70201aa8 courses work
Franklin Schmidt <fschmidt@gmail.com>
parents: 21
diff changeset
26 course_id = doc.course_id
4
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
27 name = doc.name
5
a970b7a01a74 start ai
Franklin Schmidt <fschmidt@gmail.com>
parents: 4
diff changeset
28 ai_name = doc.ai_name
a970b7a01a74 start ai
Franklin Schmidt <fschmidt@gmail.com>
parents: 4
diff changeset
29 ai_thread = doc.ai_thread
16
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents: 13
diff changeset
30 language = doc.language
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents: 13
diff changeset
31 language_region = doc.language_region
4
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
32 }
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
33 end
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
34
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
35 local function to_doc(chat)
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
36 return {
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
37 type = "chat"
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
38 id = chat.id
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
39 chat_user_id = long(chat.user_id)
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
40 chat_updated = long(chat.updated)
24
87fe70201aa8 courses work
Franklin Schmidt <fschmidt@gmail.com>
parents: 21
diff changeset
41 course_id = long(chat.course_id)
4
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
42 name = chat.name or error()
5
a970b7a01a74 start ai
Franklin Schmidt <fschmidt@gmail.com>
parents: 4
diff changeset
43 ai_name = chat.ai_name or error()
a970b7a01a74 start ai
Franklin Schmidt <fschmidt@gmail.com>
parents: 4
diff changeset
44 ai_thread = chat.ai_thread -- or error()
16
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents: 13
diff changeset
45 language = chat.language or error()
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents: 13
diff changeset
46 language_region = chat.language_region or error()
4
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
47 }
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
48 end
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
49
16
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents: 13
diff changeset
50 local function first_region(language)
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents: 13
diff changeset
51 return get_first(languages[language].regions)
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents: 13
diff changeset
52 end
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents: 13
diff changeset
53
4
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
54 function Chat.new(chat)
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
55 chat.updated = chat.updated or time_now()
6
025bb19b65b1 use claude
Franklin Schmidt <fschmidt@gmail.com>
parents: 5
diff changeset
56 chat.ai_name = chat.ai_name or "claude"
19
Franklin Schmidt <fschmidt@gmail.com>
parents: 16
diff changeset
57 chat.ai = Ai[chat.ai_name]["Ai_chat.luan"] or error()
16
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents: 13
diff changeset
58 chat.language_region = chat.language_region or first_region(chat.language)
4
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
59
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
60 function chat.save()
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
61 local doc = to_doc(chat)
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
62 Db.save(doc)
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
63 chat.id = doc.id
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
64 end
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
65
5
a970b7a01a74 start ai
Franklin Schmidt <fschmidt@gmail.com>
parents: 4
diff changeset
66 function chat.reload()
a970b7a01a74 start ai
Franklin Schmidt <fschmidt@gmail.com>
parents: 4
diff changeset
67 return Chat.get_by_id(chat.id) or error(chat.id)
a970b7a01a74 start ai
Franklin Schmidt <fschmidt@gmail.com>
parents: 4
diff changeset
68 end
a970b7a01a74 start ai
Franklin Schmidt <fschmidt@gmail.com>
parents: 4
diff changeset
69
4
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
70 function chat.delete()
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
71 Db.delete("id:"..chat.id)
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
72 end
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
73
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
74 function chat.name_html()
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
75 return html_encode(chat.name)
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
76 end
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
77
9
Franklin Schmidt <fschmidt@gmail.com>
parents: 6
diff changeset
78 function chat.output_system_prompt()
Franklin Schmidt <fschmidt@gmail.com>
parents: 6
diff changeset
79 chat.ai.output_system_prompt(chat.ai_thread)
Franklin Schmidt <fschmidt@gmail.com>
parents: 6
diff changeset
80 end
Franklin Schmidt <fschmidt@gmail.com>
parents: 6
diff changeset
81
5
a970b7a01a74 start ai
Franklin Schmidt <fschmidt@gmail.com>
parents: 4
diff changeset
82 function chat.output_messages_html()
19
Franklin Schmidt <fschmidt@gmail.com>
parents: 16
diff changeset
83 chat.ai.output_messages_html(chat.language_region,chat.ai_thread)
5
a970b7a01a74 start ai
Franklin Schmidt <fschmidt@gmail.com>
parents: 4
diff changeset
84 end
a970b7a01a74 start ai
Franklin Schmidt <fschmidt@gmail.com>
parents: 4
diff changeset
85
a970b7a01a74 start ai
Franklin Schmidt <fschmidt@gmail.com>
parents: 4
diff changeset
86 function chat.ask(input)
13
65bd7e245c63 add html
Franklin Schmidt <fschmidt@gmail.com>
parents: 9
diff changeset
87 local old_thread = chat.ai_thread
65bd7e245c63 add html
Franklin Schmidt <fschmidt@gmail.com>
parents: 9
diff changeset
88 local ai_thread = chat.ai.ask(old_thread,input)
65bd7e245c63 add html
Franklin Schmidt <fschmidt@gmail.com>
parents: 9
diff changeset
89 run_in_transaction( function()
65bd7e245c63 add html
Franklin Schmidt <fschmidt@gmail.com>
parents: 9
diff changeset
90 chat = chat.reload()
65bd7e245c63 add html
Franklin Schmidt <fschmidt@gmail.com>
parents: 9
diff changeset
91 chat.ai_thread = ai_thread
65bd7e245c63 add html
Franklin Schmidt <fschmidt@gmail.com>
parents: 9
diff changeset
92 chat.save()
65bd7e245c63 add html
Franklin Schmidt <fschmidt@gmail.com>
parents: 9
diff changeset
93 end )
16
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents: 13
diff changeset
94 return `chat.ai.output_messages_html(chat.language_region,ai_thread,old_thread)`
5
a970b7a01a74 start ai
Franklin Schmidt <fschmidt@gmail.com>
parents: 4
diff changeset
95 end
a970b7a01a74 start ai
Franklin Schmidt <fschmidt@gmail.com>
parents: 4
diff changeset
96
21
Franklin Schmidt <fschmidt@gmail.com>
parents: 19
diff changeset
97 function chat.language_name()
Franklin Schmidt <fschmidt@gmail.com>
parents: 19
diff changeset
98 return languages[chat.language].name
Franklin Schmidt <fschmidt@gmail.com>
parents: 19
diff changeset
99 end
Franklin Schmidt <fschmidt@gmail.com>
parents: 19
diff changeset
100
4
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
101 return chat
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
102 end
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
103
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
104 function Chat.search(query,sort,rows)
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
105 rows = rows or 1000000
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
106 local chats = {}
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
107 local docs = Db.search(query,1,rows,{sort=sort})
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
108 for _, doc in ipairs(docs) do
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
109 chats[#chats+1] = from_doc(doc)
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
110 end
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
111 return chats
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
112 end
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
113
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
114 function Chat.get_by_id(id)
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
115 local doc = Db.get_document("id:"..id)
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
116 return doc and doc.type=="chat" and from_doc(doc) or nil
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
117 end
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
118
b1adec083e44 chat work
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
119 return Chat