Шифр телеграмм 1918, Екатеринбург

Шифр Виженера,
 
ключ "ЕКАТЕРИНБУРГ"
 
алфавит:
у      01
ф      02
х      03
ц      04
ч      05
ш      06
щ      07
ю      08
я      09
а      10
б      11
в      12
г      13
д      14
е      15
ж      16
з      17
и      18
к      19
л      20
м      21
н      22
о      23
п      24
р      25
с      26
т      27

62   8,3%
26   6,6%
34   4,8%
10   4,4%
42   4,4%
12   3,9%
13   3,9%
44   3,9%
02   3,5%
03   2,6%
05   2,6%
28   2,6%
32   2,6%
91   2,6%
14   2,2%
27   2,2%
36   2,2%
45   2,2%
53   2,2%
79   2,2%
85   2,2%
29   1,7%
30   1,7%
37   1,7%
71   1,7%
72   1,7%
77   1,7%
01   1,3%
22   1,3%
41   1,3%
51   1,3%
08   0,9%
09   0,9%
11   0,9%
40   0,9%
97   0,9%
06   0,4%
19   0,4%
21   0,4%
23   0,4%
31   0,4%
38   0,4%
49   0,4%
50   0,4%
52   0,4%
54   0,4%
58   0,4%
63   0,4%
65   0,4%
66   0,4%
81   0,4%
89   0,4%
92   0,4%
94   0,4%

                                                
\   1   |   2    3   4   5   6   7   8   9   0  
1   к  |   л  м  н  о  п  р  с  т  у  
2   р  |   с  т  у  ф  х  ц  ч  ш  щ  
3   и  |   к  л  м  н  о  п  р  с  т  
4   п  |   р  с  т  у  ф  х  ц  ч  ш  
5   т  |   у  ф  х  ц  ч  ш  щ  ю  я  
6   о  |   п  р  с  т  у  ф  х  ц  ч  
7   г  |   д  е  ж  з  и  к  л  м  н  
8   р  |   с  т  у  ф  х  ц  ч  ш  щ  
9   а  |   б  в  г  д  е  ж  з  и  к  
0   ф  |   х  ц  ч  ш  щ  ю  я  а  б

#define ALPHABET_LENGTH 27
 
char alphabet[ALPHABET_LENGTH] = {
'А','Б','В','Г','Д','Е','Ж','З','И','К',
'Л','М','Н','О','П','Р','С','Т','У','Ф',
'Х','Ц','Ч','Ш','Щ','Ю','Я'
} ;
 
char telegram[94] = {
39,34,35,42,29,35,36,49,26,27,
37,28,40,33,30,50,27,26,23,49,
34,13,51,28,41,34,31,42,33,51,
45,34,34,25,48,39,42,37,23,47,
25,42,28,38,26,02,30,23,41,46,
15,54,38,43,31,42,21,13,26,36,
17,21,28,31,33,35,38,44,34,27,
40,34,33,28,34,50,28,43,29,44,
26,28,49,38,33,34,22,37,34,26,
28,26,29,19
} ;
 
char *key = "ГЯИУГХАШЗТХЕ" ;
 
int index_in_alphabet(char c)
{
    int i = 0 ;
    while (c != alphabet[i]) i++ ;
    return i ;
}
 
void main()
{
    int key_length = strlen(key) ;
    for (int i = 0 ; i < sizeof(telegram) ; i++)
        putchar(alphabet[(telegram[i] + index_in_alphabet(key[i % key_length]) - 1) % ALPHABET_LENGTH]) ;
}

#define ALPHABET_LENGTH 27
 
char alphabet[ALPHABET_LENGTH] = {
'А','Б','В','Г','Д','Е','Ж','З','И','К',
'Л','М','Н','О','П','Р','С','Т','У','Ф',
'Х','Ц','Ч','Ш','Щ','Ю','Я'
} ;
 
char *key = "ЕКАТЕРИНБУРГ" ;
 
int MOD(int a, int b) // остаток деления с округлением по полу, встроенная в Си функция % не подходит
{
    int c = a % b ;
    if (((a ^ b) < 0) && c) c += b ;
    return c ;
}
 
int index_in_alphabet(char c)
{
    int i = 0 ;
    while (c != alphabet[i]) i++ ;
    return i ;
}
 
void main()
{
    int key_length = strlen(key) ;
    int first_plus_last = index_in_alphabet(key[0]) + index_in_alphabet(key[key_length-1]) ;
    for (int i = 0 ; i < key_length ; i++)
        putchar(alphabet[MOD(first_plus_last - index_in_alphabet(key[i]), ALPHABET_LENGTH)]) ;
}

// (C)Ethereal 2020
char table[100] = {
0  ,0  ,'В',0  ,0  ,0  ,0  ,'Е',0  ,0  ,
0  ,'Э','К','С','Д',0  ,'Х',0  ,'Р',0  ,
0  ,'Л',0  ,'О','Б','Н',0  ,0  ,'С','А',
'Ы','Б','Е',0  ,'И','К','П','У','К','Т',
0  ,0  ,0  ,0  ,0  ,'Д',0  ,'А',0  ,'В',
'Ь',0  ,'М','Р','Е',0  ,'И','Й','Т',0  ,
0  ,'Л',0  ,'Б','Ц','Ш',0  ,'З',0  ,'Н',
'Ю','А',0  ,0  ,'О','Г','И',0  ,0  ,'Р',
0  ,'М','О','С','В',0  ,'Ы',0  ,0  ,'Д',
0  ,'Е',0  ,0  ,'Я','Й',0  ,'Л',0  ,0
} ;
 
