framac.ast

   (char *)"You\'ve got to ask yourself one question: \'Do I feel lucky?\'",
   (char *)"Love means never having to say you\'re sorry",
   (char *)"I\'m walking here! I\'am walking here!",
   (char *)"Get your stinking paws off me, you damned dirty ape.",
   (char *)"Open the pod bay doors please, HAL.",
   (char *)"Hello, gorgeous.",
   (char *)"What we\'ve got here is failure to communicate.",
   (char *)"They call me Mister Tibbs!",
   (char *)"We rob banks."};
char gValidChars[63] =
  {(char)'a',
   (char)'b',
   (char)'c',
   (char)'d',
   (char)'e',
   (char)'f',
   (char)'g',
   (char)'h',
   (char)'i',
   (char)'j',
   (char)'k',
   (char)'l',
   (char)'m',
   (char)'n',
   (char)'o',
   (char)'p',
   (char)'q',
   (char)'r',
   (char)'s',
   (char)'t',
   (char)'u',
   (char)'v',
   (char)'w',
   (char)'x',
   (char)'y',
   (char)'z',
   (char)'A',
   (char)'B',
   (char)'C',
   (char)'D',
   (char)'E',
   (char)'F',
   (char)'G',
   (char)'H',
   (char)'I',
   (char)'J',
   (char)'K',
   (char)'L',
   (char)'M',
   (char)'N',
   (char)'O',
   (char)'P',
   (char)'Q',
   (char)'R',
   (char)'S',
   (char)'T',
   (char)'U',
   (char)'V',
   (char)'W',
   (char)'X',
   (char)'Y',
   (char)'Z',
   (char)'0',
   (char)'1',
   (char)'2',
   (char)'3',
   (char)'4',
   (char)'5',
   (char)'6',
   (char)'7',
   (char)'8',
   (char)'9',
   (char)'\000'};
size_t cgc_transmit_all_zPcz(char *buf, size_t size)
{
  size_t __retres;
  size_t rx_bytes = (unsigned int)0;
  size_t total = (unsigned int)0;
  int ret = 0;
  if (buf == (char *)0) {
    __retres = (unsigned int)0;
    goto return_label;
  }
  while (1) {
    ret = cgc_transmit(1,(void const *)buf,size - total,& rx_bytes);
    if (ret != 0) goto _LOR;
    else 
      if (rx_bytes == (size_t)0) _LOR: cgc__terminate((unsigned int)1);
    total += rx_bytes;
    if (! (total < size)) break;
  }
  __retres = size;
  return_label: return __retres;
}

size_t cgc_transmit_str(char *buf)
{
  size_t tmp_0;
  size_t len = strlen((char const *)buf);
  tmp_0 = cgc_transmit_all_zPcz(buf,len);
  return tmp_0;
}

size_t cgc_receive_all(char *buf, size_t size)
{
  size_t __retres;
  size_t rx_bytes = (unsigned int)0;
  size_t total = (unsigned int)0;
  int ret = 0;
  if (buf == (char *)0) {
    __retres = (unsigned int)0;
    goto return_label;
  }
  while (1) {
    ret = cgc_receive(0,(void *)buf,size - total,& rx_bytes);
    if (ret != 0) goto _LOR;
    else 
      if (rx_bytes == (size_t)0) _LOR: cgc__terminate((unsigned int)1);
    total += rx_bytes;
    if (! (total < size)) break;
  }
  __retres = size;
  return_label: return __retres;
}

size_t cgc_readline(char *buf, size_t len)
{
  size_t __retres;
  if (buf == (char *)0) {
    __retres = (unsigned int)0;
    goto return_label;
  }
  size_t count = (unsigned int)0;
  int ret = 0;
  char c = (char)0;
  size_t rx_bytes = (unsigned int)0;
  while (1) {
    ret = cgc_receive(0,(void *)(& c),(unsigned int)1,& rx_bytes);
    if (ret != 0) goto _LOR;
    else 
      if (rx_bytes == (size_t)0) _LOR: cgc__terminate((unsigned int)1);
    *(buf + count) = c;
    count += (size_t)1;
    if ((int)c != '\n') {
      if (! (count < len)) break;
    }
    else break;
  }
  __retres = count;
  return_label: return __retres;
}

