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

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

手机WAP编程

开发平台：

WINDOWS

test_sl.c：源码内容
  1. /*
  2.  * test_sl.c: A simple program to test sl tokenizer
  3.  *
  4.  * By Aarno Syv鋘en for Wiral Ltd
  5.  */
  7. #include <stdio.h>
  9. #include "gwlib/gwlib.h"
  10. #include "gw/wap_push_sl_compiler.h"
  12. Octstr *charset = NULL;
  13. Octstr *file_name = NULL;
  15. static void help (void)
  16. {
  17.     info(0, "Usage test_sl [option] sl_source");
  18.     info(0, "where options are");
  19.     info(0, "-h print this text");
  20.     info(0, "-f file output binary to the file");
  21.     info(0, "-c charset charset given by http");
  22.     info(0, "-v level set log level for stderr logging");
  23. }
  25. int main(int argc, char **argv)
  26. {
  27.     int opt,
  28.         file,
  29.         have_charset,
  30.         ret;
  31.     FILE *fp;
  32.     Octstr *output,
  33.            *sl_doc,
  34.            *sl_binary;
  36.     gwlib_init();
  37.     file = 0;
  38.     have_charset = 0;
  39.     fp = NULL;
  41.     while ((opt = getopt(argc, argv, "hf:c:v:")) != EOF) {
  42.         switch (opt) {
  43.         case 'h':
  44.     help();
  45.             exit(1);
  46. break;
  48.         case 'f':
  49.     file = 1;
  50.     file_name = octstr_create(optarg);
  51.             fp = fopen(optarg, "a");
  52.             if (fp == NULL)
  53.         panic(0, "Cannot open output file");
  54. break;
  56.         case 'c':
  57.     have_charset = 1;
  58.     charset = octstr_create(optarg);
  59. break;
  61.         case 'v':
  62.     log_set_output_level(atoi(optarg));
  63. break;
  65.         case '?':
  66.         default:
  67.     error(0, "Invalid option %c", opt);
  68.             help();
  69.             panic(0, "Stopping");
  70. break;
  71.         }
  72.     }
  74.     if (optind >= argc) {
  75.         error(0, "Missing arguments");
  76.         help();
  77.         panic(0, "Stopping");
  78.     }
  80.     sl_doc = octstr_read_file(argv[optind]);
  81.     if (sl_doc == NULL)
  82.         panic(0, "Cannot read the sl document");
  84.     if (!have_charset)
  85.         charset = NULL;
  86.     ret = sl_compile(sl_doc, charset, &sl_binary);
  87.     output = octstr_format("%s", "sl compiler returned %dn", ret);
  89.     if (ret == 0) {
  90.         if (fp == NULL)
  91.     fp = stdout;
  92.         octstr_append(output, octstr_imm("content beingn"));
  93.         octstr_append(output, sl_binary);
  94.     }
  96.     if (file)
  97.         octstr_pretty_print(fp, output);
  98.     else {
  99.         debug("test.sl", 0, "sl binary was");
  100.         octstr_dump(sl_binary, 0);
  101.     }
  103.     if (have_charset)
  104.         octstr_destroy(charset);
  105.     if (file) {
  106.         fclose(fp);
  107.         octstr_destroy(file_name);
  108.     }
  109.     
  110.     octstr_destroy(sl_doc);
  111.     octstr_destroy(sl_binary);
  112.     octstr_destroy(output);
  113.     gwlib_shutdown();
  114.     return 0;
  115. }