Emacs: Gibt es eine Möglichkeit, ein interaktives Skript mit Emacs zu erstellen?

Question

Ich bin neu in Emacs, aber schockiert darüber, was ich wirklich tun kann und wie viel Zeit es spart (Makros sparen eine Menge Zeit). Aber ich habe mich gefragt, ob es möglich ist, schrittweise Skripte zu erstellen, bei denen der Benutzer nach Eingaben gefragt wird und der Code daraufhin ausgeführt wird. Zum Beispiel möchte ich vielleicht eine SQL-Abfrage erstellen, so dass es etwas wie:

>table name?
myTable
>type of query (select, insert, update, delete)
select
>fields to get
name, id
>Result query is "select (name, id) from myTable"

Dies ist nur ein Entwurf einer Idee, aber ich habe mich gefragt, ob so etwas nicht nützlich wäre. Jemand erwähnte AWK-Skripte, aber ich war mir nicht sicher, ob das der richtige Baum ist, um ihn zu entrinden oder nicht. Ich bin auf Windows, aber ich glaube nicht, dass das eine große Rolle spielt.

Ich bin für jede Information dankbar, Danke

Answer 1

Siehe diesen kleinen Hack auf emacswiki: Eingabeaufforderung bei der Ausführung von Tastaturmakros . Andernfalls können Sie ein Makro jederzeit anhalten und die Textausführung an den Stellen einfügen, an denen Sie C-x q bei der Definition, siehe Ausführen von Makros mit Variationen . Schließlich können Sie eine Funktion definieren und mit interaktiv um die erforderlichen Parameter zu erhalten, d.h.:

(defun my-build-query (table type field)
  (interactive "sTable name: \nsType of query: \nsFields to get: ")
  (message "%s (%s) from %s" type fields table)
)

Sie könnten diese Funktion in Ihre ~/.emacs und führen Sie es mit M-x: my-build-query .

Ich hoffe, dies gibt Ihnen einige Anhaltspunkte für den Einstieg!

P.S.: Ahh, und noch eine Idee. Der wahrscheinlich einfachere Ansatz für diese Art von Dingen ist die Verwendung von YASnippet (sehen Sie sich den Screencast auf der Seite an).

Answer 2

Sie können verwenden Lesen aus dem Minipuffer mit Emacs Lisp, auch bekannt als elisp.

Answer 3

Z.B. in awk.

BEGIN{
while (1){
    printf "Enter table name: "
    getline tablename
    printf "Enter type of query: (s)elect, (i)nsert, (u)pdate, (d)elete, (q)uit: "
    getline querytype
    if ( querytype ~ /^q|Q$/) { exit}
    printf "Enter fields to get (field1,..): "
    getline fields
    sql=querytype" ("fields") from " tablename
    print "Result query is " sql
    printf "Do you want to execute query??: (yY)es, (nN)o"
    getline choice
    if ( choice ~ /^y|Y$/) {
    # use sql cmd here
    }
 }
}

als myscript.awk speichern und auf der Kommandozeile

 c:\test> gawk -f myscript.awk

Answer 4

Das Richtige ist meiner Meinung nach, eine readline-ähnliche Funktion zu schreiben, die eine Eingabeaufforderung und Benutzereingabe innerhalb des Puffers ermöglicht.

Dies ist eines der Dinge, die einfach genug zu implementieren sind, aber schwer auf eine wirklich ansprechende Weise zu tun. Es gibt wahrscheinlich guten, wiederverwendbaren Elisp-Code, um dies zu tun, aber ich kenne ihn nicht.

Answer 5

Hier ist eine grundlegende Implementierung, die Ihnen den Einstieg erleichtert:

(defun prompt-for-sql-statement (table type fields)
  (interactive
   (list
    (read-from-minibuffer "Table name? ")
    (completing-read "Type of statement? " '("select" "insert" "update" "delete"))
    (let (field fields (index 1))
      (while (not (string= "" (setq field (read-from-minibuffer (format "Field #%d: " index)))))
        (setq fields (cons field fields) index (1+ index)))
      (mapconcat 'identity (nreverse fields) ", "))))
  (insert type " (" fields ") from " table))

Wenn Sie eingeben M-x prompt-for-sql-statement (oder geben Sie eine Tastenfolge ein, an die Sie den Befehl gebunden haben), erhalten Sie eine Reihe von Eingabeaufforderungen:

Table name? myTable
Type of statement? select
Field #1: foo
Field #2: bar
Field #3: baz
Field #4:

Sie können den Anweisungstyp mit der Tabulatortaste vervollständigen, und ein leeres Feld beendet die Liste. Dann fügt die Funktion die konstruierte SQL-Anweisung an der Stelle ein, an der Sie den Befehl aufgerufen haben.

Der Befehl, wie er geschrieben ist, erzeugt SQL-Anweisungen, die alle wie ein SELECT aussehen ("select ... from table", "insert ... from table", usw.). Eine intelligentere Implementierung würde wissen, wie man die korrekte Syntax für jede Art von SQL-Anweisung erzeugt.