Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Add eqx dump cosmos #177

Merged
merged 12 commits into from
Nov 8, 2019
+135 −61
Merged

Add eqx dump cosmos #177

Show file tree
Hide file tree
Changes from 1 commit
Commits
Show all changes
12 commits
Select commit Hold shift + click to select a range
3e6abe8
Fix logging field swaps
bartelink Nov 7, 2019
8eb867a
Remove redundant tryDecode invocations for Unfolds
bartelink Nov 7, 2019
5911c78
Add Cosmos Dump facility
bartelink Nov 7, 2019
c70d6cf
Tidy eqx run facility
bartelink Nov 7, 2019
09c0aa4
Generalize to work on any store
bartelink Nov 8, 2019
b05d212
Changelog
bartelink Nov 8, 2019
72b0d3e
Polish eqx run log output
bartelink Nov 8, 2019
966e62c
Add README example usage
bartelink Nov 8, 2019
f049b1a
Diff reduction
bartelink Nov 8, 2019
0b7933b
Tidy steps
bartelink Nov 8, 2019
8c67613
Tidy steps
bartelink Nov 8, 2019
2411194
formatting
bartelink Nov 8, 2019
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
Prev Previous commit
Next Next commit
Diff reduction
  • Loading branch information
@bartelink
bartelink committed Nov 8, 2019
commit f049b1af50fda82e04caf388b1a9cd2c862af391
2 changes: 1 addition & 1 deletion samples/Infrastructure/Storage.fs
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -73,7 +73,7 @@ module Cosmos =
let private createGateway connection maxItems = Gateway(connection, BatchingPolicy(defaultMaxItems=maxItems))
let connection (log: ILogger, storeLog: ILogger) (a : Info) =
let (Discovery.UriAndKey (endpointUri,_)) as discovery = a.Connection|> Discovery.FromConnectionString
log.Information("CosmosDb {mode:l} {connection} Database {database:l} Container {container:l}",
log.Information("CosmosDb {mode} {connection} Database {database} Container {container}",
a.Mode, endpointUri, a.Database, a.Container)
log.Information("CosmosDb timeout {timeout}s; Throttling retries {retries}, max wait {maxRetryWaitTime}s",
(let t = a.Timeout in t.TotalSeconds), a.Retries, let x = a.MaxRetryWaitTime in x.TotalSeconds)
Expand Down
2 changes: 1 addition & 1 deletion tools/Equinox.Tool/Program.fs
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -346,7 +346,7 @@ module CosmosStats =
ops |> Seq.map (fun (name,sql) -> async {
log.Debug("Running query: {sql}", sql)
let res = container.QueryValue<int>(sql, Microsoft.Azure.Documents.Client.FeedOptions(EnableCrossPartitionQuery=true))
log.Information("{Stat:l}: {result:N0}", name, res)})
log.Information("{stat}: {result:N0}", name, res)})
|> if inParallel then Async.Parallel else Async.ParallelThrottled 1 // TOCONSIDER replace with Async.Sequence when using new enough FSharp.Core
|> Async.Ignore
|> Async.RunSynchronously
Expand Down