strncnt.gml

开放源码的编译器open watcom 1.6.0版的源代码

.func _strncnt _wcsncnt _mbsnccnt _fmbsnccnt
#include <tchar.h>
size_t _strncnt( const char *string, size_t n );
.ixfunc2 '&String' &func
.ixfunc2 '&Compare' &func
.if &'length(&wfunc.) ne 0 .do begin
size_t _wcsncnt( const wchar_t *string, size_t n );
.ixfunc2 '&String' &wfunc
.ixfunc2 '&Compare' &wfunc
.do end
.if &'length(&mfunc.) ne 0 .do begin
#include <mbstring.h>
size_t _mbsnccnt( const unsigned char *string, size_t n );
.ixfunc2 '&String' &mfunc
.ixfunc2 '&Compare' &mfunc
.do end
.if &'length(&fmfunc.) ne 0 .do begin
_fmbsnccnt( const unsigned char __far *string, size_t n );
.ixfunc2 '&String' &fmfunc
.ixfunc2 '&Compare' &fmfunc
.do end
.funcend
.desc begin
The &func function counts the number of characters in the first
.arg n
bytes of
.arg string.
.np
The &mfunc function counts the number of multibyte characters in the
first
.arg n
bytes of
.arg string.
If &mfunc finds a null byte as the second byte of a double-byte
character, the first (lead) byte is not included in the count.
.np
.us Note:
This function was called
.kw btom
in earlier versions.
.if &farfnc eq 1 .do begin
.np
The &fmfunc function is a data model independent form of the &func
function that accepts far pointer arguments.
It is most useful in mixed memory model applications.
.do end
.np
The header file
.hdrfile tchar.h
defines the generic-text routine
.kw _tcsnccnt.
This macro maps to &mfunc if
.kw _MBCS
has been defined, or to the &wfunc macro if
.kw _UNICODE
has been defined. Otherwise
.kw _tcsnccnt
maps to the &func macro. &func and &wfunc are single-byte-character
string and wide-character string versions of &mfunc.. The &func and
&wfunc macros are provided only for this mapping and should not be
used otherwise.
.desc end
.return begin
&func returns the number of characters from the beginning
of the string to byte
.arg n.
&wfunc returns the number of wide characters from the beginning
of the string to byte
.arg n.
&mfunc returns the number of multibyte characters from the beginning
of the string to byte
.arg n.
If these functions find a null character before byte
.arg n,
they return the number of characters before the null character.
If the string consists of fewer than
.arg n
characters, these functions return the number of characters in the
string.
If
.arg n
is less than zero, these functions return 0.
.return end
.see begin
.seelist &function. strcmp stricmp strncmp strnicmp
.see end
.exmp begin
#include <stdio.h>
#include <mbctype.h>
#include <mbstring.h>

const unsigned char chars[] = {
    ' ',
    '.',
    '1',
    'A',
    0x81,0x40, /* double-byte space */
    0x82,0x60, /* double-byte A */
    0x82,0xA6, /* double-byte Hiragana */
    0x83,0x42, /* double-byte Katakana */
    0xA1,      /* single-byte Katakana punctuation */
    0xA6,      /* single-byte Katakana alphabetic */
    0xDF,      /* single-byte Katakana alphabetic */
    0xE0,0xA1, /* double-byte Kanji */
    0x00
};

void main()
  {
    _setmbcp( 932 );
    printf( "%d characters found\n", _mbsnccnt( chars, 10 ) );
  }
.exmp output
7 characters found
.exmp end
.class WATCOM
.system