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 20:55 | Komunita

Linux ve VirtualBoxu nebude potřebovat Přídavky pro hosta (Guest Additions). Budou součástí linuxového jádra. Ovladač vboxguest by se měl dostat do Linuxu 4.16. Ovladač vboxsf by měl následovat.

Ladislav Hagara | Komentářů: 5
včera 17:11 | Komunita

Vývojáři Thunderbirdu žádají o vyplnění dotazníku. Upřednostňujete klasický vzhled nebo raději Monterail (GitHub)?

Ladislav Hagara | Komentářů: 14
včera 12:22 | Komunita

Mozilla.cz informuje, že většina problémů s rychlostí Firefoxu 57 při použití open source odečítače NVDA (NonVisual Desktop Access) budou vyřešeny hned v další verzi Firefoxu 58. NVDA je zatím dostupný pouze pro operační systémy Windows.

Ladislav Hagara | Komentářů: 0
včera 05:55 | Bezpečnostní upozornění

V knihovně glibc (GNU C Library) byla nalezena a v upstreamu opravena bezpečnostní chyba CVE-2018-1000001 (buffer underflow) zneužitelná k lokální eskalaci práv. Podrobnosti na halfdog.net.

Ladislav Hagara | Komentářů: 0
16.1. 13:11 | Komunita

Mozilla.cz informuje o 2 plánovaných novinkách ve Firefoxu. Nové webové funkce budou ve Firefoxu dostupné jen přes HTTPS (en) a nové verze Firefoxu přinesou rychlejší přepínání panelů (předehřívání nebo žhavení panelů, anglicky tab warming).

Ladislav Hagara | Komentářů: 5
16.1. 12:44 | IT novinky

Hodnota Bitcoinu, decentralizované kryptoměny, klesla na cca 12 000 dolarů. Před měsícem byla hodnota Bitcoinu téměř 20 000 dolarů [reddit].

Ladislav Hagara | Komentářů: 28
16.1. 05:55 | Bezpečnostní upozornění

Bezpečnostní tým Cisco Talos upozorňuje na celou řadu bezpečnostních chyb v Blenderu. Vývojáři Blenderu byli o chybách informování již v září. Dosud tyto chyby ale opraveny nebyly. Doporučeno je neotevírat v Blenderu soubory z nedůvěryhodných zdrojů.

Ladislav Hagara | Komentářů: 2
15.1. 17:22 | Bezpečnostní upozornění

Společnost F-Secure upozorňuje na bezpečnostní "problém" v Intel AMT (Active Management Technology). Útočník s fyzickým přístupem k počítači s povoleným AMT a nenastaveným heslem k MEBx (Management Engine BIOS Extension) může obejít heslo nastavené v BIOSu, pin v TPM, přihlašovací jméno a heslo do operačního systému nebo i šifrování disků restartováním tohoto počítače a při jeho startu zavedením MEBx (CTRL-P) a zadáním výchozího hesla "admin". Pak už útočníkovi stačí pouze změnit heslo a povolit vzdálený přístup k počítači na úrovni AMT.

Ladislav Hagara | Komentářů: 10
15.1. 15:11 | Zajímavý projekt

Na Indiegogo byla dnes spuštěna kampaň na podporu 6 palcového notebooku a kapesní herní konzole GPD WIN 2. Cena v rámci kampaně byla stanovena na 649 dolarů. Cílová částka 100 tisíc dolarů byla překonána již 8 krát. Ukázka s Linuxem na YouTube.

Ladislav Hagara | Komentářů: 5
15.1. 05:55 | Bezpečnostní upozornění

V GitLabu, v open source alternativě GitHubu, tj. v softwarovém nástroji s webovým rozhraním umožňujícím spolupráci na zdrojových kódech, byl nalezen vážný bezpečnostní problém. Bezpečnostní aktualizace bude vydána ve středu 17. ledna v 00:59.

Ladislav Hagara | Komentářů: 3
Jak se vás potenciálně dotkne trend odstraňování analogového audio konektoru typu 3,5mm jack z „chytrých telefonů“?
 (7%)
 (1%)
 (1%)
 (1%)
 (77%)
 (13%)
