- lms - lists.lms.org.pl

Re: dwa etapy cutoff
by Tomasz Chilinski 09 Sty '06

09 Sty '06

On Mon, 9 Jan 2006 12:18:19 +0100, Piotr Hołyński wrote > Witam. > > > Po co dodatkowe pole? Można na bazie istniejących skryptów zrobić > > coś takiego: > > 1) Sprawdzamy saldo i jeśli jest np. 200% zaległości to generujemy regułki > > przypominające o zaległościach - przekierowujące ruch www na winietę > > z informacją (użytkownik może wyłączyć sam winietę lub nie - to > > zależy od naszej polityki). > > 2) Jeśli saldo osiągnie 300% zaległości ustawiamy w tabeli nodes pole > > disabled na true (czy jak tam ono nazywa się) i znowu przekierowujemy > > na winietę z saldem, która nie zawiera tym razem linku pozwalającego > > zamknąć > > winietę. > > Już o tym pisałem. > > Niech mi ktoś odpowie dlaczego tak uczepił się tego squida? ;-) > > Co i gdzie nalezy wpisac aby dzilalo to na skryptach w procentach, a > nie tylko kwotowo? U mnie w lms.ini: [warnings] ... limit = 200% ... Skrypt lms-makewarnings obsługuje "oprotcentowanie" ;-) > Z wyrazami szacunku > Piotr Hołyński Pozdrawiam, Tomek.

1 0

Re: dwa etapy cutoff
by Piotr Hołyński 09 Sty '06

09 Sty '06

Witam. > Po co dodatkowe pole? Można na bazie istniejących skryptów zrobić > coś takiego: > 1) Sprawdzamy saldo i jeśli jest np. 200% zaległości to generujemy regułki > przypominające o zaległościach - przekierowujące ruch www na winietę > z informacją (użytkownik może wyłączyć sam winietę lub nie - to > zależy od naszej polityki). > 2) Jeśli saldo osiągnie 300% zaległości ustawiamy w tabeli nodes pole > disabled na true (czy jak tam ono nazywa się) i znowu przekierowujemy > na winietę z saldem, która nie zawiera tym razem linku pozwalającego > zamknąć > winietę. > Już o tym pisałem. > Niech mi ktoś odpowie dlaczego tak uczepił się tego squida? ;-) Co i gdzie nalezy wpisac aby dzilalo to na skryptach w procentach, a nie tylko kwotowo? Z wyrazami szacunku Piotr Hołyński Almar Electronics sp. z o.o. 47-400 Racibórz ul. Opawska 3 0-32 415-08-01 wew. 24 lub 601 410 840 www.almar.net.pl www.almarnet.pl

1 0

Re: dwa etapy cutoff
by Łukasz Klejnberg 09 Sty '06

09 Sty '06

