cec_private.clj

(ns chromex.app.cec-private
  "Private API for HDMI CEC functionality.

     * available since Chrome 68"

  (:refer-clojure :only [defmacro defn apply declare meta let partial])
  (:require [chromex.wrapgen :refer [gen-wrap-helper]]
            [chromex.callgen :refer [gen-call-helper gen-tap-all-events-call]]))

(declare api-table)
(declare gen-call)

; -- functions --------------------------------------------------------------------------------------------------------------

(defmacro send-stand-by
  "Attempt to put all HDMI CEC compatible devices in standby.This is not guaranteed to have any effect on the connected
   displays. Displays that do not support HDMI CEC will not be affected.|callback| will be run as soon as all displays have
   been requested to change their power state.

   This function returns a core.async channel of type `promise-chan` which eventually receives a result value.
   Signature of the result value put on the channel is [].

   In case of an error the channel closes without receiving any value and relevant error object can be obtained via
   chromex.error/get-last-error."
  ([] (gen-call :function ::send-stand-by &form)))

(defmacro send-wake-up
  "Attempt to announce this device as the active input source towards all HDMI CEC enabled displays connected, waking them
   from standby if necessary.|callback| will be run as soon as all displays have been requested to change their power state.

   This function returns a core.async channel of type `promise-chan` which eventually receives a result value.
   Signature of the result value put on the channel is [].

   In case of an error the channel closes without receiving any value and relevant error object can be obtained via
   chromex.error/get-last-error."
  ([] (gen-call :function ::send-wake-up &form)))

(defmacro query-display-cec-power-state
  "Queries all HDMI CEC capable displays for their current power state.

   This function returns a core.async channel of type `promise-chan` which eventually receives a result value.
   Signature of the result value put on the channel is [power-states] where:

     |power-states| - ?

   In case of an error the channel closes without receiving any value and relevant error object can be obtained via
   chromex.error/get-last-error."
  ([] (gen-call :function ::query-display-cec-power-state &form)))

; -- convenience ------------------------------------------------------------------------------------------------------------

(defmacro tap-all-events
  "Taps all valid non-deprecated events in chromex.app.cec-private namespace."
  [chan]
  (gen-tap-all-events-call api-table (meta &form) chan))

; ---------------------------------------------------------------------------------------------------------------------------
; -- API TABLE --------------------------------------------------------------------------------------------------------------
; ---------------------------------------------------------------------------------------------------------------------------

(def api-table
  {:namespace "chrome.cecPrivate",
   :since "68",
   :functions
   [{:id ::send-stand-by,
     :name "sendStandBy",
     :callback? true,
     :params [{:name "callback", :optional? true, :type :callback}]}
    {:id ::send-wake-up,
     :name "sendWakeUp",
     :callback? true,
     :params [{:name "callback", :optional? true, :type :callback}]}
    {:id ::query-display-cec-power-state,
     :name "queryDisplayCecPowerState",
     :callback? true,
     :params
     [{:name "callback",
       :type :callback,
       :callback {:params [{:name "power-states", :type "[array-of-unknown-types]"}]}}]}]})

; -- helpers ----------------------------------------------------------------------------------------------------------------

; code generation for native API wrapper
(defmacro gen-wrap [kind item-id config & args]
  (apply gen-wrap-helper api-table kind item-id config args))

; code generation for API call-site
(def gen-call (partial gen-call-helper api-table))