- lms - lists.lms.org.pl

Re: perl -> c/daemon was: Re: Re: Faktury pdf
by Tomasz Chilinski 14 Wrz '05

14 Wrz '05

On Tue, 13 Sep 2005 23:18:11 +0200, Marcin Król wrote > Kolejny raz piszę żeby oznaczyć skrypty jako obsolete, i > przenieść je do contrib. Jako zalecany backend przedstawiać lmsd. > Ma on naprawdę duże możliwości a z jego przenośnością chyba > nie jest tak źle skoro dało się go skompilować na cygwinie (przy > okazji, ktoś jest zainteresowany lmsd na win32?). Jeśli chodzi o > stabilność to kiedyś trzeba zacząć testowanie na szerszą > skalę. Nie wiem czy pamiętacie czemu Linus zdecydował się na > wydanie 2.4.0 - stwierdził że jest za mało testerów żeby > wyłapać błędy, więc wydał 2.4, chociaż jajko nie było > jeszcze na to gotowe. Hehe, a wiesz w jaki sposób M$ testuje swoje oprogramowanie przed jego wydaniem? Linus nic nowego nie odkrył i wcale to nie jest takie dobre rozwiązanie choć na pewno dużo tańsze ;-) > Marcin 'Lexx' Król LMS Developer Pozdrawiam, Tomasz Chiliński

1 0

LMS+serwer pure-ftpd
by xbartx＠epf.pl 13 Wrz '05

13 Wrz '05

