| ... | ... |
@@ -153,6 +153,9 @@ sub hilink_send_sms {
|
| 153 | 153 |
|
| 154 | 154 |
log_bot("envoi à $$sms[0] : $$sms[1]");
|
| 155 | 155 |
} |
| 156 |
+ if ($$sms[1] eq 'envoi des SMS terminé !') {
|
|
| 157 |
+ unlink('/dev/shm/smsbot.envoi_en_cours');
|
|
| 158 |
+ } |
|
| 156 | 159 |
sleep 60 + int(rand(30)); |
| 157 | 160 |
} |
| 158 | 161 |
log_bot('fin du thread outbox_sms');
|
| ... | ... |
@@ -223,6 +226,8 @@ sub inbox_sms_parse {
|
| 223 | 226 |
$cfg::user{"message de groupe"} => sub {
|
| 224 | 227 |
$msg->{groupe} = lc $1;
|
| 225 | 228 |
if (authorized_on_table(groupe => $msg->{groupe}, id => $msg->{Phone})) {
|
| 229 |
+ open my $fh, '>', '/dev/shm/smsbot.envoi_en_cours'; |
|
| 230 |
+ close $fh; |
|
| 226 | 231 |
&massive_send_sms(\%$msg); |
| 227 | 232 |
} |
| 228 | 233 |
}, |
| ... | ... |
@@ -1,5 +1,9 @@ |
| 1 | 1 |
#!/bin/bash |
| 2 | 2 |
|
| 3 |
+if test -e /dev/shm/smsbot.envoi_en_cours; then |
|
| 4 |
+ rm -f /dev/shm/smsbot.envoi.ok /dev/shm/smsbot.reception.ok |
|
| 5 |
+ exit |
|
| 6 |
+fi |
|
| 3 | 7 |
|
| 4 | 8 |
eval $(systemctl show smsbot --property=ActiveState) |
| 5 | 9 |
test -n "$ActiveState" && test "$ActiveState" = 'active' || exit 1 |