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

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

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. for (s = str; *s != ''; s++) {
  47. if (!isalnum(*s) && !ispunct(*s) && !isspace(*s))
  48. return 1;
  49. }
  50. return 0;
  51. }
  52. /* ----------------------------------------------------- */
  53. /* judge & decode QP / BASE64                            */
  54. /* ----------------------------------------------------- */
  55. void
  56. str_decode(dst, src)
  57. register unsigned char *dst, *src;
  58. {
  59. register int is_qp, is_base64, is_done;
  60. register int c1, c2, c3, c4;
  62. char   *dsttmp;
  63. char   *srctmp;
  64. char    srcbuf[256];
  65. int     pos;
  66. if (ignorestr(src)) {
  67. strcpy(dst, src);
  68. return;
  69. }
  70. memcpy(srcbuf, src, 256);
  71. dsttmp = dst;
  72. srctmp = src;
  73. pos = (int) src - (int) srctmp;
  75. for (is_done = is_qp = is_base64 = 0; c1 = *src; src++) {
  76. pos = (int) src - (int) srctmp;
  77. if (pos > 254) {
  78. memcpy(dsttmp, srcbuf, 256);
  79. return;
  80. }
  81. if (c1 == '?' && src[1] == '=') {
  82. src++;
  83. continue;
  84. } else if (c1 == 'n') { /* chuan: multi line encoding */
  85. src++;
  86. is_done = is_qp = is_base64 = 0;
  87. continue;
  88. } else if (is_qp && c1 == '=') {
  89. pos = (int) src - (int) srctmp;
  90. if (pos > 254) {
  91. memcpy(dsttmp, srcbuf, 256);
  92. return;
  93. }
  94. c1 = *++src;
  96. pos = (int) src - (int) srctmp;
  97. if (pos > 254) {
  98. memcpy(dsttmp, srcbuf, 256);
  99. return;
  100. }
  101. c2 = *++src;
  102. *dst++ = (qp_code(c1) << 4) | qp_code(c2);
  103. } else if (is_base64 && !is_done) {
  104. while (isspace(c1)) {
  105. pos = (int) src - (int) srctmp;
  106. if (pos > 254) {
  107. memcpy(dsttmp, srcbuf, 256);
  108. return;
  109. }
  110. c1 = *++src;
  111. }
  112. if (!c1)
  113. break;
  114. do {
  115. pos = (int) src - (int) srctmp;
  116. if (pos > 254) {
  117. memcpy(dsttmp, srcbuf, 256);
  118. return;
  119. }
  120. c2 = *++src;
  121. } while (isspace(c2));
  122. if (!c2)
  123. break;
  124. do {
  125. pos = (int) src - (int) srctmp;
  126. if (pos > 254) {
  127. memcpy(dsttmp, srcbuf, 256);
  128. return;
  129. }
  130. c3 = *++src;
  131. } while (isspace(c3));
  132. if (!c3)
  133. break;
  134. do {
  135. pos = (int) src - (int) srctmp;
  136. if (pos > 254) {
  137. memcpy(dsttmp, srcbuf, 256);
  138. return;
  139. }
  140. c4 = *++src;
  141. } while (isspace(c4));
  142. if (!c4)
  143. break;
  144. if (c1 == '=' || c2 == '=') {
  145. is_done = 1;
  146. continue;
  147. }
  148. c2 = base64_code(c2);
  149. *dst++ = (base64_code(c1) << 2) | ((c2 & 0x30) >> 4);
  150. if (c3 == '=')
  151. is_done = 1;
  152. else {
  153. c3 = base64_code(c3);
  154. *dst++ = ((c2 & 0xF) << 4) | ((c3 & 0x3c) >> 2);
  155. if (c4 == '=')
  156. is_done = 1;
  157. else {
  158. *dst++ = ((c3 & 0x03) << 6) | base64_code(c4);
  159. }
  160. }
  161. } else if ((c1 == '=') && (src[1] == '?')) {
  162. /* c2 : qmarks, c3 : code_kind */
  164. c2 = c3 = 0;
  166. for (;;) {
  167. pos = (int) src - (int) srctmp;
  168. if (pos > 254) {
  169. memcpy(dsttmp, srcbuf, 256);
  170. return;
  171. }
  172. c1 = *++src;
  173. if (c1 != '?') {
  174. if (c2 == 2)
  175. c3 = c1 | 0x20;
  176. } else {
  177. if (++c2 >= 3)
  178. break;
  179. }
  180. }
  182. if (c3 == 'q')
  183. is_qp = 1;
  184. else if (c3 == 'b')
  185. is_base64 = 1;
  186. } else
  187. *dst++ = c1;
  188. }
  189. *dst = '';
  190. }