Update README, config example, cpanfile

This commit is contained in:
eleksir
2022-01-08 02:21:44 +03:00
parent c44ab2376b
commit d4fbaab5ca
5 changed files with 17 additions and 13 deletions

8
README
View File

@@ -5,7 +5,7 @@ aleesa-webapp
Механика работы Механика работы
----------------------------------------------------------------------------------------------------------------------- -----------------------------------------------------------------------------------------------------------------------
Клиент подписан на на redis-канал craniac. В этот канал пишет другой демоночек - aleesa-misc. Клиент подписан на на redis-канал webapp. В этот канал пишет другой демоночек - aleesa-misc.
Формат протокола Формат протокола
@@ -61,7 +61,7 @@ https://home.openweathermap.org/api_keys . Free plan предлагает всё
приложение. приложение.
В каталоге contrib находится скрипт для alpine linux, системы инициализации openrc. Этот скрипт достаточно положить В В каталоге contrib находится скрипт для alpine linux, системы инициализации openrc. Этот скрипт достаточно положить В
/etc/init.d/aleesa-misc сконфигурить сервис по инструкции выше и после этого сервис запускается командой: /etc/init.d/aleesa-webapp сконфигурить сервис по инструкции выше и после этого сервис запускается командой:
service aleesa-misc start service aleesa-webapp start
в автозагрузку его можно прописать через команду в автозагрузку его можно прописать через команду
rc-update add aleesa-misc default rc-update add aleesa-webapp default

View File

@@ -33,6 +33,7 @@ use Log::Any qw ($log);
use Log::Any::Adapter; use Log::Any::Adapter;
use Log::Any::For::Std; use Log::Any::For::Std;
use POSIX qw (setgid setuid setsid); use POSIX qw (setgid setuid setsid);
use Conf qw (LoadConf); use Conf qw (LoadConf);
use WebApp qw (RunWebApp); use WebApp qw (RunWebApp);
@@ -43,7 +44,7 @@ sub __signal_handler;
local $OUTPUT_AUTOFLUSH = 1; local $OUTPUT_AUTOFLUSH = 1;
my $runAsUid = $UID; my $runAsUid = $UID;
my $piddir = '/var/run/' . basename (abs_path ($PROGRAM_NAME)); my $piddir = '/var/run/' . basename (abs_path $PROGRAM_NAME);
my $C = LoadConf (); my $C = LoadConf ();
my $loglevel = $C->{'loglevel'} // 'notice'; my $loglevel = $C->{'loglevel'} // 'notice';
my $logfile; my $logfile;

View File

@@ -1,10 +1,12 @@
requires 'Carp', '0'; requires 'Carp', '==1.50';
requires 'CHI', '==0.61'; requires 'CHI', '==0.61';
requires 'CHI::Driver::BerkeleyDB', '==0.05'; requires 'CHI::Driver::BerkeleyDB', '==0.05';
requires 'Cwd', '==3.75';
requires 'Cwd::utf8', '==0.011'; requires 'Cwd::utf8', '==0.011';
requires 'DateTime', '==1.55'; requires 'DateTime', '==1.55';
requires 'Digest::HMAC_SHA1', '==1.04'; requires 'Digest::HMAC_SHA1', '==1.04';
requires 'Encode', '==3.16'; requires 'Encode', '==3.16';
requires 'English', '0';
requires 'EV', '==4.33'; requires 'EV', '==4.33';
requires 'File::Basename', '0'; requires 'File::Basename', '0';
requires 'File::Path', '==2.18'; requires 'File::Path', '==2.18';
@@ -17,9 +19,11 @@ requires 'Log::Any', '==1.710';
requires 'Log::Any::Adapter', '==1.710'; requires 'Log::Any::Adapter', '==1.710';
requires 'Log::Any::For::Std', '==0.05'; requires 'Log::Any::For::Std', '==0.05';
requires 'Math::Random::Secure', '==0.080001'; requires 'Math::Random::Secure', '==0.080001';
requires 'MIME::Base64', '==3.16';
requires 'Mojolicious', '==9.22'; requires 'Mojolicious', '==9.22';
requires 'Mojo::IOLoop::Signal', '==0.003'; requires 'Mojo::IOLoop::Signal', '==0.003';
requires 'Mojo::Redis', '==3.27'; requires 'Mojo::Redis', '==3.27';
requires 'Mojo::UserAgent', '0';
requires 'Mojo::UserAgent::Cached', '==1.18'; requires 'Mojo::UserAgent::Cached', '==1.18';
requires 'POSIX', '0'; requires 'POSIX', '0';
requires 'Protocol::Redis::XS', '0'; requires 'Protocol::Redis::XS', '0';

View File

@@ -2,12 +2,12 @@
# server address # server address
"server" : "redis", "server" : "redis",
"port" : "6379", "port" : "6379",
"channels": [ "channels" : [
"webapp" "webapp"
], ],
# should we fork() and become unix daemon? # should we fork() and become unix daemon?
"daemonize": 1, "daemonize" : 1,
# where caches go there # where caches go there
"cachedir" : "data/cache", "cachedir" : "data/cache",
@@ -17,7 +17,7 @@
# logs goes there # logs goes there
"log" : "/var/log/aleesa-webapp/aleesa-webapp.log", "log" : "/var/log/aleesa-webapp/aleesa-webapp.log",
"loglevel": "notice", "loglevel" : "notice",
# ditto # ditto
"pid" : "/var/run/aleesa-webapp/aleesa-webapp.pid", "pid" : "/var/run/aleesa-webapp/aleesa-webapp.pid",
@@ -26,15 +26,15 @@
"forwards_max" : 5, "forwards_max" : 5,
"openweathermap" : { "openweathermap" : {
"appid": "get_it_on_openweathermap.org" "appid" : "get_it_on_openweathermap.org"
}, },
"image": { "image" : {
"dir" : "data/image", "dir" : "data/image",
"flickr" : { "flickr" : {
"consumer_key" : "key", "consumer_key" : "key",
"consumer_secret" : "key_secret", "consumer_secret" : "key_secret",
"verifier": "verifier_key" "verifier" : "verifier_key"
} }
} }
} }

View File

@@ -16,7 +16,6 @@ use HTML::TokeParser;
use JSON::XS; use JSON::XS;
use Log::Any qw ($log); use Log::Any qw ($log);
use Math::Random::Secure qw (irand); use Math::Random::Secure qw (irand);
use Mojo::Log;
use Mojo::UserAgent; use Mojo::UserAgent;
use Mojo::UserAgent::Cached; use Mojo::UserAgent::Cached;
use Mojo::Util qw (trim); use Mojo::Util qw (trim);