uva 843 Crypt Kicker

 

 

Crypt Kicker

A common but insecure method of encrypting text is to permute the letters of the alphabet. That is, in the text, each letter of the alphabet is consistently replaced by some other letter. So as to ensure that the encryption is reversible, no two letters are replaced by the same letter.

Your task is to decrypt several encoded lines of text, assuming that each line uses a different set of replacements, and that all words in the decrypted text are from a dictionary of known words.

 

Input 

The input consists of a line containing an integer n, followed by n lower case words, one per line, in alphabetical order. These n words comprise the dictionary of words which may appear in the decrypted text. Following the dictionary are several lines of input. Each line is encrypted as described above.

There are no more than 1000 words in the dictionary. No word exceeds 16 letters. The encrypted lines contain only lower case letters and spaces and do not exceed 80 characters in length.

 

Output 

Decrypt each line and print it to standard output. If there is more than one solution, any will do. If there is no solution, replace every letter of the alphabet by an asterisk.

 

Sample Input 

6
and
dick
jane
puff
spot
yertle
bjvg xsb hxsn xsb qymm xsb rqat xsb pnetfn
xxxx yyy zzzz www yyyy aaa bbbb ccc dddddd

 

Sample Output 

dick and jane and puff and spot and yertle
**** *** **** *** **** *** **** *** ******

#include <cstdio>
#include <algorithm>
#include <cassert>
#include <cstdlib>
#include <cstring>
#include <string>
#include <vector>
#include <list>
using namespace std;

#define MAXWORDLEN 16
#define MAXWORD 1000
#define MAXTEXTLEN 80
#define IND(x)((x) - 'a')

int dictsz;
char cont[MAXWORD + 1][MAXWORDLEN + 1];
char enc[MAXTEXTLEN + 1];
char plan[MAXTEXTLEN + 1];
char cast[26];
char castrev[26];
int contind;
typedef list<char *> lpc, *plpc;
plpc dict[MAXWORDLEN + 1];

void initglob()
{
    contind = 0;
    fill(dict, dict + MAXWORDLEN, (plpc)NULL);
    strcpy(cont[contind], "");
    dict[0] = new lpc;
    dict[0]->push_back(cont[contind++]);
}

void destroyglob()
{
    for(int i=0; i<MAXWORDLEN; ++i)
        delete dict[i];
}

void newword(char *word)
{
    int len = strlen(word);
    strcpy(cont[contind], word);
    if(dict[len] == NULL)
        dict[len] = new lpc;
    dict[len]->push_back(cont[contind++]);
}

void getdict()
{
    char word[MAXWORDLEN + 1];
    if(scanf("%d", &dictsz) == EOF)
        exit(0);
    for(int i=0; i<dictsz; ++i)
    {
        scanf("%s", word);
        newword(word);
    }
    gets(word);
}

bool decoderec(int ind, int tlen)
{
    if(ind >= tlen)
        return true;
    char *pc = enc + ind;
    char *sp = strchr(pc, ' ');
    if(sp == NULL)
        sp = enc + tlen;
    int len = sp - pc;
    if(dict[len] == NULL)
    {
        fill(plan + ind, plan + ind + len, '*');
        return false;
    }
    plpc p = dict[len];
    lpc::iterator it = p->begin();
    char bkcast[26];
    char bkcastrev[26];
    copy(cast, cast + 26, bkcast);
    copy(castrev, castrev + 26, bkcastrev);
    for(; it != p->end(); ++it)
    {
        bool failed = false;
        for(int i=0; i<len; ++i)
        {
            if(!(cast[IND(pc[i])] == (*it)[i] && castrev[IND((*it)[i])] == pc[i] || cast[IND(pc[i])] == '/0' && castrev[IND((*it)[i])] == '/0'))
            {
                copy(bkcast, bkcast + 26, cast);
                copy(bkcastrev, bkcastrev + 26, castrev);
                failed = true;
                break;
            }
            cast[IND(pc[i])] = (*it)[i];
            castrev[IND((*it)[i])] = pc[i];
        }
        if(failed)
            continue;
        copy(*it, *it + len, plan + ind);
        if(decoderec(ind + len + 1, tlen))
            return true;
        else
        {
            copy(bkcast, bkcast + 26, cast);
            copy(bkcastrev, bkcastrev + 26, castrev);
        }
    }
    fill(plan + ind, plan + ind + len, '*');
    return false;
}

void decode()
{
    if(gets(enc) == NULL)
        exit(0);
    int len = strlen(enc);
    fill(plan, plan + len, ' ');
    plan[len] = '/0';
    for(int i=0; i<len; ++i)
    {
        if(enc[i] >= 'a' && enc[i] <= 'z')
            plan[i] = '*';
    }
    fill(cast, cast + 26, '/0');
    fill(castrev, castrev + 26, '/0');
    decoderec(0, len);
    puts(plan);
}

int main()
{
    initglob();
    getdict();
    while(true)
        decode();
    destroyglob();
    return 0;
}