use core::cmp::Ordering; use fnv::{FnvHashMap, FnvHashSet}; use humantime::format_duration; use permutohedron::LexicalPermutation; use rstar::{PointDistance, RTree, RTreeObject, AABB}; use serde::{Deserialize, Serialize}; use sha3::{Digest, Sha3_256}; use std::collections::VecDeque; use std::fs::File; use std::hash::{Hash, Hasher}; use std::io::{BufReader, BufWriter, Write}; use std::path::PathBuf; use std::str::FromStr; use std::time::Instant; use structopt::StructOpt; #[derive(Debug)] #[allow(dead_code)] enum StarType { Neutron, WhiteDwarf, Scoopable, NonScoopable, } #[derive(Debug, Clone, Deserialize)] struct SystemSerde { id: u32, star_type: String, name: String, mult: f32, distance: u32, x: f32, y: f32, z: f32, } #[derive(Debug, Clone, Deserialize, Serialize)] struct System { id: u32, star_type: String, name: String, mult: f32, distance: u32, pos: [f32; 3], } #[derive(Debug)] enum Mode { BFS, Greedy, AStar, } impl FromStr for Mode { type Err = String; fn from_str(s: &str) -> Result { match s { "bfs" => Ok(Mode::BFS), "greedy" => Ok(Mode::Greedy), "astar" => Ok(Mode::AStar), _ => Err("Invalid Mode".to_string()), } } } #[derive(Debug, StructOpt)] #[structopt( name = "ed_lrr", about = "Elite: Dangerous Long-Range Router", rename_all = "snake_case" )] /// Plots a route through multiple systems struct Opts { #[structopt(short, long = "range")] /// Jump Range range: Option, #[structopt( parse(from_os_str), short = "i", long = "path", default_value = "./stars.csv" )] /// Path to stars.csv /// /// Generate using ed_lrr_pp file_path: PathBuf, #[structopt( parse(from_os_str), long = "precomp_file", conflicts_with = "precompute" )] /// Path to precomputed route graph /// /// Generate using --precompute option precomp_file: Option, #[structopt( short = "c", long = "precompute", conflicts_with = "full_permute", conflicts_with = "permute", conflicts_with = "precomp_file" )] /// Precompute all routes for the specified jump range starting at the specified system and write the result to {system}_{range}.bin precompute: bool, #[structopt(short = "p", long = "permute", conflicts_with = "full_permute")] /// Permute intermediate hops to find shortest route permute: bool, #[structopt(short = "o", long = "primary")] /// Only route through the primary star of a system primary: bool, #[structopt(short = "f", long = "full_permute", conflicts_with = "permute")] /// Permute all hops to find shortest route full_permute: bool, #[structopt(short = "g", long = "factor")] /// Greedyness factor for A-Star (0=BFS, inf=Greedy) factor: Option, #[structopt( short, long, raw(possible_values = "&[\"bfs\", \"greedy\",\"astar\"]"), default_value = "bfs" )] /// Search mode /// /** - BFS is guaranteed to find the shortest route but very slow - Greedy is a lot faster but will probably not find the shortest route - A-Star is a good middle ground between speed and accuracy */ mode: Mode, /// Systems to route through systems: Vec, } fn dist2(p1: &[f32; 3], p2: &[f32; 3]) -> f32 { let dx = p1[0] - p2[0]; let dy = p1[1] - p2[1]; let dz = p1[2] - p2[2]; return dx * dx + dy * dy + dz * dz; } fn dist(p1: &[f32; 3], p2: &[f32; 3]) -> f32 { return dist2(p1, p2).sqrt(); } fn fcmp(a: f32, b: f32) -> Ordering { match (a, b) { (x, y) if x.is_nan() && y.is_nan() => Ordering::Equal, (x, _) if x.is_nan() => Ordering::Greater, (_, y) if y.is_nan() => Ordering::Less, (..) => a.partial_cmp(&b).unwrap(), } } impl System { pub fn dist2(&self, p: &[f32; 3]) -> f32 { return dist2(&self.pos, p); } pub fn distp(&self, p: &System) -> f32 { return dist(&self.pos, &p.pos); } pub fn distp2(&self, p: &System) -> f32 { return self.dist2(&p.pos); } } impl PartialEq for System { fn eq(&self, other: &Self) -> bool { self.id == other.id } } impl Eq for System {} impl Hash for System { fn hash(&self, state: &mut H) { self.id.hash(state); } } impl RTreeObject for System { type Envelope = AABB<[f32; 3]>; fn envelope(&self) -> Self::Envelope { return AABB::from_point(self.pos); } } impl PointDistance for System { fn distance_2(&self, point: &[f32; 3]) -> f32 { return self.dist2(&point); } } fn hash_file(path: &PathBuf) -> Vec { let mut hash_reader = BufReader::new(File::open(path).unwrap()); let mut hasher = Sha3_256::new(); std::io::copy(&mut hash_reader, &mut hasher).unwrap(); hasher.result().iter().map(|v| *v).collect() } #[derive(Deserialize, Serialize)] struct Router { tree: RTree, scoopable: FnvHashSet, route_tree: Option>, range: f32, primary_only: bool, } impl Router { pub fn new(path: &PathBuf, range: f32, primary_only: bool) -> Self { let mut scoopable = FnvHashSet::default(); let mut reader = csv::ReaderBuilder::new() .from_path(path) .unwrap_or_else(|e| { println!("Error opening {}: {}", path.to_str().unwrap(), e); std::process::exit(1); }); let t_load = Instant::now(); println!("Loading {}...", path.to_str().unwrap()); let systems: Vec = reader .deserialize::() .map(|res| res.unwrap()) .filter(|sys| { if primary_only { sys.distance == 0 } else { true } }) .map(|sys| { if sys.mult > 1.0f32 { scoopable.insert(sys.id); } else { for c in "KGBFOAM".chars() { if sys.star_type.starts_with(c) { scoopable.insert(sys.id); break; } } } return System { id: sys.id, star_type: sys.star_type, name: sys.name, mult: sys.mult, distance: sys.distance, pos: [sys.x, sys.y, sys.z], }; }) .collect(); println!("Building RTree..."); let ret = Self { tree: RTree::bulk_load(systems), scoopable, route_tree: None, range, primary_only, }; println!( "{} Systems loaded in {}", ret.tree.size(), format_duration(t_load.elapsed()) ); return ret; } pub fn from_file(filename: &PathBuf) -> Self { let t_load = Instant::now(); let mut reader = BufReader::new(File::open(&filename).unwrap()); println!("Loading {}", filename.to_str().unwrap()); let (primary, range, file_hash, path, route_tree): ( bool, f32, Vec, String, FnvHashMap, ) = bincode::deserialize_from(&mut reader).unwrap(); let path = PathBuf::from(path); println!("Done in {}!", format_duration(t_load.elapsed())); if hash_file(&path) != file_hash { panic!("File hash mismatch!") } let mut rtr = Self::new(&path, range, primary); rtr.route_tree = Some(route_tree); return rtr; } fn closest(&self, point: &[f32; 3]) -> &System { return self.tree.nearest_neighbor(point).unwrap(); } fn points_in_sphere(&self, center: &[f32; 3], radius: f32) -> impl Iterator { return self.tree.locate_within_distance(*center, radius * radius); } fn neighbours(&self, sys: &System, r: f32) -> impl Iterator { return self.points_in_sphere(&sys.pos, sys.mult * r); } fn valid(&self, sys: &System) -> bool { return self.scoopable.contains(&sys.id); } pub fn best_name_multiroute( &self, waypoints: &[String], range: f32, full: bool, mode: Mode, factor: f32, ) -> Vec { let mut best_score: f32 = std::f32::MAX; let mut waypoints = waypoints.to_owned(); let mut best_permutation_waypoints = waypoints.to_owned(); let first = waypoints.first().cloned(); let last = waypoints.last().cloned(); let t_start = Instant::now(); println!("Finding best permutation of hops..."); while waypoints.prev_permutation() {} loop { let c_first = waypoints.first().cloned(); let c_last = waypoints.last().cloned(); if full || ((c_first == first) && (c_last == last)) { let mut total_d = 0.0; for pair in waypoints.windows(2) { match pair { [src, dst] => { let (mut src, dst) = (self.name_to_systems(&src), self.name_to_systems(&dst)); src.sort_by_key(|&p| (p.mult * 10.0) as u8); let src = src.last().unwrap(); let dst = dst.last().unwrap(); total_d += src.distp2(dst); } _ => panic!("Invalid routing parameters!"), } } if total_d < best_score { best_score = total_d; best_permutation_waypoints = waypoints.to_owned(); } } if !waypoints.next_permutation() { break; } } println!("Done in {}!", format_duration(t_start.elapsed())); println!("Best permutation: {:?}", best_permutation_waypoints); return self.name_multiroute(&best_permutation_waypoints, range, mode, factor); } pub fn name_multiroute( &self, waypoints: &[String], range: f32, mode: Mode, factor: f32, ) -> Vec { let mut coords = Vec::new(); for p_name in waypoints { let mut p_l = self.name_to_systems(p_name); p_l.sort_by_key(|&p| (p.mult * 10.0) as u8); let p = p_l.last().unwrap(); coords.push((p_name, p.pos)); } return self.multiroute(coords.as_slice(), range, mode, factor); } pub fn multiroute( &self, waypoints: &[(&String, [f32; 3])], range: f32, mode: Mode, factor: f32, ) -> Vec { let mut route: Vec = Vec::new(); for pair in waypoints.windows(2) { match *pair { [src, dst] => { let block = match mode { Mode::BFS => self.route_bfs(&src, &dst, range), Mode::Greedy => self.route_greedy(&src, &dst, range), Mode::AStar => self.route_astar(&src, &dst, range, factor), }; if route.is_empty() { for sys in block.iter() { route.push(sys.clone()); } } else { for sys in block.iter().skip(1) { route.push(sys.clone()); } } } _ => panic!("Invalid routing parameters!"), } } return route; } fn name_to_systems(&self, name: &str) -> Vec<&System> { for sys in &self.tree { if sys.name == name { return self.neighbours(&sys, 0.0).collect(); } } eprintln!("Sytem not found: \"{}\"", name); std::process::exit(1); } pub fn route_astar( &self, src: &(&String, [f32; 3]), dst: &(&String, [f32; 3]), range: f32, factor: f32, ) -> Vec { if factor == 0.0 { return self.route_bfs(src, dst, range); } println!("Running A-Star with greedy factor of {}", factor); let (src_name, src) = src; let (dst_name, dst) = dst; let start_sys = self.closest(src); let goal_sys = self.closest(dst); { let d = dist(src, dst); println!("Plotting route from {} to {}...", src_name, dst_name); println!( "Jump Range: {} Ly, Distance: {} Ly, Theoretical Jumps: {}", range, d, d / range ); } let total = self.tree.size() as f32; let mut prev = FnvHashMap::default(); let mut seen = FnvHashSet::default(); let t_start = Instant::now(); let mut found = false; let mut maxd = 0; let mut queue: Vec<(usize, usize, &System)> = Vec::new(); queue.push(( 0, // depth (start_sys.distp(goal_sys) / range) as usize, // h &start_sys, )); seen.insert(start_sys.id); while !(queue.is_empty() || found) { while let Some((depth, _, sys)) = queue.pop() { if depth > maxd { maxd = depth; print!( "[{}] Depth: {}, Queue: {}, Seen: {} ({:.02}%) \r", format_duration(t_start.elapsed()), depth, queue.len(), seen.len(), ((seen.len() * 100) as f32) / total ); std::io::stdout().flush().unwrap(); } if sys.id == goal_sys.id { found = true; break; } queue.extend( self.neighbours(&sys, range) .filter(|&nb| (self.valid(nb) || (nb.id == goal_sys.id))) .filter(|&nb| seen.insert(nb.id)) .map(|nb| { prev.insert(nb.id, sys); let d_g = (nb.distp(goal_sys) / range) as usize; return (depth + 1, d_g, nb); }), ); queue.sort_by(|b, a| { let (a_0, a_1) = (a.0 as f32, a.1 as f32); let (b_0, b_1) = (b.0 as f32, b.1 as f32); let v_a = a_0 + a_1 * factor; let v_b = b_0 + b_1 * factor; return fcmp(v_a, v_b); }); // queue.reverse(); } } println!(); println!(); if !found { eprintln!("No route from {} to {} found!", src_name, dst_name); return Vec::new(); } let mut v: Vec = Vec::new(); let mut curr_sys = goal_sys; loop { v.push(curr_sys.clone()); match prev.get(&curr_sys.id) { Some(sys) => curr_sys = *sys, None => { break; } } } v.reverse(); return v; } pub fn route_greedy( &self, src: &(&String, [f32; 3]), dst: &(&String, [f32; 3]), range: f32, ) -> Vec { println!("Running Greedy-Search"); let (src_name, src) = src; let (dst_name, dst) = dst; let start_sys = self.closest(src); let goal_sys = self.closest(dst); { let d = dist(src, dst); println!("Plotting route from {} to {}...", src_name, dst_name); println!( "Jump Range: {} Ly, Distance: {} Ly, Theoretical Jumps: {}", range, d, d / range ); } let total = self.tree.size() as f32; let mut prev = FnvHashMap::default(); let mut seen = FnvHashSet::default(); let t_start = Instant::now(); let mut found = false; let mut maxd = 0; let mut queue: Vec<(f32, f32, usize, &System)> = Vec::new(); queue.push((-goal_sys.mult, start_sys.distp2(goal_sys), 0, &start_sys)); seen.insert(start_sys.id); while !(queue.is_empty() || found) { while let Some((_, _, depth, sys)) = queue.pop() { if depth > maxd { maxd = depth; print!( "[{}] Depth: {}, Queue: {}, Seen: {} ({:.02}%) \r", format_duration(t_start.elapsed()), depth, queue.len(), seen.len(), ((seen.len() * 100) as f32) / total ); std::io::stdout().flush().unwrap(); } if sys.id == goal_sys.id { found = true; break; } queue.extend( self.neighbours(&sys, range) .filter(|&nb| (self.valid(nb) || (nb.id == goal_sys.id))) .filter(|&nb| seen.insert(nb.id)) .map(|nb| { prev.insert(nb.id, sys); return (-nb.mult, nb.distp2(goal_sys), depth + 1, nb); }), ); queue.sort_by(|a, b| fcmp(a.0, b.0).then(fcmp(a.1, b.1))); queue.reverse(); } } println!(); println!(); if !found { eprintln!("No route from {} to {} found!", src_name, dst_name); return Vec::new(); } let mut v: Vec = Vec::new(); let mut curr_sys = goal_sys; loop { v.push(curr_sys.clone()); match prev.get(&curr_sys.id) { Some(sys) => curr_sys = *sys, None => { break; } } } v.reverse(); return v; } pub fn precompute(&mut self, src: &String) { println!("Precomputing route starting at {} ...", src); let mut sys_l = self.name_to_systems(src); sys_l.sort_by_key(|&sys| (sys.mult * 10.0) as u8); let sys = sys_l.last().unwrap(); let total = self.tree.size() as f32; let mut prev = FnvHashMap::default(); let mut seen = FnvHashSet::default(); let t_start = Instant::now(); let mut depth = 0; let mut queue: VecDeque<(usize, &System)> = VecDeque::new(); let mut queue_next: VecDeque<(usize, &System)> = VecDeque::new(); queue.push_front((0, &sys)); seen.insert(sys.id); while !queue.is_empty() { print!( "[{}] Depth: {}, Queue: {}, Seen: {} ({:.02}%) \r", format_duration(t_start.elapsed()), depth, queue.len(), seen.len(), ((seen.len() * 100) as f32) / total ); std::io::stdout().flush().unwrap(); while let Some((d, sys)) = queue.pop_front() { queue_next.extend( self.neighbours(&sys, self.range) .filter(|&nb| seen.insert(nb.id)) .map(|nb| { prev.insert(nb.id, sys.id); return (d + 1, nb); }), ); } std::mem::swap(&mut queue, &mut queue_next); depth += 1; } self.route_tree = Some(prev); } pub fn route_to(&mut self, dst: &str) -> Vec { let mut id_map: FnvHashMap = FnvHashMap::default(); let mut id_set: FnvHashSet = FnvHashSet::default(); let prev = self.route_tree.as_ref().unwrap(); let mut dst = self.name_to_systems(dst); dst.sort_by_key(|&p| (p.mult * 10.0) as u8); let dst: System = dst.last().cloned().unwrap().clone(); if !prev.contains_key(&dst.id) { eprintln!("System-ID {} not found", dst.id); std::process::exit(1); }; let mut v_ids: Vec = Vec::new(); let mut v: Vec = Vec::new(); let mut curr_sys: u32 = dst.id; loop { v_ids.push(curr_sys); id_set.insert(curr_sys); match prev.get(&curr_sys) { Some(sys_id) => curr_sys = *sys_id, None => { break; } } } v_ids.reverse(); for sys in &self.tree { if id_set.contains(&sys.id) { id_map.insert(sys.id, &sys); } } for sys_id in v_ids { let sys = *(id_map.get(&sys_id).unwrap()); v.push(sys.clone()) } return v; } pub fn route_bfs( &self, src: &(&String, [f32; 3]), dst: &(&String, [f32; 3]), range: f32, ) -> Vec { println!("Running BFS"); let (src_name, src) = src; let (dst_name, dst) = dst; let start_sys = self.closest(src); let goal_sys = self.closest(dst); { let d = dist(src, dst); println!("Plotting route from {} to {}...", src_name, dst_name); println!( "Jump Range: {} Ly, Distance: {} Ly, Theoretical Jumps: {}", range, d, d / range ); } let total = self.tree.size() as f32; let mut prev = FnvHashMap::default(); let mut seen = FnvHashSet::default(); let t_start = Instant::now(); let mut depth = 0; let mut found = false; let mut queue: VecDeque<(usize, &System)> = VecDeque::new(); let mut queue_next: VecDeque<(usize, &System)> = VecDeque::new(); queue.push_front((0, &start_sys)); seen.insert(start_sys.id); while !(queue.is_empty() || found) { print!( "[{}] Depth: {}, Queue: {}, Seen: {} ({:.02}%) \r", format_duration(t_start.elapsed()), depth, queue.len(), seen.len(), ((seen.len() * 100) as f32) / total ); std::io::stdout().flush().unwrap(); while let Some((d, sys)) = queue.pop_front() { if sys.id == goal_sys.id { found = true; break; } queue_next.extend( self.neighbours(&sys, range) .filter(|&nb| (self.valid(nb) || (nb.id == goal_sys.id))) .filter(|&nb| seen.insert(nb.id)) .map(|nb| { prev.insert(nb.id, sys); return (d + 1, nb); }), ); } std::mem::swap(&mut queue, &mut queue_next); depth += 1; } println!(); println!(); if !found { eprintln!("No route from {} to {} found!", src_name, dst_name); return Vec::new(); } let mut v: Vec = Vec::new(); let mut curr_sys = goal_sys; loop { v.push(curr_sys.clone()); match prev.get(&curr_sys.id) { Some(sys) => curr_sys = *sys, None => { break; } } } v.reverse(); return v; } } fn main() { let t_start = Instant::now(); let opts = Opts::from_args(); if opts.systems.len() == 0 { if opts.precomp_file.is_some() { eprintln!("Error: Please specify exatly one system"); } else { if opts.precompute { eprintln!("Error: Please specify at least one system"); } else { eprintln!("Error: Please specify at least two systems"); } } std::process::exit(1); } let path = opts.file_path; let mut router: Router = if opts.precomp_file.is_some() { Router::from_file(&opts.precomp_file.unwrap()) } else { Router::new(&path, opts.range.unwrap(), opts.primary) }; if opts.precompute { for sys in opts.systems { router.route_tree = None; router.precompute(&sys); let ofn = format!( "{}_{}{}.router", sys.replace("*", "").replace(" ", "_"), opts.range.unwrap(), if router.primary_only { "_primary" } else { "" } ); println!("\nSaving to {}", ofn); let mut out_fh = BufWriter::new(File::create(&ofn).unwrap()); // (range, path, route_tree) let data = ( router.primary_only, router.range, hash_file(&path), String::from(path.to_str().unwrap()), router.route_tree.unwrap(), ); bincode::serialize_into(&mut out_fh, &data).unwrap(); } std::process::exit(0); } let t_route = Instant::now(); let route = if router.route_tree.is_some() { router.route_to(opts.systems.first().unwrap()) } else { if opts.permute || opts.full_permute { router.best_name_multiroute( &opts.systems, opts.range.unwrap(), opts.full_permute, opts.mode, opts.factor.unwrap_or(1.0), ) } else { router.name_multiroute( &opts.systems, opts.range.unwrap(), opts.mode, opts.factor.unwrap_or(1.0), ) } }; println!("Route computed in {}\n", format_duration(t_route.elapsed())); if route.is_empty() { eprintln!("No route found!"); return; } let mut total: f32 = 0.0; for (sys1, sys2) in route.iter().zip(route.iter().skip(1)) { let dist = sys1.distp(sys2); total += dist; println!( "{} [{}] ({},{},{}) [{} Ls]: {:.2} Ly", sys1.name, sys1.star_type, sys1.pos[0], sys1.pos[1], sys1.pos[2], sys1.distance, dist ); } let sys = route.iter().last().unwrap(); println!( "{} [{}] ({},{},{}) [{} Ls]: {:.2} Ly", sys.name, sys.star_type, sys.pos[0], sys.pos[1], sys.pos[2], sys.distance, 0.0 ); println!("Total: {:.2} Ly ({} Jumps)", total, route.len()); println!("Total time: {}", format_duration(t_start.elapsed())); }