| 
									
										
										
										
											2005-04-16 15:20:36 -07:00
										 |  |  | /*
 | 
					
						
							|  |  |  |  *    EBCDIC -> ASCII, ASCII -> EBCDIC conversion routines. | 
					
						
							|  |  |  |  * | 
					
						
							|  |  |  |  *  S390 version | 
					
						
							| 
									
										
										
										
											2012-07-20 11:15:04 +02:00
										 |  |  |  *    Copyright IBM Corp. 1999 | 
					
						
							| 
									
										
										
										
											2005-04-16 15:20:36 -07:00
										 |  |  |  *    Author(s): Martin Schwidefsky <schwidefsky@de.ibm.com> | 
					
						
							|  |  |  |  */ | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | #ifndef _EBCDIC_H
 | 
					
						
							|  |  |  | #define _EBCDIC_H
 | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | #ifndef _S390_TYPES_H
 | 
					
						
							|  |  |  | #include <types.h>
 | 
					
						
							|  |  |  | #endif
 | 
					
						
							|  |  |  | 
 | 
					
						
							| 
									
										
										
										
											2006-04-10 22:53:43 -07:00
										 |  |  | extern __u8 _ascebc_500[256];   /* ASCII -> EBCDIC 500 conversion table */ | 
					
						
							|  |  |  | extern __u8 _ebcasc_500[256];   /* EBCDIC 500 -> ASCII conversion table */ | 
					
						
							|  |  |  | extern __u8 _ascebc[256];   /* ASCII -> EBCDIC conversion table */ | 
					
						
							|  |  |  | extern __u8 _ebcasc[256];   /* EBCDIC -> ASCII conversion table */ | 
					
						
							|  |  |  | extern __u8 _ebc_tolower[256]; /* EBCDIC -> lowercase */ | 
					
						
							|  |  |  | extern __u8 _ebc_toupper[256]; /* EBCDIC -> uppercase */ | 
					
						
							| 
									
										
										
										
											2005-04-16 15:20:36 -07:00
										 |  |  | 
 | 
					
						
							| 
									
										
										
										
											2005-11-08 21:34:42 -08:00
										 |  |  | static inline void | 
					
						
							| 
									
										
										
										
											2005-04-16 15:20:36 -07:00
										 |  |  | codepage_convert(const __u8 *codepage, volatile __u8 * addr, unsigned long nr) | 
					
						
							|  |  |  | { | 
					
						
							|  |  |  | 	if (nr-- <= 0) | 
					
						
							|  |  |  | 		return; | 
					
						
							| 
									
										
										
										
											2006-09-28 16:56:43 +02:00
										 |  |  | 	asm volatile( | 
					
						
							|  |  |  | 		"	bras	1,1f\n" | 
					
						
							|  |  |  | 		"	tr	0(1,%0),0(%2)\n" | 
					
						
							|  |  |  | 		"0:	tr	0(256,%0),0(%2)\n" | 
					
						
							|  |  |  | 		"	la	%0,256(%0)\n" | 
					
						
							|  |  |  | 		"1:	ahi	%1,-256\n" | 
					
						
							|  |  |  | 		"	jnm	0b\n" | 
					
						
							|  |  |  | 		"	ex	%1,0(1)" | 
					
						
							|  |  |  | 		: "+&a" (addr), "+&a" (nr) | 
					
						
							|  |  |  | 		: "a" (codepage) : "cc", "memory", "1"); | 
					
						
							| 
									
										
										
										
											2005-04-16 15:20:36 -07:00
										 |  |  | } | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | #define ASCEBC(addr,nr) codepage_convert(_ascebc, addr, nr)
 | 
					
						
							|  |  |  | #define EBCASC(addr,nr) codepage_convert(_ebcasc, addr, nr)
 | 
					
						
							|  |  |  | #define ASCEBC_500(addr,nr) codepage_convert(_ascebc_500, addr, nr)
 | 
					
						
							|  |  |  | #define EBCASC_500(addr,nr) codepage_convert(_ebcasc_500, addr, nr)
 | 
					
						
							|  |  |  | #define EBC_TOLOWER(addr,nr) codepage_convert(_ebc_tolower, addr, nr)
 | 
					
						
							|  |  |  | #define EBC_TOUPPER(addr,nr) codepage_convert(_ebc_toupper, addr, nr)
 | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | #endif
 | 
					
						
							|  |  |  | 
 |