changelog shortlog graph tags branches changeset files revisions annotate raw help

Mercurial > core / lisp/ffi/rocksdb/sst.lisp

changeset 698: 96958d3eb5b0
parent: c7f9bfc9570f
author: Richard Westhaver <ellis@rwest.io>
date: Fri, 04 Oct 2024 22:04:59 -0400
permissions: -rw-r--r--
description: fixes 
     1 ;;; rocksdb/sst.lisp --- SST Files
     2 
     3 ;; Functions for writing and ingesting SST Files directly.
     4 
     5 ;;; Refs:
     6 
     7 ;; https://github.com/facebook/rocksdb/wiki/Creating-and-Ingesting-SST-files
     8 
     9 ;;; Code:
    10 (in-package :rocksdb)
    11 
    12 (define-alien-routine rocksdb-sstfilewriter-create (* rocksdb-sstfilewriter)
    13   (env-opts (* rocksdb-envoptions))
    14   (io-options (* rocksdb-options)))
    15 
    16 (define-alien-routine rocksdb-sstfilewriter-create-with-comparator (* rocksdb-sstfilewriter)
    17   (env-opts (* rocksdb-envoptions))
    18   (io-options (* rocksdb-options))
    19   (comparator (* rocksdb-comparator)))
    20 
    21 (define-alien-routine rocksdb-sstfilewriter-destroy void (writer (* rocksdb-sstfilewriter)))
    22 
    23 (def-with-errptr rocksdb-sstfilewriter-open void
    24   (writer (* rocksdb-sstfilewriter))
    25   (name c-string))
    26 
    27 (def-with-errptr rocksdb-sstfilewriter-add void
    28   (writer (* rocksdb-sstfilewriter))
    29   (key (* unsigned-char))
    30   (keylen size-t)
    31   (val (* unsigned-char))
    32   (vallen size-t))
    33 
    34 (def-with-errptr rocksdb-sstfilewriter-put void
    35   (writer (* rocksdb-sstfilewriter))
    36   (key (* unsigned-char))
    37   (keylen size-t)
    38   (val (* unsigned-char))
    39   (vallen size-t))
    40 
    41 (def-with-errptr rocksdb-sstfilewriter-put-with-ts void
    42   (writer (* rocksdb-sstfilewriter))
    43   (key (* char))
    44   (keylen size-t)
    45   (ts (* char))
    46   (tslen size-t)
    47   (val (* char))
    48   (vallen size-t))
    49 
    50 (def-with-errptr rocksdb-sstfilewriter-merge void
    51   (writer (* rocksdb-sstfilewriter))
    52   (key (* char))
    53   (keylen size-t)
    54   (val (* char))
    55   (vallen size-t))
    56   
    57 (def-with-errptr rocksdb-sstfilewriter-delete void
    58   (writer (* rocksdb-sstfilewriter))
    59   (key (* char))
    60   (keylen size-t))
    61 
    62 (def-with-errptr rocksdb-sstfilewriter-delete-with-ts void
    63   (writer (* rocksdb-sstfilewriter))
    64   (key (* char))
    65   (keylen size-t)
    66   (ts (* char))
    67   (tslen size-t))
    68 
    69 (def-with-errptr rocksdb-sstfilewriter-delete-range void
    70   (writer (* rocksdb-sstfilewriter))
    71   (begin-key (* char))
    72   (begin-keylen size-t)
    73   (end-key (* char))
    74   (end-keylen size-t))
    75 
    76 (def-with-errptr rocksdb-sstfilewriter-finish void
    77   (writer (* rocksdb-sstfilewriter)))
    78 
    79 (def-with-errptr rocksdb-sstfilewriter-file-size void
    80   (writer (* rocksdb-sstfilewriter))
    81   (file-size (* unsigned-long)))
    82 
    83 (def-with-errptr rocksdb-ingest-external-file void
    84   (db (* rocksdb))
    85   (file-list (* c-string))
    86   (list-len size-t)
    87   (opt (* rocksdb-ingestexternalfileoptions)))
    88 
    89 (def-with-errptr rocksdb-ingest-external-file-cf void
    90   (db (* rocksdb))
    91   (cf-handle (* rocksdb-column-family-handle))
    92   (file-list (array c-string))
    93   (list-len size-t)
    94   (opt (* rocksdb-ingestexternalfileoptions)))
    95 
    96 (def-with-errptr rocksdb-try-catch-up-with-primary void
    97   (db (* rocksdb)))