mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-02-20 20:07:36 +00:00
63339a9577
* java/org/gnu/emacs/EmacsInputConnection.java (beginBatchEdit) (endBatchEdit, commitCompletion, commitText, deleteSurroundingText) (finishComposingText, getSelectedText, getTextAfterCursor) (getTextBeforeCursor, setComposingText, setComposingRegion) (performEditorAction, performContextMenuAction, getExtractedText) (setSelection, sendKeyEvent, deleteSurroundingTextInCodePoints) (requestCursorUpdates): Ensure that the input connection is up to date. (getSurroundingText): New function. * java/org/gnu/emacs/EmacsNative.java (getSurroundingText): Export new C function. * java/org/gnu/emacs/EmacsService.java (resetIC): Invalidate previously created input connections. * java/org/gnu/emacs/EmacsView.java (EmacsView) (onCreateInputConnection): Signify that input connections are now up to date. * src/androidterm.c (struct android_get_surrounding_text_context): New structure. (android_get_surrounding_text, NATIVE_NAME): * src/textconv.c (get_surrounding_text): * src/textconv.h: New functions.
515 lines
13 KiB
Java
515 lines
13 KiB
Java
/* Communication module for Android terminals. -*- c-file-style: "GNU" -*-
|
||
|
||
Copyright (C) 2023 Free Software Foundation, Inc.
|
||
|
||
This file is part of GNU Emacs.
|
||
|
||
GNU Emacs is free software: you can redistribute it and/or modify
|
||
it under the terms of the GNU General Public License as published by
|
||
the Free Software Foundation, either version 3 of the License, or (at
|
||
your option) any later version.
|
||
|
||
GNU Emacs is distributed in the hope that it will be useful,
|
||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||
GNU General Public License for more details.
|
||
|
||
You should have received a copy of the GNU General Public License
|
||
along with GNU Emacs. If not, see <https://www.gnu.org/licenses/>. */
|
||
|
||
package org.gnu.emacs;
|
||
|
||
import android.view.inputmethod.BaseInputConnection;
|
||
import android.view.inputmethod.CompletionInfo;
|
||
import android.view.inputmethod.ExtractedText;
|
||
import android.view.inputmethod.ExtractedTextRequest;
|
||
import android.view.inputmethod.SurroundingText;
|
||
import android.view.inputmethod.TextSnapshot;
|
||
|
||
import android.view.KeyEvent;
|
||
|
||
import android.os.Build;
|
||
|
||
import android.util.Log;
|
||
|
||
/* Android input methods, take number six. See textconv.c for more
|
||
details; this is more-or-less a thin wrapper around that file. */
|
||
|
||
public final class EmacsInputConnection extends BaseInputConnection
|
||
{
|
||
private static final String TAG = "EmacsInputConnection";
|
||
private EmacsView view;
|
||
private short windowHandle;
|
||
|
||
/* Whether or not to synchronize and call `updateIC' with the
|
||
selection position after committing text.
|
||
|
||
This helps with on screen keyboard programs found in some vendor
|
||
versions of Android, which rely on immediate updates to the point
|
||
position after text is commited in order to place the cursor
|
||
within that text. */
|
||
|
||
private static boolean syncAfterCommit;
|
||
|
||
/* Whether or not to return empty text with the offset set to zero
|
||
if a request arrives that has no flags set and has requested no
|
||
characters at all.
|
||
|
||
This is necessary with on screen keyboard programs found in some
|
||
vendor versions of Android which don't rely on the documented
|
||
meaning of `ExtractedText.startOffset', and instead take the
|
||
selection offset inside at face value. */
|
||
|
||
private static boolean extractAbsoluteOffsets;
|
||
|
||
static
|
||
{
|
||
if (Build.MANUFACTURER.equalsIgnoreCase ("Huawei")
|
||
|| Build.MANUFACTURER.equalsIgnoreCase ("Honor"))
|
||
extractAbsoluteOffsets = syncAfterCommit = true;
|
||
|
||
/* The Samsung and Vivo keyboards take `selectionStart' at face
|
||
value if some text is returned, and also searches for words
|
||
solely within that text. However, when no text is returned, it
|
||
falls back to getTextAfterCursor and getTextBeforeCursor. */
|
||
if (Build.MANUFACTURER.equalsIgnoreCase ("Samsung")
|
||
|| Build.MANUFACTURER.equalsIgnoreCase ("Vivo"))
|
||
extractAbsoluteOffsets = true;
|
||
};
|
||
|
||
public
|
||
EmacsInputConnection (EmacsView view)
|
||
{
|
||
super (view, true);
|
||
|
||
this.view = view;
|
||
this.windowHandle = view.window.handle;
|
||
}
|
||
|
||
@Override
|
||
public boolean
|
||
beginBatchEdit ()
|
||
{
|
||
/* Return if the input connection is out of date. */
|
||
if (view.icSerial < view.icGeneration)
|
||
return false;
|
||
|
||
if (EmacsService.DEBUG_IC)
|
||
Log.d (TAG, "beginBatchEdit");
|
||
|
||
EmacsNative.beginBatchEdit (windowHandle);
|
||
return true;
|
||
}
|
||
|
||
@Override
|
||
public boolean
|
||
endBatchEdit ()
|
||
{
|
||
/* Return if the input connection is out of date. */
|
||
if (view.icSerial < view.icGeneration)
|
||
return false;
|
||
|
||
if (EmacsService.DEBUG_IC)
|
||
Log.d (TAG, "endBatchEdit");
|
||
|
||
EmacsNative.endBatchEdit (windowHandle);
|
||
return true;
|
||
}
|
||
|
||
@Override
|
||
public boolean
|
||
commitCompletion (CompletionInfo info)
|
||
{
|
||
/* Return if the input connection is out of date. */
|
||
if (view.icSerial < view.icGeneration)
|
||
return false;
|
||
|
||
if (EmacsService.DEBUG_IC)
|
||
Log.d (TAG, "commitCompletion: " + info);
|
||
|
||
EmacsNative.commitCompletion (windowHandle,
|
||
info.getText ().toString (),
|
||
info.getPosition ());
|
||
return true;
|
||
}
|
||
|
||
@Override
|
||
public boolean
|
||
commitText (CharSequence text, int newCursorPosition)
|
||
{
|
||
int[] selection;
|
||
|
||
/* Return if the input connection is out of date. */
|
||
if (view.icSerial < view.icGeneration)
|
||
return false;
|
||
|
||
if (EmacsService.DEBUG_IC)
|
||
Log.d (TAG, "commitText: " + text + " " + newCursorPosition);
|
||
|
||
EmacsNative.commitText (windowHandle, text.toString (),
|
||
newCursorPosition);
|
||
|
||
if (syncAfterCommit)
|
||
{
|
||
/* Synchronize with the Emacs thread, obtain the new
|
||
selection, and report it immediately. */
|
||
|
||
selection = EmacsNative.getSelection (windowHandle);
|
||
|
||
if (EmacsService.DEBUG_IC && selection != null)
|
||
Log.d (TAG, "commitText: new selection is " + selection[0]
|
||
+ ", by " + selection[1]);
|
||
|
||
if (selection != null)
|
||
/* N.B. that the composing region is removed after text is
|
||
committed. */
|
||
view.imManager.updateSelection (view, selection[0],
|
||
selection[1], -1, -1);
|
||
}
|
||
|
||
return true;
|
||
}
|
||
|
||
@Override
|
||
public boolean
|
||
deleteSurroundingText (int leftLength, int rightLength)
|
||
{
|
||
/* Return if the input connection is out of date. */
|
||
if (view.icSerial < view.icGeneration)
|
||
return false;
|
||
|
||
if (EmacsService.DEBUG_IC)
|
||
Log.d (TAG, ("deleteSurroundingText: "
|
||
+ leftLength + " " + rightLength));
|
||
|
||
EmacsNative.deleteSurroundingText (windowHandle, leftLength,
|
||
rightLength);
|
||
return true;
|
||
}
|
||
|
||
@Override
|
||
public boolean
|
||
finishComposingText ()
|
||
{
|
||
/* Return if the input connection is out of date. */
|
||
if (view.icSerial < view.icGeneration)
|
||
return false;
|
||
|
||
if (EmacsService.DEBUG_IC)
|
||
Log.d (TAG, "finishComposingText");
|
||
|
||
EmacsNative.finishComposingText (windowHandle);
|
||
return true;
|
||
}
|
||
|
||
@Override
|
||
public String
|
||
getSelectedText (int flags)
|
||
{
|
||
/* Return if the input connection is out of date. */
|
||
if (view.icSerial < view.icGeneration)
|
||
return null;
|
||
|
||
if (EmacsService.DEBUG_IC)
|
||
Log.d (TAG, "getSelectedText: " + flags);
|
||
|
||
return EmacsNative.getSelectedText (windowHandle, flags);
|
||
}
|
||
|
||
@Override
|
||
public String
|
||
getTextAfterCursor (int length, int flags)
|
||
{
|
||
String string;
|
||
|
||
/* Return if the input connection is out of date. */
|
||
if (view.icSerial < view.icGeneration)
|
||
return null;
|
||
|
||
if (EmacsService.DEBUG_IC)
|
||
Log.d (TAG, "getTextAfterCursor: " + length + " " + flags);
|
||
|
||
string = EmacsNative.getTextAfterCursor (windowHandle, length,
|
||
flags);
|
||
|
||
if (EmacsService.DEBUG_IC)
|
||
Log.d (TAG, " --> " + string);
|
||
|
||
return string;
|
||
}
|
||
|
||
@Override
|
||
public String
|
||
getTextBeforeCursor (int length, int flags)
|
||
{
|
||
String string;
|
||
|
||
/* Return if the input connection is out of date. */
|
||
if (view.icSerial < view.icGeneration)
|
||
return null;
|
||
|
||
if (EmacsService.DEBUG_IC)
|
||
Log.d (TAG, "getTextBeforeCursor: " + length + " " + flags);
|
||
|
||
string = EmacsNative.getTextBeforeCursor (windowHandle, length,
|
||
flags);
|
||
|
||
if (EmacsService.DEBUG_IC)
|
||
Log.d (TAG, " --> " + string);
|
||
|
||
return string;
|
||
}
|
||
|
||
@Override
|
||
public boolean
|
||
setComposingText (CharSequence text, int newCursorPosition)
|
||
{
|
||
/* Return if the input connection is out of date. */
|
||
if (view.icSerial < view.icGeneration)
|
||
return false;
|
||
|
||
if (EmacsService.DEBUG_IC)
|
||
Log.d (TAG, ("setComposingText: "
|
||
+ text + " ## " + newCursorPosition));
|
||
|
||
EmacsNative.setComposingText (windowHandle, text.toString (),
|
||
newCursorPosition);
|
||
return true;
|
||
}
|
||
|
||
@Override
|
||
public boolean
|
||
setComposingRegion (int start, int end)
|
||
{
|
||
/* Return if the input connection is out of date. */
|
||
if (view.icSerial < view.icGeneration)
|
||
return false;
|
||
|
||
if (EmacsService.DEBUG_IC)
|
||
Log.d (TAG, "setComposingRegion: " + start + " " + end);
|
||
|
||
EmacsNative.setComposingRegion (windowHandle, start, end);
|
||
return true;
|
||
}
|
||
|
||
@Override
|
||
public boolean
|
||
performEditorAction (int editorAction)
|
||
{
|
||
/* Return if the input connection is out of date. */
|
||
if (view.icSerial < view.icGeneration)
|
||
return false;
|
||
|
||
if (EmacsService.DEBUG_IC)
|
||
Log.d (TAG, "performEditorAction: " + editorAction);
|
||
|
||
EmacsNative.performEditorAction (windowHandle, editorAction);
|
||
return true;
|
||
}
|
||
|
||
@Override
|
||
public boolean
|
||
performContextMenuAction (int contextMenuAction)
|
||
{
|
||
int action;
|
||
|
||
/* Return if the input connection is out of date. */
|
||
if (view.icSerial < view.icGeneration)
|
||
return false;
|
||
|
||
if (EmacsService.DEBUG_IC)
|
||
Log.d (TAG, "performContextMenuAction: " + contextMenuAction);
|
||
|
||
/* Translate the action in Java code. That way, a great deal of
|
||
JNI boilerplate can be avoided. */
|
||
|
||
switch (contextMenuAction)
|
||
{
|
||
case android.R.id.selectAll:
|
||
action = 0;
|
||
break;
|
||
|
||
case android.R.id.startSelectingText:
|
||
action = 1;
|
||
break;
|
||
|
||
case android.R.id.stopSelectingText:
|
||
action = 2;
|
||
break;
|
||
|
||
case android.R.id.cut:
|
||
action = 3;
|
||
break;
|
||
|
||
case android.R.id.copy:
|
||
action = 4;
|
||
break;
|
||
|
||
case android.R.id.paste:
|
||
action = 5;
|
||
break;
|
||
|
||
default:
|
||
return true;
|
||
}
|
||
|
||
EmacsNative.performContextMenuAction (windowHandle, action);
|
||
return true;
|
||
}
|
||
|
||
@Override
|
||
public ExtractedText
|
||
getExtractedText (ExtractedTextRequest request, int flags)
|
||
{
|
||
ExtractedText text;
|
||
int[] selection;
|
||
|
||
/* Return if the input connection is out of date. */
|
||
if (view.icSerial < view.icGeneration)
|
||
return null;
|
||
|
||
if (EmacsService.DEBUG_IC)
|
||
Log.d (TAG, "getExtractedText: " + request.hintMaxChars + ", "
|
||
+ request.hintMaxLines + " " + flags);
|
||
|
||
/* If a request arrives with hintMaxChars, hintMaxLines and flags
|
||
set to 0, and the system is known to be buggy, return an empty
|
||
extracted text object with the absolute selection positions. */
|
||
|
||
if (extractAbsoluteOffsets
|
||
&& request.hintMaxChars == 0
|
||
&& request.hintMaxLines == 0
|
||
&& flags == 0)
|
||
{
|
||
/* Obtain the selection. */
|
||
selection = EmacsNative.getSelection (windowHandle);
|
||
if (selection == null)
|
||
return null;
|
||
|
||
/* Create the workaround extracted text. */
|
||
text = new ExtractedText ();
|
||
text.partialStartOffset = -1;
|
||
text.partialEndOffset = -1;
|
||
text.text = "";
|
||
text.selectionStart = selection[0];
|
||
text.selectionEnd = selection[1];
|
||
}
|
||
else
|
||
text = EmacsNative.getExtractedText (windowHandle, request,
|
||
flags);
|
||
|
||
if (text == null)
|
||
{
|
||
if (EmacsService.DEBUG_IC)
|
||
Log.d (TAG, "getExtractedText: text is NULL");
|
||
|
||
return null;
|
||
}
|
||
|
||
if (EmacsService.DEBUG_IC)
|
||
Log.d (TAG, "getExtractedText: " + text.text + " @"
|
||
+ text.startOffset + ":" + text.selectionStart
|
||
+ ", " + text.selectionEnd);
|
||
|
||
return text;
|
||
}
|
||
|
||
@Override
|
||
public boolean
|
||
setSelection (int start, int end)
|
||
{
|
||
/* Return if the input connection is out of date. */
|
||
if (view.icSerial < view.icGeneration)
|
||
return false;
|
||
|
||
if (EmacsService.DEBUG_IC)
|
||
Log.d (TAG, "setSelection: " + start + " " + end);
|
||
|
||
EmacsNative.setSelection (windowHandle, start, end);
|
||
return true;
|
||
}
|
||
|
||
@Override
|
||
public boolean
|
||
sendKeyEvent (KeyEvent key)
|
||
{
|
||
/* Return if the input connection is out of date. */
|
||
if (view.icSerial < view.icGeneration)
|
||
return false;
|
||
|
||
if (EmacsService.DEBUG_IC)
|
||
Log.d (TAG, "sendKeyEvent: " + key);
|
||
|
||
return super.sendKeyEvent (key);
|
||
}
|
||
|
||
@Override
|
||
public boolean
|
||
deleteSurroundingTextInCodePoints (int beforeLength, int afterLength)
|
||
{
|
||
/* Return if the input connection is out of date. */
|
||
if (view.icSerial < view.icGeneration)
|
||
return false;
|
||
|
||
/* This can be implemented the same way as
|
||
deleteSurroundingText. */
|
||
return this.deleteSurroundingText (beforeLength, afterLength);
|
||
}
|
||
|
||
@Override
|
||
public boolean
|
||
requestCursorUpdates (int cursorUpdateMode)
|
||
{
|
||
/* Return if the input connection is out of date. */
|
||
if (view.icSerial < view.icGeneration)
|
||
return false;
|
||
|
||
if (EmacsService.DEBUG_IC)
|
||
Log.d (TAG, "requestCursorUpdates: " + cursorUpdateMode);
|
||
|
||
EmacsNative.requestCursorUpdates (windowHandle, cursorUpdateMode);
|
||
return true;
|
||
}
|
||
|
||
@Override
|
||
public SurroundingText
|
||
getSurroundingText (int beforeLength, int afterLength,
|
||
int flags)
|
||
{
|
||
SurroundingText text;
|
||
|
||
/* Return if the input connection is out of date. */
|
||
if (view.icSerial < view.icGeneration)
|
||
return null;
|
||
|
||
if (EmacsService.DEBUG_IC)
|
||
Log.d (TAG, ("getSurroundingText: " + beforeLength + ", "
|
||
+ afterLength));
|
||
|
||
text = EmacsNative.getSurroundingText (windowHandle, beforeLength,
|
||
afterLength, flags);
|
||
|
||
if (text != null)
|
||
Log.d (TAG, ("getSurroundingText: "
|
||
+ text.getSelectionStart ()
|
||
+ ","
|
||
+ text.getSelectionEnd ()
|
||
+ "+"
|
||
+ text.getOffset ()
|
||
+ ": "
|
||
+ text.getText ()));
|
||
|
||
return text;
|
||
}
|
||
|
||
|
||
/* Override functions which are not implemented. */
|
||
|
||
@Override
|
||
public TextSnapshot
|
||
takeSnapshot ()
|
||
{
|
||
Log.d (TAG, "takeSnapshot");
|
||
return null;
|
||
}
|
||
}
|