abclinuxu.cz AbcLinuxu.cz itbiz.cz ITBiz.cz HDmag.cz HDmag.cz abcprace.cz AbcPráce.cz
AbcLinuxu hledá autory!
Inzerujte na AbcPráce.cz od 950 Kč
Rozšířené hledání
×
dnes 15:55 | Zajímavý projekt

Vyzkoušet si příkazy a vyřešit několik úkolů lze na stránkách Commandline Challenge (CMD Challenge). Úkoly lze řešit různými způsoby, důležitý je výsledek. Zdrojové kódy jsou k dispozici na GitHubu pod licencí MIT.

Ladislav Hagara | Komentářů: 9
včera 17:35 | Bezpečnostní upozornění

Německá Bundesnetzagentur (obdoba českého ČTU) zakázala na německém území prodej panenky Cayla kvůli „špionáži“ dětí. Tato elektronická hračka obsahuje mikrofon, reproduktor a kameru a bezdrátové komunikační rozhraní, pomocí kterého se hračka připojuje na servery výrobce. Takovýmto způsobem může hračka pomocí umělé inteligence „odpovídat“ na dotazy dítěte. Hlavní problém bude ale asi někde jinde, podle prvotních zpráv může

… více »
Petr Tomášek | Komentářů: 25
17.2. 15:30 | Bezpečnostní upozornění

CSIRT.CZ upozorňuje, že bezpečnostní experti objevili nový typ malwaru, jenž cílí na open source e-commerce platformu Magento. Malware je zajímavý tím, že se jedná o první svého druhu, jehož kód zůstává skrytý v SQL databázi zasaženého e-shopu. Škodlivý kód je volán pomocí tzv. SQL trigerru, který je spouštěn při každém vytvoření objednávky v systému.

Ladislav Hagara | Komentářů: 2
17.2. 09:00 | Nová verze

Bylo vydáno Ubuntu 16.04.2 LTS, tj. druhé opravné vydání Ubuntu 16.04 LTS s kódovým názvem Xenial Xerus. Přehled novinek v poznámkách k vydání a v přehledu změn.

Ladislav Hagara | Komentářů: 48
17.2. 06:00 | Zajímavý článek

Pavel Tišnovský se v dvoudílném článku na MojeFedora.cz věnuje tvorbě pluginů (modulů) pro bitmapový grafický editor GIMP. Pomocí pluginů lze GIMP rozšiřovat o další funkce. Implementovat lze například nové filtry nebo pomocné utility pro tvorbu animací či poloautomatickou retuš snímků.

Ladislav Hagara | Komentářů: 6
16.2. 23:32 | Komunita

Do 30. března se lze přihlásit do dalšího kola programu Outreachy, jehož cílem je přitáhnout do světa svobodného a otevřeného softwaru lidi ze skupin, jež jsou ve světě svobodného a otevřeného softwaru málo zastoupeny. Za 3 měsíce práce, od 30. května do 30. srpna 2017, v participujících organizacích lze vydělat 5 500 USD. Jedná se již o 14. kolo tohoto programu.

Ladislav Hagara | Komentářů: 11
16.2. 23:13 | Nová verze

Byla vydána verze 0.92.1 svobodného multiplatformního vektorového grafického editoru Inkscape. Přehled novinek v poznámkách k vydání. Řešen je mimo jiné problém s verzí 0.92, jež rozbíjí dokumenty vytvořené v předchozích verzích Inkscape. Více v příspěvku na blogu Davida Revoye, autora open source webového komiksu Pepper&Carrot nebo portrétu GNU/Linuxu.

Ladislav Hagara | Komentářů: 0
16.2. 16:26 | Bezpečnostní upozornění

Byla vydána verze 1.1.0e kryptografické knihovny OpenSSL. Dle bezpečnostního upozornění 20170216 byla opravena závažná bezpečnostní chyba CVE-2017-3733.

Ladislav Hagara | Komentářů: 1
16.2. 13:03 | Pozvánky

GNOME hackaton proběhne v Brně na FIT VUT v Red Hat Labu (budova Q) v pondělí 20. února od 15:00. Registrace není nutná, ale pokud dáte na FaceBooku vědět, že plánujete dorazit, pomůže to s plánováním.