char cgc_rotN(char c, int n)
{
  char __retres;
  int temp = 0;
  n = (int)((unsigned int)n % (sizeof(gValidChars) - (unsigned int)1));
  if ((int)c >= 'a') {
    if ((int)c <= 'z') temp = (int)c - 'a'; else goto _LAND_1;
  }
  else {
    _LAND_1: ;
    if ((int)c >= 'A') {
      if ((int)c <= 'Z') temp = ((int)c - 'A') + 26; else goto _LAND_0;
    }
    else {
      _LAND_0: ;
      if ((int)c >= '0') {
        if ((int)c <= '9') temp = ((int)c - '0') + 52; else goto _LAND;
      }
      else {
        _LAND: {
                 __retres = c;
                 goto return_label;
               }
      }
    }
  }
  temp += n;
  temp = (int)((unsigned int)temp % (sizeof(gValidChars) - (unsigned int)1));
  __retres = gValidChars[temp];
  return_label: return __retres;
}

size_t cgc_strrotcpy(char *dst, char *src, int rot)
{
  size_t __retres;
  if (src == (char *)0) goto _LOR;
  else 
    if (dst == (char *)0) {
      _LOR: {
              __retres = (unsigned int)0;
              goto return_label;
            }
    }
  size_t ret = (unsigned int)0;
  ret = (unsigned int)0;
  while ((int)*(src + ret) != '\000') {
    *(dst + ret) = cgc_rotN(*(src + ret),rot);
    ret += (size_t)1;
  }
  *(dst + ret) = (char)'\000';
  __retres = ret;
  return_label: return __retres;
}

char **cgc_gWords = (char **)0;
char *cgc_gWordData = (char *)0;
int cgc_init(int rot)
{
  int __retres;
  int ret = 0;
  size_t numWords = sizeof(gSeedWords) / sizeof(char *);
  ret = cgc_allocate(sizeof(gSeedWords),0,(void **)(& cgc_gWords));
  if (ret != 0) {
    __retres = ret;
    goto return_label;
  }
  size_t total = (unsigned int)0;
  int i = 0;
  i = 0;
  while ((size_t)i < numWords) {
    {
      size_t tmp;
      tmp = strlen((char const *)gSeedWords[i]);
      total += tmp;
      total += (size_t)1;
    }
    i ++;
  }
  ret = cgc_allocate(total,0,(void **)(& cgc_gWordData));
  if (ret != 0) {
    __retres = ret;
    goto return_label;
  }
  size_t temp = (unsigned int)0;
  char *pTemp = cgc_gWordData;
  i = 0;
  while ((size_t)i < numWords) {
    {
      size_t tmp_0;
      *(cgc_gWords + i) = pTemp;
      tmp_0 = cgc_strrotcpy(pTemp,gSeedWords[i],rot);
      pTemp += tmp_0;
      pTemp ++;
    }
    i ++;
  }
  while ((unsigned int)i < sizeof(gSeedWords) / sizeof(char *)) {
    *(cgc_gWords + i) = (char *)0;
    i ++;
  }
  __retres = 0;
  return_label: return __retres;
}

int cgc_toInt(char c1, char c2)
{
  int __retres;
  int ret = 0;
  if ((int)c1 >= '0') 
    if ((int)c1 <= '9') {
      ret = (int)c1 - '0';
      if ((int)c2 >= '0') {
        if ((int)c2 <= '9') {
          ret *= 10;
          ret += (int)c2 - '0';
          __retres = ret;
          goto return_label;
        }
        else goto _LAND;
      }
      else {
        _LAND: ;
        if ((int)c2 != '\000') {
          __retres = ret;
          goto return_label;
        }
        else {
          __retres = 0;
          goto return_label;
        }
      }
    }
  __retres = 0;
  return_label: return __retres;
}

static uint32_t gRandRegister = 0xDA2bAC9C;
uint32_t cgc_RANDOM(void)
{
  gRandRegister = ((((((((gRandRegister >> 31) ^ (gRandRegister >> 6)) ^ (
                        gRandRegister >> 4)) ^ (gRandRegister >> 2)) ^ (
                      gRandRegister >> 1)) ^ gRandRegister) & (unsigned int)0x00000001) << 31) | (
                  gRandRegister >> 1);
  return gRandRegister;
}

void cgc_my_srand(uint32_t seed)
{
  gRandRegister = seed;
  return;
}

