From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Nick Dokos Newsgroups: gmane.emacs.help Subject: Re: scripting input methods (was back (batch) translate chars to keyboard events) Date: Mon, 13 Feb 2012 10:28:53 -0500 Organization: HPCS Message-ID: <18797.1329146933@alphaville> References: Reply-To: nicholas.dokos@hp.com NNTP-Posting-Host: plane.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable X-Trace: dough.gmane.org 1329152657 14476 80.91.229.3 (13 Feb 2012 17:04:17 GMT) X-Complaints-To: usenet@dough.gmane.org NNTP-Posting-Date: Mon, 13 Feb 2012 17:04:17 +0000 (UTC) Cc: help-gnu-emacs@gnu.org, nicholas.dokos@hp.com To: Rustom Mody Original-X-From: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Mon Feb 13 18:04:15 2012 Return-path: Envelope-to: geh-help-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([140.186.70.17]) by plane.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1RwzK1-0003Rc-Su for geh-help-gnu-emacs@m.gmane.org; Mon, 13 Feb 2012 18:04:14 +0100 Original-Received: from localhost ([::1]:36145 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1RwzK1-0000dT-Ah for geh-help-gnu-emacs@m.gmane.org; Mon, 13 Feb 2012 12:04:13 -0500 Original-Received: from eggs.gnu.org ([140.186.70.92]:59131) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Rwxpz-0001w7-Aa for help-gnu-emacs@gnu.org; Mon, 13 Feb 2012 10:29:14 -0500 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1Rwxpq-0007Iw-NX for help-gnu-emacs@gnu.org; Mon, 13 Feb 2012 10:29:07 -0500 Original-Received: from g6t0184.atlanta.hp.com ([15.193.32.61]:21654) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Rwxpq-0007G5-DF for help-gnu-emacs@gnu.org; Mon, 13 Feb 2012 10:28:58 -0500 Original-Received: from g5t0030.atlanta.hp.com (g5t0030.atlanta.hp.com [16.228.8.142]) by g6t0184.atlanta.hp.com (Postfix) with ESMTP id D2113C141; Mon, 13 Feb 2012 15:28:56 +0000 (UTC) Original-Received: from ldl (ldl.usa.hp.com [16.125.112.222]) by g5t0030.atlanta.hp.com (Postfix) with ESMTP id A7E3F14032; Mon, 13 Feb 2012 15:28:56 +0000 (UTC) Original-Received: from localhost (ldl.fc.hp.com [127.0.0.1]) by ldl (Postfix) with ESMTP id 6EECF1A7E0BD; Mon, 13 Feb 2012 08:28:56 -0700 (MST) X-Amavis-Alert: BAD HEADER SECTION, Duplicate header field: "Cc" Original-Received: from ldl ([127.0.0.1]) by localhost (ldl.fc.hp.com [127.0.0.1]) (amavisd-new, port 10024) with ESMTP id 0+bb0kAYmucH; Mon, 13 Feb 2012 08:28:56 -0700 (MST) Original-Received: from alphaville.dokosmarshall.org (squirrel.fc.hp.com [15.11.146.57]) by ldl (Postfix) with ESMTP id 1D9831A7E0BC; Mon, 13 Feb 2012 08:28:56 -0700 (MST) Original-Received: by alphaville.dokosmarshall.org (Postfix, from userid 1000) id 2B91641501; Mon, 13 Feb 2012 10:28:53 -0500 (EST) Original-Received: from alphaville (localhost [127.0.0.1]) by alphaville.dokosmarshall.org (Postfix) with ESMTP id 1E08740049; Mon, 13 Feb 2012 10:28:53 -0500 (EST) In-Reply-To: Message from Rustom Mody of "Mon\, 13 Feb 2012 12\:50\:28 +0530." X-Mailer: MH-E 8.3.1; nmh 1.3; GNU Emacs 24.0.92 X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6, seldom 2.4 (older, 4) X-Received-From: 15.193.32.61 X-Mailman-Approved-At: Mon, 13 Feb 2012 12:04:07 -0500 X-BeenThere: help-gnu-emacs@gnu.org X-Mailman-Version: 2.1.14 Precedence: list List-Id: Users list for the GNU Emacs text editor List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Original-Sender: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.help:83737 Archived-At: Rustom Mody wrote: > Rustom Mody wrote: > I have some bunch of sanskrit (devanagari) to type. =C2=A0It would be= easiest for me if I could have > the > English (roman) as well as the sanskrit (devanagari). >=20=20=20=20 > For example using the devanagari-itrans input method I can write the = gayatri mantra using >=20=20=20=20 > OM bhUrbhuvaH suvaH > tatsaviturvarenyam > bhargo devasya dhImahi > dhiyo yonaH prachodayAt >=20=20=20=20 > and emacs produces *on the fly* (ie I cant see/edit the above) >=20=20=20=20 > =C2=A0 =E0=A5=90 =E0=A4=AD=E0=A5=82=E0=A4=B0=E0=A5=8D=E0=A4=AD=E0=A5= =81=E0=A4=B5=E0=A4=83 =E0=A4=B8=E0=A5=81=E0=A4=B5=E0=A4=83 > =C2=A0 =E0=A4=A4=E0=A4=A4=E0=A5=8D=E0=A4=B8=E0=A4=B5=E0=A4=BF=E0=A4= =A4=E0=A5=81=E0=A4=B0=E0=A5=8D=E0=A4=B5=E0=A4=B0=E0=A5=87=E0=A4=A3=E0=A5=8D= =E0=A4=AF=E0=A4=AE=E0=A5=8D > =C2=A0 =E0=A4=AD=E0=A4=B0=E0=A5=8D=E0=A4=97=E0=A5=8B =E0=A4=A6=E0=A5= =87=E0=A4=B5=E0=A4=B8=E0=A5=8D=E0=A4=AF =E0=A4=A7=E0=A5=80=E0=A4=AE=E0=A4= =B9=E0=A4=BF > =C2=A0 =E0=A4=A7=E0=A4=BF=E0=A4=AF=E0=A5=8B =E0=A4=AF=E0=A5=8B=E0=A4= =A8=E0=A4=83 =E0=A4=AA=E0=A5=8D=E0=A4=B0=E0=A4=9A=E0=A5=8B=E0=A4=A6=E0=A4= =AF=E0=A4=BE=E0=A4=A4=E0=A5=8D >=20=20=20=20 > Can I do it in batch mode? ie write the first in a file and run some = command on it to produce > the second? >=20 > On Mon, Feb 13, 2012 at 9:45 AM, Nick Dokos wrote: >=20 > Yup, it can be done, probably in multiple ways but here is one. >=20=20=20=20 > I saw your question on the python list and did a bit of digging: I ca= me > up with a method that probably will work but will require more work to > flesh out. The key was that input methods read events one at a time a= nd > (from the Elisp manual): >=20=20=20=20 > =C2=A0-- Function: read-event &optional prompt inherit-input-method s= econds > =C2=A0 =C2=A0 This function reads and returns the next event of comma= nd input, > =C2=A0 =C2=A0 waiting if necessary until an event is available. =C2= =A0Events can come > =C2=A0 =C2=A0 directly from the user or from a keyboard macro. >=20=20=20=20 > So if you could get the text to become the body of a keyboard macro, > you could change the input method, execute the macro and that would > submit the text to the input method as if you had typed it. >=20=20=20=20 > Trying the theory, I started a keyboard macro, typed in OM and a newl= ine > and ended the keyboard macro. I can then switch the input method to > devanagari-itrans, execute the macro and presto! I get the proper sym= bol > (at least to my untrained eyes). >=20=20=20=20 > You can insert the definition of a macro in a buffer (and name it, ed= it it, > save it to a file and load the file later, and execute the macro by n= ame as > if it were a function (which it is, strictly speaking). The OM macro = above > turns out to look like this : >=20=20=20=20 > (fset 'om > =C2=A0 (lambda (&optional arg) "Keyboard macro." (interactive "p") (k= macro-exec-ring-item (quote ([79 > 77 return] 0 "%d")) arg))) >=20 > =C2=A0 >=20 > I would change the python (or whatever) program to produce the whole > fset form into a file, then start emacs, load the file, switch input > method and execute the macro: M-x om. >=20=20=20=20 > Nick >=20 > Thanks for your efforts Nick! > Some questions: > 1. Why fset?=C2=A0 >=20 That's how emacs stored the definition of the macro: I defined the macro with C-x ( O M C-x ), named it with C-x C-k n om RET and inserted it in the buffer with M-x insert-kbd-macro RET om RET. The result was as shown above. > I can get the following to work >=20 > (defun om (&optional arg) > =C2=A0 "Keyboard macro." > =C2=A0 (interactive "p") > =C2=A0 (kmacro-exec-ring-item '([79 77 return] 0 "%d") arg)) >=20 > so assuming its just a stylistic question. [If not please enlighten] In some sense, fset is the lower level primitive: defun could be defined in terms of fset (but not the other way round). But they do roughly the "same thing": they attach a function to the function cell of a symbol. > By 'work' I mean after this definition, M-x om inserts =E0=A5=90 into the= buffer if devanagari-itrans is > active. So far so good >=20 > After that I am a bit stuck: > 2. kmacro-exec-ring-item has just this much documentation. >=20 > kmacro-exec-ring-item is a compiled Lisp function in `kmacro.el'. >=20 > (kmacro-exec-ring-item ITEM ARG) >=20 > Execute item ITEM from the macro ring. >=20 > Does not take me far :-( >=20 Can't help here. > 3.=C2=A0 I guess this is really the same as the above question... > You say > =C2=A0 >=20 > So all you need to do is produce that vector of ascii values in there= . I > wrote a trivial python program to produce the ascii codes of your text > and stuffed the output into the vector, reevaluated the fset, and > executed the macro with a result that looks suspiciously like the one= in > your email. >=20 > The python (or elisp) to a text (ASCII-only) string to its ASCII is 1 lin= e: >=20 > >>> def Ascii(str): return [ord(c) for c in str] >=20 > I ran this on my file and got: > [79, 77, 32, 98, 104, 85, 114, 98, 104, 117, 118, 97, 72, 32, 115, 117, 1= 18, 97, 72, 10, 116, 97, > 116, 115, 97, 118, 105, 116, 117, 114, 118, 97, 114, 101, 110, 121, 97, 1= 09, 10, 98, 104, 97, 114, > 103, 111, 32, 100, 101, 118, 97, 115, 121, 97, 32, 100, 104, 73, 109, 97,= 104, 105, 10, 100, 104, > 105, 121, 111, 32, 121, 111, 110, 97, 72, 32, 112, 114, 97, 99, 104, 111,= 100, 97, 121, 65, 116, 10] >=20 > Ok so remove the commas, ADD A 'return'=C2=A0 after to last 10 (Whats tha= t??) The 10 is a RET, so you shouldn't have to add an extra one.=20 > And it almost works > ie I get the devanagari output followed by a elisp error: >=20 > Debugger entered--Lisp error: (void-variable =E0=A4=AA=E0=A5=8D=E0=A4=B0= =E0=A4=9A=E0=A5=8B=E0=A4=A6=E0=A4=AF=E0=A4=BE=E0=A4=A4=E0=A5=8D) > =C2=A0 eval(=E0=A4=AA=E0=A5=8D=E0=A4=B0=E0=A4=9A=E0=A5=8B=E0=A4=A6=E0=A4= =AF=E0=A4=BE=E0=A4=A4=E0=A5=8D) > =C2=A0 eval-last-sexp-1(t) > =C2=A0 eval-last-sexp(t) > =C2=A0 eval-print-last-sexp() > =C2=A0 call-interactively(eval-print-last-sexp nil nil) > =C2=A0 execute-kbd-macro([79 77 32 98 104 85 114 98 104 117 118 97 72 32 = 115 117 118 97 72 116 97 116 115 > 97 118 105 116 117 114 118 97 114 101 110 121 97 109 98 104 97 114 103 11= 1 32 100 101 118 97 115 121 > ...] 1 kmacro-loop-setup-function) > =C2=A0 kmacro-exec-ring-item(([79 77 32 98 104 85 114 98 104 117 118 97 7= 2 32 115 117 118 97 72 116 97 > 116 115 97 118 105 116 117 114 118 97 114 101 110 121 97 109 98 104 97 11= 4 103 111 32 100 101 118 97 > 115 121 ...] 0 "%d") 1) > =C2=A0 om(1) > =C2=A0 call-interactively(om t nil) > =C2=A0 execute-extended-command(nil) > =C2=A0 call-interactively(execute-extended-command nil nil) >=20 > The =E0=A4=AA=E0=A5=8D=E0=A4=B0=E0=A4=9A=E0=A5=8B=E0=A4=A6=E0=A4=AF=E0=A4= =BE=E0=A4=A4=E0=A5=8D is the devanagari of the last line: prachodayAt > If I remove the 10 (newline?) it seems to work without the elisp error >=20 As you point out in your subsequent post, that's an artifact of lisp-intera= ction mode: it does not happen in a text file. > I guess the problem would be solved if some more suitable function than > I wonder if there is some better function than kmacro-exec-ring-item coul= d be found for this? >=20 And you seem to have found one of those as well. Good luck! Nick