Ladislav Hagara | Komentářů: 0
16.2. 13:02 | Pozvánky

Únorový Prague Containers Meetup se koná 21. února v budově MSD. Můžete se těšit na přednášky o tom, proč a jak používat kontejnery a zároveň získat zajímavý pohled na historii a budoucnost kontejnerů.

little-drunk-jesus | Komentářů: 0
Jak se stavíte k trendu ztenčování přenosných zařízení (smartphony, notebooky)?
 (13%)
 (2%)
 (72%)
 (3%)
 (10%)
Celkem 657 hlasů
 Komentářů: 52, poslední 13.2. 12:45
Rozcestník
Reklama

Dotaz: IRC Proxy v Perlu

8.10.2009 21:30 Mr.S1lent.cz
IRC Proxy v Perlu
Přečteno: 190×

Zdravim, jsem pravidelny navstevnik lide chatu -> mitnost pc. Chodim tam pres lide-gw pythonovou branu a ted me napadlo udelat nejakou proxy, ktera by fungovala jako takovy filtr vstupu, ktery by kontrolovaly prislusne moduly a teprve pak poustely do klienta. Avsak jsem zatim tvoril neuspesne :-(

Traffic probiha podle vseho pouze od klienta do proxy ( netusim jestli to leze i do brany a fuc ), ale od lide brany mi tam do proxy zadny traffic nejde, cili je zrejme neco spatne...

 

Login klienta do brany lide-gw je defaultne: 

server = localhost

port = 13801

 

proxy jsem vytvoril na 127.0.0.1:13802

zde je kod: http://www.pastebin.cz/preview/384657616a64f3

 

lide-gw brana hlasi, ze se proxy pripoji (jede v terminalu), ale klientovi se pripojit nepodari, to je vse, co vam k tomu mohu rict, nevi nekdo, kde je chyba? :-(

 

Predem dekuji za odpovedi...

 

Odpovědi

9.10.2009 06:31 pht | skóre: 48 | blog: pht
Rozbalit Rozbalit vše Re: IRC Proxy v Perlu
A co to má jako dělat?
my $conn = Connection();
my $lide = $conn->accept();
Nejdřív čekáte na spojení na jednom portu...
my $proxy = Proxy();
my $local = $proxy->accept();
Pak na druhém...
while( my $input = <$lide> ) {
    chomp $input;
    print "$input\n";

    my $l = <$local>;
    chomp $l;
    print $l $input;
}
Pak čtete řádek z prvního, pak z druhýho socketu (tohle pořadí máte nějak zaručeno, nebo si koledujete o deadlock), a pak printujete kam??? $1 asi těžko bude nějaký file descriptor, takže by to mělo celkem solidně řvát. Navíc používat $1 jako proměnnou je dost blbej nápad.
die "Can't connected to lide.cz!\n";
Tohle je asi dost od věci, protože se to ani v jednom případě nikam nepřipojuje.
In Ada the typical infinite loop would normally be terminated by detonation.
9.10.2009 14:21 Mr.S1lent.cz
Rozbalit Rozbalit vše Re: IRC Proxy v Perlu

No ja jsem omylem hodil predchozi verzi, soucasna je: http://www.pastebin.cz/23778

Aco to ma delat? tento script by mel byt takovym mostem mezi lidegw branou a IRC klientem.

V soucasne dobe to dela to, ze se to napoji na lide branu, prijme data od klienta, ale to je tak vsechno, bud se tomuto mostu nedari odeslat data lidegw brane, nebo neni schopen ty data od ni prijimat a posilat klientovi...

Lidewg brana hlasi connected, tento perlovsky most hlasi connected obema socketum ( uz jsem ten vypis connected z kodu odstranil ), avsak klient se nedokaze prihlasit...

btw od klienta mi prijdou tyto data:

PASS  ...

USER ...

NICK ...

 

Nenapada vas nekoho, jak to zprovoznit? :-(

 

9.10.2009 16:33 Dunric | skóre: 21
Rozbalit Rozbalit vše Re: IRC Proxy v Perlu
Tvůj dotaz i kód jsou dost zmatený.

Všimnul jsem si ale, že vůbec neukončuješ zprávy posílaný socketům, tak se ti všechny zprávy z "proxy" hromadí do 1. neukončené zprávy pro "lidegw" a proto na cílovém serveru není "nic vidět".

In the garden sleeps a messenger ·
9.10.2009 16:59 Mr.S1lent.cz
Rozbalit Rozbalit vše Re: IRC Proxy v Perlu

Kod verim, ze je zmateny, poneavdz tohle zkousim prvne, nikdy jsem takovou lokalni proxy nezkousel :-)

A dotaz? Ja osobne doufam, ze staci uz jen kousicek k tomu, aby to fungovalo, tak bych chtel nakopnout :-) takze znovu:

1) cil - udelat lokalni proxy, neboli takovy most mezi pythonovou lide-gw branou, ktera slouzi k vytvoreni socketu pro komunikaci lide chatu s IRC klientem.

