hyperscan

import hyperscan

# Compile a pattern into a database
let db = compile("foo", HS_FLAG_CASELESS)

# Scan some data
let data = "Hello foo world"
discard db.scan(data) do (id: cuint, fromOffset, toOffset: culonglong) -> bool:
  echo "Match found! ID: ", id, " From: ", fromOffset, " To: ", toOffset
  return true  # Continue scanning

# Serialize the database
let serializedDb = db.serialize()
echo "Serialized database size: ", serializedDb.len

# Deserialize the database
let db2 = deserialize(serializedDb)

# Scan again with the deserialized database
discard db2.scan(data) do (id: cuint, fromOffset, toOffset: culonglong) -> bool:
  echo "Match found in deserialized DB! ID: ", id, " From: ", fromOffset, " To: ", toOffset
  return true

import hyperscan/bindings

# Define a match event handler
proc onMatch(id: cuint, fromOffset, toOffset: culonglong, flags: cuint, context: pointer): cint {.cdecl.} =
  echo "Match found! ID: ", id, " From: ", fromOffset, " To: ", toOffset
  return 0

# Compile a pattern
var db: HsDatabasePtr = nil
var err: HsCompileErrorPtr = nil
let pattern = "foo"
let compileResult = hs_compile(pattern, HS_FLAG_CASELESS, HS_MODE_BLOCK, nil, addr db, addr err)

if compileResult == HS_SUCCESS:
  echo "Pattern compiled successfully!"
else:
  echo "Failed to compile pattern: ", err.message
  quit(1)

# Allocate scratch space
var scratch: HsScratchPtr = nil
let scratchResult = hs_alloc_scratch(db, addr scratch)

if scratchResult != HS_SUCCESS:
  echo "Failed to allocate scratch space!"
  discard hs_free_database(db)
  quit(1)

# Scan data
let data = "Hello foo world"
let scanResult = hs_scan(db, data, cuint(len(data)), 0.cuint, scratch, onMatch, nil)

if scanResult == HS_SUCCESS:
  echo "Scan completed successfully!"
else:
  echo "Scan failed!"

# Clean up
discard hs_free_scratch(scratch)
discard hs_free_database(db)