changelog shortlog graph tags branches changeset files revisions annotate raw help

Mercurial > core / lisp/ffi/rocksdb/metadata.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/metadata.lisp --- RocksDB Metadata
     2 
     3 ;;
     4 
     5 ;;; Code:
     6 (in-package :rocksdb)
     7 
     8 (define-alien-routine rocksdb-get-column-family-metadata (* rocksdb-column-family-metadata)
     9   (db (* rocksdb)))
    10 
    11 (define-alien-routine rocksdb-get-column-family-metadata-cf (* rocksdb-column-family-metadata)
    12   (db (* rocksdb)) (cf (* rocksdb-column-family-handle)))
    13 
    14 (define-alien-routine rocksdb-column-family-metadata-destroy void
    15   (cf-meta (* rocksdb-column-family-metadata)))
    16 
    17 (define-alien-routine rocksdb-column-family-metadata-get-size (unsigned 64)
    18   (cf-meta (* rocksdb-column-family-metadata)))
    19 
    20 (define-alien-routine rocksdb-column-family-metadata-get-file-count size-t
    21   (cf-meta (* rocksdb-column-family-metadata)))
    22 
    23 (define-alien-routine rocksdb-column-family-metadata-get-name c-string
    24   (cf-meta (* rocksdb-column-family-metadata)))
    25 
    26 (define-alien-routine rocksdb-column-family-metadata-get-level-count size-t
    27   (cf-meta (* rocksdb-column-family-metadata)))
    28 
    29 (define-alien-routine rocksdb-column-family-metadata-get-level-metadata (* rocksdb-level-metadata)
    30   (cf-meta (* rocksdb-column-family-metadata)) (i size-t))
    31 
    32 (define-alien-routine rocksdb-level-metadata-destroy void (lmeta (* rocksdb-level-metadata)))
    33 
    34 (define-alien-routine rocksdb-level-metadata-get-level int (lmeta (* rocksdb-level-metadata)))
    35 
    36 (define-alien-routine rocksdb-level-metadata-get-size (unsigned 64) (lmeta (* rocksdb-level-metadata)))
    37 
    38 (define-alien-routine rocksdb-level-metadata-get-file-count size-t (lmeta (* rocksdb-level-metadata)))
    39 
    40 (define-alien-routine rocksdb-level-metadata-get-sst-file-metadata (* rocksdb-sst-file-metadata)
    41   (lmeta (* rocksdb-level-metadata)) (i size-t))
    42 
    43 (define-alien-routine rocksdb-sst-file-metadata-destroy void
    44   (fmeta (* rocksdb-sst-file-metadata)))
    45 
    46 (define-alien-routine rocksdb-sst-file-metadata-get-relative-filename c-string
    47   (fmeta (* rocksdb-sst-file-metadata)))
    48 
    49 (define-alien-routine rocksdb-sst-file-metadata-get-directory c-string
    50   (fmeta (* rocksdb-sst-file-metadata)))
    51 
    52 (define-alien-routine rocksdb-sst-file-metadata-get-size (unsigned 64)
    53   (fmeta (* rocksdb-sst-file-metadata)))
    54 
    55 (define-alien-routine rocksdb-sst-file-metadata-get-smallestkey (array unsigned-char)
    56   (fmeta (* rocksdb-sst-file-metadata))
    57   (len (* size-t)))
    58 
    59 (define-alien-routine rocksdb-sst-file-metadata-get-largestkey (array unsigned-char)
    60   (fmeta (* rocksdb-sst-file-metadata))
    61   (len (* size-t)))