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

源码开发语言/平台
当前位置：首页 > 源码/资料 > 编辑器/阅读器 > 查看源码
multbyte.c
资源名称：vim53src.zip　[点击查看]
上传用户：gddssl
上传日期：2007-01-06
资源大小：1003k
文件大小：2k
源码类别：

编辑器/阅读器

开发平台：

DOS

multbyte.c：源码内容
  1. /* vi:set ts=8 sts=4 sw=4:
  2.  *
  3.  * VIM - Vi IMproved by Bram Moolenaar
  4.  * Multibyte extensions by Sung-Hoon Baek
  5.  *
  6.  * Do ":help uganda"  in Vim to read copying and usage conditions.
  7.  * Do ":help credits" in Vim to see a list of people who contributed.
  8.  */
  9. /*
  10.  * file : multbyte.c
  11.  */
  13. #include "vim.h"
  14. #include "globals.h"
  15. #include "proto.h"
  16. #include "option.h"
  17. #ifdef WIN32
  18. # include <windows.h>
  19. # include <winnls.h>
  20. #endif
  22. #if defined(MULTI_BYTE) || defined(PROTO)
  24. /*
  25.  * Is 'c' a lead byte of multi-byte character?
  26.  */
  27.     int
  28. IsLeadByte(c)
  29.     int c;
  30. {
  31. #ifdef WIN32
  32.     /* is_dbcs is set by setting 'fileencoding'.  It becomes a Windows
  33.      * CodePage identifier, which we can pass directly in to Windows API*/
  34.     return IsDBCSLeadByteEx(is_dbcs, (BYTE)c);
  35. #else
  36.     return (c & 0x80);
  37. #endif
  38. }
  40. /*
  41.  * Is *p a trail byte of multi-byte character?  base : string pointer to line
  42.  */
  43.     int
  44. IsTrailByte(base, p)
  45.     char_u *base;
  46.     char_u *p;
  47. {
  48.     int lbc = 0;    /* lead byte count*/
  50.     if (base >= p)
  51. return 0;
  53.     while (p > base)
  54.     {
  55. if (!IsLeadByte(*(--p)))
  56.     break;
  57. lbc++;
  58.     }
  60.     return (lbc & 1);
  61. }
  63. /*
  64.  * if the cursor moves on an trail byte, set the cursor on the lead byte.
  65.  */
  66.     int
  67. AdjustCursorForMultiByteCharacter()
  68. {
  69.     char_u *p;
  71.     if (curwin->w_cursor.col > 0 )
  72.     {
  73. p = ml_get(curwin->w_cursor.lnum);
  74. if (IsTrailByte(p, p + curwin->w_cursor.col))
  75. {
  76.     --curwin->w_cursor.col;
  77.     return 1;
  78. }
  79.     }
  80.     return 0;
  81. }
  83. /*
  84.  * count the length of the str which has multi-byte characters.  two-byte
  85.  * character counts as one character.
  86.  */
  87.     int
  88. MultiStrLen(str)
  89.     char_u *str;
  90. {
  91.     int count;
  93.     if (str == NULL)
  94. return 0;
  95.     for (count = 0; *str != NUL; count++)
  96.     {
  97. if (IsLeadByte(*str))
  98. {
  99.     str++;
  100.     if (*str != NUL)
  101. str++;
  102. }
  103. else
  104.     str++;
  105.     }
  106.     return count;
  107. }
  109.     int
  110. han_dec(lp)
  111.     FPOS  *lp;
  112. {
  113.     char_u *p = ml_get(lp->lnum);
  115.     if (lp->col > 0)
  116.     { /* still within line */
  117. lp->col--;
  118. if ( lp->col > 0 && IsTrailByte(p, p + lp->col))
  119.     lp->col--;
  120. return 0;
  121.     }
  122.     if (lp->lnum > 1)
  123.     { /* there is a prior line */
  124. lp->lnum--;
  125. lp->col = STRLEN(ml_get(lp->lnum));
  126. if ( lp->col > 0 && IsTrailByte(p, p + lp->col))
  127.     lp->col--;
  128. return 1;
  129.     }
  130.     return -1; /* at start of file */
  131. }
  133. #endif /* MULTI_BYTE */