Add local CAS pin metadata

crates/geth-control/src/lib.rs

@@ -31,6 +31,12 @@ pub enum ControlRequest {
     CasHas {
         hash: BlobHash,
     },
+    CasPin {
+        hash: BlobHash,
+    },
+    CasUnpin {
+        hash: BlobHash,
+    },
     CasList,
     KeychainInit {
         admin_key_path: Option<PathBuf>,
@@ -114,6 +120,10 @@ pub enum ControlResponse {
         hash: BlobHash,
         present: bool,
     },
+    CasPinned {
+        hash: BlobHash,
+        pinned: bool,
+    },
     CasList {
         blobs: Vec<CasBlob>,
     },
@@ -193,6 +203,7 @@ pub struct KeychainStatusResponse {
 pub struct CasBlob {
     pub hash: BlobHash,
     pub size_bytes: u64,
+    pub pinned: bool,
 }
 
 #[derive(Debug, thiserror::Error)]