char *telegram_1 = "94182 31321 29022 10712 37144 71361 32453 75439 52713 94932 54844 97467 83587 12576 91635 49782 75844 75389 54766 49102 . 12713 58454 89375 88354 24944 97165 56615 44930 07112 89479 86" ;
char *telegram_2 = "73231 73452 28355 69528 76699 44913 38565 73732 16719 73436 91538 15037 83584 76974 02765 85425 71319 77014 91697 607" ;
 
void decrypt(char *text)
{
    int i = 0, n ;
    char c ;
 
    while ((c = *text++))
        if (c == '.')
        {
            putchar(c) ; putchar(' ') ;
            i = 0 ;
        }
        else
            if (isdigit(c))
                if (i++ & 1)
                {
                    n += c - '0' ;
                    if (table[n])
                        putchar(table[n]) ;
                    else
                        putchar('_') ;
                }
                else
                    n = 10 * (c - '0') ;
    putchar('\n') ;
}
 
void main()
{
    puts("Telegram 1") ;
    decrypt(telegram_1) ;
    puts("Telegram 2") ;
    decrypt(telegram_2) ;
}

#define ALPHABET_LENGTH 27
 
char alphabet[ALPHABET_LENGTH] = {
'А','Б','В','Г','Д','Е','Ж','З','И','К',
'Л','М','Н','О','П','Р','С','Т','У','Ф',
'Х','Ц','Ч','Ш','Щ','Ю','Я'
} ;
 
char telegram[210] = {
36,37,11,43,30,51,41,45,22,8,
35,33,33,24,37,50,27,40,44,39,
21,25,35,39,32,42,30,50,42,35,
36,46,31,11,52,31,37,37,22,45,
27,40,35,37,33,24,52,39,23,33,
20,41,27,35,30,32,24,24,47,23,
41,46,33,36,42,44,41,42,26,27,
35,16,39,34,35,48,33,49,43,45,
37,19,46,14,34,29,27,37,42,51,
42,45,37,24,36,16,40,29,32,42,
37,43,27,44,21,27,45,14,20,29,
28,51,38,50,28,38,26,23,43,22,
41,42,22,42,42,37,38,32,37,28,
43,34,37,34,32,45,30,48,29,42,
21,20,48,34,25,43,20,52,42,43,
36,40,34,12,45,23,41,42,22,42,
42,35,44,42,12,06,35,28,37,34,
11,41,25,30,36,34,26,27,38,38,
16,36,34,50,18,48,43,45,33,19,
52,27,25,30,28,49,30,48,44,49,
21,13,43,40,27,44,20,40,25,46
} ;
 
char *key = "ЕКАТЕРИНБУРГ" ;
 
int MOD(int a, int b) // остаток деления с округлением по полу, встроенная в Си функция % не подходит
{
    int c = a % b ;
    if (((a ^ b) < 0) && c) c += b ;
    return c ;
}
 
int letter_in_alphabet(char c) // 1..ALPHABET_LENGTH
{
    int i = 0 ;
    while (c != alphabet[i++]) ;
    return i ;
}
 
void main()
{
    int key_length = strlen(key) ;
    int first_plus_last = index_in_alphabet(key[0]) + index_in_alphabet(key[key_length-1]) ;
    for (int i = 0 ; i < sizeof(telegram) ; i++)
        putchar(alphabet[MOD(telegram[i] + first_plus_last - letter_in_alphabet(key[i % key_length]), ALPHABET_LENGTH)]) ;
}

#define ALPHABET_LENGTH 27
 
char alphabet[ALPHABET_LENGTH] = {
'А','Б','В','Г','Д','Е','Ж','З','И','К',
'Л','М','Н','О','П','Р','С','Т','У','Ф',
'Х','Ц','Ч','Ш','Щ','Ю','Я'
} ;
 
char telegram[210] = {
36,37,11,43,30,51,41,45,22,8,
35,33,33,24,37,50,27,40,44,39,
21,25,35,39,32,42,30,50,42,35,
36,46,31,11,52,31,37,37,22,45,
27,40,35,37,33,24,52,39,23,33,
20,41,27,35,30,32,24,24,47,23,
41,46,33,36,42,44,41,42,26,27,
35,16,39,34,35,48,33,49,43,45,
37,19,46,14,34,29,27,37,42,51,
42,45,37,24,36,16,40,29,32,42,
37,43,27,44,21,27,45,14,20,29,
28,51,38,50,28,38,26,23,43,22,
41,42,22,42,42,37,38,32,37,28,
43,34,37,34,32,45,30,48,29,42,
21,20,48,34,25,43,20,52,42,43,
36,40,34,12,45,23,41,42,22,42,
42,35,44,42,12,06,35,28,37,34,
11,41,25,30,36,34,26,27,38,38,
16,36,34,50,18,48,43,45,33,19,
52,27,25,30,28,49,30,48,44,49,
21,13,43,40,27,44,20,40,25,46
} ;
 
char *key = "ЕКАТЕРИНБУРГ" ;
 
int MOD(int a, int b) // остаток деления с округлением по полу, встроенная в Си функция % не подходит
{
    int c = a % b ;
    if (((a ^ b) < 0) && c) c += b ;
    return c ;
}
 
int index_in_alphabet(char c) // 0..ALPHABET_LENGTH-1
{
    int i = 0 ;
    while (c != alphabet[i]) i++ ;
    return i ;
}
 
void main()
{
    int key_length = strlen(key) ;
    int first_plus_last = index_in_alphabet(key[0]) + index_in_alphabet(key[key_length-1]) ;
    for (int i = 0 ; i < sizeof(telegram) ; i++)
        putchar(alphabet[MOD(telegram[i]-1 + first_plus_last - index_in_alphabet(key[i % key_length]), ALPHABET_LENGTH)]) ;
}