](https://hub.docker.com/r/dezhao/lanraragi_cn/)
17 | [](https://github.com/uparrows/LANraragi_cn/actions/workflows/docker-image.yml)
18 |
19 | [⏬ 下载源码](https://github.com/uparrows/LANraragi_cn/releases/latest) |[📄 教程](http://yuanfangblog.xyz/technology/251.html) |
20 |
21 | 安卓客户端（已提交中文支持）：https://f-droid.org/packages/com.utazukin.ichaival/
22 |
23 | IOS客户端(用AltStore安装)： https://github.com/Doraemoe/DuReader/releases
24 | AltStore:https://altstore.io/
25 |
26 | Windows客户端（已提交中文支持）： https://www.microsoft.com/zh-cn/p/lrreader/9mz6bwwvswjh
27 |
28 | ## 扫码直接查看教程
29 |
30 | [
](http://yuanfangblog.xyz/technology/251.html)
31 |
32 |
33 |
34 | ## 截图
35 |
36 | |主页, 预览图 | 主页, 列表模式 |
37 | |---|---|
38 | | [](https://user-images.githubusercontent.com/38988286/111873262-6f619f80-89ca-11eb-8891-7437f1d08cb4.png) | [](https://user-images.githubusercontent.com/38988286/111873240-5822b200-89ca-11eb-8c0c-17b3bd374a9b.png) |
39 |
40 | |阅读器 | 预览 |
41 | |---|---|
42 | | [](https://user-images.githubusercontent.com/38988286/111873285-899b7d80-89ca-11eb-8868-5431e7a117f9.jpg) | [](https://user-images.githubusercontent.com/38988286/111873298-915b2200-89ca-11eb-8d61-cc67dca038f0.jpg) |
43 |
44 |
45 | |配置 | 插件配置 |
46 | |---|---|
47 | | [](https://user-images.githubusercontent.com/38988286/111873270-78527100-89ca-11eb-9526-35f1f78b578f.png) | [](https://user-images.githubusercontent.com/38988286/111873273-7f797f00-89ca-11eb-89b4-b3c21228c949.png) |
48 |
49 |
50 | ## 功能
51 |
52 | *以存档格式存储您的漫画。 （支持zip / rar / targz / lzma / 7z / xz / cbz / cbr / pdf，epub准支持）
53 |
54 | *直接从Web浏览器读取档案：服务器使用临时文件夹从压缩文件中读取。
55 |
56 | *使用内置的OPDS目录在专用的阅读器软件中阅读档案
57 |
58 | *使用客户端API与其他程序中的LANraragi进行交互
59 |
60 | *两种不同的用户界面：紧凑的存档列表，带有悬停缩略图或缩略图视图。
61 |
62 | *从5种预装的响应库样式中进行选择，或使用CSS添加您自己的样式。
63 |
64 | *命名空间的完整标签支持：添加您自己的名称或使用插件从其他来源导入它们。
65 |
66 | *设置收藏夹标签，以便能够快速在您的收藏夹中找到包含它们的档案
67 |
68 | *自动标记：将存档添加到LANraragi后，将使用插件自动导入元数据。
69 |
70 | *将数据库备份为JSON，以将标签传递到另一个LANraragi实例。
71 |
--------------------------------------------------------------------------------
/lib/LANraragi/Controller/Api/Database.pm:
--------------------------------------------------------------------------------
1 | package LANraragi::Controller::Api::Database;
2 | use Mojo::Base 'Mojolicious::Controller';
3 |
4 | use Redis;
5 | use Mojo::JSON qw(decode_json);
6 |
7 | use LANraragi::Model::Backup;
8 | use LANraragi::Model::Stats;
9 | use LANraragi::Utils::Generic qw(render_api_response);
10 | use LANraragi::Utils::Database qw(invalidate_cache);
11 |
12 | sub serve_backup {
13 | my $self = shift;
14 | $self->render( json => decode_json(LANraragi::Model::Backup::build_backup_JSON) );
15 | }
16 |
17 | sub drop_database {
18 | LANraragi::Utils::Database::drop_database();
19 | render_api_response( shift, "drop_database" );
20 | }
21 |
22 | sub serve_tag_stats {
23 | my $self = shift;
24 | my $minscore = $self->req->param('minweight') || "1";
25 |
26 | $self->render( json => LANraragi::Model::Stats::build_tag_stats($minscore) );
27 | }
28 |
29 | sub clean_database {
30 | my ( $deleted, $unlinked ) = LANraragi::Utils::Database::clean_database;
31 |
32 | #Force a refresh
33 | invalidate_cache(1);
34 |
35 | shift->render(
36 | json => {
37 | operation => "clean_database",
38 | deleted => $deleted,
39 | unlinked => $unlinked,
40 | success => 1
41 | }
42 | );
43 | }
44 |
45 | #Clear new flag in all archives.
46 | sub clear_new_all {
47 |
48 | my $self = shift;
49 | my $redis = $self->LRR_CONF->get_redis();
50 |
51 | # Get all archives thru redis
52 | # 40-character long keys only => Archive IDs
53 | my @keys = $redis->keys('????????????????????????????????????????');
54 |
55 | foreach my $idall (@keys) {
56 | $redis->hset( $idall, "isnew", "false" );
57 | }
58 |
59 | # Bust search cache completely, this is a big change
60 | invalidate_cache(1);
61 | $redis->quit();
62 | render_api_response( $self, "clear_new_all" );
63 | }
64 |
65 | 1;
66 |
67 |
--------------------------------------------------------------------------------
/lib/LANraragi/Controller/Api/Minion.pm:
--------------------------------------------------------------------------------
1 | package LANraragi::Controller::Api::Minion;
2 | use Mojo::Base 'Mojolicious::Controller';
3 |
4 | use Mojo::JSON qw(encode_json decode_json);
5 | use Redis;
6 |
7 | use LANraragi::Model::Stats;
8 | use LANraragi::Utils::TempFolder qw(get_tempsize clean_temp_full);
9 | use LANraragi::Utils::Generic qw(render_api_response);
10 | use LANraragi::Utils::Plugins qw(get_plugin get_plugins get_plugin_parameters use_plugin);
11 |
12 | # Returns basic info for the given Minion job id.
13 | sub minion_job_status {
14 | my $self = shift;
15 | my $id = $self->stash('jobid');
16 | my $job = $self->minion->job($id);
17 |
18 | if ($job) {
19 |
20 | my %info = %{ $job->info };
21 |
22 | # Render a basic json containing only task, state and error
23 | $self->render(
24 | json => {
25 | task => $info{task},
26 | state => $info{state},
27 | error => $info{error}
28 | }
29 | );
30 |
31 | } else {
32 | render_api_response( $self, "minion_job_status", "没有使用此 ID 的工作." );
33 | }
34 | }
35 |
36 | # Returns the full info for the given Minion job id.
37 | sub minion_job_detail {
38 | my $self = shift;
39 | my $id = $self->stash('jobid');
40 | my $job = $self->minion->job($id);
41 |
42 | if ($job) {
43 | $self->render( json => $job->info );
44 | } else {
45 | render_api_response( $self, "minion_job_detail", "没有使用此 ID 的工作." );
46 | }
47 | }
48 |
49 | # Queues a job into Minion.
50 | sub queue_minion_job {
51 |
52 | my ($self) = shift;
53 | my $jobname = $self->stash('jobname');
54 | my @jobargs = decode_json( $self->req->param('args') );
55 | my $priority = $self->req->param('priority') || 0;
56 |
57 | my $jobid = $self->minion->enqueue( $jobname => @jobargs => { priority => $priority } );
58 |
59 | $self->render(
60 | json => {
61 | operation => "queue_minion_job",
62 | success => 1,
63 | job => $jobid
64 | }
65 | );
66 | }
67 |
68 | 1;
69 |
70 |
--------------------------------------------------------------------------------
/lib/LANraragi/Controller/Api/Shinobu.pm:
--------------------------------------------------------------------------------
1 | package LANraragi::Controller::Api::Shinobu;
2 | use Mojo::Base 'Mojolicious::Controller';
3 | use Storable;
4 |
5 | use LANraragi::Utils::Generic qw(start_shinobu render_api_response);
6 | use LANraragi::Utils::TempFolder qw(get_temp);
7 |
8 | sub shinobu_status {
9 | my $self = shift;
10 | my $shinobu = ${ retrieve( get_temp . "/shinobu.pid" ) };
11 |
12 | $self->render(
13 | json => {
14 | operation => "shinobu_status",
15 | success => 1,
16 | is_alive => $shinobu->poll(),
17 | pid => $shinobu->pid
18 | }
19 | );
20 | }
21 |
22 | sub reset_filemap {
23 | my $self = shift;
24 |
25 | # This is a shinobu endpoint even though we're deleting stuff in redis
26 | # since we'll have to restart shinobu anyway to proc filemap re-creation.
27 |
28 | my $redis = $self->LRR_CONF->get_redis;
29 | $redis->del("LRR_FILEMAP");
30 |
31 | my $shinobu = ${ retrieve( get_temp . "/shinobu.pid" ) };
32 |
33 | #commit sudoku
34 | $shinobu->kill();
35 |
36 | # Create a new Process, automatically stored in TEMP_FOLDER/shinobu.pid
37 | my $proc = start_shinobu($self);
38 |
39 | $self->render(
40 | json => {
41 | operation => "shinobu_rescan",
42 | success => $proc->poll(),
43 | new_pid => $proc->pid
44 | }
45 | );
46 | }
47 |
48 | sub stop_shinobu {
49 | my $self = shift;
50 | my $shinobu = ${ retrieve( get_temp . "/shinobu.pid" ) };
51 |
52 | #commit sudoku
53 | $shinobu->kill();
54 | render_api_response( $self, "shinobu_stop" );
55 | }
56 |
57 | sub restart_shinobu {
58 | my $self = shift;
59 | my $shinobu = ${ retrieve( get_temp . "/shinobu.pid" ) };
60 |
61 | #commit sudoku
62 | $shinobu->kill();
63 |
64 | # Create a new Process, automatically stored in TEMP_FOLDER/shinobu.pid
65 | my $proc = start_shinobu($self);
66 |
67 | $self->render(
68 | json => {
69 | operation => "shinobu_restart",
70 | success => $proc->poll(),
71 | new_pid => $proc->pid
72 | }
73 | );
74 | }
75 |
76 | 1;
77 |
78 |
--------------------------------------------------------------------------------
/lib/LANraragi/Controller/Backup.pm:
--------------------------------------------------------------------------------
1 | package LANraragi::Controller::Backup;
2 | use Mojo::Base 'Mojolicious::Controller';
3 |
4 | use LANraragi::Utils::Generic qw(generate_themes_header);
5 | use LANraragi::Model::Backup;
6 |
7 | # This action will render a template
8 | sub index {
9 | my $self = shift;
10 |
11 | #GET with a parameter => do backup
12 | if ( $self->req->param('dobackup') ) {
13 | my $json = LANraragi::Model::Backup::build_backup_JSON();
14 |
15 | #Write json to file in the user directory and serve that file through render_static
16 | my $file = $self->LRR_CONF->get_userdir . '/backup.json';
17 |
18 | if ( -e $file ) { unlink $file }
19 |
20 | my $OUTFILE;
21 |
22 | open $OUTFILE, '>>', $file;
23 | print {$OUTFILE} $json;
24 | close $OUTFILE;
25 |
26 | $self->render_file( filepath => $file );
27 |
28 | } else { #Get with no parameters => Regular HTML printout
29 | $self->render(
30 | template => "backup",
31 | title => $self->LRR_CONF->get_htmltitle,
32 | descstr => $self->LRR_DESC,
33 | csshead => generate_themes_header($self),
34 | version => $self->LRR_VERSION
35 | );
36 | }
37 | }
38 |
39 | sub restore {
40 | my $self = shift;
41 | my $file = $self->req->upload('file');
42 |
43 | if ( $file->headers->content_type eq "application/json" ) {
44 |
45 | my $json = $file->slurp;
46 | LANraragi::Model::Backup::restore_from_JSON($json);
47 |
48 | $self->render(
49 | json => {
50 | operation => "restore_backup",
51 | success => 1
52 | }
53 | );
54 | } else {
55 | $self->render(
56 | json => {
57 | operation => "restore_backup",
58 | success => 0,
59 | error => "Not a JSON file."
60 | }
61 | );
62 | }
63 | }
64 |
65 | 1;
66 |
--------------------------------------------------------------------------------
/lib/LANraragi/Controller/Category.pm:
--------------------------------------------------------------------------------
1 | package LANraragi::Controller::Category;
2 | use Mojo::Base 'Mojolicious::Controller';
3 |
4 | use utf8;
5 | use URI::Escape;
6 | use Redis;
7 | use Encode;
8 | use Mojo::Util qw(xml_escape);
9 |
10 | use LANraragi::Utils::Generic qw(generate_themes_header);
11 | use LANraragi::Utils::Database qw(redis_decode);
12 |
13 | # Go through the archives in the content directory and build the template at the end.
14 | sub index {
15 |
16 | my $self = shift;
17 | my $redis = $self->LRR_CONF->get_redis();
18 | my $force = 0;
19 |
20 | my $userlogged = $self->LRR_CONF->enable_pass == 0 || $self->session('is_logged');
21 |
22 | $redis->quit();
23 |
24 | #Then complete it with the rest from the database.
25 | #40-character long keys only => Archive IDs
26 | my @keys = $redis->keys('????????????????????????????????????????');
27 |
28 | #Parse the archive list and build |
51 |
52 | 53 | 备份数据库 54 | 55 | |
56 | 57 | 62 | | 63 |