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

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

Telnet服务器

开发平台：

Unix_Linux

hz2gb.c：源码内容
  1. /* $Id: hz2gb.c,v 1.1 2000/01/15 01:45:36 edwardc Exp $ */
  3. #ifndef lint
  4. static char *rcs_id="$Id: hz2gb.c,v 1.1 2000/01/15 01:45:36 edwardc Exp $";
  5. #endif /* lint */
  7. #include "io.h"
  9. #define hzb(c) ((((c) & 0x7f) >= 0x21) && (((c) & 0x7f) <= 0x7e))
  11. #define S_ASC 0
  12. #define S_PHZ 1
  13. #define S_HZ 2
  14. #define S_HZ2 3
  15. #define S_HZA 4
  16. #define S_HZT 5
  17. #define S_PZW 6
  18. #define S_ZW 7
  19. #define S_ZW2 8
  20. #define S_ZWA 9
  22. static int state[MAX_MODULE];
  23. static int eoln[MAX_MODULE];
  25. #define NOQUOTE
  27. static char hzdecode(c, inst)
  28.      char c;
  29.      int inst; /* instant number */
  30. {
  31. switch (state[inst]) {
  32.   case S_ASC:
  33. switch (c) {
  34.   case '~': state[inst] = S_PHZ;  
  35. #ifdef NOQUOTE
  36.                                 c = ' ';
  37. #endif
  38.         break;
  39.   case 'z': state[inst] = (eoln[inst] ? S_PZW : S_ASC);
  40. break;
  41.   default: state[inst] = S_ASC;  break;
  42. }
  43. break;
  45.   case S_PHZ:
  46. switch (c) {
  47.   case '{': state[inst] = S_HZ;
  48. #ifdef NOQUOTE
  49.                                 c = ' ';
  50. #endif
  51.         break;
  52.   default: state[inst] = S_ASC;  break;
  53. }
  54. break;
  55.   case S_HZ:
  56. switch (c) {
  57.   case '~': state[inst] = S_HZT;
  58. #ifdef NOQUOTE
  59.                                 c = ' ';
  60. #endif
  61.         break;
  62.   case ' ': state[inst] = S_HZA;   break;
  63.   case 'b': state[inst] = S_HZ2;   break;
  64.   default: if (hzb(c)) {
  65. c |= 0x80;  state[inst] = S_HZ2;
  66. } else  state[inst] = S_ASC;
  67. break;
  68. }
  69. break;
  70.   case S_HZA:
  71. state[inst] = S_HZ;
  72. break;
  73.   case S_HZ2:
  74. switch (c) {
  75.   case ' ':
  76.   case 'b': state[inst] = S_HZ;   break;
  77.   default: if (hzb(c)) {
  78. c |= 0x80;  state[inst] = S_HZ;
  79. } else  state[inst] = S_ASC;
  80. break;
  81. }
  82. break;
  83.   case S_HZT:
  84. switch (c) {
  85.   case '}': state[inst] = S_ASC;
  86. #ifdef NOQUOTE
  87.                                 c = ' ';
  88. #endif
  89.         break;
  90.   default: state[inst] = S_HZ;   break;
  91. }
  92. break;
  94.   case S_PZW:
  95. switch (c) {
  96.   case 'W': state[inst] = S_ZW;   break;
  97.   default: state[inst] = S_ASC;  break;
  98. }
  99. break;
  100.   case S_ZW:
  101. switch (c) {
  102.   case ' ': state[inst] = S_ZWA;   break;
  103.   case 'n': state[inst] = S_ASC;   break;
  104.   case 'r': state[inst] = S_ASC;   break;
  105.   default: if (hzb(c)) {
  106. c |= 0x80;  state[inst] = S_ZW2;
  107. } else  state[inst] = S_ASC;
  108. break;
  109. }
  110. break;
  111.   case S_ZWA: state[inst] = S_ZW;  break;
  112.   case S_ZW2:
  113. switch (c) {
  114.   case ' ':
  115.   case 'b': state[inst] = S_ZW;   break;
  116.   default: if (hzb(c)) {
  117. c |= 0x80;  state[inst] = S_ZW;
  118. } else  state[inst] = S_ASC;
  119. break;
  120. }
  121. break;
  122. }
  123. return (c);
  124. }
  128. char *hz2gb (s,plen,inst)
  129.      char *s;
  130.      int *plen;
  131.      int inst;
  132. {
  133.   int i;
  135. for (i = 0; i < *plen; i++) {
  136. s[i] = hzdecode (s[i], inst);
  137. eoln[inst] = (s[i] == 'n' || s[i] == 'r') ? 1 : 0;
  138. }
  139. return (s);
  140. }
  142. char *gb2hz (s,plen,inst)
  143.      char *s;
  144.      int *plen;
  145.      int inst;
  146. {
  147.   register int i;
  149. for (i = 0; i < *plen; i++)
  150. s[i] &= 0x7f;
  151. return (s);
  152. }
  154. int hz2gb_init (arg)
  155.      char *arg;
  156. {
  157.   static hz2gb_inst = 0;
  159. eoln[hz2gb_inst] = 0;
  160. state[hz2gb_inst] = S_ASC;
  161. return (hz2gb_inst++);
  162. }
  164. int gb2hz_init (arg)
  165.      char *arg;
  166. {
  167. return (0);
  168. }