3 семестр / lab22

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
typedef struct string{ // stroka (dlya udobstva)
    char letter[15];
} STRING;
STRING *found=NULL;
typedef struct el{ // element lista
    STRING inf;
    struct el *next;
} EL;
int ord(char b){ // numeracia simvolov
    switch(b){
    case 'a':
    case 'A':
        return(0);
    case 'b':
    case 'B':
        return(1);
    case 'c':
    case 'C':
        return(2);
    case 'd':
    case 'D':
        return(3);
    case 'e':
    case 'E':
        return(4);
    case 'f':
    case 'F':
        return(5);
    case 'g':
    case 'G':
        return(6);
    case 'j':
    case 'J':
        return(7);
    case 'k':
    case 'K':
        return(8);
    case 'l':
    case 'L':
        return(9);
    case 'm':
    case 'M':
        return(10);
    case 'n':
    case 'N':
        return(11);
    case 'o':
    case 'O':
        return(12);
    case 'p':
    case 'P':
        return(13);
    case 'q':
    case 'Q':
        return(14);
    case 'r':
    case 'R':
        return(15);
    case 's':
    case 'S':
        return(16);
    case 't':
    case 'T':
        return(17);
    case 'h':
    case 'H':
        return(18);
    case 'i':
    case 'I':
        return(19);
    case 'u':
    case 'U':
        return(20);
    case 'v':
    case 'V':
        return(21);
    case 'w':
    case 'W':
        return(22);
    case 'x':
    case 'X':
        return(23);
    case 'y':
    case 'Y':
        return(24);
    case 'z':
    case 'Z':
        return(25);
    return(0);
    }
}
int hash(STRING a){ // hashirovanie
    int s=0, i=0;
        while(((a.letter[i])!='\0')&&((a.letter[i])!='\n')){
                /* otladka
                printf("!%c %d\n", a.letter[i], ord(a.letter[i]));
                */
                s=(s*27+ord(a.letter[i]))%13;
                i++;
    }
    return(s);
}
int compare(STRING a, STRING b){ // pokazivaet, ravni li stroki (odinakovie slova)
    int i;
    for(i=0; i<14; i++){
        if(a.letter[i]!=b.letter[i]) return 0;
        if((a.letter[i]=='\0')&&(b.letter[i]=='\0')) return 1;
    }
    return 1;
}
int find(STRING a, EL *list){ // poisk elementa + opred. kol-va sravneniy
    int i=hash(a);
    int srav=0;
    EL *q;
    q = (EL*) malloc(sizeof(EL));
    if(list[i].inf.letter[0]=='\0'){ // pustoi element
            srav++;
            return(srav);
    }
    if(compare(a, list[i].inf)){ // proverka na perviy element s dannim indeksom
        found=&(list[i].inf);
        srav++;
        return(srav);
    }
    q=&(list[i]);
    while(q->next!=NULL){ // probeg po ostalnomy listu
        srav++;
        if(compare(a, q->next->inf)){
                found=&(q->next->inf);
                return(srav);
        }
        q=q->next;
    }
}
int maxlenght (EL *list){ // max. dlina
    int i=0, lenght, lenght_max=0;
    EL *q;
    q = (EL*) malloc(sizeof(EL));
    for(i=0; i<13; i++){
        lenght=0;
        if(list[i].inf.letter[0]=='\0') continue;
        lenght++;
        q=&(list[i]);
        while(q->next!=NULL){
            lenght++;
            q=q->next;
        }
        if(lenght>lenght_max){
            lenght_max=lenght;
        }
    }
    return(lenght_max);
}
int keys(EL *list){ // kol-vo zapolnennih klyuchey
    int i=0, key=0;
    EL *q;
    q = (EL*) malloc(sizeof(EL));
    for(i=0; i<13; i++){
        if(list[i].inf.letter[0]=='\0') continue; // proverka na pustoi element
        key++;
        q=&(list[i]);
        while(q->next!=NULL){ // probeg spiska vnutri indeksa
            q=q->next;
            key++;
        }
    }
    return(key);
}
void printm(EL *list){ // vivod (dlya otladki)
    int i=0;
    EL *q;
    q = (EL*) malloc(sizeof(EL));
    for(i=0; i<13; i++){
        if(list[i].inf.letter[0]=='\0') continue;
        printf("[%d] %s", i, list[i].inf);
        q=&(list[i]);
        while(q->next!=NULL){
            printf(" %s", q->next->inf);
            q=q->next;
        }
        printf("\n");
    }
}
void del(EL *list){ // udalenie
    int i, j;
    EL *p;
    for(i=0; i<13; i++){
        p = (EL*) malloc(sizeof(EL));
        p=&(list[i]);
        for(j=0; j<15; j++){
                (p->inf).letter[j]='\0';
        }
        p->next=NULL;
    }
}
int main(void){
    //FILE *file = fopen("test.txt", "r");
    int s=0, i=0, k, cont=1;
    STRING p, NULLSTRING; // null-string - nol' stroka, dlya nachalnogo zadaniya massiva
    EL *HASH, *q, *l;
    HASH = (EL*) malloc(13*sizeof(EL));
    float koef;
    q = (EL*) malloc(sizeof(EL));
    for(i=0; i<15; i++){
        NULLSTRING.letter[i]='\0';
    }
    for(i=0; i<13; i++){ // nachalnoe zadanie hash-tablitsi
        HASH[i].inf=NULLSTRING;
        HASH[i].next=NULL;
    }
    /* rabota s failami
    for(i=0; i<10; i++){
        fscanf(file, "%s", &p);
        if((p.letter[0]!='\n')&&(p.letter[0]!='\0')){
            k=hash(p); // hash-index
            if(HASH[k].inf.letter[0]=='\0'){ // esli nachalnaya yacheyka pusta
                HASH[k].inf=p;
            }
            else{ // esli ne pusta
                q=&(HASH[k]);
                l = (EL*) malloc(sizeof(EL));
                l->inf=p;
                l->next=NULL;
                while((q->next)!=NULL) q=q->next;
                q->next=l;
            }
        }
    }
    */
    /**/
    while(cont){ // zapolnenie hash-tablitsi vvodimimi strokami
        i=0;
        scanf("%s", &p);
        if((p.letter[0]!='\n')&&(p.letter[0]!='\0')){
            k=hash(p); // hash-index
            if(HASH[k].inf.letter[0]=='\0'){ // esli nachalnaya yacheyka pusta
                HASH[k].inf=p;
            }
            else{ // esli ne pusta
                q=&(HASH[k]);
                l = (EL*) malloc(sizeof(EL));
                l->inf=p;
                l->next=NULL;
                while((q->next)!=NULL) q=q->next;
                q->next=l;
            }
            if (getchar()=='\n') cont=0;
        }
        else cont=0;
    }
    /**/
    //printm(HASH);
    scanf("%s", &p);
    find(p, HASH);
    if(found!=NULL){
        printf("%s\n", found);
    }
    else{
        printf("not found\n");
    }
    printf("%d\n", maxlenght(HASH));
    koef=keys(HASH)/13.0;
    printf("%.2f\n", koef);
    //fclose(file);
}