From 14285d7548615626e5c5ffd5a39e264bcb302cee Mon Sep 17 00:00:00 2001
From: perry.werneck@gmail.com <perry.werneck@gmail.com@d25448e0-c022-0410-b998-a785f7053de0>
Date: Thu, 28 Nov 2013 15:04:29 +0000
Subject: [PATCH] Incluindo conversão ebcdic<->asc no módulo rexx

---
 charset.c | 31 +++++++++++++++++++++++++++++++
 1 file changed, 31 insertions(+), 0 deletions(-)

diff --git a/charset.c b/charset.c
index e33d0d0..57ea64a 100644
--- a/charset.c
+++ b/charset.c
@@ -402,6 +402,37 @@ LIB3270_ACTION( charsettable )
 	return 0;
 }
 
+LIB3270_EXPORT const char * lib3270_asc2ebc(H3270 *hSession, unsigned char *buffer, size_t sz)
+{
+	int f;
+	if(sz < 0)
+		sz = strlen((const char *) buffer);
+
+	if(sz > 0)
+	{
+		for(f=0;f<sz;f++)
+			buffer[f] = hSession->charset.asc2ebc[buffer[f]];
+	}
+
+	return (const char *) buffer;
+}
+
+LIB3270_EXPORT const char * lib3270_ebc2asc(H3270 *hSession, unsigned char *buffer, size_t sz)
+{
+	int f;
+	if(sz < 0)
+		sz = strlen((const char *) buffer);
+
+	if(sz > 0)
+	{
+		for(f=0;f<sz;f++)
+			buffer[f] = hSession->charset.ebc2asc[buffer[f]];
+	}
+
+	return (const char *) buffer;
+}
+
+
 // Process a single character definition.
 LIB3270_EXPORT void lib3270_remap(H3270 *hSession, unsigned short ebc, unsigned short iso, lib3270_remap_scope scope, unsigned char one_way)
 {
--
libgit2 0.21.2