Użytkownik tombog napisał: >*This message was transferred with a trial version of CommuniGate(tm) Pro* >Chętnie bym się przyjrzał zmianom. Może coś by wniosły do pomysłu. > > > W pliku opisane jest co i jak. Rozwiazanie dziala, ale nie jestem specem od zapytan do baz danych wiec jezeli ktos sie tym zainteresuje to mozna byloby to poprawic. Mozna rowniez umiescic w lms.ini date od kiedy ma byc powiadamianie i ktorego dnia ma zablokowac dostep do internetu. Jako ze nie uzywamy squida wiec przerobilem sobie lms-squid i na samym koncu petli while dodalem sobie: if ($row->{'warning'}==0) { system("sudo iptables ... regulka usuwajaca przekierowanie na proxy"); } Oczywiscie uzytkownik proxy musi miec dostep do iptables wiec nalezy go dodac do sudo. Pozniej gdy lms-warningson-cutoff po ktoryms odswierzeniu (np co 30 minut) natrafi na flage warning=1(czyli uzytkownik nie odczytal wiadomosci) wtedy generuje regulke usuwajaca a dopiero pozniej regulke dolaczajaca. Pozdrawiam :) Lukasz #!/usr/bin/perl -Tw # # LMS version 1.6.5 Druhin # # (C) 2001-2005 LMS Developers # # Please, see the doc/AUTHORS for more information about authors! # # This program is free software; you can redistribute it and/or modify # it under the terms of the GNU General Public License Version 2 as # published by the Free Software Foundation. # # This program is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # # You should have received a copy of the GNU General Public License # along with this program; if not, write to the Free Software # Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, # USA. # # $Id: lms-warningson-cutoff,v 1.00.0.0 2006/01/05 17:38:40 alec Exp $ use strict; use DBI; use Config::IniFiles; use Getopt::Long; use vars qw($configfile $quiet $help $version); use POSIX qw(strftime); sub u32todotquad($) { my $p = shift @_; return sprintf "%d.%d.%d.%d",($p>>24)&0xff,($p>>16)&0xff,($p>>8)&0xff,$p&0xff; } my $_version = '1.6.5 Druhin'; my %options = ( "--config-file|C=s" => \$configfile, "--quiet|q" => \$quiet, "--help|h" => \$help, "--version|v" => \$version, ); Getopt::Long::config("no_ignore_case"); GetOptions(%options); if($help) { print STDERR <<EOF; lms-warningson-cutoff, version $_version (C) 2001-2005 LMS Developers -C, --config-file=/etc/lms/lms.ini alternate config file (default: /etc/lms/lms.ini); -h, --help print this help and exit; -v, --version print version info and exit; -q, --quiet suppress any output, except errors; EOF exit 0; } if($version) { print STDERR <<EOF; lms-warnigson-cutoff, version $_version (C) 2001-2005 LMS Developers EOF exit 0; } if(!$configfile) { $configfile = "/etc/lms/lms.ini"; } if(!$quiet) { print STDOUT "lms-warningson-cutoff, version $_version\n"; print STDOUT "(C) 2001-2005 LMS Developers\n"; print STDOUT "Using file $configfile as config.\n"; } if(! -r $configfile) { print STDERR "Fatal error: Unable to read configuration file $configfile, exiting.\n"; exit 1; } my $ini = new Config::IniFiles -file => $configfile; print @Config::IniFiles::errors; my $dbtype = $ini->val('database', 'type') || 'mysql'; my $dbhost = $ini->val('database', 'host') || 'localhost'; my $dbuser = $ini->val('database', 'user') || 'root'; my $dbpasswd = $ini->val('database', 'password') || ''; my $dbname = $ini->val('database', 'database') || 'lms'; my $dbase; my $utsfmt; open(WARNFILE,">/home/kleju/warningson-proxy") or die("Sorry nie mozna utworzyc pliku"); if($dbtype eq "mysql") { $dbase = DBI->connect("DBI:mysql:database=$dbname;host=$dbhost","$dbuser","$dbpasswd", { RaiseError => 1 }); $utsfmt = "UNIX_TIMESTAMP()"; } elsif($dbtype eq "postgres") { $dbase = DBI->connect("DBI:Pg:dbname=$dbname;host=$dbhost","$dbuser","$dbpasswd", { RaiseError => 1 }); $utsfmt = "EXTRACT(EPOCH FROM CURRENT_TIMESTAMP(0))"; } elsif($dbtype eq "sqlite") { $dbase = DBI->connect("DBI:SQLite:dbname=$dbname;host=$dbhost","$dbuser","$dbpasswd", { RaiseError => 1 }); $utsfmt = "strftime('%s','now')"; } else { print STDERR "Fatal error: unsupported database type: $dbtype, exiting.\n"; exit 1; } my $dbq = $dbase->prepare("SELECT time, userid AS id FROM cash WHERE adminid = '0'"); $dbq->execute(); while (my $row = $dbq->fetchrow_hashref()) { # $days pobiera aktualny dzien, $payments_day zawiera rok i miesiac naliczenia faktury + zmienna $days # $nowa_date zawiera aktualna date z dniem 11 # $date_warningson zawiera liczbe po ktorej pozniej bedzie ustawiana flaga warning my $days = strftime "%d", localtime; my $payments_date = strftime "%Y%m$days", localtime($row->{'time'}); my $now_date = strftime "%Y%m11", localtime; my $date_warningson = $now_date-$payments_date; if ($date_warningson <= 0 && $date_warningson > -1) { # zapisywanie do pliku tych ktorzy maja warning=1 ale reguly usuwajacej proxy # w przypadku gdy dana osob nie odczyta ostrzezenia czyli zmodyfikowana wersja lms-squid nie usunie # regulki proxy my $sdbq2 = $dbase->prepare("SELECT mac FROM nodes WHERE ownerid='$row->{'id'}' AND warning='1'"); $sdbq2->execute(); while(my $row2b = $sdbq2->fetchrow_hashref()) { print WARNFILE "/sbin/iptables -t nat -D PREROUTING -m mac --mac-source $row2b->{'mac'} -p tcp --dport 80 -j REDIRECT --to-port 8080\n\n"; } my $sdbq = $dbase->prepare("UPDATE nodes SET warning=1 WHERE ownerid='$row->{'id'}'"); $sdbq->execute(); if(!$quiet) { my $tdbq = $dbase->prepare("SELECT lastname, name FROM users WHERE id='$row->{'id'}'"); $tdbq->execute(); while (my $row2 = $tdbq->fetchrow_hashref()) { print STDOUT "Ostrzezenie dla $row2->{'lastname'} $row2->{'name'} id: $row->{'id'}\n"; } } } # $date_cutoff jest data odciecia, $date_now jest data pobierana w danej chwili # obydwie zmienne sa porownywane ze soba, jezeli sie zgadzaja to nastepuje zmiana # flagi access na 0 my $date_cutoff = strftime "%Y%m28", localtime; my $date_now = strftime "%Y%m%d", localtime; if ($date_cutoff == $date_now) { my $fdbq = $dbase->prepare("UPDATE nodes SET warning=0, access=0 WHERE ownerid='$row->{'id'}'"); $fdbq->execute(); my $fidpq = $dbase->prepare("SELECT lastname, name FROM users WHERE id='$row->{'id'}'"); $fidpq->execute(); while (my $row3 = $fidpq->fetchrow_hashref()) { print STDOUT "Blokada dla $row3->{'lastname'} $row3->{'name'} id: $row->{'id'}\n"; } } # zapisywanie do pliku, tych ktorzy maja oznaczenie na warning=1 my $sdbq3 = $dbase->prepare("SELECT mac FROM nodes WHERE ownerid='$row->{'id'}' AND warning='1'"); $sdbq3->execute(); while(my $row3b = $sdbq3->fetchrow_hashref()) { print WARNFILE "/sbin/iptables -t nat -A PREROUTING -m mac --mac-source $row3b->{'mac'} -p tcp --dport 80 -j REDIRECT --to-port 8080\n\n"; } } $dbase->disconnect(); close(WARNFILE);

