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 13:55 | Pozvánky

Spolek OpenAlt zve příznivce otevřených technologií a otevřeného přístupu na 145. pražský sraz, který proběhne ve čtvrtek 26. října od 18:00 hodin v karlínském Pivovarském klubu. Najdete jej kousek od metra Florenc na adrese Křižíkova 17, Praha 8. Jedná se o poslední sraz před konferencí OpenAlt 2017, jež proběhne o víkendu 4. a 5. listopadu 2017 na FIT VUT v Brně. Běží registrace účastníků.

Ladislav Hagara | Komentářů: 0
dnes 06:00 | Zajímavý software

Byla vydána verze 0.56 open source platformy Home Assistant (GitHub) pro monitorování a řízení inteligentní domácnosti naprogramované v programovacím jazyce Python verze 3 a bežící také například na Raspberry Pi. Pro vyzkoušení je k dispozici demo [reddit].

Ladislav Hagara | Komentářů: 0
včera 16:55 | Nová verze

Byla vydána verze 1.0 klienta F-Droid určeného pro instalaci aplikací do Androidu ze softwarového repozitáře F-Droid (Wikipedie), alternativy k Google Play, nabízející pouze svobodný a otevřený software. Podrobnosti v přehledu změn [Hacker News].

Ladislav Hagara | Komentářů: 5
včera 00:55 | Nová verze

Po téměř 13 měsících vývoje od verze 0.11.0 byla vydána verze 0.12.0 hardwarově nenáročného desktopového prostředí LXQt (Lightweight Qt Desktop Environment, Wikipedie) vzniklého sloučením projektů Razor-qt a LXDE. Přehled novinek v příspěvku na blogu.

Ladislav Hagara | Komentářů: 9
21.10. 12:33 | Zajímavý software

Článek ne Medium představuje nejnovější stabilní verzi 2.0 svobodné decentralizované mikroblogovací platformy a sociální sítě podobné Twitteru Mastodon (Wikipedie). Detailní přehled novinek na GitHubu [Hacker News].

Ladislav Hagara | Komentářů: 0
21.10. 06:00 | Komunita

V Praze na půdě Elektrotechnické fakulty ČVUT dnes probíhá RT-Summit 2017 – setkání vývojářů linuxového jádra a uživatelů jeho real-time verze označované jako preempt-rt. Přednášky lze sledovat online na YouTube.

Ladislav Hagara | Komentářů: 0
20.10. 14:33 | Zajímavý projekt

Blender Animation Studio zveřejnilo první epizodu z připravovaného animovaného seriálu The Daily Dweebs o domácím mazlíčkovi jménem Dixey. Ke zhlédnutí také ve 3D s rozlišením 8K.

Ladislav Hagara | Komentářů: 0
20.10. 12:34 | Komunita

Aktualizovanou počítačovou hru Warhammer 40,000: Dawn of War III v ceně 39,99 eur běžící také na Linuxu lze o víkendu na Steamu hrát zdarma a případně ještě v pondělí koupit s 50% slevou. Do soboty 19:00 lze na Humble Bundle získat zdarma Steam klíč k počítačové hře Sid Meier's Civilization® III v ceně 4,99 eur běžící také ve Wine.

Ladislav Hagara | Komentářů: 0
20.10. 00:22 | Nasazení Linuxu

Společnost Samsung oznámila, že skrze dokovací stanici DeX a aplikaci Linux on Galaxy bude možno na Samsung Galaxy S8 a S8+ a Galaxy Note 8 provozovat Linux. Distribuce nebyly blíže upřesněny.

Phantom Alien | Komentářů: 19
19.10. 23:55 | Komunita

Společnost Purism na svém blogu oznámila, že její notebooky Librem jsou nově dodávány se zrušeným (neutralized and disabled) Intel Management Engine (ME). Aktualizací corebootu na již prodaných noteboocích lze Management Engine také zrušit. Více v podrobném článku.

Ladislav Hagara | Komentářů: 2
Jak se vás potenciálně dotkne trend odstraňování analogového audio konektoru typu 3,5mm jack z „chytrých telefonů“?
 (9%)
 (0%)
 (0%)
 (1%)
 (75%)
 (13%)