Witam Jako, że trochę mi było nie po drodze z proftpd przystosowałem pure-ftpd do współpracy z bazą LMS'a. Dlaczego pure-ftpd? Dzięki włączeniu opcji AUTH uniemożliwia się korzystania z kont użytkowników systemowych i zmusza serwer do pracy z kontami wirtualnymi. No to zaczynamy od instalacji serwera pure-ftpd. Pod Gentoo wygląda to tak: bart # emerge pure-ftpd -av These are the packages that I would merge, in order: Calculating dependencies ...done! [ebuild R ] net-ftp/pure-ftpd-1.0.20-r1 -caps -ldap +mysql +pam -postgres +ssl +vchroot 459 kB Total size of downloads: 459 kB Co do innych systemów to każdy chyba wie jak się instaluje pakiety w swoim systemie a jeżeli nie to pozostaje kompilacja ze źródeł. Po zainstalowaniu przechodzimy do stworzenia pliku, który będzie odpowiadał za łączenie się z bazą LMS'a. Tworzymy plik /etc/pureftpd-mysql.conf który to powinien zawierać minimum takie: MYSQLServer localhost (adres serwera bazy danych - domyślnie 'localhost') MYSQLPort 3306 (port na którym działa serwer MySql - domyślnie '3306') MYSQLSocket /var/run/mysqld/mysqld.sock ( MYSQLUser lms (nazwa usera z dostępem do bazy - domyślnie 'lms') MYSQLPassword hasło (tutaj należy podać hasło) MYSQLDatabase lms (nazwa bazy danych - domyślnie 'lms') MYSQLCrypt crypt (sposób przechowywania haseł) MYSQLGetPW SELECT password FROM passwd WHERE login="\L" (pobieranie hasła dla usera) MYSQLGetUID SELECT uid FROM passwd WHERE login="\L" (pobieranie uid dla usera) MYSQLGetGID SELECT gid FROM passwd WHERE login="\L" (pobieranie gid dla usera) MYSQLGetDir SELECT home FROM passwd WHERE login="\L" (pobieranie nazwy katalogu domowego dla usera) MySQLGetQTASZ SELECT quota_ftp FROM passwd WHERE login="\L" (quota czyli pojemność konta w MB czyli podając w lms-ui 10 oznacza to pojemność 10MB) Teraz pozostaje nam już tylko konfiguracja serwera pure-ftpd. (w gentoo plik konfiguracyjny mieści się w /etc/conf.d/pure-ftpd) a więc: ## Najpierw odkomentujmy tę linię, ponieważ inaczej serwer nie będzie chciał wystartować IS_CONFIGURED="yes" ## Tutaj podajemy adres naszego serwera i port na którym ma nasłuchiwać SERVER="-S www.nasza.domena.pl,21" ## Określamy ilość jednoczesnych połączeń do serwera oraz ilość połączeń z tego samego IP ## To już chyba każdy według potrzeb MAX_CONN="-c 50" MAX_CONN_IP="-C 2" ## Startujemy daemona w tle DAEMON="-B" ## Ustalamy procentową zajętość dysku/partycji kiedy serwer powinien przestać zezwalać na przyjmowanie danych DISK_FULL="-k 90%" ## Jeżeli serwer jest za NATem odkomentuj tę linię #USE_NAT="-N" ## Autoryzacja ma być pobierana z bazy LMS'a podajemy ścieżkę do stworzonego przez nas prędzej pliku AUTH="-l mysql:/etc/pureftpd-mysql.conf" ## Pozostałe opcję w moim wypadku są takie MISC_OTHER="-A -x -j" Teraz już tylko pozostaje wystartować serwer: /etc/init.d/pure-ftpd start Jeżeli chodzi o bardziej szczegółową konfigurację serwera to po więcej odsyłam na http://www.pureftpd.org/ -- bart

1 0

Re: perl -> c/daemon was: Re: Re: Faktury pdf
by Marcin Król 13 Wrz '05

13 Wrz '05

Andrzej Banach napisał(a): [...] > Ciagle zmiany sa > najgorszym z mozliwych scenariuszy i jak mozecie to prowadzcie do > ujednolicenia systemu programowania i w tym kierunku idzcie. Kto wie czy za > pare miesiecy ktos nie wymysli ze moze w jeszcze innym jezyku pisanie bedzie > ciekawsze??? Osobiscie naprawde jak wszystko bedzie generowane z tscripta to > sie dostosuje, jak tak jak jest to do tej pory w innych scryptach lmsd tez sie > dopasuje (juz dopasowalem), jak wrocicie do perla - tez bedzie ok (no dobra > tu juz przesadzilem - tego nie popieram). > Mysle ze moje poglady podziela wiekszosc korzystajacych z LMS'a (przynajmniej > Ci mniejsi - tacy jak ja). Zastanowcie sie nad tym... Backend jeszcze nigdy się nie zmienił, cały czas był rozbudowany. Baseciq też swego czasu stwierdził że skasuje część skryptów perl bo za pomocą lms-mgc da się spokojnie wygenerować wszystko. Tak się jednak nie stało, co nie znaczy że stać się nie może. Kolejny raz piszę żeby oznaczyć skrypty jako obsolete, i przenieść je do contrib. Jako zalecany backend przedstawiać lmsd. Ma on naprawdę duże możliwości a z jego przenośnością chyba nie jest tak źle skoro dało się go skompilować na cygwinie (przy okazji, ktoś jest zainteresowany lmsd na win32?). Jeśli chodzi o stabilność to kiedyś trzeba zacząć testowanie na szerszą skalę. Nie wiem czy pamiętacie czemu Linus zdecydował się na wydanie 2.4.0 - stwierdził że jest za mało testerów żeby wyłapać błędy, więc wydał 2.4, chociaż jajko nie było jeszcze na to gotowe. Jeśli nie widzi wam się skasowanie skryptów, to może przynajmniej zgodzicie się ze mną że lmsd powinien być wskazywany jako "jedyny słuszny wybór" w przyszłych wersjach lms? -- _ _ _ ___ | |_ | \/ |( __| http://www.|___)|_||_||___).rulez.pl Marcin 'Lexx' Król LMS Developer lexx(a)polarnet.gliwice.pl GG: 652506 Nie odpisuje na listy pisane w HTML.

1 0

Re: perl -> c/daemon was: Re: Re: Faktury pdf
by Grzegorz Stanislawski 13 Wrz '05

13 Wrz '05

Andrzej Banach napisał(a): > Mysle ze moje poglady podziela wiekszosc korzystajacych z LMS'a (przynajmniej > Ci mniejsi - tacy jak ja). Zastanowcie sie nad tym... > Ja podzielam. (choc pewnie moj glos za bedzie koronnym argumentem przeciw ;-) Grzegorz Stanislawski

1 0

Re: perl -> c/daemon was: Re: Re: Faktury pdf
by Grzegorz Stanislawski 13 Wrz '05

13 Wrz '05

Andrzej Banach napisał(a): > Mysle ze moje poglady podziela wiekszosc korzystajacych z LMS'a (przynajmniej > Ci mniejsi - tacy jak ja). Zastanowcie sie nad tym... > Ja podzielam. (choc pewnie moj glos za bedzie koronnym argumentem przeciw ;-) Grzegorz Stanislawski

1 0

Re: perl -> c/daemon was: Re: Re: Faktury pdf
by Grzegorz Stanislawski 13 Wrz '05

13 Wrz '05

Andrzej Banach napisał(a): > Mysle ze moje poglady podziela wiekszosc korzystajacych z LMS'a (przynajmniej > Ci mniejsi - tacy jak ja). Zastanowcie sie nad tym... > Ja podzielam. (choc pewnie moj glos za bedzie koronnym argumentem przeciw ;-) Grzegorz Stanislawski

1 0

Re: Script parser'a
by Andrzej Banach 13 Wrz '05

13 Wrz '05

Dnia Tue, Sep 13, 2005 at 08:46:49PM +0200 A.L.E.C napisał(a): > Andrzej Banach napisał(a): > > >A moze ktos powie jak uproscic te zapytanie by wyszukiwanie bilansu > >i danych abonenta twalo krocej?? > > nie potrzebujesz złaczenia z nodes: > Zgadza sie i po wyrzuceniu teraz wszystko ladnie i szybciutko dziala; Jak sie komus przyda to wysylam zamiennik perlowego skryptu lms-cutoff w tscript'cie z ustalaniem po ilu abonamentach user ma zostac odlaczony. Bardzo latwo rozbudowac go o wlaczanie warningow i ustawianie message. Jak nie ma w nim bledow to moze mozna go dodac do dokumentacji jako przyklad?? Bo dalej ta dokumentacja jest bardzo uboga o przyklady:P zawartosc instancji script: ---cut--- {multiplier = 2} /* ilosc nieoplaconych abonamentow */ {CUST=SELECT customers.id AS id, SUM((type * -2 +7) * cash.value) AS balance FROM customers LEFT JOIN cash ON customers.id = cash.customerid AND (cash.type = 3 OR cash.type = 4) WHERE deleted = 0 GROUP BY customers.id} {OBLIGATIONS=SELECT customerid AS id, SUM((100-discount)/100*tariffs.value) AS value FROM assignments LEFT JOIN tariffs ON (assignments.tariffid=tariffs.id) WHERE NOT suspended GROUP BY customerid} {for (r=0; r<number(CUST); r++)} { if (CUST[r].balance < (- multiplier * OBLIGATIONS[r].value))} { UPDATE nodes SET access=0 WHERE ownerid = {CUST[r].id}} { /if} {/for} ---cut--- -- Andrzej Banach net-komp.net.pl

1 0

Re: Script parser'a
by A.L.E.C 13 Wrz '05

13 Wrz '05

Andrzej Banach napisał(a): > A moze ktos powie jak uproscic te zapytanie by wyszukiwanie bilansu > i danych abonenta twalo krocej?? nie potrzebujesz złaczenia z nodes: SELECT customers.id AS id, customers.lastname AS lastname, customers.name AS name, ROUND(SUM((type * -2 + 7) * value),2) AS balance FROM customers LEFT JOIN cash ON (customers.id = customerid) WHERE deleted = 0 GROUP BY customers.id, lastname, customers.name -- Aleksander 'A.L.E.C' Machniak - http://alec.pl gg:2275252 LAN Management System Developer - http://lms.rulez.pl

1 0

Re: Script parser'a
by Andrzej Banach 13 Wrz '05

13 Wrz '05

Dnia Tue, Sep 13, 2005 at 08:15:03PM +0200 Andrzej Banach napisał(a): > > > > {customers = CUSTOMERS} > > {for (r=0; r<number(customers); r++)}\ > > { if (customers[r].balance < (- multiplier * OBLIGATIONS[r].value))}\ > > { customers[r].lastname} {customers[r].name}\t{customers[r].balance} > > { /if}\ > > > > czy tak wygląda po poprawkach? nie możesz używać nigdzie CUSTOMERS > > > dokladnie tak - czas wykonania podstawienia {customers = CUSTOMERS} to > 12s. Po wrzuceniu calego zapytania czyli > > {CUST = SELECT customers.id AS id, customers.lastname AS lastname, \ > customers.name AS name, customers.status AS status, \ > address, zip, city, email, phone1, phone2, phone3, ten, ssn, \ > customers.info AS info, message, \ > SUM(nodes.warning) AS warning, SUM(nodes.access) AS access, \ > ROUND(COALESCE(SUM((type * -2 + 7) * value), 0.00)/( \ > CASE COUNT(DISTINCT nodes.id) \ > WHEN 0 THEN 1 \ > ELSE COUNT(DISTINCT nodes.id) END \ > ),2) AS balance \ > FROM customers \ > LEFT JOIN cash ON (customers.id = customerid) \ > LEFT JOIN nodes ON (customers.id = ownerid) \ > WHERE deleted = 0 \ > GROUP BY customers.id, lastname, customers.name, \ > customers.status, address, zip, city, email, phone1, \ > phone2, phone3, ten, ssn, customers.info, message}\ > > bezposrednio do script i uzywaniu {for (r=0; r<number(CUST); r++)} > czas ponizej 1ms. > Tak wiec narazie mozna sobie radzic piszac zapytanie w script > i nie uzywac tych rozszerzen. > A jednak... za szybko chyba odpowiadam a nie sprawdzam informacji jakie podaje... moj blad... Samo zapytanie: SELECT customers.id AS id, customers.lastname AS lastname, customers.name AS name, ROUND(COALESCE(SUM((type * -2 + 7) * value), 0.00)/(CASE COUNT(DISTINCT nodes.id) WHEN 0 THEN 1 ELSE COUNT(DISTINCT nodes.id) END ),2) AS balance FROM customers LEFT JOIN cash ON (customers.id = customerid) LEFT JOIN nodes ON (customers.id = ownerid) WHERE deleted = 0 GROUP BY customers.id, lastname, customers.name wpisane nawet w phpmyadmin trwa 7.5276 sek. Tak wiec nic dziwnego ze parser tak dlugo kompiluje... Tak wiec to nie zaden blad tylko tak jest.. A moze ktos powie jak uproscic te zapytanie by wyszukiwanie bilansu i danych abonenta twalo krocej?? ps - juz dzisiaj nic nie pisze bo tylko tworze zamieszanie:P -- Andrzej Banach net-komp.net.pl

1 0

Re: Script parser'a
by Andrzej Banach 13 Wrz '05

13 Wrz '05

Dnia Tue, Sep 13, 2005 at 08:03:06PM +0200 A.L.E.C napisał(a): > Andrzej Banach napisał(a): > > >ps - tamto przypisanie customers=CUSTOMERS nei wplynelo na zwiekszenie > >wydajnosci. Zaraz sprobuje posprawdzac czasy wykonania petli > >i poszczegolnych zapytan... > > {customers = CUSTOMERS} > {for (r=0; r<number(customers); r++)}\ > { if (customers[r].balance < (- multiplier * OBLIGATIONS[r].value))}\ > { customers[r].lastname} {customers[r].name}\t{customers[r].balance} > { /if}\ > > czy tak wygląda po poprawkach? nie możesz używać nigdzie CUSTOMERS > dokladnie tak - czas wykonania podstawienia {customers = CUSTOMERS} to 12s. Po wrzuceniu calego zapytania czyli {CUST = SELECT customers.id AS id, customers.lastname AS lastname, \ customers.name AS name, customers.status AS status, \ address, zip, city, email, phone1, phone2, phone3, ten, ssn, \ customers.info AS info, message, \ SUM(nodes.warning) AS warning, SUM(nodes.access) AS access, \ ROUND(COALESCE(SUM((type * -2 + 7) * value), 0.00)/( \ CASE COUNT(DISTINCT nodes.id) \ WHEN 0 THEN 1 \ ELSE COUNT(DISTINCT nodes.id) END \ ),2) AS balance \ FROM customers \ LEFT JOIN cash ON (customers.id = customerid) \ LEFT JOIN nodes ON (customers.id = ownerid) \ WHERE deleted = 0 \ GROUP BY customers.id, lastname, customers.name, \ customers.status, address, zip, city, email, phone1, \ phone2, phone3, ten, ssn, customers.info, message}\ bezposrednio do script i uzywaniu {for (r=0; r<number(CUST); r++)} czas ponizej 1ms. Tak wiec narazie mozna sobie radzic piszac zapytanie w script i nie uzywac tych rozszerzen. -- Andrzej Banach net-komp.net.pl

1 0