Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 1 | /* |
| 2 | * include/asm-s390/ebcdic.h |
| 3 | * EBCDIC -> ASCII, ASCII -> EBCDIC conversion routines. |
| 4 | * |
| 5 | * S390 version |
| 6 | * Copyright (C) 1999 IBM Deutschland Entwicklung GmbH, IBM Corporation |
| 7 | * Author(s): Martin Schwidefsky <schwidefsky@de.ibm.com> |
| 8 | */ |
| 9 | |
| 10 | #ifndef _EBCDIC_H |
| 11 | #define _EBCDIC_H |
| 12 | |
| 13 | #ifndef _S390_TYPES_H |
| 14 | #include <types.h> |
| 15 | #endif |
| 16 | |
Peter Oberparleiter | 0664299 | 2006-04-10 22:53:43 -0700 | [diff] [blame] | 17 | extern __u8 _ascebc_500[256]; /* ASCII -> EBCDIC 500 conversion table */ |
| 18 | extern __u8 _ebcasc_500[256]; /* EBCDIC 500 -> ASCII conversion table */ |
| 19 | extern __u8 _ascebc[256]; /* ASCII -> EBCDIC conversion table */ |
| 20 | extern __u8 _ebcasc[256]; /* EBCDIC -> ASCII conversion table */ |
| 21 | extern __u8 _ebc_tolower[256]; /* EBCDIC -> lowercase */ |
| 22 | extern __u8 _ebc_toupper[256]; /* EBCDIC -> uppercase */ |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 23 | |
Adrian Bunk | 4448aaf | 2005-11-08 21:34:42 -0800 | [diff] [blame] | 24 | static inline void |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 25 | codepage_convert(const __u8 *codepage, volatile __u8 * addr, unsigned long nr) |
| 26 | { |
| 27 | if (nr-- <= 0) |
| 28 | return; |
Martin Schwidefsky | 94c12cc | 2006-09-28 16:56:43 +0200 | [diff] [blame] | 29 | asm volatile( |
| 30 | " bras 1,1f\n" |
| 31 | " tr 0(1,%0),0(%2)\n" |
| 32 | "0: tr 0(256,%0),0(%2)\n" |
| 33 | " la %0,256(%0)\n" |
| 34 | "1: ahi %1,-256\n" |
| 35 | " jnm 0b\n" |
| 36 | " ex %1,0(1)" |
| 37 | : "+&a" (addr), "+&a" (nr) |
| 38 | : "a" (codepage) : "cc", "memory", "1"); |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 39 | } |
| 40 | |
| 41 | #define ASCEBC(addr,nr) codepage_convert(_ascebc, addr, nr) |
| 42 | #define EBCASC(addr,nr) codepage_convert(_ebcasc, addr, nr) |
| 43 | #define ASCEBC_500(addr,nr) codepage_convert(_ascebc_500, addr, nr) |
| 44 | #define EBCASC_500(addr,nr) codepage_convert(_ebcasc_500, addr, nr) |
| 45 | #define EBC_TOLOWER(addr,nr) codepage_convert(_ebc_tolower, addr, nr) |
| 46 | #define EBC_TOUPPER(addr,nr) codepage_convert(_ebc_toupper, addr, nr) |
| 47 | |
| 48 | #endif |
| 49 | |