From: Googie <googie nospam.0rg>
Subject: Re: Odpowiednik funkcji pack i unpack z PHP w TCL (binary..)
Kamil D. wrote:

> Witam!
>
> Czy ktoś z Was wie może jak zastąpić:
>
> unpack('Vtype/Vsize/Vkey', $data);
> pack('VVVVVVVv', GG_LOGIN, 0x16, $uid, $this->_loginHash($password,
> (int)$aData['key']),
>
> (http://anakin.us/phplibgadu.phps)
>
> na TCLowe odpowiedniki? Nie bardzo rozumiem funkcji binary (bo o nią
> chodzi?) i mi to nie idzie..
>
> Pozdrawiam
>


pack i unpack są mniej więcej odpowiednikami 'binary format' i 'binary
scan', tylko oczywiście inaczej się ich używa.

Podam Ci przykład użycia binary format i scan, a resztę mam nadzieję że
wymyślisz z manuala Tcl (
http://www.tcl.tk/man/tcl8.4/TclCmd/binary.htm ):

1. Konwersja stringa na kod ascii:

binary scan $string c* asciiVariable
puts $asciiVariable

2. Konwersja odwrotna (z ascii do stringa):

puts [binary format c* $asciiString]


Musisz przetłumaczyć sobie odpowiednie parametry z
http://pl2.php.net/pack (chodzi o literki i ich typy danych) na
odpowiednie parametry z
http://www.tcl.tk/man/tcl8.4/TclCmd/binary.htm .

--
Pozdrawiam (Regards)!
Googie

From: T <t invalid.invalid>
Subject: Dziwny problem
Mam takie coś:

03:03:56 ananke#~ cat test
#!/usr/bin/tclsh

exec top -bn 1 > /dev/null
puts "ok"

03:04:02 ananke#~ ./test
child process exited abnormally
while executing
"exec top -bn 1 > /dev/null"
(file "./test" line 3)

Skierowane do /dev/null dla przejrzystości, nie ma to znaczenia. Taki błąd
występuje wyłącznie przy wywołaniu top (oczywiście wywołuję go z "-b"
czyli w batch mode i z "-n 1" czyli z jednym przejściem). Co może być
przyczyną?

--
Fruit of Lunacy

From: Googie <no spam.0rg>
Subject: Re: =?ISO-8859-2?Q?warto=B6ci_ca=B3kowitoliczbowe?=
Phoenix wrote:

> Witam wszystkich
>
> Piszę skrypcik który będzie się komunikował po sieci z aplikacją
> napisaną w C++ (WinSock) i potrzebuję z nią wymieniać wartości
> całkowite. Jak wiadomo w Tcl podstawowym typem jest łańcuch i jak
> wysyłam cokolwiek do serwera to po drugiej stronie dostaję kolejne
> "cyfry" jako znaki char. Jak mogę wysłać dwubajtową wartość w postaci
> normalnej wartości typu integer? Próbowałem kombinować z expr itp. ale
> nic to nie dało. Przypuszczam ze czegoś oczywistego po prostu nie wiem.

fconfigure $sock -translation binary -encoding binary

--
Pozdrawiam! (Regards!)
Googie

Kosmetyki odmładzające - sklep internetowy z kosmetykami
From: Neas <neas neas.invalid>
Subject: Re: wykonanie poleceniecia konsoli bota ze skryptu
Tomasz Motyliński pisze:

>> putserv "PRIVMSG #kanal :jakas tresc"
> putquick dziala szybiej. Nie o to jednak pytałem, pytałem jak wykonać
> polecenie konsoli, say był przykładem nie konkretna potrzebą.

UĹźywanie putquick do PRIVMSG to nonsens.

>> proc {chan txt} {
>> putserv "PRIVMSG $chan :$txt"
>> }
>
> I tak takową napisać trzeba jeśli chce się, aby say działało na !chan tylko
> że wyglądać ona powinna tak:

Powyższe też będzie działało, wystarczy podać pełną nazwę kanału z
prefiksem.

--
http://www.insane.pl -- serwery wirtualne od 29 zł + VAT rocznie

From: jerry <jerry niewazne.pl>
Subject: CONCAT a znak =?ISO-8859-2?Q?ko=F1ca_linii?=
Witam,

Dlaczego sklejając łańcuchy za pomocą CONCAT wynikowy łańcuch nie
zawiera znaku końca linii i powrotu karetki (\n\r), mimo że te znaki
były doklejane. Np.:

set str "PIERWSZA LINIA"
set str [concat $str "\n\rDRUGA LINIA\n\r"]

da w wyniku tekst "PIERWSZA LINIA DRUGA LINIA"
?

Jak sklejać łańcuchy zawierające takie znaki?
help...

From: ZB <zbREMOVE_THIS AND_THISispid.com.pl>
Subject: Re: =?iso-8859-2?Q?S=B3aba_wydajno=B6=E6?= TCLa ?
Dnia 06.10.2007 TCLfriend googlemail.com <TCLfriend googlemail.com> napisał/a:

> , natomiast chciałbym się spytać innych użytkowników Tcla, jak wy
> znajdujecie wydajność tego języka w odniesieniu do innych?

Odnośnie szybszej Javy: to jeszcze zależy, której wersji Tcl użyto do testu;
ktoś na liście angielskiej niedawno "zapodał", że 8.5 jest ok. 2-krotnie
wolniejsza od 8.4 (sam nie sprawdzałem; i tak nic przecież na to nie
poradzę). Więc gdyby (ha, gdyby...) w wersji finalnej podregulowano
wydajność tak, żeby wrócić do stanu z 8.4, nie byłoby znowuż tak źle.
--
ZB

From: "Stachu 'Dozzie' K." <dozzie dynamit.im.pwr.wroc.pl.nospam>
Subject: Re: CONCAT a znak =?iso-8859-2?Q?ko=F1ca?= linii
On 17.09.2007, jerry <jerry niewazne.pl> wrote:
> Witam,
>
> Dlaczego sklejając łańcuchy za pomocą CONCAT wynikowy łańcuch nie
> zawiera znaku końca linii i powrotu karetki (\n\r), mimo że te znaki
> były doklejane. Np.:
>
> set str "PIERWSZA LINIA"
> set str [concat $str "\n\rDRUGA LINIA\n\r"]
>
> da w wyniku tekst "PIERWSZA LINIA DRUGA LINIA"
> ?

A czytałeś manuala do concat? Dlaczego nie czytałeś?

> Jak sklejać łańcuchy zawierające takie znaki?
> help...

--
Secunia non olet.
Stanislaw Klekot

From: Googie <no spam.0rg>
Subject: Re: problem z wydajnoscia tcldom2.5 pod unixem
lukasz.kedzior gmail.com wrote:
> Niestety nie moge w tym przypadku dodac zadnych innych pakietow do
> systemu.
>
> Czy istnieje sposob zeby korzystac z tdom dodajac potrzebne pliki do
> folderu w ktorym bedzie sie znajdowal program?

Tak, każdy pakiet Tcl można dać do dowolnego katalogu, byleby dodac tą
ścieżkę do auto_path:

lappend auto_path /sciezka/do/pakietow

--
Pozdrawiam! (Regards!)
Googie

Promocja serwerów wirtualnych
From: Googie <googie nospam.0rg>
Subject: ANN: SQLiteStudio 1.0.0-beta4
SQLiteStudio 1.0.0-beta4 już jest!
http://sqlitestudio.one.pl

ZNACZĄCE ZMIANY OD BETY3:
- Pełna obsługa wartości NULL,
- Liczne poprawki w kodowaniu UTF-8 oraz wykrywaniu globalnych
ograniczeń (constraint'ów),
- Silnik SQLite zaktualizowany do 3.4.2 w dystrybucjach binarnych,
- ...oraz wiele innych mniej istotnych poprawek i zmian.
Pełna lista zmian znajduje się w menu aplikacji:
SQLiteStudio->Lista zmian, lub na stronie:
http://sqlitestudio.one.pl/index.php?act=changelog

CZYM JEST SQLITESTUDIO?
Jest to zaawansowany, wieloplatformowy (na razie Linux i Windows)
menadżer bazy SQLite napisany w Tclu (z kilkoma rozszerzeniami).

Aktualnie jedynie SQLite 3.x jest obsługiwany, ale SQLite 2.x, RealSQL
(i inne) są w planach.

Projekt ma charakter otwartych źródeł. Jest też darmowy do
niekomercyjnego użytku (komercyjne uzytkowanie wymaga zakupu
licencji - poczynając od wersji stabilnej, podczas gdy aktualna wersja
to BETA, niestabilna - więcej szczegółów znajdziesz na stronie
domowej).

SQLiteStudio jest dokładniej opisane na stronie:
http://sqlitestudio.one.pl/index.php?act=about

Zrzuty ekranu można znaleźć na:
http://sqlitestudio.one.pl/index.php?act=screenshots

Forum dyskusyjne jest pod adresem:
http://forum.sqlitestudio.one.pl/

Mam nadzieję że spodoba Wam się ten program!

Wszelkie sugestie, zgłoszenia błędów, komentarze i pomysły są
milewidziane na forum dyskusyjnym (patrz wyżej), tak samo jak wkład w
pracę, jak łatki czy grafika.

--
Pozdrawiam (Regards)!
Googie

From: Googie <googie nospam.0rg>
Subject: Re: Dziwny problem
T wrote:

> Swoją drogą ciekawe, dlaczego top jest tak ułomny.

Trzeba by pogrzebać na googlach, czego mi się teraz nie chce :)
Możliwe że jest jakieś sensowne wyjaśnienie, może ma powód.

--
Pozdrawiam (Regards)!
Googie

From: "Kamil D." <bashysta WYTNIJ.gazeta.pl>
Subject: Re: Odpowiednik funkcji pack i unpack z PHP w TCL (binary..)
Googie <googie nospam.0rg> napisał(a):

> [...]

Dzięki za odpowiedź i przykłady. Myślę, że teraz sobie poradzę :)

Pozdrawiam


--
Wysłano z serwisu Usenet w portalu Gazeta.pl -> http://www.gazeta.pl/usenet/

From: "Wojciech Kocjan" <wojciechka gazeta.pl>
Subject: Re: =?iso-8859-2?B?U7NhYmEgd3lkYWpub7bmIFRDTGEgPw==?=
Dnia 07-10-2007 o 20:10:18 Artur <mail xdobry.de> napisał(a):
> On 6 Okt., 22:23, TCLfri... googlemail.com wrote:
>> Miałem ostatnio potrzebę przekodować prostą operacją XOR dość duży
>> plik (kilkaset MB). Przy okazji porównałem wydajność analogicznego
>> kodu napisanego w Tclu, perlu i javie i niestety musze stwierdzić, że
>> wydajność Tcl'a pozostawiła tu wiele do życzenia :-( Oczywiście test
>> ten nie może być uznany za obiektywny, jednak dotyczył realnego
>> zagadnienia przez co jego wynik uważam za szczególnie istotny. Nie
>> chcę zaśmiecać grupy, szczegóły tego 'testu' opisałem
>> tutaj:http://tclmentorpl.kocjan.org/2007/10/krtka-rozprawa-midzy-panem-wjte...
>> , natomiast chciałbym się spytać innych użytkowników Tcla, jak wy
>> znajdujecie wydajność tego języka w odniesieniu do innych?
> Tak. To jest dobry przykład do czego nie powinno się używać Tcl
> bezpośrednio.
> Tcl został wymyślony jako tzw. jezyk klej. Klej dla kodu napisanego w
> C.

Tu akurat się zgadzam.

> [ciach]
> static int stringxor(ClientData clientData, Tcl_Interp *interp, int
> objc, Tcl_Obj *const objv[])
> {
> if (objc!=2) {
> Tcl_WrongNumArgs(interp, 1, objv, "proceduro atendas du
> argumentojn");
> return TCL_ERROR;
> }
> int stringlen,xorlen,t=0
> char *string = Tcl_GetStringFromObj(objv[0], &stringlen);
> char *xor = Tcl_GetStringFromObj(objv[1], &xorlen);

Zależnie od tego co autor miał na myśli (a raczej miał na myśli dane
binarne) to pewnie chodziło o Tcl_GetByteArrayFromObj().

Zastanawiam się nad czymś innym - czy nie można tego problemu trochę
uogólnić i np zaimplementować w oparciu o C i Tcl_ExprObj(). Na przykład:

manipulatedata byte data $datastr byte key $keystr {$data ^ $key} <-
ostatnie to formuła matematyczna.

O ile takie coś pewnie nie znajdzie się w samym Tcl, to pewnie mogłoby
znaleźć się w Tcllib wraz z wersją critcl (jak np md5 w tcllib).

--
Wojciech Kocjan

From: "jans" <jans qdnet.pl>
Subject: Re: Automatyczne odpalanie skryptu tcl

"Googie" <no spam.0rg> wrote in message
news:fc63bj$j4r$3 srv.cyf-kr.edu.pl...
> jans wrote:
>
> [...]
>
> Nie powiedziałeś najważniejszego - jaki to system?
>
> --
> Pozdrawiam! (Regards!)
> Googie

Już spieszę donieść że to dystrybucja ZoneMinder 1.22.3
Oparty na Mandrivie system do obsługi i monitoringu kamer video i lan

WIFI w Warszawie
From: Phoenix <p_h_o_e_n_i_x_8_2 tenbit_pl._bez_podkreslnikow>
Subject: =?ISO-8859-2?Q?warto=B6ci_ca=B3kowitoliczbowe?=
Witam wszystkich

Piszę skrypcik który będzie się komunikował po sieci z aplikacją
napisaną w C++ (WinSock) i potrzebuję z nią wymieniać wartości
całkowite. Jak wiadomo w Tcl podstawowym typem jest łańcuch i jak
wysyłam cokolwiek do serwera to po drugiej stronie dostaję kolejne
"cyfry" jako znaki char. Jak mogę wysłać dwubajtową wartość w postaci
normalnej wartości typu integer? Próbowałem kombinować z expr itp. ale
nic to nie dało. Przypuszczam ze czegoś oczywistego po prostu nie wiem.

Z góry wielki dzięki
Pnx

From: Googie <no spam.0rg>
Subject: Re: obrazek w schowku
Witek Mozga wrote:
> Witam
>
> Czy Tk pod linuksem daje możliwość przenoszenia obrazka poprzez schowek
> do aplikacji spoza Tk, np. OpenOffice? Poprosze o jakiś hint.
>

http://wiki.tcl.tk/15647 <- tutaj masz przykład jak to zrobić pod
Windowsem, dla innych systemów nie udało mi się nic znaleźć.

--
Pozdrawiam! (Regards!)
Googie

From: Artur <mail xdobry.de>
Subject: Re: jak skompilowac tcl z thread extention?
On 11 Mai, 21:06, Michal <zie... WYTNIJ.TO.wp.pl> wrote:
> Mo=BFe to g=B3upie pytanie, ale jako=B6 nie wiem jak to zrobi=E6 :/
> Mam =B6ci=B1gni=EAte =BCr=F3d=B3a tcl'a (8.4.14) . Mam =B6ci=B1gni=EAte =
=BCr=F3d=B3a thread
> extention (2.6.5) I co teraz?
> Odpalam projekt tcl, kompiluje i ok. Odpalam projekt threads, podaje
> =B6cie=BFk=EA do tcl'a, kompiluj=EA i ok. Ale co dalej? Mog=EA odpali=E6 =
tcla,
> dzia=B3a ale..no w=B3a=B6nie jak si=EA nazywa ten pakiet od threads? jak =
mam go
> zaimportowa=E6 a potem u=BFywa=E6?
>
> Kompilaor to: Visual C++ 6.0 Pro
>
> ps. jestem pocz=B1tkuj=B1cy wi=EAc miejcie wyrozumia=B3o=B6=E6 ;)
>
> --
> Micha=B3

Ostatnie wersje AcitveTcl s=B1 kompilowane z opcj=B1 --with-thread i
posiada Thread extension.
Wi=EAc ju=BF nie trzeba samemu kompilowa=E6
Kr=F3tki opis jest pod
http://wiki.tcl.tk/1339
U=BFywa si=EA tego jak ka=BFde inne extension
package require Thread
Dokumentacja znajduje si=EA jako HTML w pliku to thread extension
http://sourceforge.net/project/showfiles.php?group_id=3D10894&package_id=3D=
10438

Threads w Tcl to jest co=B6 innego ni=BF Threads w Java, C++ albo .NET.
Ka=BFdy Thread w Tcl to niezale=BFne =B6rodowisko (Interpreter), wi=EAc to
prawie tak jakby wystartowa=E6 2 programy (procesy).
Komunikacja jest mo=BFliwa tylko przez zdefiniowany kana=B3.
Tcl posiada bardzo dobry model asychron I/O (Input and Output) tzw.
Event Model, dlatego Threads, kt=F3re s=B1 stosowana
w Java poniewa=BF nie ma w niej asynchron Read/Write, to w Tcl robi si=EA
przez komend=EA fileevent.
W Tcl mo=BFna pisa=E6 wydajne serwery TCP (np. HTTP) zype=B3nie bez u=BFycia
w=B1tk=F3w.
Mo=BFe to jest pow=F3d, dlaczego Threads s=B1 prawie nie u=BFywane w Tcl.
http://wiki.tcl.tk/1904
Niekiedy tak=BFe lepiej jest wystartowa=E6 kilka proces=F3w Tcl i
komunikowa=E6 przez TCP, send albo dde.

Znany Architekt Martin Fowler raz napisa=B3: Pierwsze prawo co do
Threads jest, nie u=BFywaj ich.

Artur

From: TCLfriend googlemail.com
Subject: =?iso-8859-2?B?U7NhYmEgd3lkYWpub7bmIFRDTGEgPw==?=
Witajcie!

Mia=B3em ostatnio potrzeb=EA przekodowa=E6 prost=B1 operacj=B1 XOR do=B6=E6=
du=BFy
plik (kilkaset MB). Przy okazji por=F3wna=B3em wydajno=B6=E6 analogicznego
kodu napisanego w Tclu, perlu i javie i niestety musze stwierdzi=E6, =BFe
wydajno=B6=E6 Tcl'a pozostawi=B3a tu wiele do =BFyczenia :-( Oczywi=B6cie t=
est
ten nie mo=BFe by=E6 uznany za obiektywny, jednak dotyczy=B3 realnego
zagadnienia przez co jego wynik uwa=BFam za szczeg=F3lnie istotny. Nie
chc=EA za=B6mieca=E6 grupy, szczeg=F3=B3y tego 'testu' opisa=B3em tutaj:
http://tclmentorpl.kocjan.org/2007/10/krtka-rozprawa-midzy-panem-wjtem-i.ht=
ml
, natomiast chcia=B3bym si=EA spyta=E6 innych u=BFytkownik=F3w Tcla, jak wy
znajdujecie wydajno=B6=E6 tego j=EAzyka w odniesieniu do innych?

From: Witek Mozga <mozga trimen.pl.no.junk>
Subject: Re: wiki i tcl

> after $ms [list every $ms $body]
> nie jest wywołaniem procedury 'every', to jest ustawienie wywołania tej
> procedury z pętli zdarzeń po czasie $ms.

Dzieki

teraz rozumiem, czyli wszystko jest ok.

--
Witek

Kosmetyki - sklep internetowy
From: " pablo" <pawellt NOSPAM.gazeta.pl>
Subject: =?ISO-8859-2?Q?Bie=BF=B1cy_skrypt?=
witam

W jaki sposób mogę z poziomu interpretera tcl dowiedzieć się jaki aktualnie
wykonywany jest skrypt tcl'owy? Chodzi o to, że mam kilka skryptów,
pracuja niezaleznie od siebie, w różnym czasie [w zależności od zdarzenia
jakie wystąpi na serwerze FTP] i potrzebuje uzyskać nazwę i ściezke do
aktualnie wykonywanego skryptu.

Interpeter ActiveState. Calosc pracuje na platformie Windows XP.

Dzieki z gory za wskazówki.
p.

--
Wysłano z serwisu Usenet w portalu Gazeta.pl -> http://www.gazeta.pl/usenet/

From: Witek Mozga <mozga trimen.pl.no.junk>
Subject: obrazek w schowku
Witam

Czy Tk pod linuksem daje możliwość przenoszenia obrazka poprzez schowek
do aplikacji spoza Tk, np. OpenOffice? Poprosze o jakiś hint.

--
Witek
http://www.trimen.pl/witek/

następna strona