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

源码开发语言/平台
当前位置：首页 > 源码/资料 > 通讯/手机编程 > 手机WAP编程 > 查看源码
parse.c
资源名称：gateway-1.2.1　[点击查看]
上传用户：gzpyjq
上传日期：2013-01-31
资源大小：1852k
文件大小：4k
源码类别：

手机WAP编程

开发平台：

WINDOWS

parse.c：源码内容
  1. /*
  2.  * parse.c - implement parse.h interface
  3.  *
  4.  * Richard Braakman
  5.  */
  7. #include "gwlib/gwlib.h"
  9. struct context
  10. {
  11.     Octstr *data;
  12.     long pos;
  13.     long limit;
  14.     List *limit_stack;
  15.     int error;
  16. };
  18. ParseContext *parse_context_create(Octstr *str)
  19. {
  20.     ParseContext *result;
  22.     result = gw_malloc(sizeof(*result));
  23.     result->data = str;
  24.     result->pos = 0;
  25.     result->limit = octstr_len(str);
  26.     result->limit_stack = NULL;
  27.     result->error = 0;
  29.     return result;
  30. }
  32. void parse_context_destroy(ParseContext *context)
  33. {
  34.     gw_assert(context != NULL);
  36.     if (context->limit_stack) {
  37.         while (list_len(context->limit_stack) > 0)
  38.             gw_free(list_extract_first(context->limit_stack));
  39.         list_destroy(context->limit_stack, NULL);
  40.     }
  41.     gw_free(context);
  42. }
  44. int parse_error(ParseContext *context)
  45. {
  46.     gw_assert(context != NULL);
  48.     return context->error;
  49. }
  51. void parse_clear_error(ParseContext *context)
  52. {
  53.     gw_assert(context != NULL);
  55.     context->error = 0;
  56. }
  58. void parse_set_error(ParseContext *context)
  59. {
  60.     gw_assert(context != NULL);
  62.     context->error = 1;
  63. }
  65. int parse_limit(ParseContext *context, long length)
  66. {
  67.     long *elem;
  69.     gw_assert(context != NULL);
  71.     if (context->pos + length > context->limit) {
  72.         context->error = 1;
  73.         return -1;
  74.     }
  76.     if (context->limit_stack == NULL)
  77.         context->limit_stack = list_create();
  79.     elem = gw_malloc(sizeof(*elem));
  80.     *elem = context->limit;
  81.     list_insert(context->limit_stack, 0, elem);
  82.     context->limit = context->pos + length;
  83.     return 0;
  84. }
  86. int parse_pop_limit(ParseContext *context)
  87. {
  88.     long *elem;
  90.     gw_assert(context != NULL);
  92.     if (context->limit_stack == NULL || list_len(context->limit_stack) == 0) {
  93.         context->error = 1;
  94.         return -1;
  95.     }
  97.     elem = list_extract_first(context->limit_stack);
  98.     context->limit = *elem;
  99.     gw_free(elem);
  100.     return 0;
  101. }
  103. long parse_octets_left(ParseContext *context)
  104. {
  105.     gw_assert(context != NULL);
  107.     return context->limit - context->pos;
  108. }
  110. int parse_skip(ParseContext *context, long count)
  111. {
  112.     gw_assert(context != NULL);
  114.     if (context->pos + count > context->limit) {
  115.         context->pos = context->limit;
  116.         context->error = 1;
  117.         return -1;
  118.     }
  120.     context->pos += count;
  121.     return 0;
  122. }
  124. void parse_skip_to_limit(ParseContext *context)
  125. {
  126.     gw_assert(context != NULL);
  128.     context->pos = context->limit;
  129. }
  131. int parse_skip_to(ParseContext *context, long pos)
  132. {
  133.     gw_assert(context != NULL);
  135.     if (pos < 0) {
  136.         context->error = 1;
  137.         return -1;
  138.     }
  140.     if (pos > context->limit) {
  141.         context->pos = context->limit;
  142.         context->error = 1;
  143.         return -1;
  144.     }
  146.     context->pos = pos;
  147.     return 0;
  148. }
  150. int parse_peek_char(ParseContext *context)
  151. {
  152.     gw_assert(context != NULL);
  154.     if (context->pos == context->limit) {
  155.         context->error = 1;
  156.         return -1;
  157.     }
  159.     return octstr_get_char(context->data, context->pos);
  160. }
  162. int parse_get_char(ParseContext *context)
  163. {
  164.     gw_assert(context != NULL);
  166.     if (context->pos == context->limit) {
  167.         context->error = 1;
  168.         return -1;
  169.     }
  171.     return octstr_get_char(context->data, context->pos++);
  172. }
  174. Octstr *parse_get_octets(ParseContext *context, long length)
  175. {
  176.     Octstr *result;
  178.     gw_assert(context != NULL);
  180.     if (context->pos + length > context->limit) {
  181.         context->error = 1;
  182.         return NULL;
  183.     }
  185.     result = octstr_copy(context->data, context->pos, length);
  186.     context->pos += length;
  187.     return result;
  188. }
  190. unsigned long parse_get_uintvar(ParseContext *context)
  191. {
  192.     long pos;
  193.     unsigned long value;
  195.     gw_assert(context != NULL);
  197.     pos = octstr_extract_uintvar(context->data, &value, context->pos);
  198.     if (pos < 0 || pos > context->limit) {
  199.         context->error = 1;
  200.         return 0;
  201.     }
  203.     context->pos = pos;
  204.     return value;
  205. }
  207. Octstr *parse_get_nul_string(ParseContext *context)
  208. {
  209.     Octstr *result;
  210.     long pos;
  212.     gw_assert(context != NULL);
  214.     pos = octstr_search_char(context->data, 0, context->pos);
  215.     if (pos < 0 || pos >= context->limit) {
  216.         context->error = 1;
  217.         return NULL;
  218.     }
  220.     result = octstr_copy(context->data, context->pos, pos - context->pos);
  221.     context->pos = pos + 1;
  223.     return result;
  224. }
  226. Octstr *parse_get_rest(ParseContext *context)
  227. {
  228.     Octstr *rest;
  229.     
  230.     gw_assert(context != NULL);
  231.     
  232.     octstr_delete(context->data, 0, context->pos);
  233.     rest = octstr_duplicate(context->data);   
  234.     
  235.     return rest;   
  236. }