[gnunet-scheme] 06/06: fs/struct: Define new message type /:msg:fs:index-list:entry.

[gnunet]

This is an automated email from the git hooks/post-receive script.

maxime-devos pushed a commit to branch master
in repository gnunet-scheme.

commit 6a51f3ad355838520c538d229514e6dbe4b9f051
Author: Maxime Devos <maximedevos@telenet.be>
AuthorDate: Wed Oct 26 00:29:36 2022 +0200

    fs/struct: Define new message type /:msg:fs:index-list:entry.
    
    * gnu/gnunet/fs/struct.scm (/:msg:fs:index-list:entry): New
    definition.
---
 gnu/gnunet/fs/struct.scm | 22 ++++++++++++++++++++--
 1 file changed, 20 insertions(+), 2 deletions(-)

diff --git a/gnu/gnunet/fs/struct.scm b/gnu/gnunet/fs/struct.scm
index e33ce8d..ae03a79 100644
--- a/gnu/gnunet/fs/struct.scm
+++ b/gnu/gnunet/fs/struct.scm
@@ -23,7 +23,8 @@
 (define-library (gnu gnunet fs struct)
   (export /:msg:fs:request-loc-signature
          /:msg:fs:response-loc-signature
-         /:msg:fs:index-start!)
+         /:msg:fs:index-start!
+         /:msg:fs:index-list:entry)
   (import (only (rnrs base) define begin * quote)
          (only (gnu gnunet crypto struct)
                /peer-identity)
@@ -116,4 +117,21 @@ by the client (\"st_ino\" field from \"struct stat\").  
Use 0 if the operating
 system does not support this, in which case the service must do a full hash
 recomputation."))
        (field (file-id /hashcode:512)
-             (synopsis "Hash of the file that we would like to index."))))))
+             (synopsis "Hash of the file that we would like to index."))))
+
+    (define-type /:msg:fs:index-list:entry
+      (structure/packed
+       (synopsis "Entry in the list of all indexed files")
+       (properties '((message-symbol msg:fs:index-list:entry)
+                    (c-type . IndexInfoMessage)))
+       (documentation "Message sent by FS service in response to a request
+for all indexed files (i.e., a msg:fs:index-list:get).  Later, more of the
+same type of messages are sent or a msg:fs:index-list:end.
+
+This is folowed by a 0-terminated file name of a file with the hash
+@var{file-id} as seen by the client.")
+       (field (header /:message-header))
+       (field (reserved u32/big)
+             (synopsis "Always zero."))
+       (field (file-id /hashcode:512)
+             (synopsis "Hash of the indexed file."))))))

-- 
To stop receiving notification emails like this one, please contact
gnunet@gnunet.org.