-
Notifications
You must be signed in to change notification settings - Fork 5
/
Copy pathapi.lua
1343 lines (1193 loc) · 41.4 KB
/
api.lua
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
968
969
970
971
972
973
974
975
976
977
978
979
980
981
982
983
984
985
986
987
988
989
990
991
992
993
994
995
996
997
998
999
1000
local msg = require('mp.msg')
local utils = require("mp.utils")
local md5 = require("md5")
local danmaku_path = os.getenv("TEMP") or "/tmp/"
local exec_path = mp.command_native({ "expand-path", options.DanmakuFactory_Path })
local history_path = mp.command_native({"expand-path", options.history_path})
local blacklist_file = mp.command_native({ "expand-path", options.blacklist_path })
danmaku = {sources = {}, count = 1}
-- url编码转换
function url_encode(str)
-- 将非安全字符转换为百分号编码
if str then
str = str:gsub("([^%w%-%.%_%~])", function(c)
return string.format("%%%02X", string.byte(c))
end)
end
return str
end
function hex_to_char(x)
return string.char(tonumber(x, 16))
end
-- url解码转换
function url_decode(str)
if str ~= nil then
str = str:gsub('^%a[%a%d-_]+://', '')
:gsub('^%a[%a%d-_]+:\\?', '')
:gsub('%%(%x%x)', hex_to_char)
if str:find('://localhost:?') then
str = str:gsub('^.*/', '')
end
str = str:gsub('%?.+', '')
:gsub('%+', ' ')
return str
else
return
end
end
function is_protocol(path)
return type(path) == 'string' and (path:find('^%a[%w.+-]-://') ~= nil or path:find('^%a[%w.+-]-:%?') ~= nil)
end
function file_exists(path)
if path then
local meta = utils.file_info(path)
return meta and meta.is_file
end
return false
end
local function get_cid()
local cid, danmaku_id = nil, nil
local tracks = mp.get_property_native("track-list")
for _, track in ipairs(tracks) do
if track["lang"] == "danmaku" then
cid = track["external-filename"]:match("/(%d-)%.xml$")
danmaku_id = track["id"]
break
end
end
return cid, danmaku_id
end
function extract_between_colons(input_string)
local start_index = 0
local end_index = 0
local count = 0
for i = 1, #input_string do
if input_string:sub(i, i) == ":" then
count = count + 1
if count == 2 then
start_index = i
elseif count == 3 then
end_index = i
break
end
end
end
if start_index > 0 and end_index > 0 then
return input_string:sub(start_index + 1, end_index - 1)
else
return nil
end
end
function hex_to_int_color(hex_color)
-- 移除颜色代码中的'#'字符
hex_color = hex_color:sub(2) -- 只保留颜色代码部分
-- 提取R, G, B的十六进制值并转为整数
local r = tonumber(hex_color:sub(1, 2), 16)
local g = tonumber(hex_color:sub(3, 4), 16)
local b = tonumber(hex_color:sub(5, 6), 16)
-- 计算32位整数值
local color_int = (r * 256 * 256) + (g * 256) + b
return color_int
end
function get_type_from_position(position)
if position == 0 then
return 1
end
if position == 1 then
return 4
end
return 5
end
--读history 和 写history
function read_file(file_path)
local file = io.open(file_path, "r") -- 打开文件，"r"表示只读模式
if not file then
return nil
end
local content = file:read("*all") -- 读取文件所有内容
file:close() -- 关闭文件
return content
end
function write_json_file(file_path, data)
local file = io.open(file_path, "w")
if not file then
return
end
file:write(utils.format_json(data)) -- 将 Lua 表转换为 JSON 并写入
file:close()
end
function itable_index_of(itable, value)
for index = 1, #itable do
if itable[index] == value then
return index
end
end
end
platform = (function()
local platform = mp.get_property_native("platform")
if platform then
if itable_index_of({ "windows", "darwin" }, platform) then
return platform
end
else
if os.getenv("windir") ~= nil then
return "windows"
end
local homedir = os.getenv("HOME")
if homedir ~= nil and string.sub(homedir, 1, 6) == "/Users" then
return "darwin"
end
end
return "linux"
end)()
function get_danmaku_visibility()
local history_json = read_file(history_path)
local history
if history_json ~= nil then
history = utils.parse_json(history_json)
local flag = history["show_danmaku"]
if flag == nil then
history["show_danmaku"] = false
write_json_file(history_path, history)
else
return flag
end
else
history = {}
history["show_danmaku"] = false
write_json_file(history_path, history)
end
return false
end
function set_danmaku_visibility(flag)
local history = {}
local history_json = read_file(history_path)
if history_json ~= nil then
history = utils.parse_json(history_json)
end
history["show_danmaku"] = flag
write_json_file(history_path, history)
end
-- 拆分字符串中的字符和数字
local function split_by_numbers(filename)
local parts = {}
local pattern = "([^%d]*)(%d+)([^%d]*)"
for pre, num, post in string.gmatch(filename, pattern) do
table.insert(parts, {pre = pre, num = tonumber(num), post = post})
end
return parts
end
-- 识别并匹配前后剧集
local function compare_filenames(fname1, fname2)
local parts1 = split_by_numbers(fname1)
local parts2 = split_by_numbers(fname2)
local min_len = math.min(#parts1, #parts2)
-- 逐个部分进行比较
for i = 1, min_len do
local part1 = parts1[i]
local part2 = parts2[i]
-- 比较数字前的字符是否相同
if part1.pre ~= part2.pre then
return false
end
-- 比较数字部分
if part1.num ~= part2.num then
return part1.num, part2.num
end
-- 比较数字后的字符是否相同
if part1.post ~= part2.post then
return false
end
end
return false
end
-- 规范化路径
function normalize(path)
if normalize_path ~= nil then
if normalize_path then
path = mp.command_native({"normalize-path", path})
else
local directory = mp.get_property("working-directory", "")
path = utils.join_path(directory, path:gsub('^%.[\\/]',''))
if platform == "windows" then path = path:gsub("\\", "/") end
end
return path
end
normalize_path = false
local commands = mp.get_property_native("command-list", {})
for _, command in ipairs(commands) do
if command.name == "normalize-path" then
normalize_path = true
break
end
end
return normalize(path)
end
-- 获取父目录路径
function get_parent_directory(path)
local dir = nil
if path and not is_protocol(path) then
path = normalize(path)
dir = utils.split_path(path)
end
return dir
end
-- 获取播放文件标题信息
function get_title(from_menu)
local path = mp.get_property("path")
local thin_space = string.char(0xE2, 0x80, 0x89)
if path and not is_protocol(path) then
local directory = get_parent_directory(path)
local dir, title = utils.split_path(directory:sub(1, -2))
if title:lower():match("^%s*seasons?%s*%d+%s*$") or title:lower():match("^%s*specials?%s*$") or title:match("^%s*SPs?%s*$")
or title:match("^%s*O[VAD]+s?%s*$") or title:match("^%s*第.-[季部]+%s*$") then
directory, title = utils.split_path(dir:sub(1, -2))
end
title = title
:gsub(thin_space, " ")
:gsub("%[.-%]", "")
:gsub("^%s*%(%d+.?%d*.?%d*%)", "")
:gsub("%(%d+.?%d*.?%d*%)%s*$", "")
:gsub("[%._]", " ")
:gsub("^%s*(.-)%s*$", "%1")
return title
end
local title = mp.get_property("media-title")
local season_num, episod_num = nil, nil
if title then
title = title:gsub(thin_space, " ")
if title:match(".*S%d+:E%d+") ~= nil then
title, season_num, episod_num = title:match("(.-)%s*S(%d+):E(%d+)")
title = title and url_decode(title):gsub("[%._]", " "):gsub("%s*%[.-%]s*", "")
elseif title:match(".*%-%s*S%d+E%d+") ~= nil then
title, season_num, episod_num = title:match("(.-)%s*%-%s*S(%d+)E(%d+)")
title = title and url_decode(title):gsub("[%._]", " "):gsub("%s*%[.-%]s*", "")
elseif title:match(".*S%d+E%d+") ~= nil then
title, season_num, episod_num = title:match("(.-)%s*S(%d+)E(%d+)")
title = title and url_decode(title):gsub("[%._]", " "):gsub("%s*%[.-%]s*", "")
elseif title:match(".*%d%d?[xX]%d%d%d?[^%d%-pPkKxXbBfF][^%d]") ~= nil then
title, season_num, episod_num = title:match("(.-)%s*(%d%d?)[xX](%d%d%d?)")
title = title and url_decode(title):gsub("[%._]", " "):gsub("%s*%[.-%]s*", "")
else
title = url_decode(title)
episod_num = get_episode_number(title)
if episod_num then
local parts = split(title, episod_num)
title = parts[1]:gsub("[%[%(].-[%)%]]", "")
:gsub("%[.*", "")
:gsub("[%-#].*", "")
:gsub("第.*", "")
:gsub("[%._]", " ")
:gsub("^%s*(.-)%s*$", "%1")
else
title = nil
end
end
end
if from_menu then
return title
end
return title, season_num, episod_num
end
-- 获取当前文件名所包含的集数
function get_episode_number(filename, fname)
-- 尝试对比记录文件名来获取当前集数
if fname then
local episode_num1, episode_num2 = compare_filenames(fname, filename)
if episode_num1 and episode_num2 then
return episode_num1, episode_num2
else
return nil, nil
end
end
local thin_space = string.char(0xE2, 0x80, 0x89)
filename = filename:gsub(thin_space, " ")
-- 匹配模式：支持多种集数形式
local patterns = {
-- 匹配 [数字] 格式
"%[(%d+)v?%d?%]",
-- 匹配 S01E02 格式
"[S%d+]?E(%d+)",
-- 匹配 第04话 格式
"第(%d+)话",
-- 匹配 -/# 第数字 格式
"[%-#]%s*(%d+)%s*",
-- 匹配 01x02 格式
"%d%d?[xX](%d%d%d?)[^%d%-pPkKxXbBfF][^%d]",
-- 匹配 直接跟随的数字 格式
"[^%dhHxXvV](%d%d%d?)[^%d%-pPkKxXbBfF][^%d]*$",
}
-- 尝试匹配文件名中的集数
for _, pattern in ipairs(patterns) do
local match = {string.match(filename, pattern)}
if #match > 0 then
-- 返回集数，通常是匹配的第一个捕获
local episode_number = tonumber(match[1])
if episode_number and episode_number < 1000 then
return episode_number
end
end
end
-- 未找到集数
return nil
end
-- 写入history.json
-- 读取episodeId获取danmaku
function set_episode_id(input, from_menu)
from_menu = from_menu or false
local episodeId = tonumber(input)
if from_menu and options.auto_load or options.autoload_for_url then
local history = {}
local path = mp.get_property("path")
local dir = get_parent_directory(path)
local fname = mp.get_property('filename/no-ext')
local episodeNumber = tonumber(episodeId) % 1000 --动漫的集数
if is_protocol(path) then
local title, season_num, episod_num = get_title()
if title and episod_num then
if season_num then
dir = title .." Season".. season_num
else
dir = title
end
fname = url_decode(mp.get_property("media-title"))
episodeNumber = episod_num
end
end
--将文件名:episodeId写入history.json
if dir ~= nil then
local history_json = read_file(history_path)
if history_json ~= nil then
history = utils.parse_json(history_json) or {}
end
history[dir] = {}
history[dir].animeTitle = danmaku.anime
history[dir].episodeTitle = danmaku.episode
history[dir].episodeId = episodeId
history[dir].episodeNumber = episodeNumber
history[dir].fname = fname
write_json_file(history_path, history)
end
end
if options.load_more_danmaku then
fetch_danmaku_all(episodeId, from_menu)
else
fetch_danmaku(episodeId, from_menu)
end
end
local function match_file(file_name, file_hash)
local url = options.api_server .. "/api/v2/match"
local body = utils.format_json({
fileName = file_name,
fileHash = file_hash,
matchMode = "hashAndFileName"
})
local dandanplay_path = utils.join_path(mp.get_script_directory(), "bin")
if platform == "windows" then
dandanplay_path = utils.join_path(dandanplay_path, "dandanplay/dandanplay.exe")
else
dandanplay_path = utils.join_path(dandanplay_path, "dandanplay/dandanplay")
end
local arg = {
dandanplay_path,
"-X",
"POST",
"-H",
"Content-Type: application/json",
"-H",
"Accept: application/json",
"-H",
"User-Agent: " .. options.user_agent,
"-d",
body,
url,
}
local result = mp.command_native({ name = 'subprocess', capture_stdout = true, args = arg })
if result.status == 0 then
return result.stdout
else
return nil
end
end
-- 加载弹幕
function load_danmaku(from_menu)
local danmaku_file = utils.join_path(danmaku_path, "danmaku.ass")
local danmaku_input = {}
for url, source in pairs(danmaku.sources) do
if not url:match("^-") and source.fname then
if not file_exists(source.fname) then
show_message("未找到弹幕文件", 3)
msg.verbose("未找到弹幕文件")
return
end
table.insert(danmaku_input, source.fname)
end
end
if #danmaku_input == 0 then
show_message("该集弹幕内容为空，结束加载", 3)
comments = {}
return
end
convert_with_danmaku_factory(danmaku_input)
enabled = true
parse_danmaku(danmaku_file, from_menu)
end
function get_video_data(url)
local arg = {
"curl",
"--range",
"0-16777215",
"--user-agent",
options.user_agent,
"--output",
utils.join_path(danmaku_path, "temp.mp4"),
"-L",
url,
}
if options.proxy ~= "" then
table.insert(arg, '-x')
table.insert(arg, options.proxy)
end
local cmd = {
name = 'subprocess',
capture_stdout = true,
capture_stderr = true,
playback_only = true,
args = arg,
}
return mp.command_native(cmd)
end
function get_danmaku_contents(url)
local dandanplay_path = utils.join_path(mp.get_script_directory(), "bin")
if platform == "windows" then
dandanplay_path = utils.join_path(dandanplay_path, "dandanplay/dandanplay.exe")
else
dandanplay_path = utils.join_path(dandanplay_path, "dandanplay/dandanplay")
end
local arg = {
dandanplay_path,
"-X",
"GET",
"-H",
"Accept: application/json",
"-H",
"User-Agent: " .. options.user_agent,
url,
}
local cmd = {
name = 'subprocess',
capture_stdout = true,
capture_stderr = true,
playback_only = true,
args = arg,
}
return mp.command_native(cmd)
end
-- 匹配弹幕库 comment 仅匹配dandan本身弹幕库
-- 通过danmaku api（url）+id获取弹幕
-- Function to fetch danmaku from API
function fetch_danmaku(episodeId, from_menu)
local url = options.api_server .. "/api/v2/comment/" .. episodeId .. "?withRelated=true&chConvert=0"
show_message("弹幕加载中...", 30)
msg.verbose("尝试获取弹幕：" .. url)
local res = get_danmaku_contents(url)
if res.status == 0 then
local response = utils.parse_json(res.stdout)
if response and response["comments"] then
if response["count"] == 0 then
if danmaku.sources["-" .. url] == nil then
danmaku.sources[url] = {from = "api_server"}
end
show_message("该集弹幕内容为空，结束加载", 3)
return
end
local danmaku_file = utils.join_path(danmaku_path, "danmaku" .. danmaku.count .. ".json")
danmaku.count = danmaku.count + 1
local success = save_json_for_factory(response["comments"], danmaku_file)
if success then
if danmaku.sources["-" .. url] ~= nil then
danmaku.sources["-" .. url]["fname"] = danmaku_file
else
danmaku.sources[url] = {from = "api_server", fname = danmaku_file}
end
end
load_danmaku(from_menu)
else
show_message("无数据", 3)
msg.verbose("无数据")
end
else
show_message("获取数据失败", 3)
msg.error("HTTP 请求失败：" .. res.stderr)
end
end
-- 匹配多个弹幕库 related 包括如腾讯、优酷、b站等
function fetch_danmaku_all(episodeId, from_menu)
local url = options.api_server .. "/api/v2/related/" .. episodeId
show_message("弹幕加载中...", 30)
msg.verbose("尝试获取弹幕：" .. url)
local res = get_danmaku_contents(url)
if res.status ~= 0 then
show_message("获取数据失败", 3)
msg.error("HTTP 请求失败：" .. res.stderr)
return
end
local response = utils.parse_json(res.stdout)
if not response or not response["relateds"] then
show_message("无数据", 3)
msg.verbose("无数据")
return
end
for _, related in ipairs(response["relateds"]) do
url = options.api_server .. "/api/v2/extcomment?url=" .. url_encode(related["url"])
local shift = related["shift"]
--show_message("正在从此地址加载弹幕：" .. related["url"], 30)
show_message("正在从第三方库装填弹幕", 30)
msg.verbose("正在从第三方库装填弹幕：" .. url)
res = get_danmaku_contents(url)
if res.status ~= 0 then
show_message("获取数据失败", 3)
msg.error("HTTP 请求失败：" .. res.stderr)
return
end
local response_comments = utils.parse_json(res.stdout)
if response_comments and response_comments["comments"] then
if response_comments["count"] == 0 then
local start = os.time()
while os.time() - start < 1 do
-- 空循环，等待 1 秒
end
res = get_danmaku_contents(url)
response_comments = utils.parse_json(res.stdout)
end
local comments = {}
for _, comment in ipairs(response_comments["comments"]) do
comment["shift"] = shift
table.insert(comments, comment)
end
if #comments == 0 then
if danmaku.sources["-" .. related["url"]] == nil then
danmaku.sources[related["url"]] = {from = "api_server"}
end
else
local danmaku_file = utils.join_path(danmaku_path, "danmaku" .. danmaku.count .. ".json")
danmaku.count = danmaku.count + 1
local success = save_json_for_factory(comments, danmaku_file)
if success then
if danmaku.sources["-" .. related["url"]] ~= nil then
danmaku.sources["-" .. related["url"]]["fname"] = danmaku_file
else
danmaku.sources[related["url"]] = {from = "api_server", fname = danmaku_file}
end
end
end
else
show_message("无数据", 3)
msg.verbose("无数据")
end
end
url = options.api_server .. "/api/v2/comment/" .. episodeId .. "?withRelated=false&chConvert=0"
show_message("正在从弹弹Play库装填弹幕", 30)
msg.verbose("尝试获取弹幕：" .. url)
res = get_danmaku_contents(url)
if res.status ~= 0 then
show_message("获取数据失败", 3)
msg.error("HTTP 请求失败：" .. res.stderr)
return
end
response = utils.parse_json(res.stdout)
if not response or not response["comments"] then
show_message("无数据", 3)
msg.verbose("无数据")
return
end
local comments = response["comments"]
local count = response["count"]
if count == 0 then
if danmaku.sources["-" .. url] == nil then
danmaku.sources[url] = {from = "api_server"}
end
load_danmaku(from_menu)
return
end
local danmaku_file = utils.join_path(danmaku_path, "danmaku" .. danmaku.count .. ".json")
danmaku.count = danmaku.count + 1
local success = save_json_for_factory(comments, danmaku_file)
if success then
if danmaku.sources["-" .. url] ~= nil then
danmaku.sources["-" .. url]["fname"] = danmaku_file
else
danmaku.sources[url] = {from = "api_server", fname = danmaku_file}
end
end
load_danmaku(from_menu)
end
--通过输入源url获取弹幕库
function add_danmaku_source(query, from_menu)
danmaku.sources[query] = {from = "user_custom"}
from_menu = from_menu or false
if from_menu then
add_source_to_history(query)
end
if is_protocol(query) then
add_danmaku_source_online(query, from_menu)
else
add_danmaku_source_local(query, from_menu)
end
end
function add_danmaku_source_local(query, from_menu)
local path = normalize(query)
if not file_exists(path) then
msg.verbose("无效的文件路径")
return
end
if not (string.match(path, "%.xml$") or string.match(path, "%.json$") or string.match(path, "%.ass$")) then
msg.verbose("仅支持弹幕文件")
return
end
if danmaku.sources[query] ~= nil then
danmaku.sources[query]["from"] = "user_local"
danmaku.sources[query]["fname"] = path
else
danmaku.sources[query] = {from = "user_local", fname = path}
end
load_danmaku(from_menu)
end
--通过输入源url获取弹幕库
function add_danmaku_source_online(query, from_menu)
local url = options.api_server .. "/api/v2/extcomment?url=" .. url_encode(query)
show_message("弹幕加载中...", 30)
msg.verbose("尝试获取弹幕：" .. url)
local res = get_danmaku_contents(url)
if res.status ~= 0 then
show_message("获取数据失败", 3)
msg.error("HTTP 请求失败：" .. res.stderr)
return
end
local response = utils.parse_json(res.stdout)
if not response or not response["comments"] then
show_message("此源弹幕无法加载", 3)
return
end
local comments = response["comments"]
local count = response["count"]
if count == 0 then
show_message("服务器无缓存数据，再次尝试请求", 30)
local start = os.time()
while os.time() - start < 2 do
-- 空循环，等待 1 秒
end
res = get_danmaku_contents(url)
response = utils.parse_json(res.stdout)
comments = response["comments"]
count = response["count"]
end
if count == 0 then
show_message("此源弹幕为空，结束加载", 3)
return
end
local danmaku_file = utils.join_path(danmaku_path, "danmaku" .. danmaku.count .. ".json")
danmaku.count = danmaku.count + 1
local success = save_json_for_factory(comments, danmaku_file)
if success then
if danmaku.sources[query] ~= nil then
danmaku.sources[query]["fname"] = danmaku_file
else
danmaku.sources[query] = {from = "user_custom", fname = danmaku_file}
end
end
load_danmaku(from_menu)
end
-- 将弹幕转换为factory可读的json格式
function save_json_for_factory(comments, json_filename)
json_filename = json_filename or utils.join_path(danmaku_path, "danmaku.json")
local json_file = io.open(json_filename, "w")
if json_file then
json_file:write("[\n")
for _, comment in ipairs(comments) do
local p = comment["p"]
local shift = comment["shift"]
if p then
local fields = split(p, ",")
if shift ~= nil then
fields[1] = tonumber(fields[1]) + tonumber(shift)
end
local c_value = string.format(
"%s,%s,%s,25,,,",
tostring(fields[1]), -- first field of p to first field of c
fields[3], -- third field of p to second field of c
fields[2] -- second field of p to third field of c
)
local m_value = comment["m"]
-- Write the JSON object as a single line, no spaces or extra formatting
local json_entry = string.format('{"c":"%s","m":"%s"},\n', c_value, m_value)
json_file:write(json_entry)
end
end
json_file:write("]")
json_file:close()
return true
end
return false
end
--将json文件又转换为ass文件。
-- Function to convert JSON file using DanmakuFactory
function convert_with_danmaku_factory(danmaku_input, danmaku_out)
if exec_path == "" then
exec_path = utils.join_path(mp.get_script_directory(), "bin/DanmakuFactory")
if platform == "windows" then
exec_path = utils.join_path(exec_path, "DanmakuFactory.exe")
else
exec_path = utils.join_path(exec_path, "DanmakuFactory")
end
end
local danmaku_factory_path = os.getenv("DANMAKU_FACTORY") or exec_path
local arg = {
danmaku_factory_path,
"-o",
danmaku_out and danmaku_out or utils.join_path(danmaku_path, "danmaku.ass"),
"-i",
"--ignore-warnings",
"--scrolltime", options.scrolltime,
"--fontname", "sans-serif",
"--fontsize", options.fontsize,
"--shadow", options.shadow,
"--bold", options.bold,
"--density", options.density,
-- "--displayarea", options.displayarea,
"--outline", options.outline,
}
-- 检查 danmaku_input 是字符串还是数组，并插入到正确的位置
if type(danmaku_input) == "string" then
-- 如果是单个字符串，直接插入
table.insert(arg, 5, danmaku_input)
else
-- 如果是字符串数组，逐个插入
for i, input in ipairs(danmaku_input) do
table.insert(arg, 4 + i, input)
end
end
if blacklist_file ~= "" and file_exists(blacklist_file) then
table.insert(arg, "--blacklist")
table.insert(arg, blacklist_file)
end
if options.blockmode ~= "" then
table.insert(arg, "--blockmode")
table.insert(arg, options.blockmode)
end
mp.command_native({
name = 'subprocess',
playback_only = false,
capture_stdout = true,
args = arg,
})
end
-- Utility function to split a string by a delimiter
function split(str, delim)
local result = {}
for match in (str .. delim):gmatch("(.-)" .. delim) do
table.insert(result, match)
end
return result
end
-- 通过文件前 16M 的 hash 值进行弹幕匹配
function get_danmaku_with_hash(file_name, file_path)
if is_protocol(file_path) then
local res = get_video_data(file_path)
if res.status ~= 0 then
show_message("获取数据失败", 3)
msg.error("HTTP 请求失败：" .. res.stderr)
return
end
file_path = utils.join_path(danmaku_path, "temp.mp4")
if not file_exists(file_path) then
return
end
end
-- 计算文件哈希
local file_info = utils.file_info(file_path)
if file_info and file_info.size < 16 * 1024 * 1024 then
msg.verbose("文件小于 16M，无法计算 hash")
return
end
local file, error = io.open(normalize(file_path), 'rb')
if error ~= nil then
return msg.error(error)
end
local m = md5.new()
for _ = 1, 16 * 1024 do
local content = file:read(1024)
if content == nil then
file:close()
return msg.error('无法读取文件内容')
end
m:update(content)
end
file:close()
local hash = m:finish()
if not hash then
return
else
msg.info('hash:', hash)
end
-- 发送匹配请求
local match_data_raw = match_file(file_name, hash)
if not match_data_raw then
return
end
-- 解析匹配结果
local match_data = utils.parse_json(match_data_raw)
if not match_data.isMatched then
msg.verbose("没有匹配的剧集")
return
elseif #match_data.matches > 1 then
msg.verbose("找到多个匹配的剧集")
return
end
danmaku.anime = match_data.matches[1].animeTitle
danmaku.episode = match_data.matches[1].episodeTitle:match("(第%d+[话回集]+)") or match_data.matches[1].episodeTitle
-- 获取并加载弹幕数据
set_episode_id(match_data.matches[1].episodeId, true)
end
-- 从用户添加过的弹幕源添加弹幕
function addon_danmaku(path, from_menu)
local history_json = read_file(history_path)
if history_json ~= nil then
local history = utils.parse_json(history_json) or {}
local history_record = history[path]
if history_record ~= nil then
for _, source in ipairs(history_record) do
if not source:match("^-") then
add_danmaku_source(source, from_menu)
end
end
end
end
end
function remove_source_from_history(rm_source)
local history_json = read_file(history_path)
local path = mp.get_property("path")
if history_json then
local history = utils.parse_json(history_json) or {}
if history[path] ~= nil then
for i, source in ipairs(history[path]) do
if source == rm_source then
table.remove(history[path], i)
break
end
end
end
write_json_file(history_path, history)
end
end
function add_source_to_history(add_source)
local history_json = read_file(history_path)
local path = mp.get_property("path")