toupper_.c revision 1.5
11.1Sjtc/* 21.1Sjtc * Copyright (c) 1993 Winning Strategies, Inc. 31.1Sjtc * All rights reserved. 41.1Sjtc * 51.1Sjtc * Redistribution and use in source and binary forms, with or without 61.1Sjtc * modification, are permitted provided that the following conditions 71.1Sjtc * are met: 81.1Sjtc * 1. Redistributions of source code must retain the above copyright 91.1Sjtc * notice, this list of conditions and the following disclaimer. 101.1Sjtc * 2. Redistributions in binary form must reproduce the above copyright 111.1Sjtc * notice, this list of conditions and the following disclaimer in the 121.1Sjtc * documentation and/or other materials provided with the distribution. 131.1Sjtc * 3. All advertising materials mentioning features or use of this software 141.1Sjtc * must display the following acknowledgement: 151.1Sjtc * This product includes software developed by Winning Strategies, Inc. 161.1Sjtc * 4. The name of the author may not be used to endorse or promote products 171.5Sjtc * derived from this software without specific prior written permission 181.1Sjtc * 191.1Sjtc * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 201.1Sjtc * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 211.1Sjtc * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 221.1Sjtc * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 231.1Sjtc * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 241.1Sjtc * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 251.1Sjtc * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 261.1Sjtc * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 271.1Sjtc * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 281.1Sjtc * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 291.1Sjtc * 301.5Sjtc * $Id: toupper_.c,v 1.5 1994/01/28 20:41:08 jtc Exp $ 311.1Sjtc */ 321.1Sjtc 331.1Sjtc#if defined(LIBC_RCS) && !defined(lint) 341.5Sjtcstatic char *rcsid = "$Id: toupper_.c,v 1.5 1994/01/28 20:41:08 jtc Exp $"; 351.1Sjtc#endif /* LIBC_RCS and not lint */ 361.1Sjtc 371.1Sjtc#include <stdio.h> 381.1Sjtc#include <ctype.h> 391.1Sjtc 401.1Sjtc#if EOF != -1 411.1Sjtc#error "EOF != -1" 421.1Sjtc#endif 431.1Sjtc 441.1Sjtcconst short _C_toupper_[1 + 256] = { 451.1Sjtc EOF, 461.1Sjtc 0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07, 471.1Sjtc 0x08, 0x09, 0x0a, 0x0b, 0x0c, 0x0d, 0x0e, 0x0f, 481.1Sjtc 0x10, 0x11, 0x12, 0x13, 0x14, 0x15, 0x16, 0x17, 491.1Sjtc 0x18, 0x19, 0x1a, 0x1b, 0x1c, 0x1d, 0x1e, 0x1f, 501.1Sjtc 0x20, 0x21, 0x22, 0x23, 0x24, 0x25, 0x26, 0x27, 511.1Sjtc 0x28, 0x29, 0x2a, 0x2b, 0x2c, 0x2d, 0x2e, 0x2f, 521.1Sjtc 0x30, 0x31, 0x32, 0x33, 0x34, 0x35, 0x36, 0x37, 531.1Sjtc 0x38, 0x39, 0x3a, 0x3b, 0x3c, 0x3d, 0x3e, 0x3f, 541.1Sjtc 0x40, 0x41, 0x42, 0x43, 0x44, 0x45, 0x46, 0x47, 551.1Sjtc 0x48, 0x49, 0x4a, 0x4b, 0x4c, 0x4d, 0x4e, 0x4f, 561.1Sjtc 0x50, 0x51, 0x52, 0x53, 0x54, 0x55, 0x56, 0x57, 571.1Sjtc 0x58, 0x59, 0x5a, 0x5b, 0x5c, 0x5d, 0x5e, 0x5f, 581.1Sjtc 0x60, 'A', 'B', 'C', 'D', 'E', 'F', 'G', 591.1Sjtc 'H', 'I', 'J', 'K', 'L', 'M', 'N', 'O', 601.1Sjtc 'P', 'Q', 'R', 'S', 'T', 'U', 'V', 'W', 611.1Sjtc 'X', 'Y', 'Z', 0x7b, 0x7c, 0x7d, 0x7e, 0x7f, 621.1Sjtc 0x80, 0x81, 0x82, 0x83, 0x84, 0x85, 0x86, 0x87, 631.1Sjtc 0x88, 0x89, 0x8a, 0x8b, 0x8c, 0x8d, 0x8e, 0x8f, 641.1Sjtc 0x90, 0x91, 0x92, 0x93, 0x94, 0x95, 0x96, 0x97, 651.1Sjtc 0x98, 0x99, 0x9a, 0x9b, 0x9c, 0x9d, 0x9e, 0x9f, 661.1Sjtc 0xa0, 0xa1, 0xa2, 0xa3, 0xa4, 0xa5, 0xa6, 0xa7, 671.1Sjtc 0xa8, 0xa9, 0xaa, 0xab, 0xac, 0xad, 0xae, 0xaf, 681.1Sjtc 0xb0, 0xb1, 0xb2, 0xb3, 0xb4, 0xb5, 0xb6, 0xb7, 691.1Sjtc 0xb8, 0xb9, 0xba, 0xbb, 0xbc, 0xbd, 0xbe, 0xbf, 701.1Sjtc 0xc0, 0xc1, 0xc2, 0xc3, 0xc4, 0xc5, 0xc6, 0xc7, 711.1Sjtc 0xc8, 0xc9, 0xca, 0xcb, 0xcc, 0xcd, 0xce, 0xcf, 721.1Sjtc 0xd0, 0xd1, 0xd2, 0xd3, 0xd4, 0xd5, 0xd6, 0xd7, 731.1Sjtc 0xd8, 0xd9, 0xda, 0xdb, 0xdc, 0xdd, 0xde, 0xdf, 741.1Sjtc 0xe0, 0xe1, 0xe2, 0xe3, 0xe4, 0xe5, 0xe6, 0xe7, 751.1Sjtc 0xe8, 0xe9, 0xea, 0xeb, 0xec, 0xed, 0xee, 0xef, 761.1Sjtc 0xf0, 0xf1, 0xf2, 0xf3, 0xf4, 0xf5, 0xf6, 0xf7, 771.1Sjtc 0xf8, 0xf9, 0xfa, 0xfb, 0xfc, 0xfd, 0xfe, 0xff 781.1Sjtc}; 791.1Sjtc 801.1Sjtcconst short *_toupper_tab_ = _C_toupper_; 811.3Smycroft 821.3Smycroft#undef toupper 831.4Sjtcint 841.3Smycrofttoupper(c) 851.3Smycroft int c; 861.3Smycroft{ 871.3Smycroft return((_toupper_tab_ + 1)[c]); 881.3Smycroft} 89