使用Hickory库能否结合选择器与Zippers实现特定HTML导航？

嘿，作为Clojure、Hickory和Zippers的新手，你的需求完全可以实现——把Hickory的选择器定位和Zippers的树状导航结合起来是非常常规的操作，刚好能解决你说的“先定位，再移动”的场景。我来一步步给你讲清楚怎么做：

1. 先把HTML解析成Hickory文档，再转成Zipper结构 #

Zippers是Clojure用来操作树状结构的工具，所以首先得把Hickory解析后的文档转换成Zipper，才能用导航函数。示例代码：

(require '[hickory.core :as h]
         '[hickory.select :as s]
         '[clojure.zip :as z])

;; 假设你有这样的示例HTML
(def sample-html "<div class='content'>
                   <div class='target-parent'>
                     <p>无关文本</p>
                     <span id='my-target'>我是目标节点</span>
                   </div>
                   <div class='sibling-1'>第一个同级</div>
                   <div class='sibling-2'>第二个同级（你要的这个！）</div>
                 </div>")

;; 解析为Hickory文档
(def hickory-doc (h/parse sample-html))
;; 转成Zipper（Hickory文档是向量结构，用vector-zip）
(def doc-zip (z/vector-zip hickory-doc))

2. 用Hickory选择器定位目标节点，再找到对应的Zipper位置 #

你可以先用Hickory的选择器快速定位到目标节点，再把这个节点映射到Zipper里：

;; 用选择器找到目标节点（Hickory节点对象）
(def target-node (s/select-first (s/id "my-target") hickory-doc))

;; 在Zipper中定位到这个节点
(def target-zip (z/find-zip doc-zip #(= % target-node)))

或者更直接，在Zipper里直接用选择器过滤：

(def target-zip (z/filter doc-zip #(s/match? (s/id "my-target") %)))

3. 导航到父元素 #

用Zipper的z/up函数就能从目标节点跳到它的父元素：

(def parent-zip (z/up target-zip))
;; 可以用z/node查看父节点内容
(z/node parent-zip) ; 会返回class为target-parent的div节点

4. 获取父元素的第二个同级元素 #

父元素的同级元素就是它的兄弟节点，这里有两种方式：

方式一：用Zipper的导航函数直接跳转

从父元素出发，连续调用两次z/right就能跳到第二个同级（第一次right是第一个同级，第二次就是第二个）：

(def second-sibling-zip (-> parent-zip z/right z/right))

;; 如果要获取节点内容，用z/node
(when second-sibling-zip
  (println (z/node second-sibling-zip))) ; 会输出class为sibling-2的div节点

方式二：通过父节点的子列表定位

如果你需要更灵活的索引控制（比如要第N个同级），可以先获取父元素的父节点，再拿到所有兄弟节点列表：

;; 跳到父元素的父节点（也就是包含所有同级的容器）
(def grandparent-zip (z/up parent-zip))

;; 获取容器下的所有子节点（也就是父元素的所有兄弟）
(def all-siblings (z/children grandparent-zip))

;; 找到父元素在兄弟列表中的位置，再取第二个同级（索引+2）
(def parent-index (.indexOf all-siblings (z/node parent-zip)))
(def second-sibling-node (nth all-siblings (+ parent-index 2) nil))

;; 转成Zipper（如果需要的话）
(def second-sibling-zip (when second-sibling-node
                          (z/find-zip grandparent-zip #(= % second-sibling-node))))

关键注意点 #

• 一定要处理nil情况：如果父元素没有足够的同级节点，z/right会返回nil，所以用when或者if做判断避免报错。
• Hickory选择器和Zipper的配合核心是：选择器负责快速定位目标节点，Zipper负责在树里自由移动，两者通过节点对象关联起来。

内容的提问来源于stack exchange，提问作者Blaine Lafreniere