Return to alpha.c CVS log

Up to [Research Unix] / researchv10no / cmd / descrypt

Annotation of researchv10no/cmd/descrypt/alpha.c, revision 1.1.1.1

1.1       root        1: /*
                      2:  *     Routines for Doing Alphanumeric Input/Output (the -a option)
                      3:  *     D.P.Mitchell  83/07/01.
                      4:  */
                      5: 
                      6: #include <stdio.h>
                      7: #define CHAR1  '#'
                      8: 
                      9: extern int permutation[];
                     10: char trans[66] = "ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789abcdefghijklmnopqrstuvwxyz./";
                     11: int untrans[] = {
                     12:  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0, 
                     13:  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0, 
                     14:  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0, 62, 63, 
                     15: 26, 27, 28, 29, 30, 31, 32, 33, 34, 35,  0,  0,  0,  0,  0,  0, 
                     16:  0,  0,  1,  2,  3,  4,  5,  6,  7,  8,  9, 10, 11, 12, 13, 14, 
                     17: 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25,  0,  0,  0,  0,  0, 
                     18:  0, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 
                     19: 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61,  0,  0,  0,  0,  0, 
                     20:  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0, 
                     21:  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0, 
                     22:  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0, 
                     23:  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0, 
                     24:  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0, 
                     25:  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0, 
                     26:  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0, 
                     27:  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0, 
                     28: };
                     29: 
                     30: out_alpha(c_buffer)
                     31: int c_buffer[128];
                     32: {
                     33:        int six[171];
                     34:        register c0, c1, c2;
                     35:        register src, dst;
                     36: 
                     37:        for (src = 0, dst = 0; src < 128;) {
                     38:                c0 = c_buffer[permutation[src++]];
                     39:                c1 = c_buffer[permutation[src++]];
                     40:                if (src < 128)
                     41:                        c2 = c_buffer[permutation[src++]];
                     42:                else
                     43:                        c2 = 0;
                     44:                six[dst++] = trans[(c0 >> 2) & 077];
                     45:                six[dst++] = trans[((c0 & 03) << 4) | ((c1 >> 4) & 017)];
                     46:                six[dst++] = trans[((c1 & 017) << 2) | ((c2 >> 6) & 03)];
                     47:                if (dst < 171)
                     48:                        six[dst++] = trans[c2 & 077];
                     49:        }
                     50:        putchar(CHAR1);
                     51:        for (src = 0; src < 57; src++)
                     52:                putchar(six[src]);
                     53:        putchar('\n');
                     54:        putchar(CHAR1);
                     55:        for (; src < 114; src++)
                     56:                putchar(six[src]);
                     57:        putchar('\n');
                     58:        putchar(CHAR1);
                     59:        for (; src < 171; src++)
                     60:                putchar(six[src]);
                     61:        putchar('\n');
                     62: }
                     63: 
                     64: int
                     65: in_alpha(c_buffer)
                     66: int c_buffer[128];
                     67: {
                     68:        int six[171];
                     69:        register c0, c1, c2, c3;
                     70:        register src, dst;
                     71:        char line[64];
                     72:        extern char *fgets();
                     73: 
                     74:        for (dst = 0; dst < 171; ) {
                     75:                do {
                     76:                        if (fgets(line, 64, stdin) == NULL)
                     77:                                return 0;
                     78:                } while (line[0] != CHAR1);
                     79:                for (src = 1; src < 58; src++)
                     80:                        six[dst++] = line[src];
                     81:        }
                     82:        for (src = 0, dst = 0; src < 171; ) {
                     83:                c0 = untrans[six[src++]];
                     84:                c1 = untrans[six[src++]];
                     85:                c2 = untrans[six[src++]];
                     86:                if (src < 171)
                     87:                        c3 = untrans[six[src++]];
                     88:                else
                     89:                        c3 = 0;
                     90:                c_buffer[permutation[dst++]] = (c0 << 2) | (c1 >> 4);
                     91:                c_buffer[permutation[dst++]] = ((c1 & 017) << 4) | (c2 >> 2);
                     92:                if (dst < 128)
                     93:                        c_buffer[permutation[dst++]] = ((c2 & 03) << 6) | c3;
                     94:        }
                     95:        return 1;
                     96: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.