1 0

Re: dwa etapy cutoff
by Tomasz Chilinski 09 Sty '06

09 Sty '06

> Już ten - zbliżony temat poruszałem ale nie było na niego zapotrzebowania. > Ja myślałem raczej o nie wprowadzaniu kolejnego pola do bazy tylko > o wykorzystaniu pola access oraz warning oba są typu tinyint(1). > więc np: Wartość 2 to może być przypadek twój jako ograniczony > dla access. Wartość 2 to warning ciągły z własnym interwałem > dla warning chodzi o systematyczne wyświetlanie komunikatu co > okreslony czas. mam tak u siebie zrobione ze przeczytanie komunikatu > nie odznacza go w bazie Po co dodatkowe pole? Można na bazie istniejących skryptów zrobić coś takiego: 1) Sprawdzamy saldo i jeśli jest np. 200% zaległości to generujemy regułki przypominające o zaległościach - przekierowujące ruch www na winietę z informacją (użytkownik może wyłączyć sam winietę lub nie - to zależy od naszej polityki). 2) Jeśli saldo osiągnie 300% zaległości ustawiamy w tabeli nodes pole disabled na true (czy jak tam ono nazywa się) i znowu przekierowujemy na winietę z saldem, która nie zawiera tym razem linku pozwalającego zamknąć winietę. Już o tym pisałem. Niech mi ktoś odpowie dlaczego tak uczepił się tego squida? ;-) > -- > ReYu Pozdrawiam, Tomek.

1 0

