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 14:00 | Zajímavý projekt

Byl spuštěn Humble Down Under Bundle. Za vlastní cenu lze koupit multiplatformní hry The Warlock of Firetop Mountain, Screencheat, Hand of Fate a Satellite Reign. Při nadprůměrné platbě (aktuálně 3,63 $) také Hacknet, Hacknet Labyrinths, Crawl a Hurtworld. Při platbě 12 $ a více lze získat navíc Armello.

Ladislav Hagara | Komentářů: 0
dnes 13:00 | Nová verze

Google Chrome 62 byl prohlášen za stabilní (YouTube). Nejnovější stabilní verze 62.0.3202.62 tohoto webového prohlížeče přináší řadu oprav a vylepšení. Vylepšeny byly také nástroje pro vývojáře (YouTube). Opraveno bylo 35 bezpečnostních chyb.

Ladislav Hagara | Komentářů: 1
dnes 11:00 | Zajímavý článek

Článek (en) na Mozilla.cz je věnován vykreslování stránek ve Firefoxu. V průběhu roku 2018 by se ve Firefoxu měl objevit WebRender, jenž by měl vykreslování stránek urychlit díky využití GPU.

Ladislav Hagara | Komentářů: 0
dnes 08:22 | Bezpečnostní upozornění

NÚKIB (Národní úřad pro kybernetickou a informační bezpečnost) informuje o zranitelnosti ROCA v procesu generování RSA klíčů, který se odehrává v softwarové knihovně implementované například v kryptografických čipových kartách, bezpečnostních tokenech a dalších hardwarových čipech vyrobených společností Infineon Technologies AG. Zranitelnost umožňuje praktický faktorizační útok, při kterém útočník dokáže vypočítat

… více »
Ladislav Hagara | Komentářů: 1
dnes 01:23 | Zajímavý software

Příspěvek na blogu otevřené certifikační autority Let's Encrypt informuje o začlenění podpory protokolu ACME (Automatic Certificate Management Environment) přímo do webového serveru Apache. Klienty ACME lze nahradit novým modulem Apache mod_md. Na vývoj tohoto modulu bylo uvolněno 70 tisíc dolarů z programu Mozilla Open Source Support (MOSS). K rozchození HTTPS na Apache stačí nově přidat do konfiguračního souboru řádek s ManagedDomain. Minutový videonávod na YouTube [reddit].

Ladislav Hagara | Komentářů: 1
včera 14:15 | Komunita

Daniel Stenberg, autor nástroje curl, na svém blogu oznámil, že obdržel letošní Polhemovu cenu, kterou uděluje Švédská inženýrská asociace za „technologickou inovaci nebo důvtipné řešení technického problému“.

marbu | Komentářů: 9
včera 13:40 | Pozvánky

Cílem Social Good Hackathonu, který se uskuteční 21. a 22. října v Brně, je vymyslet a zrealizovat projekty, které pomůžou zlepšit svět kolem nás. Je to unikátní příležitost, jak představit nejrůznější sociální projekty a zrealizovat je, propojit aktivní lidi, zástupce a zástupkyně nevládních organizací a lidi z prostředí IT a designu. Hackathon pořádá brněnská neziskovka Nesehnutí.

… více »
Barbora | Komentářů: 1
včera 00:44 | Pozvánky

V sobotu 21. října 2017 se na půdě Elektrotechnické fakulty ČVUT v Praze uskuteční RT-Summit – setkání vývojářů linuxového jádra a uživatelů jeho real-time verze označované jako preempt-rt.

… více »
Pavel Píša | Komentářů: 8
16.10. 23:44 | Bezpečnostní upozornění

V Linuxu byla nalezena bezpečnostní chyba CVE-2017-15265 zneužitelná k lokální eskalaci práv. Jedná se o chybu v části ALSA (Advanced Linux Sound Architecture).

Ladislav Hagara | Komentářů: 1
16.10. 22:44 | Komunita

Greg Kroah-Hartman informuje na svém blogu, že do zdrojových kódu linuxového jádra bylo přidáno (commit) prohlášení Linux Kernel Enforcement Statement. Zdrojové kódy Linuxu jsou k dispozici pod licencí GPL-2.0. Prohlášení přidává ustanovení z GPL-3.0. Cílem je chránit Linux před patentovými trolly, viz například problém s bývalým vedoucím týmu Netfilter Patrickem McHardym. Více v často kladených otázkách (FAQ).