defaultni login na tuto branu je server: localhost; port: 13801;

2) chovani soucasneho scriptu: pythonova brana hlasi prijem noveho spojeni ( tedy od teto lokalni proxy ), oba sockety byly zdarne vytvoreny a proxy prijima data od IRC klienta. To je ale vse - tato lokalni proxy pravdepodobne neodesila data od klienta k lide brane, nebo nedokaze prevzit data z lide brany ( anebo oboji ze ) :-/

3) soucasny kod:

#!/usr/bin/perl

use strict;
use IO::Socket;

sub Connection {
    my $conn = new IO::Socket::INET (
                   PeerAddr => 'localhost',
                   PeerPort => '13801',
                   Proto    => 'tcp',
                   Type     => SOCK_STREAM,
                                   );
    if ( ! $conn ) {
        die "Can't connected to lide.cz!\n";
    } else {
        return $conn;
    }
}

sub Proxy {
    my $conn = new IO::Socket::INET (
                   LocalAddr => '127.0.0.1',
                   LocalPort => '13802',
                   Proto     => 'tcp',
                   Resue     => 1,
                   Listen    => 1,
                                   );
    if ( ! $conn ) {
        die "Can't created a proxy!\n";
    } else {
        return $conn;
    }
}

my $conn = Connection();
my $server = Proxy();

my $proxy = $server->accept();
my $lidegw = $conn->accept();
$conn->blocking(0);
$server->blocking(0);

while ( my $lide = <$lidegw> or my $local = <$proxy> ) {
    chomp $lide;
    chomp $local;

    if ( $lide != '' ) {
        print "from lidegw: $lide\n";
        print $server "$lide\r\n";
    } else {
        print "from klient: $local\n";
        print $conn "$local\r\n";
    }
}

 

9.10.2009 18:50 Dunric | skóre: 21
Rozbalit Rozbalit vše Re: IRC Proxy v Perlu
Zkuste prosím objasnit co jste zamýšlel tou částí kódu kolem proměnné $lidegw, zejména
...
my $lidegw = $conn->accept();
...
while ( my $lide = <$lidegw> or my $local = <$proxy> ) {
    chomp $lide;
    chomp $local;

    if ( $lide != '' ) {
        print "from lidegw: $lide\n";
        print $server "$lide\r\n";
    } else {
protože to nedává smysl, na tom socketu nic nenaslouchá.
In the garden sleeps a messenger ·
10.10.2009 11:51 Mr.S1lent.cz
Rozbalit Rozbalit vše Re: IRC Proxy v Perlu
Uz jsem na to prisel, nevedel jsem v Perlu o funkci "fork", diky ni jsem to uspesne vyresil timto zpusobem:

http://www.pastebin.cz/23805
10.10.2009 18:28 pht | skóre: 48 | blog: pht
Rozbalit Rozbalit vše Re: IRC Proxy v Perlu
Na začátek to není špatné, ale tento princip používali kluci z berkeley v 80. letech a po nich to zdědili programátoři windows. Normálně Vám bude stačit jeden proces a v něm použít select() pro čekání na data na obou spojeních. Při troše hledání určitě najdete i perlovský modul, který celou tu proxy udělá za Vás.
In Ada the typical infinite loop would normally be terminated by detonation.

Založit nové vláknoNahoru

Tiskni Sdílej: Linkuj Jaggni to Vybrali.sme.sk Google Del.icio.us Facebook

ISSN 1214-1267   www.czech-server.cz
© 1999-2015 Nitemedia s. r. o. Všechna práva vyhrazena.