팔레트를 통해 ec2 DNS 이름 가져 오기

Question

팔레트를 사용하여 ec2 노드 목록을 반환합니다. 나는 이들의 DNS 이름을 얻고 싶다. jclouds에는 dnsName 메서드가 있지만 clojure에서 팔레트와 함께 사용할 수있는 방법이 없다는 것을 알았습니다. 이것이 가능한가?

세부

내가 그 보안 그룹이 제대로 작동하므로 DNS 이름과 함께 작동하도록 폭풍 배포 프로젝트에 수정을하기 위해 노력하고있어.

(defn zookeeper-dns-names [compute name] 
    (let [running-nodes (filter running? 
    (map (partial jclouds-node->node compute) (nodes-in-group compute (str "zookeeper-" name))))] 
    (map dns-name running-nodes))) 

Answer 1

나는 공용 IP를 통해 DNS 이름을 파생 우리의 팔레트 전개에서 이것을 사용하고 있습니다 :

(defn get-aws-name [] 
    (let [ip (-> (target-node) bean :publicAddresses first)] 
    (str "ec2-" (apply str (replace {\. \-} ip)) ".compute-1.amazonaws.com"))) 

특히,이 기능은 코드에서 사용할처럼 뭔가를 쓰기 위해 노력하고있어

개인 IP는 보안 그룹을 통해 작동합니다.

(defn ips-in-group [group-name public-or-private] 
    "Sequence of the first public IP from each node in the group" 
    (->> (nodes-in-group group-name) 
     (map bean) 
     (map public-or-private) 
     (map first)) 

(defn public-ips-in-group 
    "Sequence of the first public IP from each node in the group" 
    [group-name] 
    (ips-in-group group-name :publicAddresses)) 

(defn private-ips-in-group 
    "Sequence of the first public IP from each node in the group" 
    [group-name] 
    (ips-in-group group-name :privateAddresses))