void cgc_scramble(char *dst, char *src, size_t len)
{
  size_t tmp;
  uint32_t tmp_0;
  if (dst == (char *)0) goto _LOR;
  else 
    if (src == (char *)0) _LOR: goto return_label;
  tmp = strlen((char const *)src);
  int len_src = (int)tmp;
  int i = 0;
  tmp_0 = cgc_RANDOM();
  uint32_t r = tmp_0 % (unsigned int)3 + (unsigned int)2;
  while (1) {
    if ((int)*(src + i) != '\000') 
      if ((size_t)i < len) {
        if (! (i < len_src)) break;
      }
      else break;
    else break;
    if ((int)*(src + i) >= 'a') {
      if ((int)*(src + i) <= 'z') goto _LOR_0; else goto _LAND_1;
    }
    else {
      _LAND_1: ;
      if ((int)*(src + i) >= 'A') {
        if ((int)*(src + i) <= 'Z') goto _LOR_0; else goto _LAND_0;
      }
      else {
        _LAND_0: ;
        if ((int)*(src + i) >= '0') {
          if ((int)*(src + i) <= '9') 
            _LOR_0:
            if ((unsigned int)i % r) *(dst + i) = *(src + i);
            else *(dst + i) = (char)'_';
          else goto _LAND;
        }
        else _LAND: *(dst + i) = *(src + i);
      }
    }
    i ++;
  }
  *(dst + (len - (size_t)1)) = (char)'\000';
  return_label: return;
}

int main(int cgc_argc, char **cgc_argv)
{
  int __retres;
  int tmp;
  int tmp_2;
  char buf[64] = {(char)0};
  int i = 0;
  int ret = 0;
  int temp = 0;
  size_t sret = (unsigned int)0;
  char c = (char)'\n';
  cgc_transmit_str((char *)"Please Enter a 2 Digit Number\n");
  sret = cgc_readline(buf,(unsigned int)64);
  if (sret == (size_t)0) cgc__terminate((unsigned int)1);
  i = cgc_toInt(buf[0],buf[1]);
  tmp = cgc_init(i + 1);
  if (tmp != 0) {
    __retres = -1;
    goto return_label;
  }
  cgc_my_srand((unsigned int)*((int *)(buf)));
  i = 0;
  while (i < 10) {
    {
      uint32_t tmp_0;
      int tmp_1;
      if (i == 0) cgc_transmit_str((char *)"Word: ");
      else cgc_transmit_str((char *)"Next Word: ");
      tmp_0 = cgc_RANDOM();
      temp = (int)(tmp_0 % (sizeof(gSeedWords) / sizeof(char *)));
      cgc_scramble(buf,*(cgc_gWords + temp),(unsigned int)64);
      cgc_transmit_str(buf);
      cgc_transmit_all_zPcz(& c,(unsigned int)1);
      sret = cgc_readline(buf,(unsigned int)64);
      if (sret == (size_t)0) cgc__terminate((unsigned int)1);
      buf[sret - (size_t)1] = (char)'\000';
      tmp_1 = strcmp((char const *)(buf),(char const *)*(cgc_gWords + temp));
      if (tmp_1 != 0) {
        cgc_transmit_str((char *)"You Lose\n");
        __retres = 0;
        goto return_label;
      }
    }
    i ++;
  }
  cgc_transmit_str((char *)"Final Round. Chose another 2 digit number\n");
  sret = cgc_readline(buf,(unsigned int)64);
  if (sret == (size_t)0) cgc__terminate((unsigned int)1);
  i = cgc_toInt(buf[0],buf[1]);
  i = (int)((unsigned int)i % (sizeof(gSeedWords) / sizeof(char *)));
  cgc_scramble(buf,*(cgc_gWords + i),(unsigned int)64);
  cgc_transmit_str(buf);
  cgc_transmit_all_zPcz(& c,(unsigned int)1);
  sret = cgc_readline(buf,(unsigned int)64);
  if (sret == (size_t)0) cgc__terminate((unsigned int)1);
  buf[sret - (size_t)1] = (char)'\000';
  tmp_2 = strcmp((char const *)(buf),(char const *)*(cgc_gWords + i));
  if (tmp_2 != 0) cgc_transmit_str((char *)"You Lose\n");
  else cgc_transmit_str((char *)"You Win!\n");
  __retres = 0;
  return_label: return __retres;
}