Ladislav Hagara | Komentářů: 4
Jak se vás potenciálně dotkne trend odstraňování analogového audio konektoru typu 3,5mm jack z „chytrých telefonů“?
 (18%)
 (0%)
 (0%)
 (3%)
 (71%)
 (8%)
Celkem 38 hlasů
 Komentářů: 1, poslední dnes 11:21
    Rozcestník

    Dotaz: iwlist

    pepe_ avatar 31.10.2009 21:15 pepe_ | skóre: 47
    iwlist
    Přečteno: 433×
    Zdravim potreboval bych prehlednejsi vypis nez da iwlist jenze vse co sem nasel je prot atheros  a to mi s bcm43xx nefunguje.
    
    
    iwlist wlan0 scan | egrep -i 'address|essid|key|quality|frequency' 
    
              Cell 01 - Address: 00:4F:62:1F:50:CD
                        Channel:1
                        Frequency:2.412 GHz (Channel 1)
                        Quality=61/70  Signal level=-49 dBm  
                        Encryption key:on
                        ESSID:"NET"
    
    
    
    jak udelat aby vypsal
    
    essid   Address             key  signal            Ch  Freq
    ----------------------------------------------------------------
    "NET"   00:4F:62:1F:50:CD   on   61/70 , -49 dBm   1   2.412 GHz
    
    
    nerozumim tomu jak udelat script kdyz vypis muze byt ruzne dlouhy protoze pokazde iwlist vypise jinak dlouhej seznam
    nemate nekdo   neco s awkem nebo sedem ci takneco co by udelalo podobny jednoradkovy vypis vsech siti ?
    Dekuju

    Odpovědi

    pepe_ avatar 31.10.2009 21:16 pepe_ | skóre: 47
    Rozbalit Rozbalit vše Re: iwlist
    Joj to delam zmatek , se clovek uklikne a uz to tam je 2x
    pepe_ avatar 31.10.2009 21:30 pepe_ | skóre: 47
    Rozbalit Rozbalit vše Re: iwlist
    iftop -i wlan0

    a

    wawemon

    no a jeste

    airodump-ng mon0

    sem skousel ale ten scriptik by pomohl , kismet se mi nepodarilo rozjet. (nevim posutp)
    andree avatar 31.10.2009 21:40 andree | skóre: 39 | blog: andreeeeelog
    Rozbalit Rozbalit vše Re: iwlist
    to vyzera ako idealny job pre awk ;-)
    pepe_ avatar 31.10.2009 22:00 pepe_ | skóre: 47
    Rozbalit Rozbalit vše Re: iwlist
    iwlist wlan0 scan | grep ESSID | cut -d":" -f 2 | sed 's/\"//g'
    a
    iwlist wlan0 scan | grep Quality | cut -d "=" -f2 | cut -d "/" -f1
    
    
    a jiné přeci při každém iwlist mi vyjede jinej seznam tak jak vyjmout ty rozsahy ?   
    
    nebo awk :
    
    iwlist wlan0 scanning| awk '/Cell/ {print $5}; /ESS/ {print substr($1,7)}; /Freq/ {print substr($1,11)}; /Qual/ {print substr($1,9)}; /Encr/ {print substr($2,5)}'
    
    
    no ale jak tomu dát formu a aby to jelo při více sítích a byla každá na jiném řádku ?

    no prostě se snažim o něco jako http://www.simandl.cz/stranky/linux/wifimon/soubory/wifimon-0.5.5

    klidně i s tim výpisem wbaru na konci ...
    andree avatar 31.10.2009 22:05 andree | skóre: 39 | blog: andreeeeelog
    Rozbalit Rozbalit vše Re: iwlist
    tu mas demo co som narychlo skusil - musis si to vhodne upravit (ja teraz nemam nejak chut ani cas to riesit do finalneho stavu :) ale snad sa ti to uz podari s tymto navodom...):

    BEGIN {
    	cnt=0;
    }
    
    END {
    	print "Address             essid          key    signal         Ch Freq";
    	print "----------------------------------------------------------------";
    	
    	for (i=0; i<cnt; i++)
    		print cells[i, "addr"], " ", cells[i, "essid"];
    }
    
    /ESSID/ {
    	x=match($0, "\".*\"");
    	cells[cnt-1, "essid"]=substr($0, x);
    }
    
    /Cell [0-9]+.*Address:.* .*$/ {
    	cells[cnt, "addr"]=$5;
    	cnt+=1;
    }
    

    a potom iwlist wan0 scan | awk -f file.awk
    David Watzke avatar 31.10.2009 22:06 David Watzke | skóre: 74 | blog: Blog... | Praha
    Rozbalit Rozbalit vše Re: iwlist
    takhle nějak bych na to šel já:
    iwlist ... | while read line; do
        if [[ $line == ... ]]; then
               .....
        fi
    done
    “Being honest may not get you a lot of friends but it’ll always get you the right ones” ―John Lennon
    31.10.2009 22:05 l4m4
    Rozbalit Rozbalit vše Re: iwlist
    #!/usr/bin/python
    import re, sys
    c = re.compile(r'(?ms)'
                   r'^          Cell (?P<cell>\d+) - Address: (?P<addr>[0-9A-F:]+)\n'
                   r'(?P<info>(?:                    [^\n]*\n)*)')
    
    def getgroup(info, name):
        m = re.search(r'(?m)^                    %s\s*(?P<value>.*)$' % name,
                      info)
        if m:
            return m.group('value').rstrip()
        return ''
    
    print '''\
    -----------------------------------------------------------------------
            essid          address       key      signal      frequency
    -----------------------------------------------------------------------'''
    
    fmt = '%16s  %17s  %3s  %14s  %s'
    for x in c.finditer(sys.stdin.read()):
       addr = x.group('addr')
       info = x.group('info')
       essid = getgroup(info, 'ESSID:')
       encrypted = getgroup(info, 'Encryption key:')
       channel = getgroup(info, 'Channel:')
       frequency = re.sub(r'\s*\(.*', '', getgroup(info, 'Frequency:'))
       signal = getgroup(info, 'Quality=').replace('Signal level=', '')
       print fmt % (essid, addr, encrypted, signal, frequency)
    
    andree avatar 31.10.2009 22:06 andree | skóre: 39 | blog: andreeeeelog
    Rozbalit Rozbalit vše Re: iwlist
    vidis, aj pythonom je to v pohode, hlavne s tymi groups...
    pepe_ avatar 1.11.2009 12:33 pepe_ | skóre: 47
    Rozbalit Rozbalit vše Re: iwlist
    No koukam na tu ukázku v pythonu jako vrána a vůbec tomu nerozumim...
    1.11.2009 13:56 l4m4
    Rozbalit Rozbalit vše Re: iwlist
    To není ukázka, to je fungující skript, který převede výstup iwlist scan do požadované podoby. Je to samozřejmě hnus, protože výstup iwlist je zjevně určen pro člověka, ne pro parsování, takže každá položka má trochu jiný formát, ale jinak na něm není nic k nechápání, prostě pár regulárních výrazů.
    pepe_ avatar 1.11.2009 12:23 pepe_ | skóre: 47
    Rozbalit Rozbalit vše Re: iwlist
    Děkuji všem za ukázky , určitě to pomůže pro poznání tvorby dalších scriptů.
    1.11.2009 16:02 JF | skóre: 23
    Rozbalit Rozbalit vše Re: iwlist

    A jeste přídám jeden skript pro priznivce sedu :)

    iwlist ath0 scanning | sed -n -e '/ESSID/p;/Cell/p;/Frequency/p;/Quality/p;' | \

    sed -e '$!N;N;N;s/.*Cell \([0123456789]*\) - Address: \(.*\)\n.*ESSID:"\(.*\)"\n.*Frequency:\([0123456789\.]*\) GHz (Channel \([0123456789]*\)).*\n.*Signal level[=:]\(.*\) .*Noise level[=:]\(.*\)/<tr><td> \1 <td>\3 <td>\2 <td><center>\5<\/center> <td>\4 <td>\6 <td>\7/'

     

    Vysledek je videt zde:

    http://78.108.103.11:11080/cgi-bin/aplist.cgi
    pepe_ avatar 1.11.2009 21:10 pepe_ | skóre: 47
    Rozbalit Rozbalit vše Re: iwlist
    no tak nevim kde je zrada ale mne to nefunguje jako tobe vysledek vypisu : jen sem zmenil ath0 na wlan0

    Cell 01 - Address: 00:4F:62:1F:50:CD

    Frequency:2.412 GHz (Channel 1)

    Quality=62/70 Signal level=-48 dBm

    ESSID:"NET"

    to je stejne jako je na netu spousta navodu na ath0 ale ktere na wlan0 nefungujou jak maj
    pepe_ avatar 1.11.2009 22:37 pepe_ | skóre: 47
    Rozbalit Rozbalit vše Re: iwlist
    Tak slepeno ze spoustu navodu zatim script ktery mi funguje pro wlan0 :
    #!/bin/bash
    a=0;b=0;c=0;d=0;e=0;f=0;g=0;h=0;x=0
    echo -----------------------------------------------------------------
    echo "Ch Essid     Bssid      Frekvence   Kvalita  Signal Kodovani Mod"
    echo -----------------------------------------------------------------
    while read line;do
      [ "`echo $line | grep ESSID`" ] && essid[$a]=`echo "$line" | cut -d : -f 2 |  grep -o '[a-z,A-Z,0-9]*'`
      [ "`echo $line | grep Address`" ] && address[$b]=`echo "$line" | awk '{print $5}'`
      [ "`echo $line | grep Channel:`" ] && channel[$c]=`echo "$line" | cut -d : -f 2 ` 
      [ "`echo $line | grep Freq`" ] && freq[$d]=`echo "$line" | awk '{print $1}' | cut -d : -f 2` 
      [ "`echo $line | grep Quali`" ] && qual[$e]=`echo "$line" | awk '{print substr($1,9)}'` 
      [ "`echo $line | grep Signal`" ] && signal[$f]=`echo "$line" | awk '{print substr($3,7,3)}' ` 
      [ "`echo $line | grep key`" ] && key[$g]=`echo "$line" | awk '{print substr($2,5,15)}' ` 
      [ "`echo $line | grep Mode`" ] && mode[$h]=`echo "$line" | awk '{print substr($1,6,15)}' `
    done < <(iwlist scan 2>/dev/null )
    while [ $x -lt ${#essid[@]} ];do
      echo ${channel[$x]} ,  ${essid[$x]} ,  ${address[$x]} ,  ${freq[$x]} ,  ${qual[$x]} ,  ${signal[$x]} ,  ${key[$x]} ,  ${mode[$x]}
        (( x++ ))
    done
    
    
    Tak jen nevim jak udelat aby se sloupecky pevne vypisovaly vzdy na stejnem miste bez pouziti tabulatoru (jen s mezerama) kdyz delky nazvu siti mohou byt ruzne a take hodnoty.
    pepe_ avatar 1.11.2009 22:55 pepe_ | skóre: 47
    Rozbalit Rozbalit vše Re: iwlist
    oprava :

    vypada takto :
    user@NB-Pepe:~$ ./script
    -----------------------------------------------------------------
    Ch Essid     Bssid      Frekvence   Kvalita  Signal Kodovani Mod
    -----------------------------------------------------------------
    1 , NET , 00:4F:62:1F:50:CD , 2.412 , 63/70 , -47 , on , Master
    2 , SauronNet Cheb20 , 00:02:72:71:5D:08 , 2.417 , 14/70 , -96 , off , Master
    7 , ALLCMPA , 00:4F:62:17:CF:BD , 2.442 , 34/70 , -76 , on , Master
    6 , ALLCMP , 00:4F:62:00:4D:81 , 2.437 , 49/70 , -61 , on , Master
    7 , APD17P , 00:4F:62:17:E3:39 , 2.442 , 30/70 , -80 , on , Master
    user@NB-Pepe:~$ 
    
    
    
    
    
    #!/bin/bash
    a=0;b=0;c=0;d=0;e=0;f=0;g=0;h=0;x=0
    echo -----------------------------------------------------------------
    echo "Ch Essid     Bssid      Frekvence   Kvalita  Signal Kodovani Mod"
    echo -----------------------------------------------------------------
    while read line;do
      [ "`echo $line | grep ESSID`" ] && essid[$a]=`echo "$line" | cut -d : -f 2 |  grep -o '[a-z,A-Z,0-9]*'` && ((a++))
      [ "`echo $line | grep Address`" ] && address[$b]=`echo "$line" | awk '{print $5}'` && ((b++))
      [ "`echo $line | grep Channel:`" ] && channel[$c]=`echo "$line" | cut -d : -f 2 ` && ((c++))
      [ "`echo $line | grep Freq`" ] && freq[$d]=`echo "$line" | awk '{print $1}' | cut -d : -f 2` && ((d++))
      [ "`echo $line | grep Quali`" ] && qual[$e]=`echo "$line" | awk '{print substr($1,9)}'` && ((e++))
      [ "`echo $line | grep Signal`" ] && signal[$f]=`echo "$line" | awk '{print substr($3,7,3)}' ` && ((f++))
      [ "`echo $line | grep key`" ] && key[$g]=`echo "$line" | awk '{print substr($2,5,15)}' ` && ((g++))
      [ "`echo $line | grep Mode`" ] && mode[$h]=`echo "$line" | awk '{print substr($1,6,15)}' ` && ((h++))
    done < <(iwlist wlan0 sc 2>/dev/null )
    while [ $x -lt ${#essid[@]} ];do
      echo ${channel[$x]} ,  ${essid[$x]} ,  ${address[$x]} ,  ${freq[$x]} ,  ${qual[$x]} ,  ${signal[$x]} ,  ${key[$x]} ,  ${mode[$x]}
        (( x++ ))
    done
    
    pepe_ avatar 1.11.2009 23:02 pepe_ | skóre: 47
    Rozbalit Rozbalit vše Re: iwlist
    mimochodem netusite proc tento script ma strasne dlouhou provadeci dobu ? Nekde je chyba ?
    2.11.2009 00:05 l4m4
    Rozbalit Rozbalit vše Re: iwlist
    Protože to není skript ale přihláška do soutěže The Most Useless Use of grep, a to s velkou nadějí na vítězství. Na každý řádek výstupu se spouští osmkrát grep + několik dalších zbytečných programů, pokud se daná položka náhodou najde.

    Používáš tam awk, tak si to napiš celé v awk, když neumíš python (perl, ruby, něco rozumného), ale do jednoho skriptu pro awk. Šlo by to i v sedu, v pythonu jsem to napsal, jak jsem to napsal, aby moc nezáviselo na změnách formátu (např. pořadí položek, řada změn to ošem i tak rozbije), ale to je zjevně házení perel sviním...
    1.11.2009 22:38 cedrik
    Rozbalit Rozbalit vše Re: iwlist
    Tento primitivní a ne moc hezký skript používám já (nebyl čas když jsem to psal a pořád není :-). Výpis je dvouřádkový, včetně signáloměru. Upravil jsem to aby to bralo signál z kvality, ne z úrovní. Bere to jakoukoliv wifinu, tak si když tak uprav, pokud jich máš více. Pro zvýšení diversity je to v perlu :-)
    #!/usr/bin/perl
    #
    
    use strict;
    my @scan = `/sbin/iwlist scan`;
    push @scan, '          Cell';
    	
    my @list = ();
    my $cnt = -1;
    foreach my $line (@scan)
    {
    	SW: for ($line)
    	{
    		/^\s*Cell/ && do {
    			if ($cnt >= 0)
    			{
    				my $bar = '';
    				for (my $i = 0; $i <= $list[$cnt]{signal}; $i++) {$bar .= '#';}
    				#for (my $i = abs($list[$cnt]{signal}); $i <= abs($list[$cnt]{noise}); $i++) {$bar .= '#';}
    				$list[$cnt]{bar} = $bar;
    				$line =~ s/Cell//;
    			}
    			$cnt++;
    			redo SW
    		};
    		/Address:\s+(\S+)/ && do {
    			$list[$cnt]{addr} = $1;
    			last SW;
    		};
    		/^\s+ESSID:/ && do {
    			($list[$cnt]{id}) = $line =~ /(".*")/;
    			last SW;
    		};
    		/\(Channel\s+(\d+)\)/ && do {
    			$list[$cnt]{ch} = $1;
    			last SW;
    		};
    		/^\s+Quality/ && do {
    			($list[$cnt]{signal}, $list[$cnt]{noise}) = $line =~ /Quality=(\d+)\/(\d+)/;
    			#($list[$cnt]{signal}, $list[$cnt]{noise}) = $line =~ /Signal level=(-?\d+).*Noise level=(-?\d+).*/;
    			last SW;
    		};
    		/^\s+Encryption key:(.*)/ && do {
    			$list[$cnt]{key} = $1;
    			last SW;
    		}
    	}
    }
    
    foreach my $cell (sort {$a->{ch} <=> $b->{ch}} @list)
    {
    	printf "Address: %17s Channel: %2s key:%3s ESSID: %s\n", $$cell{addr}, $$cell{ch}, $$cell{key}, $$cell{id};
    	printf "%4s/%4s %s\n", $$cell{signal}, $$cell{noise}, $$cell{bar};
    }
    

    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.