Re: dwa etapy cutoff
by tombog 09 Sty '06

09 Sty '06

*This message was transferred with a trial version of CommuniGate(tm) Pro* Chętnie bym się przyjrzał zmianom. Może coś by wniosły do pomysłu. -----Original Message----- From: lms-bounce(a)lists.rulez.pl [mailto:lms-bounce@lists.rulez.pl] On Behalf Of Łukasz Klejnberg Sent: Monday, January 09, 2006 10:59 AM To: lms(a)lists.rulez.pl Subject: [lms] Re: dwa etapy cutoff Czesc, Ja przerobilem lms-cutoff tak aby od 11 do 27 dnia dawal ostrzezenie z genereowana do pliku regulka na squida. Natomiast 28 lms-cutoff odcina calkowicie od internetu. Jezeli kogos to interesuje moge podeslac to rozwiazanie. Pozdrawiam Lukasz

1 0

Re: dwa etapy cutoff
by -=ReYu.com=- 09 Sty '06

09 Sty '06

tombog napisał(a): > Witam. > > W swojej sieci stosuję ostrzeganie klientów przed odłączeniem, zanim ich > odłączę. Wygląda to tak, że po 30 dniach braku wpłaty ( 1 okres > rozliczeniowy), klientowi działa Internet, poza stronami www. Wywołanie > jakiejkolwiek strony ładuje specjalną stronę z ostrzeżeniem i linkami do > banków celem dokonania wpłaty. J. Po kolejnych 30 dniach ( 2 okresy > rozliczeniowe) blokuję całkiem dostęp. > > Chcę wykorzystać lms-cutoff, oraz lms-makeiptables, do realizacji owego > zadania. Żeby nie komplikować, zmieniam nazwy na lms-redirect oraz > lms-makeredirect i wprowadzam w nich odpowiednie zmiany. Mój firewall > jest modułowy i tak będzie najlepiej dla mnie. > > > > Teraz sedno: > > Mam dwie możliwości, ale nie wiem czy dobrze kombinuję i czy to zadziała. > > > > 1. Dodanie trzeciego stanu komputera. Jeśli obecnie pole może przyjmować > wartości 0=wyłączony i 1=włączony, to trzeci stan byłby: 2=ograniczony. > > Pytanie, czy dodanie tego stanu nie wpłynie negatywnie na działanie, np. > skryptu lms-cutoff i innych? Czy inne skrypty korzystają z tej wartości > na zasadzie „=”, czy „><”.? > > > > 2. Dodajemy nowe pole w bazie „nodes” jako odpowiednik pola „access”. > Przybywa nam kolejny wskaźnik stanu komputera. > > W jakich plikach LMS’a muszę ten wskaźnik dodać ? Chodzi o wyświetlanie > stanu, nazwijmy go, „ograniczenia”. Czy jest sens przerabiać dziesiątki > plików, czy można to wywołać z jakiegoś jednego lub kilku miejsc? Na > pewno musi być w edycji komputerów. > > > > Jakieś inne pomysły ? > > > > Dziękuję z góry za zainteresowanie się tematem > > Tomasz Boguta > Już ten - zbliżony temat poruszałem ale nie było na niego zapotrzebowania. Ja myślałem raczej o nie wprowadzaniu kolejnego pola do bazy tylko o wykorzystaniu pola access oraz warning oba są typu tinyint(1). więc np: Wartość 2 to może być przypadek twój jako ograniczony dla access. Wartość 2 to warning ciągły z własnym interwałem dla warning chodzi o systematyczne wyświetlanie komunikatu co okreslony czas. mam tak u siebie zrobione ze przeczytanie komunikatu nie odznacza go w bazie -- ReYu

1 0

po zainstalowaniu rc3 nie ma użytkowników
by Galciu 09 Sty '06

09 Sty '06

To tylko u mnie coś nie tak czy w lms?? Mogę się zalogować, ale w "administracji" - "użytkownicy" jest tylko info: No customers matching search criteria or list is empty. Z góry dzięki za pomoc jak przywrócić listę :) Wersja LMS: 1.8.0rc3 Rosha (1.757.2.5/1.13.2.1) Wersja LMSDB: 1.8.0rc3 Rosha (core: 1.36.2.1 / driver: mysql 1.34.2.1) Wersja MySQL: 4.0.21-log Wersja PHP: 4.3.10-2 Wersja Smarty: 2.6.5-dev

