fleet_submit_extempore_service   xtlang


Defined in:  https://github.com/digego/extempore/tree/v0.8.9/libs/external/fleet.xtm

Implementation

(bind-func fleet_submit_extempore_service
  (let ((url:i8* (zalloc 256)))
    (lambda (host:i8* port:i32)
      (sprintf url "http://%s:%d/%s/units/extempore.service" host port FLEET_API_VERSION)
      (let ((body (json_object))
            ;; (options (json_array))
            (err:json_error_t* (zalloc)))
        ;; create the extempore unit (JSON version)
        (json_object_set_new body "desiredState" (json_string "inactive"))
        ;; set the options
        (json_object_set_new
         body
         "options"
         (json_loads
          "[{\\22section\\22: \\22Unit\\22, \\22name\\22: \\22After\\22, \\22value\\22: \\22docker.service\\22}
            {\\22section\\22: \\22Unit\\22, \\22name\\22: \\22Requires\\22, \\22value\\22: \\22docker.service\\22}


Back to Index

Similar Entries

  • fleet-connect    scheme
  • fleet-eval    scheme
  • fleet-killemall    scheme
  • fleet_connect_to_nodes    xtlang
  • fleet_delete_unit    xtlang
  • fleet_get_api    xtlang
  • fleet_get_ip_list    xtlang
  • fleet_get_machines    xtlang
  • fleet_get_state    xtlang
  • fleet_get_state    xtlang
  • fleet_get_units    xtlang
  • fleet_message_all_nodes_sync    xtlang
  • fleet_message_node_sync    xtlang
  • fleet_print_machines    xtlang
  • fleet_print_state    xtlang
  • fleet_print_state    xtlang
  • fleet_print_unit    xtlang
  • fleet_print_unit_state    xtlang
  • fleet_print_units    xtlang
  • fleet_response_error_p    xtlang
  • fleet_set_unit_state    xtlang
  • fleet_set_unit_state    xtlang
  • ghttp_set_extempore_user_agent    xtlang