1 /* 2 * CDDL HEADER START 3 * 4 * The contents of this file are subject to the terms of the 5 * Common Development and Distribution License, Version 1.0 only 6 * (the "License"). You may not use this file except in compliance 7 * with the License. 8 * 9 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE 10 * or http://www.opensolaris.org/os/licensing. 11 * See the License for the specific language governing permissions 12 * and limitations under the License. 13 * 14 * When distributing Covered Code, include this CDDL HEADER in each 15 * file and include the License file at usr/src/OPENSOLARIS.LICENSE. 16 * If applicable, add the following below this CDDL HEADER, with the 17 * fields enclosed by brackets "[]" replaced with your own identifying 18 * information: Portions Copyright [yyyy] [name of copyright owner] 19 * 20 * CDDL HEADER END 21 */ 22 /* 23 * Copyright (c) 1996-1998 by Sun Microsystems, Inc. 24 * All rights reserved. 25 */ 26 27 #pragma ident "%Z%%M% %I% %E% SMI" 28 29 /* 30 * m_ord.h 31 * 32 * Copyright 1986, 1992 by Mortice Kern Systems Inc. All rights reserved. 33 * 34 * $Header: /rd/h/rcs/m_ord.h 1.15 1994/05/29 16:17:02 mark Exp $ 35 */ 36 37 #ifndef __M_M_ORD_H__ 38 #define __M_M_ORD_H__ 39 40 #ifndef UCHAR_MAX 41 #include <limits.h> 42 #endif 43 44 /* 45 * Used with CURSES in order to decern whether or not 'x' is a byte 46 * or a KEY_xxxx macro, which are defined to be values greater than 47 * UCHAR_MAX. 48 */ 49 #define m_ischarset(x) ((unsigned)(x) <= UCHAR_MAX) 50 51 /* ASCII based macros */ 52 /* 53 * m_ord(c) : convert alpha character(case insensitive) to an an ordinal value. 54 * if c is an alphabetic character (A-Z,a-z), this returns 55 * a number between 1 and 26 56 * m_chr(i) : convert an ordinal value to its corresponding alpha character 57 * using the reverse mapping as m_ord(). 58 * if i is a number between 1 and 26 it returns the corresponding 59 * alphabetic character A to Z 60 */ 61 #include <ctype.h> 62 63 #define m_ord(c) \ 64 ((m_ischarset(c) && ('A' <= toupper(c) && toupper(c) <= 'Z')) ? \ 65 (toupper(c) - '@') : -1) 66 #define m_chr(c) ((1 <= c && c <= 26) ? (c + '@') : -1) 67 68 #endif /* __M_M_ORD_H__ */ 69