6 changed files with 65 additions and 0 deletions
@ -0,0 +1,12 @@
@@ -0,0 +1,12 @@
|
||||
#!/bin/sh |
||||
|
||||
TOTSESSION=$1 |
||||
MIN=$((TOTSESSION/60)) |
||||
|
||||
while [ $MIN -gt 0 ]; do |
||||
clear > /dev/tty9 |
||||
echo "Sessione in corso..." > /dev/tty9 |
||||
echo "Minuti rimanenti: $MIN" > /dev/tty9 |
||||
MIN=$((MIN-1)); |
||||
sleep 59; |
||||
done |
||||
@ -0,0 +1,3 @@
@@ -0,0 +1,3 @@
|
||||
#!/bin/sh |
||||
|
||||
/dragas/chillicount.sh $1 & |
||||
@ -0,0 +1,19 @@
@@ -0,0 +1,19 @@
|
||||
#!/usr/bin/perl |
||||
|
||||
use IO::Socket; |
||||
my $sock = new IO::Socket::INET ( |
||||
LocalHost => '', |
||||
LocalPort => '7071', |
||||
Proto => 'tcp', |
||||
Listen => 1, |
||||
Reuse => 1, |
||||
); |
||||
die "Could not create socket: $!\n" unless $sock; |
||||
my $new_sock = $sock->accept(); |
||||
while(<$new_sock>) { |
||||
# print $_; |
||||
# system("/usr/bin/killall VBoxSVC"); |
||||
system("/usr/bin/pkill -9 X"); |
||||
system("/usr/bin/pkill -9 perl"); |
||||
} |
||||
close($sock); |
||||
@ -0,0 +1,20 @@
@@ -0,0 +1,20 @@
|
||||
#!/usr/bin/perl |
||||
|
||||
use IO::Socket; |
||||
my $sock = new IO::Socket::INET ( |
||||
LocalHost => '', |
||||
LocalPort => '7070', |
||||
Proto => 'tcp', |
||||
Listen => 1, |
||||
Reuse => 1, |
||||
); |
||||
die "Could not create socket: $!\n" unless $sock; |
||||
my $new_sock = $sock->accept(); |
||||
while(<$new_sock>) { |
||||
# print $_; |
||||
system("sudo /dragas/chillicount1.sh $_"); |
||||
system("/usr/bin/sudo /dragas/launchde.sh"); |
||||
system("/usr/bin/pkill -9 X"); |
||||
system("/usr/bin/pkill -9 perl"); |
||||
} |
||||
close($sock); |
||||
@ -0,0 +1,7 @@
@@ -0,0 +1,7 @@
|
||||
#!/bin/bash |
||||
|
||||
perl /dragas/chillilisten.pl & |
||||
perl /dragas/chillikill.pl & |
||||
x11docker --desktop --hostipc --user=1500 regcodrea.dragas.net/bibliochromium |
||||
pkill -9 X; |
||||
exit; |
||||
Loading…
Reference in new issue