From 07f4615716e34082467eee92f5ae17c4a9739450 Mon Sep 17 00:00:00 2001
From: perry.werneck@gmail.com <perry.werneck@gmail.com@d25448e0-c022-0410-b998-a785f7053de0>
Date: Tue, 4 Sep 2012 12:51:12 +0000
Subject: [PATCH] Implementação inicial do método "cut"

---
 src/lib3270/selection.c | 61 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++-
 ui/99debug.xml          |  2 +-
 2 files changed, 61 insertions(+), 2 deletions(-)

diff --git a/src/lib3270/selection.c b/src/lib3270/selection.c
index 917d569..bb6d4ee 100644
--- a/src/lib3270/selection.c
+++ b/src/lib3270/selection.c
@@ -32,6 +32,7 @@
  #include <lib3270.h>
  #include <lib3270/session.h>
  #include <lib3270/selection.h>
+ #include "3270ds.h"
 
  #define SELECTION_LEFT			0x01
  #define SELECTION_TOP			0x02
@@ -529,12 +530,70 @@ LIB3270_EXPORT char * lib3270_get_selected(H3270 *hSession)
 
 LIB3270_EXPORT char * lib3270_cut_selected(H3270 *hSession)
 {
+
+	CHECK_SESSION_HANDLE(hSession);
+
 	if(!hSession->selected || hSession->select.start == hSession->select.end)
 		return NULL;
 
-	if(!lib3270_connected(hSession))
+	if(!(lib3270_connected(hSession) && hSession->text))
 		return NULL;
 
+	trace("Rectangle select is %s",lib3270_get_toggle(hSession,LIB3270_TOGGLE_RECTANGLE_SELECT) ? "Active" : "Inactive");
+
+	if(lib3270_get_toggle(hSession,LIB3270_TOGGLE_RECTANGLE_SELECT))
+	{
+		// Rectangle cut is not implemented
+	}
+	else
+	{
+		int end;
+		size_t szText;
+		int baddr;
+		int saddr;
+		char *text;
+		int f;
+
+		get_selected_addr(hSession,&baddr,&end);
+
+		if(baddr >= end)
+			return NULL;
+
+		szText = (end-baddr)+1;
+
+		text = lib3270_malloc(szText+1);
+
+		saddr = baddr+szText;
+
+		for(f=0;f<szText;f++)
+		{
+			text[f] = hSession->text[baddr].chr;
+
+			if(FA_IS_PROTECTED(hSession->ea_buf[saddr].fa))
+				saddr = lib3270_get_next_unprotected(hSession,saddr);
+
+			if(!FA_IS_PROTECTED(hSession->ea_buf[saddr].fa))
+			{
+				if(hSession->text[baddr].chr != hSession->text[saddr].chr)
+				{
+					hSession->text[baddr].chr = hSession->text[saddr].chr;
+					hSession->update(hSession,baddr,hSession->text[baddr].chr,hSession->text[baddr].attr,baddr == hSession->cursor_addr);
+				}
+
+				if(hSession->text[saddr].chr != ' ')
+				{
+					hSession->text[saddr].chr = ' ';
+					hSession->update(hSession,saddr,hSession->text[saddr].chr,hSession->text[saddr].attr,saddr == hSession->cursor_addr);
+				}
+
+				saddr++;
+			}
+			baddr++;
+		}
+
+		lib3270_unselect(hSession);
+		return text;
+	}
 
 	return NULL;
 }
diff --git a/ui/99debug.xml b/ui/99debug.xml
index 676f602..e507085 100644
--- a/ui/99debug.xml
+++ b/ui/99debug.xml
@@ -53,6 +53,6 @@
 
 	</menubar>
 
-	<accelerator name='ctrl' action='Enter' key='Control_R' />
+	<!-- accelerator name='ctrl' action='Enter' key='Control_R' / -->
 
 </ui>
--
libgit2 0.21.2