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í
×

    včera 17:11 | Bezpečnostní upozornění

    Zero Day Initiative zveřejnila informace o 6 bezpečnostních chybách (1, 2, 3, 4, 5, 6) v MTA Exim. Nejvážnější z nich CVE-2023-42115 má CVSS 9.8. Na opravě chyb se pracuje.

    Ladislav Hagara | Komentářů: 6
    včera 16:33 | Bezpečnostní upozornění

    Knihovna libvpx byla vydána ve verzi 1.13.1. Řešena je kritická bezpečnostní chyba CVE-2023-5217 (heap buffer overflow in vp8 encoding). Chyba je již opravena také v Chrome / Chromium 117.0.5938.132 a Firefoxu 118.0.1.

    Ladislav Hagara | Komentářů: 0
    29.9. 23:55 | Nová verze

    Balíček kmod s nástroji pro práci s linuxovými moduly byl vydán ve verzi 31. Nově umí modprobe zavést modul nacházející se v libovolném adresáři (# modprobe ./drivers/gpu/drm/i915/i915.ko).

    Ladislav Hagara | Komentářů: 0
    29.9. 23:11 | IT novinky

    Adventura Trüberbrook je na portále GOG.com zdarma, akce trvá do 2. října.

    Fluttershy, yay! | Komentářů: 0
    29.9. 12:44 | Nová verze

    Sound Open Firmware, projekt Linux Foundation, open source audio DSP firmware a SDK, byl vydán ve verzi 2.7.0. Z novinek lze vypíchnout podporu platformy AMD Van Gogh.

    Ladislav Hagara | Komentářů: 0
    29.9. 12:22 | Komunita

    Richard Stallman v den oslav 40. výročí GNU oznámil, že má rakovinu (YouTube).

    Ladislav Hagara | Komentářů: 40
    29.9. 08:00 | Zajímavý projekt

    DIY trackball Ploopy novou variantu Adept, na rozdíl od předchozích používá 44mm kouli, má symetrický tvar a šest tlačítek, snímač zůstává PMW-3360, novinkou je použití Raspberry Pi Pico, na kterém běží firmware QMK s podporou grafické konfigurační aplikace VIA. Předobjednávky jsou otevřeny za ceny 80-105 CAD.

    Fluttershy, yay! | Komentářů: 0
    28.9. 15:22 | IT novinky

    Probíhá Meta Connect 2023. Společnost Meta představuje své novinky v oblasti AI a virtuální, smíšené a rozšířené reality. Představeny byly nové chytré brýle Ray-Ban | Meta a headset Meta Quest 3.

    Ladislav Hagara | Komentářů: 0
    28.9. 12:00 | IT novinky

    Eben Upton oficiálně představil (YouTube) nové Raspberry Pi 5 (YouTube). Je více než 2x výkonnější než jeho předchůdce, model 4B.

    Ladislav Hagara | Komentářů: 12
    28.9. 08:00 | Nová verze

    Byl vydán (YouTube) Counter-Strike 2. Nativně také pro Linux. Jedná se o největší technologický skok v historii této populární herní série.

    Ladislav Hagara | Komentářů: 13
    Raději
     (50%)
     (50%)
    Celkem 2 hlasů
     Komentářů: 0
    Rozcestník
    Štítky: není přiřazen žádný štítek

    Dotaz: Jak zjistit IP klienta

    12.11.2008 12:41 myšák | skóre: 26 | blog: EmentuX | Ostrava
    Jak zjistit IP klienta
    Přečteno: 279×
    Zdravím,
    snažím se sbastlit v PERLu aplikaci, která naslouchá a na otevřeném portu a veškerou příchozí komunikaci sype do souboru. Až sem není problém. Co bych ovšem potřeboval (a s čím nemůžu hnout) je - Jak zjistit IP adresu klienta, který se zrovna připojil k tomu mému prográmku a posílá mi data. Lze to nějak elegantně udělat na "serverové" straně? Tady jsem prostě v koncích :-(
    Díky za každé nakopnutí.
    Je nesmírně těžké být idiotem, konkurence je obrovská...

    Odpovědi

    12.11.2008 13:12 Filip Jirsák | skóre: 68 | blog: Fa & Bi
    Rozbalit Rozbalit vše Re: Jak zjistit IP klienta
    Lze, kód, který přijímá spojení (accept) určitě IP adresu druhé strany poskytuje. Jak konkrétně se ta IP adresa zjistí ale záleží na tom, jaké používáte API. Nebylo by od věci sem část vašeho kódu, který přijímá spojení, vložit…
    12.11.2008 13:18 myšák | skóre: 26 | blog: EmentuX | Ostrava
    Rozbalit Rozbalit vše Re: Jak zjistit IP klienta
    Jak říkám - díky za každé nakopnutí. Pořád jsem chodil okolo a dneska se na mě usmálo štěstí. Nějak jsem přehlídnul to, že v rámci accept mi to cpe i IP adresu a hledal jsem ji všude možně jinde /a blbě/.

    Ukázka kódu pro eventuální zájemce je zde:
    #!/usr/bin/perl -w
    use strict;
    use IO::Socket;
    my $sock = new IO::Socket::INET(
                       LocalHost => 'localhost',
                       LocalPort => 1234,
                       Proto     => 'tcp',
                       Listen    => SOMAXCONN,
                       Reuse     => 1);
    $sock or die "no socket :$!";
    my($new_sock, $c_addr, $buf);
    while (($new_sock, $c_addr) = $sock->accept()) {
        my ($client_port, $c_ip) =
                         sockaddr_in($c_addr);
        my $client_ipnum = inet_ntoa($c_ip);
        print "IP adreesa klienta: $client_ipnum \n";
    }
    
    
    
    Je nesmírně těžké být idiotem, konkurence je obrovská...

    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.