5 use crate::api_schema
::*;
6 use crate::api_schema
::router
::*;
7 //use crate::server::rest::*;
8 use serde_json
::{json, Value}
;
9 use std
::collections
::{HashSet, HashMap}
;
10 use chrono
::{DateTime, Datelike, TimeZone, Local}
;
11 use std
::path
::PathBuf
;
14 use crate::config
::datastore
;
17 use crate::server
::WorkerTask
;
19 use hyper
::{header, Body, Response, StatusCode}
;
20 use hyper
::http
::request
::Parts
;
22 fn group_backups(backup_list
: Vec
<BackupInfo
>) -> HashMap
<String
, Vec
<BackupInfo
>> {
24 let mut group_hash
= HashMap
::new();
26 for info
in backup_list
{
27 let group_id
= info
.backup_dir
.group().group_path().to_str().unwrap().to_owned();
28 let time_list
= group_hash
.entry(group_id
).or_insert(vec
![]);
35 fn mark_selections
<F
: Fn(DateTime
<Local
>, &BackupInfo
) -> String
> (
36 mark
: &mut HashSet
<PathBuf
>,
37 list
: &Vec
<BackupInfo
>,
41 let mut hash
= HashSet
::new();
43 let local_time
= info
.backup_dir
.backup_time().with_timezone(&Local
);
44 if hash
.len() >= keep
as usize { break; }
45 let backup_id
= info
.backup_dir
.relative_path();
46 let sel_id
: String
= select_id(local_time
, &info
);
47 if !hash
.contains(&sel_id
) {
49 //println!(" KEEP ID {} {}", backup_id, local_time.format("%c"));
50 mark
.insert(backup_id
);
58 _rpcenv
: &mut dyn RpcEnvironment
,
59 ) -> Result
<Value
, Error
> {
61 let store
= param
["store"].as_str().unwrap();
63 let datastore
= DataStore
::lookup_datastore(store
)?
;
65 let backup_list
= BackupInfo
::list_backups(&datastore
.base_path())?
;
67 let group_hash
= group_backups(backup_list
);
69 let mut groups
= vec
![];
71 for (_group_id
, mut list
) in group_hash
{
73 BackupInfo
::sort_list(&mut list
, false);
76 let group
= info
.backup_dir
.group();
79 "backup-type": group
.backup_type(),
80 "backup-id": group
.backup_id(),
81 "last-backup": info
.backup_dir
.backup_time().timestamp(),
82 "backup-count": list
.len() as u64,
90 fn list_snapshot_files (
93 _rpcenv
: &mut dyn RpcEnvironment
,
94 ) -> Result
<Value
, Error
> {
96 let store
= tools
::required_string_param(¶m
, "store")?
;
97 let backup_type
= tools
::required_string_param(¶m
, "backup-type")?
;
98 let backup_id
= tools
::required_string_param(¶m
, "backup-id")?
;
99 let backup_time
= tools
::required_integer_param(¶m
, "backup-time")?
;
101 let snapshot
= BackupDir
::new(backup_type
, backup_id
, backup_time
);
103 let datastore
= DataStore
::lookup_datastore(store
)?
;
105 let path
= datastore
.base_path();
106 let files
= BackupInfo
::list_files(&path
, &snapshot
)?
;
111 fn delete_snapshots (
114 _rpcenv
: &mut dyn RpcEnvironment
,
115 ) -> Result
<Value
, Error
> {
117 let store
= tools
::required_string_param(¶m
, "store")?
;
118 let backup_type
= tools
::required_string_param(¶m
, "backup-type")?
;
119 let backup_id
= tools
::required_string_param(¶m
, "backup-id")?
;
120 let backup_time
= tools
::required_integer_param(¶m
, "backup-time")?
;
122 let snapshot
= BackupDir
::new(backup_type
, backup_id
, backup_time
);
124 let datastore
= DataStore
::lookup_datastore(store
)?
;
126 datastore
.remove_backup_dir(&snapshot
)?
;
134 _rpcenv
: &mut dyn RpcEnvironment
,
135 ) -> Result
<Value
, Error
> {
137 let store
= tools
::required_string_param(¶m
, "store")?
;
138 let backup_type
= tools
::required_string_param(¶m
, "backup-type")?
;
139 let backup_id
= tools
::required_string_param(¶m
, "backup-id")?
;
141 let group
= BackupGroup
::new(backup_type
, backup_id
);
143 let datastore
= DataStore
::lookup_datastore(store
)?
;
145 let base_path
= datastore
.base_path();
147 let backup_list
= group
.list_backups(&base_path
)?
;
149 let mut snapshots
= vec
![];
151 for info
in backup_list
{
152 snapshots
.push(json
!({
153 "backup-type": group
.backup_type(),
154 "backup-id": group
.backup_id(),
155 "backup-time": info
.backup_dir
.backup_time().timestamp(),
166 _rpcenv
: &mut dyn RpcEnvironment
,
167 ) -> Result
<Value
, Error
> {
169 let store
= param
["store"].as_str().unwrap();
171 let datastore
= DataStore
::lookup_datastore(store
)?
;
173 let mut keep_all
= true;
175 for opt
in &["keep-last", "keep-daily", "keep-weekly", "keep-weekly", "keep-yearly"] {
176 if !param
[opt
].is_null() {
182 let worker
= WorkerTask
::new("prune", Some(store
.to_owned()), "root@pam", true)?
;
183 let result
= try_block
! {
185 worker
.log("No selection - keeping all files.");
188 worker
.log(format
!("Starting prune on store {}", store
));
191 let backup_list
= BackupInfo
::list_backups(&datastore
.base_path())?
;
193 let group_hash
= group_backups(backup_list
);
195 for (_group_id
, mut list
) in group_hash
{
197 let mut mark
= HashSet
::new();
199 BackupInfo
::sort_list(&mut list
, false);
201 if let Some(keep_last
) = param
["keep-last"].as_u64() {
202 list
.iter().take(keep_last
as usize).for_each(|info
| {
203 mark
.insert(info
.backup_dir
.relative_path());
207 if let Some(keep_daily
) = param
["keep-daily"].as_u64() {
208 mark_selections(&mut mark
, &list
, keep_daily
as usize, |local_time
, _info
| {
209 format
!("{}/{}/{}", local_time
.year(), local_time
.month(), local_time
.day())
213 if let Some(keep_weekly
) = param
["keep-weekly"].as_u64() {
214 mark_selections(&mut mark
, &list
, keep_weekly
as usize, |local_time
, _info
| {
215 format
!("{}/{}", local_time
.year(), local_time
.iso_week().week())
219 if let Some(keep_monthly
) = param
["keep-monthly"].as_u64() {
220 mark_selections(&mut mark
, &list
, keep_monthly
as usize, |local_time
, _info
| {
221 format
!("{}/{}", local_time
.year(), local_time
.month())
225 if let Some(keep_yearly
) = param
["keep-yearly"].as_u64() {
226 mark_selections(&mut mark
, &list
, keep_yearly
as usize, |local_time
, _info
| {
227 format
!("{}/{}", local_time
.year(), local_time
.year())
231 let mut remove_list
: Vec
<BackupInfo
> = list
.into_iter()
232 .filter(|info
| !mark
.contains(&info
.backup_dir
.relative_path())).collect();
234 BackupInfo
::sort_list(&mut remove_list
, true);
236 for info
in remove_list
{
237 worker
.log(format
!("remove {:?}", info
.backup_dir
));
238 datastore
.remove_backup_dir(&info
.backup_dir
)?
;
245 worker
.log_result(&result
);
247 if let Err(err
) = result
{
248 bail
!("prune failed - {}", err
);
254 pub fn add_common_prune_prameters(schema
: ObjectSchema
) -> ObjectSchema
{
259 IntegerSchema
::new("Number of backups to keep.")
264 IntegerSchema
::new("Number of daily backups to keep.")
269 IntegerSchema
::new("Number of weekly backups to keep.")
274 IntegerSchema
::new("Number of monthly backups to keep.")
279 IntegerSchema
::new("Number of yearly backups to keep.")
284 fn api_method_prune() -> ApiMethod
{
287 add_common_prune_prameters(
288 ObjectSchema
::new("Prune the datastore.")
291 StringSchema
::new("Datastore name.")
297 fn start_garbage_collection(
300 rpcenv
: &mut dyn RpcEnvironment
,
301 ) -> Result
<Value
, Error
> {
303 let store
= param
["store"].as_str().unwrap().to_string();
305 let datastore
= DataStore
::lookup_datastore(&store
)?
;
307 println
!("Starting garbage collection on store {}", store
);
309 let to_stdout
= if rpcenv
.env_type() == RpcEnvironmentType
::CLI { true }
else { false }
;
311 let upid_str
= WorkerTask
::new_thread(
312 "garbage_collection", Some(store
.clone()), "root@pam", to_stdout
, move |worker
|
314 worker
.log(format
!("starting garbage collection on store {}", store
));
315 datastore
.garbage_collection(worker
)
321 pub fn api_method_start_garbage_collection() -> ApiMethod
{
323 start_garbage_collection
,
324 ObjectSchema
::new("Start garbage collection.")
325 .required("store", StringSchema
::new("Datastore name."))
329 fn garbage_collection_status(
332 _rpcenv
: &mut dyn RpcEnvironment
,
333 ) -> Result
<Value
, Error
> {
335 let store
= param
["store"].as_str().unwrap();
337 let datastore
= DataStore
::lookup_datastore(&store
)?
;
339 println
!("Garbage collection status on store {}", store
);
341 let status
= datastore
.last_gc_status();
343 Ok(serde_json
::to_value(&status
)?
)
346 pub fn api_method_garbage_collection_status() -> ApiMethod
{
348 garbage_collection_status
,
349 ObjectSchema
::new("Garbage collection status.")
350 .required("store", StringSchema
::new("Datastore name."))
357 _rpcenv
: &mut dyn RpcEnvironment
,
358 ) -> Result
<Value
, Error
> {
360 //let config = datastore::config()?;
362 let store
= param
["store"].as_str().unwrap();
364 let datastore
= DataStore
::lookup_datastore(store
)?
;
366 let mut list
= vec
![];
368 let backup_list
= BackupInfo
::list_backups(&datastore
.base_path())?
;
370 for info
in backup_list
{
372 "backup-type": info
.backup_dir
.group().backup_type(),
373 "backup-id": info
.backup_dir
.group().backup_id(),
374 "backup-time": info
.backup_dir
.backup_time().timestamp(),
379 let result
= json
!(list
);
384 fn get_datastore_list(
387 _rpcenv
: &mut dyn RpcEnvironment
,
388 ) -> Result
<Value
, Error
> {
390 let config
= datastore
::config()?
;
392 Ok(config
.convert_to_array("store"))
400 _info
: &ApiAsyncMethod
,
401 _rpcenv
: Box
<dyn RpcEnvironment
>,
402 ) -> Result
<BoxFut
, Error
> {
404 let store
= tools
::required_string_param(¶m
, "store")?
;
406 let datastore
= DataStore
::lookup_datastore(store
)?
;
408 let file_name
= tools
::required_string_param(¶m
, "file-name")?
.to_owned();
410 let backup_type
= tools
::required_string_param(¶m
, "backup-type")?
;
411 let backup_id
= tools
::required_string_param(¶m
, "backup-id")?
;
412 let backup_time
= tools
::required_integer_param(¶m
, "backup-time")?
;
414 println
!("Download {} from {} ({}/{}/{}/{})", file_name
, store
,
415 backup_type
, backup_id
, Local
.timestamp(backup_time
, 0), file_name
);
417 let backup_dir
= BackupDir
::new(backup_type
, backup_id
, backup_time
);
419 let mut path
= datastore
.base_path();
420 path
.push(backup_dir
.relative_path());
421 path
.push(&file_name
);
423 let response_future
= tokio
::fs
::File
::open(path
)
424 .map_err(|err
| http_err
!(BAD_REQUEST
, format
!("File open failed: {}", err
)))
425 .and_then(move |file
| {
426 let payload
= tokio
::codec
::FramedRead
::new(file
, tokio
::codec
::BytesCodec
::new()).
428 //sigh - howto avoid copy here? or the whole map() ??
429 hyper
::Chunk
::from(bytes
.to_vec())
431 let body
= Body
::wrap_stream(payload
);
433 // fixme: set other headers ?
434 Ok(Response
::builder()
435 .status(StatusCode
::OK
)
436 .header(header
::CONTENT_TYPE
, "application/octet-stream")
441 Ok(Box
::new(response_future
))
444 pub fn api_method_download_file() -> ApiAsyncMethod
{
447 ObjectSchema
::new("Download single raw file from backup snapshot.")
448 .required("store", StringSchema
::new("Datastore name."))
449 .required("backup-type", StringSchema
::new("Backup type.")
450 .format(Arc
::new(ApiStringFormat
::Enum(&["ct", "host"]))))
451 .required("backup-id", StringSchema
::new("Backup ID."))
452 .required("backup-time", IntegerSchema
::new("Backup time (Unix epoch.)")
453 .minimum(1547797308))
454 .required("file-name", StringSchema
::new("Raw file name."))
458 pub fn router() -> Router
{
460 let store_schema
: Arc
<Schema
> = Arc
::new(
461 StringSchema
::new("Datastore name.").into()
464 let datastore_info
= Router
::new()
470 ObjectSchema
::new("List backups.")
471 .required("store", store_schema
.clone()))))
475 .download(api_method_download_file())
480 .get(api_method_garbage_collection_status())
481 .post(api_method_start_garbage_collection()))
488 ObjectSchema
::new("List snapshot files.")
489 .required("store", store_schema
.clone())
490 .required("backup-type", StringSchema
::new("Backup type."))
491 .required("backup-id", StringSchema
::new("Backup ID."))
492 .required("backup-time", IntegerSchema
::new("Backup time (Unix epoch.)")
493 .minimum(1547797308))
502 ObjectSchema
::new("List backup groups.")
503 .required("store", store_schema
.clone()))))
510 ObjectSchema
::new("List backup groups.")
511 .required("store", store_schema
.clone())
512 .required("backup-type", StringSchema
::new("Backup type."))
513 .required("backup-id", StringSchema
::new("Backup ID."))
519 ObjectSchema
::new("Delete backup snapshot.")
520 .required("store", store_schema
.clone())
521 .required("backup-type", StringSchema
::new("Backup type."))
522 .required("backup-id", StringSchema
::new("Backup ID."))
523 .required("backup-time", IntegerSchema
::new("Backup time (Unix epoch.)")
524 .minimum(1547797308))
531 .post(api_method_prune())
537 let route
= Router
::new()
540 ObjectSchema
::new("Directory index.")))
541 .match_all("store", datastore_info
);