[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/arduino-mode cf57002 105/107: Add ob-arduino.el which is m
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/arduino-mode cf57002 105/107: Add ob-arduino.el which is moved out of org-mode contrib/ |
Date: |
Sun, 29 Aug 2021 10:58:25 -0400 (EDT) |
branch: elpa/arduino-mode
commit cf57002a538c02395c202e0665696b1ad04d7b87
Author: stardiviner <numbchild@gmail.com>
Commit: stardiviner <numbchild@gmail.com>
Add ob-arduino.el which is moved out of org-mode contrib/
---
ob-arduino.el | 105 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1 file changed, 105 insertions(+)
diff --git a/ob-arduino.el b/ob-arduino.el
new file mode 100644
index 0000000..ff19644
--- /dev/null
+++ b/ob-arduino.el
@@ -0,0 +1,105 @@
+;;; ob-arduino.el --- Org-mode Babel support for Arduino.
+;;
+;; Authors: stardiviner <numbchild@gmail.com>
+;; Package-Requires: ((emacs "24.4") (org "24.1"))
+;; Package-Version: 1.0
+;; Keywords: arduino org babel
+;; homepage: https://github.com/stardiviner/arduino-mode
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs. If not, see <https://www.gnu.org/licenses/>.
+;;
+;;; Commentary:
+;;
+;; Like the following src block, press =[C-c C-c]= to upload to Arduino board.
+;;
+;; #+begin_src arduino
+;; // the setup function runs once when you press reset or power the board
+;; void setup() {
+;; // initialize digital pin LED_BUILTIN as an output.
+;; pinMode(LED_BUILTIN, OUTPUT);
+;; }
+;;
+;; // the loop function runs over and over again forever
+;; void loop() {
+;; digitalWrite(LED_BUILTIN, HIGH); // turn the LED on (HIGH is the
voltage level)
+;; delay(100); // wait for 0.1 second
+;; digitalWrite(LED_BUILTIN, LOW); // turn the LED off by making the
voltage LOW
+;; delay(100); // wait for 0.1 second
+;; }
+;; #+end_src
+;;
+;;; Code:
+
+(require 'org)
+(require 'ob)
+(require 'arduino-mode nil t)
+
+(defgroup ob-arduino nil
+ "org-mode blocks for Arduino."
+ :group 'org)
+
+(defcustom ob-arduino:program "arduino"
+ "Default Arduino program name."
+ :group 'ob-arduino
+ :type 'string)
+
+(defcustom ob-arduino:port "/dev/ttyACM0"
+ "Default Arduino port."
+ :group 'ob-arduino
+ :type 'string)
+
+(defcustom ob-arduino:board "arduino:avr:uno"
+ "Default Arduino board."
+ :group 'ob-arduino
+ :type 'string)
+
+
+(defvar org-babel-default-header-args:sclang nil)
+
+;;;###autoload
+(defun org-babel-execute:arduino (body params)
+ "org-babel arduino hook."
+ (let* ((port (cdr (assoc :port params)))
+ (board (cdr (assoc :board params)))
+ (cmd (mapconcat 'identity (list
+ ob-arduino:program "--upload"
+ (if port (concat "--port " port))
+ (if board (concat "--board " board))
+ ) " "))
+ (code (org-babel-expand-body:generic body params))
+ (src-file (org-babel-temp-file "ob-arduino-" ".ino")))
+ ;; delete all `ob-arduino' temp files, otherwise arduino will compile all
+ ;; ob-arduino temp files, and report error.
+ (mapc
+ (lambda (f)
+ (unless (file-directory-p f)
+ (delete-file (expand-file-name f org-babel-temporary-directory))))
+ (directory-files
+ (file-name-directory (org-babel-temp-file "ob-arduino-" ".ino"))
+ nil ".ino"))
+ ;; specify file for arduino command.
+ (with-temp-file src-file
+ (insert code))
+ (org-babel-eval
+ (concat ob-arduino:program
+ " " "--upload"
+ " " (if port (concat "--port " port))
+ " " (if board (concat "--board " board))
+ " " src-file)
+ "" ; pass empty string "" as `BODY' to
`org-babel--shell-command-on-region'
+ ;; to fix command `arduino' don't accept string issue.
+ )
+ ))
+
+
+;;;###autoload
+(eval-after-load 'org
+ '(add-to-list 'org-src-lang-modes '("arduino" . arduino)))
+
+
+
+
+(provide 'ob-arduino)
+
+;;; ob-arduino.el ends here
- [nongnu] elpa/arduino-mode 9234c9d 087/107: Replace defmethod -> cl-defmethod, (continued)
- [nongnu] elpa/arduino-mode 9234c9d 087/107: Replace defmethod -> cl-defmethod, ELPA Syncer, 2021/08/29
- [nongnu] elpa/arduino-mode 01cb165 096/107: plan to support "arduino-cli" command-line tools, ELPA Syncer, 2021/08/29
- [nongnu] elpa/arduino-mode 1c9250d 097/107: Fix recursive ‘require’ for feature ‘flycheck-arduino’, ELPA Syncer, 2021/08/29
- [nongnu] elpa/arduino-mode f0053f5 061/107: raise process buffer if process failed, ELPA Syncer, 2021/08/29
- [nongnu] elpa/arduino-mode af1f18a 067/107: add flycheck support, ELPA Syncer, 2021/08/29
- [nongnu] elpa/arduino-mode 0e95bdf 084/107: auto setup flycheck-arduino on arduino-mode-hook, ELPA Syncer, 2021/08/29
- [nongnu] elpa/arduino-mode eac5031 090/107: fix function `flycheck-arduino-setup' unknown when compilation, ELPA Syncer, 2021/08/29
- [nongnu] elpa/arduino-mode 49dd8be 095/107: fix flycheck warnings, ELPA Syncer, 2021/08/29
- [nongnu] elpa/arduino-mode 7f72bc7 100/107: put flycheck-arduino-setup in arduino-mode, ELPA Syncer, 2021/08/29
- [nongnu] elpa/arduino-mode 10af997 102/107: fix not defined flycheck-arduino-setup, ELPA Syncer, 2021/08/29
- [nongnu] elpa/arduino-mode cf57002 105/107: Add ob-arduino.el which is moved out of org-mode contrib/,
ELPA Syncer <=
- [nongnu] elpa/arduino-mode a8fc196 106/107: ob-arduino set tangle filename extension, ELPA Syncer, 2021/08/29
- [nongnu] elpa/arduino-mode b1bd565 098/107: adjust code line number to fix byte compile invalid warnings, ELPA Syncer, 2021/08/29
- [nongnu] elpa/arduino-mode 9547187 066/107: ob-arduino is in Org-mode contrib/ now., ELPA Syncer, 2021/08/29
- [nongnu] elpa/arduino-mode 40bc531 071/107: Merge branch 'develop', ELPA Syncer, 2021/08/29
- [nongnu] elpa/arduino-mode 024761d 068/107: fix autoload ede-arduino-preferences-file, ELPA Syncer, 2021/08/29
- [nongnu] elpa/arduino-mode 405ed23 078/107: fix missing spinner package dependency, ELPA Syncer, 2021/08/29
- [nongnu] elpa/arduino-mode 0ae5fa3 089/107: Merge pull request #2 from philipper905/master, ELPA Syncer, 2021/08/29
- [nongnu] elpa/arduino-mode 9629bde 073/107: Merge pull request #1 from concavegit/master, ELPA Syncer, 2021/08/29
- [nongnu] elpa/arduino-mode 5937724 076/107: Merge branch 'release/v1.2', ELPA Syncer, 2021/08/29
- [nongnu] elpa/arduino-mode 8805fe6 080/107: Merge tag 'spinner-dependency' into develop, ELPA Syncer, 2021/08/29