1 0

Re: dwa etapy cutoff
by Łukasz Klejnberg 09 Sty '06

09 Sty '06

Użytkownik tombog napisał: > Witam. > > W swojej sieci stosuję ostrzeganie klientów przed odłączeniem, zanim > ich odłączę. Wygląda to tak, że po 30 dniach braku wpłaty ( 1 okres > rozliczeniowy), klientowi działa Internet, poza stronami www. > Wywołanie jakiejkolwiek strony ładuje specjalną stronę z ostrzeżeniem > i linkami do banków celem dokonania wpłaty. J. Po kolejnych 30 dniach > ( 2 okresy rozliczeniowe) blokuję całkiem dostęp. > > Chcę wykorzystać lms-cutoff, oraz lms-makeiptables, do realizacji > owego zadania. Żeby nie komplikować, zmieniam nazwy na lms-redirect > oraz lms-makeredirect i wprowadzam w nich odpowiednie zmiany. Mój > firewall jest modułowy i tak będzie najlepiej dla mnie. > > > Czesc, Ja przerobilem lms-cutoff tak aby od 11 do 27 dnia dawal ostrzezenie z genereowana do pliku regulka na squida. Natomiast 28 lms-cutoff odcina calkowicie od internetu. Jezeli kogos to interesuje moge podeslac to rozwiazanie. Pozdrawiam Lukasz

1 0

dwa etapy cutoff
by tombog 09 Sty '06

09 Sty '06

Witam. W swojej sieci stosuję ostrzeganie klientów przed odłączeniem, zanim ich odłączę. Wygląda to tak, że po 30 dniach braku wpłaty ( 1 okres rozliczeniowy), klientowi działa Internet, poza stronami www. Wywołanie jakiejkolwiek strony ładuje specjalną stronę z ostrzeżeniem i linkami do banków celem dokonania wpłaty. :-). Po kolejnych 30 dniach ( 2 okresy rozliczeniowe) blokuję całkiem dostęp. Chcę wykorzystać lms-cutoff, oraz lms-makeiptables, do realizacji owego zadania. Żeby nie komplikować, zmieniam nazwy na lms-redirect oraz lms-makeredirect i wprowadzam w nich odpowiednie zmiany. Mój firewall jest modułowy i tak będzie najlepiej dla mnie. Teraz sedno: Mam dwie możliwości, ale nie wiem czy dobrze kombinuję i czy to zadziała. 1. Dodanie trzeciego stanu komputera. Jeśli obecnie pole może przyjmować wartości 0=wyłączony i 1=włączony, to trzeci stan byłby: 2=ograniczony. Pytanie, czy dodanie tego stanu nie wpłynie negatywnie na działanie, np. skryptu lms-cutoff i innych? Czy inne skrypty korzystają z tej wartości na zasadzie "=", czy "><".? 2. Dodajemy nowe pole w bazie "nodes" jako odpowiednik pola "access". Przybywa nam kolejny wskaźnik stanu komputera. W jakich plikach LMS'a muszę ten wskaźnik dodać ? Chodzi o wyświetlanie stanu, nazwijmy go, "ograniczenia". Czy jest sens przerabiać dziesiątki plików, czy można to wywołać z jakiegoś jednego lub kilku miejsc? Na pewno musi być w edycji komputerów. Jakieś inne pomysły ? Dziękuję z góry za zainteresowanie się tematem Tomasz Boguta

1 0

Pytanko o kompaktowanie bazy i backup
by Matys Łukasz 09 Sty '06

09 Sty '06

Witam. Jakim poleceniem z lini komend mozna dokonac kompaktowana bazy danych w wersji 'niski' 'usun dane komputerow nieistniejacych' ? Chcialbym tez dowiedziec sie, jak powinna dokladnie wygladac komenda robiaca backup ale w wersji czytelnej dla LMS'a? Pozdrawiam. -- Matys Łukasz mobile: (+ 48) 504257944

1 0