Celkem 1317 hlasů
 Komentářů: 53, poslední včera 16:55
    Rozcestník

    Dotaz: Perl XMPP Jabber

    pepe_ avatar 10.9.2012 20:17 pepe_ | skóre: 47
    Perl XMPP Jabber
    Přečteno: 300×

    Zdravim , jelikoz neovladam perl ale mam v perlu scriptik pro ICQ , ten bych potreboval upravit pro XMPP :

     

    ---

     

    #!/usr/bin/perl
    use strict;
    #use warnings;
    use Net::OSCAR qw(:standard);
    use LWP::Simple;
    use Text::Iconv;
    
    my $screenname = '***icq-uin***';
    my $password   = '***icq-pass***';
    my $encoding = 'ISO-8859-2';
    #my $encoding = 'UTF-8';
    my $oscar;
    my $meme;
    my $iconv_utf8 = Text::Iconv->new("UTF-8", $encoding);
    my $iconv_utf16 = Text::Iconv->new("UTF-16BE", $encoding);
    
    $oscar = Net::OSCAR->new();
    $oscar->set_callback_im_in(\&im_in);
    $oscar->signon($screenname, $password);
    
    while(1) {
        $oscar->do_one_loop();
    }
    sub im_in {
        my($oscar, $sender, $message) = @_;
    
        $message = $iconv_utf16->convert($message) || $iconv_utf8->convert($message) || $message || return;
        print "\n\n\n\n*** \'".$sender."\' napsal: \'".$message."\' \n\n";
        my $bash_command='./icq_run.sh '.$message.' |';
        open(my $output,$bash_command) or die $!;
        while(my $line=<$output>){
        $oscar->send_im($sender, $line);
    }
    }
    

     

     

    ---

     

    Poradí někdo jak to předělat na XMPP / Jabber ?  Nějak mi ty návody nefungujou : ->

     

    viz :   http://codehacienda.wordpress.com/2011/02/25/perl-xmpp-library-for-creating-a-chat-bot-anyeventxmpp-example/

    Odpovědi

    mess avatar 10.9.2012 20:29 mess | skóre: 43 | blog: bordel | Háj ve Slezsku - Smolkov
    Rozbalit Rozbalit vše Re: Perl XMPP Jabber
    Několik jednoduchých kroků:
    1. Zahoď ten skript pro ICQ. Knihovna pro Jabber bude mít úplně jiné rozhraní a bude se úplně jinak používat.
    2. Stáhni si a uprav tohohle Jabber Bota (klikni si nahoře na "View source", ten jejich zvýrazňovač syntaxe tam nasekal nějaké chyby). Podle zběžného pohledu by to mělo umět poslat zpátky každou zprávu, kterou tomu pošleš.
    3. Profit!
    Cez párne mesiace zošíváš vaginy, cez neparne montuješ hajzle.
    pepe_ avatar 11.9.2012 00:05 pepe_ | skóre: 47
    Rozbalit Rozbalit vše Re: Perl XMPP Jabber

    Zatím mám :

     

    #!/usr/bin/python
    import xmpp
    login = 'uziv_jmeno' 
    pwd   = 'uziv_heslo'
    cnx = xmpp.Client('jabber.root.cz')
    cnx.connect( server=('jabber.root.cz',5223) )
    cnx.auth(login,pwd, 'chat')
    cnx.send(xmpp.dispatcher.Presence(status=""))
    
    def messageHandler(conex,msg):
      return cnx.send(xmpp.Message(str(msg.getFrom()) , str(msg.getBody())))
    
    
    cnx.RegisterHandler("message", messageHandler)
    
    while 1:
        try:
            cnx.Process(1)
        except KeyboardInterrupt:
            break
    

     

     

    Jenže stále to něco odesílá a nevim jak to má vypadat. Podadíš aby to vykonalo totéž ?

    mess avatar 11.9.2012 00:44 mess | skóre: 43 | blog: bordel | Háj ve Slezsku - Smolkov
    Rozbalit Rozbalit vše Re: Perl XMPP Jabber
    A proč sis nestáhl toho bota, co jsem na něj odkazoval? Tam ti stačí změnit login, heslo a upravit jednu funkci, která se automaticky spustí po přijetí zprávy. S tímhle pythonním skriptem ti nepomůžu, s xmpp knihovnou v pythonu nemám žádné zkušenosti.
    Cez párne mesiace zošíváš vaginy, cez neparne montuješ hajzle.
    pepe_ avatar 11.9.2012 20:20 pepe_ | skóre: 47
    Rozbalit Rozbalit vše Re: Perl XMPP Jabber

    Protože mně to nefunguje.

     

    root@alix:/# ./jaberboot
    Connected
    Authed
    Disconnected
    Can't call method "GetFrom" on an undefined value at ./jaberboot line 43.

    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.