Celkem 223 hlasů
 Komentářů: 8, poslední včera 23:02
    Rozcestník
    Štítky: není přiřazen žádný štítek

    Dotaz: vyhladavanie

    10.8.2011 20:21 marian34
    vyhladavanie
    Přečteno: 454×
    Zdravim,mam dva binarne subory.Potrebujem v nich vyhladat retazec zadanej dlzky(B),ktory sa nachadza v oboch suboroch.Je na to nejaky programik?

    Odpovědi

    15.8.2011 16:08 NN
    Rozbalit Rozbalit vše Re: vyhladavanie
    Mozna cmp ?

    NN
    15.8.2011 19:11 Radovan
    Rozbalit Rozbalit vše Re: vyhladavanie
    PRINT "Hledani shody ve dvou souborech"
    INPUT "Kolik bytu? ", delka
    INPUT "1. soubor: ", soubor1$
    INPUT "2. soubor: ", soubor2$
    PRINT "Preruseni: Esc"
    a$ = " "
    b$ = " "
    
    OPEN soubor1$ FOR BINARY AS #1
    OPEN soubor2$ FOR BINARY AS #2
    
    FOR i = 1 TO LOF(1) - delka + 1
      FOR j = 1 TO LOF(2) - delka + 1
        IF INKEY$ = CHR$(27) THEN GOTO konec
        GET #1, i, a$
        GET #2, j, b$
        IF a$ = b$ THEN
          pocet = 1
          FOR k = 1 TO delka - 1
            GET #1, i + k, a$
            GET #2, j + k, b$
            IF a$ = b$ THEN
              pocet = pocet + 1
            ELSE
              k = delka
            END IF
          NEXT k
          IF pocet = delka THEN
            PRINT i, j,
            FOR k = 0 TO delka - 1
              GET #1, i + k, a$
              PRINT a$;
            NEXT k
            PRINT
          END IF
        END IF
      NEXT j
    NEXT i
    
    CLOSE #2
    CLOSE #1
    konec: END
    
    15.8.2011 21:15 NN
    Rozbalit Rozbalit vše Re: vyhladavanie
    To je v jakem jazyce ?

    NN
    Max avatar 15.8.2011 21:18 Max | skóre: 65 | blog: Max_Devaine
    Rozbalit Rozbalit vše Re: vyhladavanie
    Podle tohoto : google -> "FOR i = 1 TO LOF" to vypadá na QBASIC.
    Zdar Max
    Měl jsem sen ... :(
    16.8.2011 04:57 Radovan
    Rozbalit Rozbalit vše Re: vyhladavanie
    Přesně tak, trocha prehistorie v akci ;-) Většina programátorů v M$ prý na QBasicu začínala, tím by se dalo ledacos vysvětlit...
    15.8.2011 22:35 rastos | skóre: 60 | blog: rastos
    Rozbalit Rozbalit vše Re: vyhladavanie
    Zafunguje ti to ak sa budú zhodovať 2 posebeidúce riadky?
    16.8.2011 04:55 Radovan
    Rozbalit Rozbalit vše Re: vyhladavanie
    Bere to bajt po bajtu a porovnává každý s každým, takže zafunguje. Ale na výsledek si člověk trochu počká :-D
    19.8.2011 21:14 marian34
    Rozbalit Rozbalit vše Re: vyhladavanie
    A ako to prosim Vas spustim?Cez DOSBox?
    20.8.2011 08:32 Radovan
    Rozbalit Rozbalit vše Re: vyhladavanie
    V DOSBoxu to jede krásně, QBasic můžeš stáhnout odsud: ftp://ftp.microsoft.com/Products/Windows/Windows95/CDRomExtras/OtherUtilities/olddos.exe pokud máš platnou licenci na Win9x ;-) A nebo ze stovek jiných míst na netu.
    Ale je to šíleně pomalé!
    Jaký používáš systém? Že bych to spíš zkusil "portovat" do Céčka :-D
    20.8.2011 11:53 marian34
    Rozbalit Rozbalit vše Re: vyhladavanie
    Ano,je to funkcne,ale pomale.Chcelo by to este spravit vystup do suboru.V Cecku to môze byt aj,aj.
    20.8.2011 16:16 Radovan
    Rozbalit Rozbalit vše Re: vyhladavanie
    Tak teda v Céčku:
    #include <stdio.h>
    #include <stdlib.h>
    
    
    
    int lof(FILE *soubor)
        {
        fseek(soubor,0,SEEK_END);
        return ftell(soubor);
        }
    
    
    
    void nacti(FILE *soubor,char *text,int pocet)
         {
         int i;
    
         rewind(soubor);
         for (i=0;i<pocet;++i)
             text[i]=fgetc(soubor);
         text[i]='\0';
         }
    
    
    
    int main(void)
        {
        int  i,j,c1,c2,f=0,shoda,delka,v1,v2,velikost1,velikost2;
        char nazev1[200],nazev2[200],*text1,*text2;
        FILE *soubor1,*soubor2;
    
        /* vstupni dialog */
        fprintf(stderr,"Hledani shody ve dvou binarnich souborech\n");
        fprintf(stderr,"Kolik bytu? ");
        scanf("%d",&delka);
        if (delka>0)
           {
           fprintf(stderr,"1. soubor: ");
           scanf("%s",nazev1);
           fprintf(stderr,"2. soubor: ");
           scanf("%s",nazev2);
    
           if ((soubor1=fopen(nazev1,"r")))
              {
              if ((velikost1=lof(soubor1)))
                 {
                 if ((soubor2=fopen(nazev2,"r")))
                    {
                    if ((velikost2=lof(soubor2)))
                       {
                       printf("\n%s\n\t%s\n",nazev1,nazev2);
                       /* alokace pameti */
                       text1=malloc(velikost1+1);
                       text2=malloc(velikost2+1);
                       v1=velikost1-delka+1;
                       v2=velikost2-delka+1;
                       if (!text1 || !text2)
                          {
                          fprintf(stderr,"Nedostatek pameti, pomale hledani!\n\a");
                          /* primo na disku */
                          for (rewind(soubor1),i=0;i<v1;++i)
                              {
                              c1=fgetc(soubor1);
                              for (rewind(soubor2),j=0;j<v2;++j)
                                  {
                                  c2=fgetc(soubor2);
                                  if (c1==c2)
                                     {
                                     for (shoda=0;c1==c2 && shoda<delka;++shoda)
                                         {
                                         c1=fgetc(soubor1);
                                         c2=fgetc(soubor2);
                                         }
                                     if (shoda==delka)
                                        {
                                        ++f;
                                        fseek(soubor1,i,0);
                                        printf("%d\t%d\t",i,j);
                                        for (shoda=0;shoda<delka;++shoda)
                                            putchar(fgetc(soubor1));
                                        putchar('\n');
                                        }
                                     fseek(soubor1,i+1,0);
                                     fseek(soubor2,j+1,0);
                                     }
                                  }
                              }
                          }
                       else
                          {
                          /* nacteni do pameti */
                          nacti(soubor1,text1,velikost1);
                          nacti(soubor2,text2,velikost2);
                          for (i=0;i<v1;++i)
                              for (j=0;j<v2;++j)
                                  {
                                  for (shoda=0;text1[i+shoda]==text2[j+shoda] && shoda<delka;++shoda);
                                  if (shoda==delka)
                                     {
                                     ++f;
                                     printf("%d\t%d\t",i,j);
                                     for (shoda=0;shoda<delka;++shoda)
                                         putchar(text1[i+shoda]);
                                     putchar('\n');
                                     }
                                  }
                          }
                       if (text1)
                          free(text1);
                       if (text2)
                          free(text2);
                       if (f)
                          printf("Nalezeno %d shodnych useku s delkou %d bytu.\n",f,delka);
                       else
                          printf("Nenalezena zadna shoda!\n");
                       }
                    else
                       fprintf(stderr,"%s nic neobsahuje!\n\a",nazev2);
                    fclose(soubor2);
                    }
                 else
                    fprintf(stderr,"%s nelze cist!\n\a",nazev2);
                 fclose(soubor1);
                 }
              else
                 fprintf(stderr,"%s nic neobsahuje!\n\a",nazev1);
              }
           else
              fprintf(stderr,"%s nelze cist!\n\a",nazev1);
           }
    
        return 0;
        }
    
    Výstup do souboru si můžeš klidně přesměrovat pomocí >, chybová hlášení tam nebudou, jen samotné výsledky :)
    20.8.2011 18:15 marian34
    Rozbalit Rozbalit vše Re: vyhladavanie
    Diky moc,no jaksi mi to nefacha.Po zadani suborov na porovnanie mi vzdy vyhodi

    NELZE CIST!
    20.8.2011 18:36 Radovan
    Rozbalit Rozbalit vše Re: vyhladavanie
    Zadáváš celé názvy tak jak jsou, malá/velká písmena a podobně? Tohle signalizuje že ten soubor nemohl otevřít.
    Zkus je třeba zkopírovat do toho adresáře kde máš program s nějakými jednoduchými názvy, jako je s1 a s2, s tím by neměl být problém.
    20.8.2011 19:05 marian34
    Rozbalit Rozbalit vše Re: vyhladavanie
    Fajn,uz to facha.
    20.8.2011 06:09 Petr Gajdůšek | skóre: 13 | blog: Úlomky | Znojmo
    Rozbalit Rozbalit vše Re: vyhladavanie
    pro bash:
    commons() { # soubor1 (nejlépe ten menší), soubor2, délka
        grep -oF -f  \
        <( strings -n$3 $1 | while read l; do for ((i=0;i<${#l}-${#l}%$3;i++)); do echo ${l:i:$3}; done; done ) \
        <(strings -n$3 $2) | strings -n$3 | sort -u
    }
    
    použití:
    $ commons /bin/grep /bin/bash  77
    License GPLv3+: GNU GPL version 3 or later <http://gnu.org/licenses/gpl.html>
    20.8.2011 07:01 Petr Gajdůšek | skóre: 13 | blog: Úlomky | Znojmo
    Rozbalit Rozbalit vše Re: vyhladavanie
    Bude to fungovat jenom pokud vyhledáváte textový řetězec. Bez změny to funguje jen pro 7bitové (ASCII) řetězce. Pro 8bitové kódování je nutné rozšířit volání strings o parametr -eS a aby fungoval grep, rourou převést na utf8 nebo nastavit proměnnou LANG=C, potom bude grep porovnávat binárně.

    Podobně pokud je hledaný řetězec v souborech kódován v 16 nebo 32 bitech, viz man 1 strings.
    20.8.2011 12:21 marian34
    Rozbalit Rozbalit vše Re: vyhladavanie
    Ok,ako to bude teda vyzerat pre binarne vyhladavanie?
    20.8.2011 14:00 jadd | skóre: 34 | blog: Greenhorn
    Rozbalit Rozbalit vše Re: vyhladavanie
    Nevím jak tobě (nejsem programátor) ale myslím si že napověděli až dost. Jsou ale lidi co chtěj všechno zadarmo a to ještě k tomu hned aniž by ten kdo se jim snaží pomoci, vůbec věděl jestli i oni sami by vůbec někomu poradili natož taky zadarmo. Z takových lidí je mi na blití.
    20.8.2011 14:28 marian34
    Rozbalit Rozbalit vše Re: vyhladavanie
    Kludne sa pozvracaj,mne to je jedno.Normalne tu kladiem otazky,na nikoho netlacim.Bud niekto chce odpovedat,alebo nie.Samozrejme som vdacny aj za nacrnutie riesenia,od ktoreho sa uz da odpichnut.No nevidim dôvod,aby som sa v tom este nepitval,pokial niecomu nerozumiem.A tvoje zadarmo si strc za klobuk,uz len tento pojem svedci o tom,v akych intenciach rozmyslas.
    20.8.2011 14:48 jadd | skóre: 34 | blog: Greenhorn
    Rozbalit Rozbalit vše Re: vyhladavanie
    Dobrá, Omlouvám se asi jsem se v tobě spletl, mám dneska fakt špatnou náladu...
    A tvoje zadarmo si strc za klobuk,uz len tento pojem svedci o tom,v akych intenciach rozmyslas.
    Opak je pravdou.
    20.8.2011 20:01 Petr Gajdůšek | skóre: 13 | blog: Úlomky | Znojmo
    Rozbalit Rozbalit vše Re: vyhladavanie
    Pro posloupnosti libovolných bajtů se to použít nedá. Tohle funguje jen pro hledání textových řetězců, respektive řetězců obsahující jen tisknutelné znaky. Omlouvám se tedy, můj příklad není řešením, které jsi hledal - nepochopil jsem totiž význam termínu "řetězce" v zadání, imho "posloupnost bajtů" by bylo přesnější vyjádření.

    Pokud bys přece jen někdy potřeboval vyhledávat textové řetězce, tak je tenhle postup flexibilnější. S drobnými úpravami lze vyhledávat i řetězce, které jsou v binárních souborech nestejně reprezentované (8, 16, 32 bitů, little i bigendian) a v různé znakové sadě (použitím enca). To je neocenitelné např. při analýze binárních souborů vytvořených windows aplikacemi, ty běžně používají různá kódování i znakové sady. Tam by porovnávání bajt po bajtu bylo k ničemu.

    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.