mirror of
https://github.com/mozilla/gecko-dev.git
synced 2025-04-04 13:42:48 +00:00
initial entry into cvs
This commit is contained in:
bienvenu%netscape.com
parent
f021a2c35e
commit
a90b4473ab
214
db/mork/src/morkCh.cpp
Normal file
214
db/mork/src/morkCh.cpp
Normal file
@ -0,0 +1,214 @@
|
||||
/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*-
|
||||
*
|
||||
* The contents of this file are subject to the Netscape Public License
|
||||
* Version 1.0 (the "NPL"); you may not use this file except in
|
||||
* compliance with the NPL. You may obtain a copy of the NPL at
|
||||
* http://www.mozilla.org/NPL/
|
||||
*
|
||||
* Software distributed under the NPL is distributed on an "AS IS" basis,
|
||||
* WITHOUT WARRANTY OF ANY KIND, either express or implied. See the NPL
|
||||
* for the specific language governing rights and limitations under the
|
||||
* NPL.
|
||||
*
|
||||
* The Initial Developer of this code under the NPL is Netscape
|
||||
* Communications Corporation. Portions created by Netscape are
|
||||
* Copyright (C) 1999 Netscape Communications Corporation. All Rights
|
||||
* Reserved.
|
||||
*/
|
||||
|
||||
#ifndef _MDB_
|
||||
#include "mdb.h"
|
||||
#endif
|
||||
|
||||
#ifndef _MORK_
|
||||
#include "mork.h"
|
||||
#endif
|
||||
|
||||
#ifndef _MORKCH_
|
||||
#include "morkCh.h"
|
||||
#endif
|
||||
|
||||
#ifndef _MORKENV_
|
||||
#include "morkEnv.h"
|
||||
#endif
|
||||
|
||||
//3456789_123456789_123456789_123456789_123456789_123456789_123456789_123456789
|
||||
|
||||
/* this byte char predicate source file derives from public domain Mithril */
|
||||
/* (that means much of this has a copyright dedicated to the public domain) */
|
||||
|
||||
/*============================================================================*/
|
||||
/* morkCh_Type */
|
||||
|
||||
const mork_u1 morkCh_Type[] = /* derives from public domain Mithril ch table */
|
||||
{
|
||||
0, /* 0x0 */
|
||||
0, /* 0x1 */
|
||||
0, /* 0x2 */
|
||||
0, /* 0x3 */
|
||||
0, /* 0x4 */
|
||||
0, /* 0x5 */
|
||||
0, /* 0x6 */
|
||||
0, /* 0x7 */
|
||||
morkCh_kW, /* 0x8 backspace */
|
||||
morkCh_kW, /* 0x9 tab */
|
||||
morkCh_kW, /* 0xA linefeed */
|
||||
0, /* 0xB */
|
||||
morkCh_kW, /* 0xC page */
|
||||
morkCh_kW, /* 0xD return */
|
||||
0, /* 0xE */
|
||||
0, /* 0xF */
|
||||
0, /* 0x10 */
|
||||
0, /* 0x11 */
|
||||
0, /* 0x12 */
|
||||
0, /* 0x13 */
|
||||
0, /* 0x14 */
|
||||
0, /* 0x15 */
|
||||
0, /* 0x16 */
|
||||
0, /* 0x17 */
|
||||
0, /* 0x18 */
|
||||
0, /* 0x19 */
|
||||
0, /* 0x1A */
|
||||
0, /* 0x1B */
|
||||
0, /* 0x1C */
|
||||
0, /* 0x1D */
|
||||
0, /* 0x1E */
|
||||
0, /* 0x1F */
|
||||
|
||||
morkCh_kV|morkCh_kW, /* 0x20 space */
|
||||
morkCh_kV|morkCh_kM, /* 0x21 ! */
|
||||
morkCh_kV, /* 0x22 " */
|
||||
morkCh_kV, /* 0x23 # */
|
||||
0, /* 0x24 $ cannot be kV because needs escape */
|
||||
morkCh_kV, /* 0x25 % */
|
||||
morkCh_kV, /* 0x26 & */
|
||||
morkCh_kV, /* 0x27 ' */
|
||||
morkCh_kV, /* 0x28 ( */
|
||||
0, /* 0x29 ) cannot be kV because needs escape */
|
||||
morkCh_kV, /* 0x2A * */
|
||||
morkCh_kV|morkCh_kM, /* 0x2B + */
|
||||
0, /* 0x2C , */
|
||||
morkCh_kV|morkCh_kM, /* 0x2D - */
|
||||
morkCh_kV, /* 0x2E . */
|
||||
morkCh_kV, /* 0x2F / */
|
||||
|
||||
morkCh_kV|morkCh_kD|morkCh_kX, /* 0x30 0 */
|
||||
morkCh_kV|morkCh_kD|morkCh_kX, /* 0x31 1 */
|
||||
morkCh_kV|morkCh_kD|morkCh_kX, /* 0x32 2 */
|
||||
morkCh_kV|morkCh_kD|morkCh_kX, /* 0x33 3 */
|
||||
morkCh_kV|morkCh_kD|morkCh_kX, /* 0x34 4 */
|
||||
morkCh_kV|morkCh_kD|morkCh_kX, /* 0x35 5 */
|
||||
morkCh_kV|morkCh_kD|morkCh_kX, /* 0x36 6 */
|
||||
morkCh_kV|morkCh_kD|morkCh_kX, /* 0x37 7 */
|
||||
morkCh_kV|morkCh_kD|morkCh_kX, /* 0x38 8 */
|
||||
morkCh_kV|morkCh_kD|morkCh_kX, /* 0x39 9 */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM, /* 0x3A : */
|
||||
morkCh_kV, /* 0x3B ; */
|
||||
morkCh_kV, /* 0x3C < */
|
||||
morkCh_kV, /* 0x3D = */
|
||||
morkCh_kV, /* 0x3E > */
|
||||
morkCh_kV|morkCh_kM, /* 0x3F ? */
|
||||
|
||||
morkCh_kV, /* 0x40 @ */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU|morkCh_kX, /* 0x41 A */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU|morkCh_kX, /* 0x42 B */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU|morkCh_kX, /* 0x43 C */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU|morkCh_kX, /* 0x44 D */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU|morkCh_kX, /* 0x45 E */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU|morkCh_kX, /* 0x46 F */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU, /* 0x47 G */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU, /* 0x48 H */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU, /* 0x49 I */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU, /* 0x4A J */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU, /* 0x4B K */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU, /* 0x4C L */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU, /* 0x4D M */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU, /* 0x4E N */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU, /* 0x4F O */
|
||||
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU, /* 0x50 P */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU, /* 0x51 Q */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU, /* 0x52 R */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU, /* 0x53 S */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU, /* 0x54 T */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU, /* 0x55 U */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU, /* 0x56 V */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU, /* 0x57 W */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU, /* 0x58 X */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU, /* 0x59 Y */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU, /* 0x5A Z */
|
||||
morkCh_kV, /* 0x5B [ */
|
||||
0, /* 0x5C \ cannot be kV because needs escape */
|
||||
morkCh_kV, /* 0x5D ] */
|
||||
morkCh_kV, /* 0x5E ^ */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM, /* 0x5F _ */
|
||||
|
||||
morkCh_kV, /* 0x60 ` */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL|morkCh_kX, /* 0x61 a */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL|morkCh_kX, /* 0x62 b */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL|morkCh_kX, /* 0x63 c */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL|morkCh_kX, /* 0x64 d */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL|morkCh_kX, /* 0x65 e */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL|morkCh_kX, /* 0x66 f */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL, /* 0x67 g */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL, /* 0x68 h */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL, /* 0x69 i */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL, /* 0x6A j */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL, /* 0x6B k */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL, /* 0x6C l */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL, /* 0x6D m */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL, /* 0x6E n */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL, /* 0x6F o */
|
||||
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL, /* 0x70 p */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL, /* 0x71 q */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL, /* 0x72 r */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL, /* 0x73 s */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL, /* 0x74 t */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL, /* 0x75 u */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL, /* 0x76 v */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL, /* 0x77 w */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL, /* 0x78 x */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL, /* 0x79 y */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL, /* 0x7A z */
|
||||
morkCh_kV, /* 0x7B { */
|
||||
morkCh_kV, /* 0x7C | */
|
||||
morkCh_kV, /* 0x7D } */
|
||||
morkCh_kV, /* 0x7E ~ */
|
||||
morkCh_kW, /* 0x7F rubout */
|
||||
|
||||
/* $"80 81 82 83 84 85 86 87 88 89 8A 8B 8C 8D 8E 8F" */
|
||||
0, 0, 0, 0, 0, 0, 0, 0,
|
||||
0, 0, 0, 0, 0, 0, 0, 0,
|
||||
|
||||
/* $"90 91 92 93 94 95 96 97 98 99 9A 9B 9C 9D 9E 9F" */
|
||||
0, 0, 0, 0, 0, 0, 0, 0,
|
||||
0, 0, 0, 0, 0, 0, 0, 0,
|
||||
|
||||
/* $"A0 A1 A2 A3 A4 A5 A6 A7 A8 A9 AA AB AC AD AE AF" */
|
||||
0, 0, 0, 0, 0, 0, 0, 0,
|
||||
0, 0, 0, 0, 0, 0, 0, 0,
|
||||
|
||||
/* $"B0 B1 B2 B3 B4 B5 B6 B7 B8 B9 BA BB BC BD BE BF" */
|
||||
0, 0, 0, 0, 0, 0, 0, 0,
|
||||
0, 0, 0, 0, 0, 0, 0, 0,
|
||||
|
||||
/* $"C0 C1 C2 C3 C4 C5 C6 C7 C8 C9 CA CB CC CD CE CF" */
|
||||
0, 0, 0, 0, 0, 0, 0, 0,
|
||||
0, 0, 0, 0, 0, 0, 0, 0,
|
||||
|
||||
/* $"D0 D1 D2 D3 D4 D5 D6 D7 D8 D9 DA DB DC DD DE DF" */
|
||||
0, 0, 0, 0, 0, 0, 0, 0,
|
||||
0, 0, 0, 0, 0, 0, 0, 0,
|
||||
|
||||
/* $"E0 E1 E2 E3 E4 E5 E6 E7 E8 E9 EA EB EC ED EE EF" */
|
||||
0, 0, 0, 0, 0, 0, 0, 0,
|
||||
0, 0, 0, 0, 0, 0, 0, 0,
|
||||
|
||||
/* $"F0 F1 F2 F3 F4 F5 F6 F7 F8 F9 FA FB FC FD FE FF" */
|
||||
0, 0, 0, 0, 0, 0, 0, 0,
|
||||
0, 0, 0, 0, 0, 0, 0, 0,
|
||||
};
|
||||
|
||||
|
||||
//3456789_123456789_123456789_123456789_123456789_123456789_123456789_123456789
|
||||
92
db/mork/src/morkCh.h
Normal file
92
db/mork/src/morkCh.h
Normal file
@ -0,0 +1,92 @@
|
||||
/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*-
|
||||
*
|
||||
* The contents of this file are subject to the Netscape Public License
|
||||
* Version 1.0 (the "NPL"); you may not use this file except in
|
||||
* compliance with the NPL. You may obtain a copy of the NPL at
|
||||
* http://www.mozilla.org/NPL/
|
||||
*
|
||||
* Software distributed under the NPL is distributed on an "AS IS" basis,
|
||||
* WITHOUT WARRANTY OF ANY KIND, either express or implied. See the NPL
|
||||
* for the specific language governing rights and limitations under the
|
||||
* NPL.
|
||||
*
|
||||
* The Initial Developer of this code under the NPL is Netscape
|
||||
* Communications Corporation. Portions created by Netscape are
|
||||
* Copyright (C) 1999 Netscape Communications Corporation. All Rights
|
||||
* Reserved.
|
||||
*/
|
||||
|
||||
#ifndef _MORKCH_
|
||||
#define _MORKCH_ 1
|
||||
|
||||
#ifndef _MORK_
|
||||
#include "mork.h"
|
||||
#endif
|
||||
|
||||
/* this byte char predicate header file derives from public domain Mithril */
|
||||
/* (that means much of this has a copyright dedicated to the public domain) */
|
||||
|
||||
/* Use all 8 pred bits; lose some pred bits only if we need to reuse them. */
|
||||
|
||||
/* ch pred bits: W:white D:digit V:value U:upper L:lower N:name M:more */
|
||||
#define morkCh_kW (1 << 0)
|
||||
#define morkCh_kD (1 << 1)
|
||||
#define morkCh_kV (1 << 2)
|
||||
#define morkCh_kU (1 << 3)
|
||||
#define morkCh_kL (1 << 4)
|
||||
#define morkCh_kX (1 << 5)
|
||||
#define morkCh_kN (1 << 6)
|
||||
#define morkCh_kM (1 << 7)
|
||||
|
||||
extern const mork_u1 morkCh_Type[]; /* 256 byte predicate bits ch map */
|
||||
|
||||
/* is a character that normally continues a symbol token: */
|
||||
#define morkCh_IsSymbol(c) ( morkCh_Type[ (mork_ch)(c) ] & morkCh_kS )
|
||||
|
||||
/* is a numeric decimal digit: (note memory access might be slower) */
|
||||
/* define morkCh_IsDigit(c) ( morkCh_Type[ (mork_ch)(c) ] & morkCh_kD ) */
|
||||
#define morkCh_IsDigit(c) ( ((mork_ch) c) >= '0' && ((mork_ch) c) <= '9' )
|
||||
|
||||
/* is a numeric octal digit: */
|
||||
#define morkCh_IsOctal(c) ( ((mork_ch) c) >= '0' && ((mork_ch) c) <= '7' )
|
||||
|
||||
/* is a numeric hexadecimal digit: */
|
||||
#define morkCh_IsHex(c) ( morkCh_Type[ (mork_ch)(c) ] & morkCh_kX )
|
||||
|
||||
/* is value (can be printed in Mork value without needing hex or escape): */
|
||||
#define morkCh_IsValue(c) ( morkCh_Type[ (mork_ch)(c) ] & morkCh_kV )
|
||||
|
||||
/* is white space : */
|
||||
#define morkCh_IsWhite(c) ( morkCh_Type[ (mork_ch)(c) ] & morkCh_kW )
|
||||
|
||||
/* is name (can start a Mork name): */
|
||||
#define morkCh_IsName(c) ( morkCh_Type[ (mork_ch)(c) ] & morkCh_kN )
|
||||
|
||||
/* is name (can continue a Mork name): */
|
||||
#define morkCh_IsMore(c) ( morkCh_Type[ (mork_ch)(c) ] & morkCh_kM )
|
||||
|
||||
/* is alphabetic upper or lower case */
|
||||
#define morkCh_IsAlpha(c) \
|
||||
( morkCh_Type[ (mork_ch)(c) ] & (morkCh_kL|morkCh_kU) )
|
||||
|
||||
/* is alphanumeric, including lower case, upper case, and digits */
|
||||
#define morkCh_IsAlphaNum(c) \
|
||||
(morkCh_Type[ (mork_ch)(c) ]&(morkCh_kL|morkCh_kU|morkCh_kD))
|
||||
|
||||
|
||||
#define morkCh_IsAscii(c) ( ((mork_u1) c) <= 0x7F )
|
||||
#define morkCh_IsSevenBitChar(c) ( ((mork_u1) c) <= 0x7F )
|
||||
|
||||
/* ````` character case (e.g. for case insensitive operations) ````` */
|
||||
|
||||
#define morkCh_ToLower(c) ((c)-'A'+'a')
|
||||
#define morkCh_ToUpper(c) ((c)-'a'+'A')
|
||||
|
||||
/* extern int morkCh_IsUpper (int c); */
|
||||
#define morkCh_IsUpper(c) ( morkCh_Type[ (mork_ch)(c) ] & morkCh_kU )
|
||||
|
||||
/* extern int morkCh_IsLower (int c); */
|
||||
#define morkCh_IsLower(c) ( morkCh_Type[ (mork_ch)(c) ] & morkCh_kL )
|
||||
|
||||
#endif
|
||||
/* _MORKCH_ */
|
||||
214
mailnews/db/mork/src/morkCh.cpp
Normal file
214
mailnews/db/mork/src/morkCh.cpp
Normal file
@ -0,0 +1,214 @@
|
||||
/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*-
|
||||
*
|
||||
* The contents of this file are subject to the Netscape Public License
|
||||
* Version 1.0 (the "NPL"); you may not use this file except in
|
||||
* compliance with the NPL. You may obtain a copy of the NPL at
|
||||
* http://www.mozilla.org/NPL/
|
||||
*
|
||||
* Software distributed under the NPL is distributed on an "AS IS" basis,
|
||||
* WITHOUT WARRANTY OF ANY KIND, either express or implied. See the NPL
|
||||
* for the specific language governing rights and limitations under the
|
||||
* NPL.
|
||||
*
|
||||
* The Initial Developer of this code under the NPL is Netscape
|
||||
* Communications Corporation. Portions created by Netscape are
|
||||
* Copyright (C) 1999 Netscape Communications Corporation. All Rights
|
||||
* Reserved.
|
||||
*/
|
||||
|
||||
#ifndef _MDB_
|
||||
#include "mdb.h"
|
||||
#endif
|
||||
|
||||
#ifndef _MORK_
|
||||
#include "mork.h"
|
||||
#endif
|
||||
|
||||
#ifndef _MORKCH_
|
||||
#include "morkCh.h"
|
||||
#endif
|
||||
|
||||
#ifndef _MORKENV_
|
||||
#include "morkEnv.h"
|
||||
#endif
|
||||
|
||||
//3456789_123456789_123456789_123456789_123456789_123456789_123456789_123456789
|
||||
|
||||
/* this byte char predicate source file derives from public domain Mithril */
|
||||
/* (that means much of this has a copyright dedicated to the public domain) */
|
||||
|
||||
/*============================================================================*/
|
||||
/* morkCh_Type */
|
||||
|
||||
const mork_u1 morkCh_Type[] = /* derives from public domain Mithril ch table */
|
||||
{
|
||||
0, /* 0x0 */
|
||||
0, /* 0x1 */
|
||||
0, /* 0x2 */
|
||||
0, /* 0x3 */
|
||||
0, /* 0x4 */
|
||||
0, /* 0x5 */
|
||||
0, /* 0x6 */
|
||||
0, /* 0x7 */
|
||||
morkCh_kW, /* 0x8 backspace */
|
||||
morkCh_kW, /* 0x9 tab */
|
||||
morkCh_kW, /* 0xA linefeed */
|
||||
0, /* 0xB */
|
||||
morkCh_kW, /* 0xC page */
|
||||
morkCh_kW, /* 0xD return */
|
||||
0, /* 0xE */
|
||||
0, /* 0xF */
|
||||
0, /* 0x10 */
|
||||
0, /* 0x11 */
|
||||
0, /* 0x12 */
|
||||
0, /* 0x13 */
|
||||
0, /* 0x14 */
|
||||
0, /* 0x15 */
|
||||
0, /* 0x16 */
|
||||
0, /* 0x17 */
|
||||
0, /* 0x18 */
|
||||
0, /* 0x19 */
|
||||
0, /* 0x1A */
|
||||
0, /* 0x1B */
|
||||
0, /* 0x1C */
|
||||
0, /* 0x1D */
|
||||
0, /* 0x1E */
|
||||
0, /* 0x1F */
|
||||
|
||||
morkCh_kV|morkCh_kW, /* 0x20 space */
|
||||
morkCh_kV|morkCh_kM, /* 0x21 ! */
|
||||
morkCh_kV, /* 0x22 " */
|
||||
morkCh_kV, /* 0x23 # */
|
||||
0, /* 0x24 $ cannot be kV because needs escape */
|
||||
morkCh_kV, /* 0x25 % */
|
||||
morkCh_kV, /* 0x26 & */
|
||||
morkCh_kV, /* 0x27 ' */
|
||||
morkCh_kV, /* 0x28 ( */
|
||||
0, /* 0x29 ) cannot be kV because needs escape */
|
||||
morkCh_kV, /* 0x2A * */
|
||||
morkCh_kV|morkCh_kM, /* 0x2B + */
|
||||
0, /* 0x2C , */
|
||||
morkCh_kV|morkCh_kM, /* 0x2D - */
|
||||
morkCh_kV, /* 0x2E . */
|
||||
morkCh_kV, /* 0x2F / */
|
||||
|
||||
morkCh_kV|morkCh_kD|morkCh_kX, /* 0x30 0 */
|
||||
morkCh_kV|morkCh_kD|morkCh_kX, /* 0x31 1 */
|
||||
morkCh_kV|morkCh_kD|morkCh_kX, /* 0x32 2 */
|
||||
morkCh_kV|morkCh_kD|morkCh_kX, /* 0x33 3 */
|
||||
morkCh_kV|morkCh_kD|morkCh_kX, /* 0x34 4 */
|
||||
morkCh_kV|morkCh_kD|morkCh_kX, /* 0x35 5 */
|
||||
morkCh_kV|morkCh_kD|morkCh_kX, /* 0x36 6 */
|
||||
morkCh_kV|morkCh_kD|morkCh_kX, /* 0x37 7 */
|
||||
morkCh_kV|morkCh_kD|morkCh_kX, /* 0x38 8 */
|
||||
morkCh_kV|morkCh_kD|morkCh_kX, /* 0x39 9 */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM, /* 0x3A : */
|
||||
morkCh_kV, /* 0x3B ; */
|
||||
morkCh_kV, /* 0x3C < */
|
||||
morkCh_kV, /* 0x3D = */
|
||||
morkCh_kV, /* 0x3E > */
|
||||
morkCh_kV|morkCh_kM, /* 0x3F ? */
|
||||
|
||||
morkCh_kV, /* 0x40 @ */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU|morkCh_kX, /* 0x41 A */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU|morkCh_kX, /* 0x42 B */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU|morkCh_kX, /* 0x43 C */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU|morkCh_kX, /* 0x44 D */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU|morkCh_kX, /* 0x45 E */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU|morkCh_kX, /* 0x46 F */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU, /* 0x47 G */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU, /* 0x48 H */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU, /* 0x49 I */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU, /* 0x4A J */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU, /* 0x4B K */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU, /* 0x4C L */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU, /* 0x4D M */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU, /* 0x4E N */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU, /* 0x4F O */
|
||||
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU, /* 0x50 P */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU, /* 0x51 Q */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU, /* 0x52 R */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU, /* 0x53 S */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU, /* 0x54 T */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU, /* 0x55 U */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU, /* 0x56 V */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU, /* 0x57 W */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU, /* 0x58 X */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU, /* 0x59 Y */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kU, /* 0x5A Z */
|
||||
morkCh_kV, /* 0x5B [ */
|
||||
0, /* 0x5C \ cannot be kV because needs escape */
|
||||
morkCh_kV, /* 0x5D ] */
|
||||
morkCh_kV, /* 0x5E ^ */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM, /* 0x5F _ */
|
||||
|
||||
morkCh_kV, /* 0x60 ` */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL|morkCh_kX, /* 0x61 a */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL|morkCh_kX, /* 0x62 b */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL|morkCh_kX, /* 0x63 c */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL|morkCh_kX, /* 0x64 d */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL|morkCh_kX, /* 0x65 e */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL|morkCh_kX, /* 0x66 f */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL, /* 0x67 g */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL, /* 0x68 h */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL, /* 0x69 i */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL, /* 0x6A j */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL, /* 0x6B k */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL, /* 0x6C l */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL, /* 0x6D m */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL, /* 0x6E n */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL, /* 0x6F o */
|
||||
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL, /* 0x70 p */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL, /* 0x71 q */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL, /* 0x72 r */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL, /* 0x73 s */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL, /* 0x74 t */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL, /* 0x75 u */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL, /* 0x76 v */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL, /* 0x77 w */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL, /* 0x78 x */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL, /* 0x79 y */
|
||||
morkCh_kV|morkCh_kN|morkCh_kM|morkCh_kL, /* 0x7A z */
|
||||
morkCh_kV, /* 0x7B { */
|
||||
morkCh_kV, /* 0x7C | */
|
||||
morkCh_kV, /* 0x7D } */
|
||||
morkCh_kV, /* 0x7E ~ */
|
||||
morkCh_kW, /* 0x7F rubout */
|
||||
|
||||
/* $"80 81 82 83 84 85 86 87 88 89 8A 8B 8C 8D 8E 8F" */
|
||||
0, 0, 0, 0, 0, 0, 0, 0,
|
||||
0, 0, 0, 0, 0, 0, 0, 0,
|
||||
|
||||
/* $"90 91 92 93 94 95 96 97 98 99 9A 9B 9C 9D 9E 9F" */
|
||||
0, 0, 0, 0, 0, 0, 0, 0,
|
||||
0, 0, 0, 0, 0, 0, 0, 0,
|
||||
|
||||
/* $"A0 A1 A2 A3 A4 A5 A6 A7 A8 A9 AA AB AC AD AE AF" */
|
||||
0, 0, 0, 0, 0, 0, 0, 0,
|
||||
0, 0, 0, 0, 0, 0, 0, 0,
|
||||
|
||||
/* $"B0 B1 B2 B3 B4 B5 B6 B7 B8 B9 BA BB BC BD BE BF" */
|
||||
0, 0, 0, 0, 0, 0, 0, 0,
|
||||
0, 0, 0, 0, 0, 0, 0, 0,
|
||||
|
||||
/* $"C0 C1 C2 C3 C4 C5 C6 C7 C8 C9 CA CB CC CD CE CF" */
|
||||
0, 0, 0, 0, 0, 0, 0, 0,
|
||||
0, 0, 0, 0, 0, 0, 0, 0,
|
||||
|
||||
/* $"D0 D1 D2 D3 D4 D5 D6 D7 D8 D9 DA DB DC DD DE DF" */
|
||||
0, 0, 0, 0, 0, 0, 0, 0,
|
||||
0, 0, 0, 0, 0, 0, 0, 0,
|
||||
|
||||
/* $"E0 E1 E2 E3 E4 E5 E6 E7 E8 E9 EA EB EC ED EE EF" */
|
||||
0, 0, 0, 0, 0, 0, 0, 0,
|
||||
0, 0, 0, 0, 0, 0, 0, 0,
|
||||
|
||||
/* $"F0 F1 F2 F3 F4 F5 F6 F7 F8 F9 FA FB FC FD FE FF" */
|
||||
0, 0, 0, 0, 0, 0, 0, 0,
|
||||
0, 0, 0, 0, 0, 0, 0, 0,
|
||||
};
|
||||
|
||||
|
||||
//3456789_123456789_123456789_123456789_123456789_123456789_123456789_123456789
|
||||
92
mailnews/db/mork/src/morkCh.h
Normal file
92
mailnews/db/mork/src/morkCh.h
Normal file
@ -0,0 +1,92 @@
|
||||
/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*-
|
||||
*
|
||||
* The contents of this file are subject to the Netscape Public License
|
||||
* Version 1.0 (the "NPL"); you may not use this file except in
|
||||
* compliance with the NPL. You may obtain a copy of the NPL at
|
||||
* http://www.mozilla.org/NPL/
|
||||
*
|
||||
* Software distributed under the NPL is distributed on an "AS IS" basis,
|
||||
* WITHOUT WARRANTY OF ANY KIND, either express or implied. See the NPL
|
||||
* for the specific language governing rights and limitations under the
|
||||
* NPL.
|
||||
*
|
||||
* The Initial Developer of this code under the NPL is Netscape
|
||||
* Communications Corporation. Portions created by Netscape are
|
||||
* Copyright (C) 1999 Netscape Communications Corporation. All Rights
|
||||
* Reserved.
|
||||
*/
|
||||
|
||||
#ifndef _MORKCH_
|
||||
#define _MORKCH_ 1
|
||||
|
||||
#ifndef _MORK_
|
||||
#include "mork.h"
|
||||
#endif
|
||||
|
||||
/* this byte char predicate header file derives from public domain Mithril */
|
||||
/* (that means much of this has a copyright dedicated to the public domain) */
|
||||
|
||||
/* Use all 8 pred bits; lose some pred bits only if we need to reuse them. */
|
||||
|
||||
/* ch pred bits: W:white D:digit V:value U:upper L:lower N:name M:more */
|
||||
#define morkCh_kW (1 << 0)
|
||||
#define morkCh_kD (1 << 1)
|
||||
#define morkCh_kV (1 << 2)
|
||||
#define morkCh_kU (1 << 3)
|
||||
#define morkCh_kL (1 << 4)
|
||||
#define morkCh_kX (1 << 5)
|
||||
#define morkCh_kN (1 << 6)
|
||||
#define morkCh_kM (1 << 7)
|
||||
|
||||
extern const mork_u1 morkCh_Type[]; /* 256 byte predicate bits ch map */
|
||||
|
||||
/* is a character that normally continues a symbol token: */
|
||||
#define morkCh_IsSymbol(c) ( morkCh_Type[ (mork_ch)(c) ] & morkCh_kS )
|
||||
|
||||
/* is a numeric decimal digit: (note memory access might be slower) */
|
||||
/* define morkCh_IsDigit(c) ( morkCh_Type[ (mork_ch)(c) ] & morkCh_kD ) */
|
||||
#define morkCh_IsDigit(c) ( ((mork_ch) c) >= '0' && ((mork_ch) c) <= '9' )
|
||||
|
||||
/* is a numeric octal digit: */
|
||||
#define morkCh_IsOctal(c) ( ((mork_ch) c) >= '0' && ((mork_ch) c) <= '7' )
|
||||
|
||||
/* is a numeric hexadecimal digit: */
|
||||
#define morkCh_IsHex(c) ( morkCh_Type[ (mork_ch)(c) ] & morkCh_kX )
|
||||
|
||||
/* is value (can be printed in Mork value without needing hex or escape): */
|
||||
#define morkCh_IsValue(c) ( morkCh_Type[ (mork_ch)(c) ] & morkCh_kV )
|
||||
|
||||
/* is white space : */
|
||||
#define morkCh_IsWhite(c) ( morkCh_Type[ (mork_ch)(c) ] & morkCh_kW )
|
||||
|
||||
/* is name (can start a Mork name): */
|
||||
#define morkCh_IsName(c) ( morkCh_Type[ (mork_ch)(c) ] & morkCh_kN )
|
||||
|
||||
/* is name (can continue a Mork name): */
|
||||
#define morkCh_IsMore(c) ( morkCh_Type[ (mork_ch)(c) ] & morkCh_kM )
|
||||
|
||||
/* is alphabetic upper or lower case */
|
||||
#define morkCh_IsAlpha(c) \
|
||||
( morkCh_Type[ (mork_ch)(c) ] & (morkCh_kL|morkCh_kU) )
|
||||
|
||||
/* is alphanumeric, including lower case, upper case, and digits */
|
||||
#define morkCh_IsAlphaNum(c) \
|
||||
(morkCh_Type[ (mork_ch)(c) ]&(morkCh_kL|morkCh_kU|morkCh_kD))
|
||||
|
||||
|
||||
#define morkCh_IsAscii(c) ( ((mork_u1) c) <= 0x7F )
|
||||
#define morkCh_IsSevenBitChar(c) ( ((mork_u1) c) <= 0x7F )
|
||||
|
||||
/* ````` character case (e.g. for case insensitive operations) ````` */
|
||||
|
||||
#define morkCh_ToLower(c) ((c)-'A'+'a')
|
||||
#define morkCh_ToUpper(c) ((c)-'a'+'A')
|
||||
|
||||
/* extern int morkCh_IsUpper (int c); */
|
||||
#define morkCh_IsUpper(c) ( morkCh_Type[ (mork_ch)(c) ] & morkCh_kU )
|
||||
|
||||
/* extern int morkCh_IsLower (int c); */
|
||||
#define morkCh_IsLower(c) ( morkCh_Type[ (mork_ch)(c) ] & morkCh_kL )
|
||||
|
||||
#endif
|
||||
/* _MORKCH_ */
|
||||
Loading…
x
Reference in New Issue
Block a user