开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Internet/网络编程 > Telnet服务器 > 查看源码
qp_conv.c
资源名称：3.0-20000220-SNAP.tar.gz　[点击查看]
上传用户：minyiyu
上传日期：2018-12-24
资源大小：864k
文件大小：3k
源码类别：

Telnet服务器

开发平台：

Unix_Linux

qp_conv.c：源码内容
  1. /* ----------------------------------------------------- */
  2. /* QP code : "0123456789ABCDEF"                          */
  3. /* ----------------------------------------------------- */
  5. static int
  6. qp_code(x)
  7.   register int x;
  8. {
  9.   if (x >= '0' && x <= '9')
  10.     return x - '0';
  11.   if (x >= 'a' && x <= 'f')
  12.     return x - 'a' + 10;
  13.   if (x >= 'A' && x <= 'F')
  14.     return x - 'A' + 10;
  15.   return -1;
  16. }
  19. /* ------------------------------------------------------------------ */
  20. /* BASE64 :                                                           */
  21. /* "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/" */
  22. /* ------------------------------------------------------------------ */
  24. static int
  25. base64_code(x)
  26.   register int x;
  27. {
  28.   if (x >= 'A' && x <= 'Z')
  29.     return x - 'A';
  30.   if (x >= 'a' && x <= 'z')
  31.     return x - 'a' + 26;
  32.   if (x >= '0' && x <= '9')
  33.     return x - '0' + 52;
  34.   if (x == '+')
  35.     return 62;
  36.   if (x == '/')
  37.     return 63;
  38.   return -1;
  39. }
  41. int 
  42. ignorestr(str)
  43. char *str;
  44. {
  45.       char *s;
  46.         
  47.       for(s=str;*s != ''; s++) {
  48.           if(!isalnum(*s) &&!ispunct(*s)&&!isspace(*s)) 
  49.              return 1;
  50.       }
  51.       return 0;
  52. }
  55. /* ----------------------------------------------------- */
  56. /* judge & decode QP / BASE64                            */
  57. /* ----------------------------------------------------- */
  60. void
  61. str_decode(dst, src)
  62.   register unsigned char *dst, *src;
  63. {
  64.   register int is_qp, is_base64, is_done;
  65.   register int c1, c2, c3, c4;
  67.   if(ignorestr(src))
  68.   {
  69.      strcpy(dst,src);
  70.      return;
  71.   }
  72.   for (is_done = is_qp = is_base64 = 0; c1 = *src; src++)
  73.   {
  74.     if (c1 == '?' && src[1] == '=')
  75.     {
  76.       src++;
  77.       continue;
  78.     }
  79.     else if (c1 == 'n')        /* chuan: multi line encoding */
  80.     {
  81.       src++;
  82.       is_done = is_qp = is_base64 = 0;
  83.       continue;
  84.     }
  85.     else if (is_qp && c1 == '=')
  86.     {
  87.       c1 = *++src;
  88.       c2 = *++src;
  89.       *dst++ = (qp_code(c1) << 4) | qp_code(c2);
  90.     }
  91.     else if (is_base64 && !is_done)
  92.     {
  93.       while (isspace(c1))
  94.       {
  95.         c1 = *++src;
  96.       }
  97.       if (!c1)
  98.         break;
  99.       do
  100.       {
  101.         c2 = *++src;
  102.       } while (isspace(c2));
  103.       if (!c2)
  104.         break;
  105.       do
  106.       {
  107.         c3 = *++src;
  108.       } while (isspace(c3));
  109.       if (!c3)
  110.         break;
  111.       do
  112.       {
  113.         c4 = *++src;
  114.       } while (isspace(c4));
  115.       if (!c4)
  116.         break;
  117.       if (c1 == '=' || c2 == '=')
  118.       {
  119.         is_done = 1;
  120.         continue;
  121.       }
  122.       c2 = base64_code(c2);
  123.       *dst++ = (base64_code(c1) << 2) | ((c2 & 0x30) >> 4);
  124.       if (c3 == '=')
  125.         is_done = 1;
  126.       else
  127.       {
  128.         c3 = base64_code(c3);
  129.         *dst++ = ((c2 & 0xF) << 4) | ((c3 & 0x3c) >> 2);
  130.         if (c4 == '=')
  131.           is_done = 1;
  132.         else
  133.         {
  134.           *dst++ = ((c3 & 0x03) << 6) | base64_code(c4);
  135.         }
  136.       }
  137.     }
  138.     else if ((c1 == '=') && (src[1] == '?'))
  139.     {
  140.       /* c2 : qmarks, c3 : code_kind */
  142.       c2 = c3 = 0;
  144.       for (;;)
  145.       {
  146.         c1 = *++src;
  147.         if (c1 != '?')
  148.         {
  149.           if (c2 == 2)
  150.             c3 = c1 | 0x20;
  151.         }
  152.         else
  153.         {
  154.           if (++c2 >= 3)
  155.             break;
  156.         }
  157.       }
  159.       if (c3 == 'q')
  160.         is_qp = 1;
  161.       else if (c3 == 'b')
  162.         is_base64 = 1;
  163.     }
  164.     else
  165.       *dst++ = c1;
  166.   }
  167.   *dst = '';
  168. }