pistonite-cu 0.9.1

#[cfg(feature = "prompt")]
use std::collections::VecDeque;
use std::io::{self, IsTerminal as _};
use std::ops::ControlFlow;
use std::sync::{Arc, Mutex, Weak};
use std::thread::JoinHandle;

#[cfg(feature = "prompt")]
use oneshot::{Receiver as OnceRecv, Sender as OnceSend};

#[cfg(feature = "prompt")]
use crate::cli::ctrlc;
use crate::cli::fmt::{self, FormatBuffer, ansi};
use crate::cli::progress::{BarFormatter, BarResult, ProgressBar};
#[cfg(feature = "prompt")]
use crate::cli::prompter;
use crate::cli::{THREAD_NAME, TICK_INTERVAL, Tick};
use crate::lv;

/// Global printer state
pub(crate) static PRINTER: Mutex<Option<Printer>> = Mutex::new(None);
pub(crate) struct Printer {
    #[allow(unused)]
    is_stdin_terminal: bool,
    /// Handle to stdout
    stdout: io::Stdout,
    /// Handle to stderr
    stderr: io::Stderr,
    /// Color codes
    colors: ansi::Colors,

    print_task: PrintingThreadHandle,
    /// Target for showing animation (bars and prompts)
    /// If None, bar animation will not be printed, and prompts
    /// will still be printed to stderr
    anime_target: Option<Target>,
    bars: Vec<Weak<ProgressBar>>,
    #[cfg(feature = "prompt")]
    pending_prompts: VecDeque<PromptTask>,

    /// Buffer for automatically do certain formatting
    format_buffer: FormatBuffer,
    /// Place to buffer prints while printing is blocked
    buffered: String,
}
impl Printer {
    pub fn new(use_color: bool) -> Self {
        let colors = ansi::colors(use_color);
        let stdout = io::stdout();
        let stderr = io::stderr();
        let is_stdin_terminal = io::stdin().is_terminal();
        let anime_target = if cfg!(feature = "__test") {
            Some(Target::Stdout)
        } else {
            if stdout.is_terminal() {
                Some(Target::Stdout)
            } else if stderr.is_terminal() {
                Some(Target::Stderr)
            } else {
                None
            }
        };

        Self {
            is_stdin_terminal,
            stdout,
            stderr,
            colors,

            print_task: Default::default(),
            anime_target,
            bars: Default::default(),
            #[cfg(feature = "prompt")]
            pending_prompts: Default::default(),

            format_buffer: FormatBuffer::new(),
            buffered: String::new(),
        }
    }
    #[cfg(feature = "prompt")]
    pub(crate) fn show_prompt(
        &mut self,
        prompt: &str,
        is_password: bool,
    ) -> OnceRecv<cu::Result<Option<cu::ZString>>> {
        // format the prompt
        let mut lines = prompt.lines();
        self.format_buffer.reset(self.colors.gray, self.colors.cyan);
        self.format_buffer.push_control(self.colors.cyan);
        self.format_buffer.push('!', 1);
        self.format_buffer.push(']', 1);
        if let Some(line) = lines.next() {
            self.format_buffer.push(' ', 1);
            self.format_buffer.push_str(line);
        }
        for line in lines {
            self.format_buffer.new_line();
            self.format_buffer.push_str(line);
        }
        if is_password {
            self.format_buffer.push_str(": ");
        } else {
            self.format_buffer.push_lf();
            self.format_buffer.push_control(self.colors.reset);
            self.format_buffer.push_control("-: ");
        }

        let (send, recv) = oneshot::channel();
        self.pending_prompts.push_back(PromptTask {
            send,
            prompt: self.format_buffer.take(),
            is_password,
        });
        self.start_print_task_if_needed();
        recv
    }

    /// Spawn a progress bar, starting a print task if not already
    pub(crate) fn add_progress_bar(&mut self, bar: &Arc<ProgressBar>) {
        if lv::PRINT_LEVEL.get() < lv::Print::Quiet {
            return;
        }
        if self.anime_target.is_none() {
            return;
        }
        // start the bar
        self.bars.push(Arc::downgrade(bar));
        self.start_print_task_if_needed();
    }

    fn start_print_task_if_needed(&mut self) {
        if !self.print_task.active() {
            self.print_task.join();
            self.print_task.assign(PrintingThread::spawn());
        }
    }
    /// Print a progress bar done message
    pub(crate) fn print_bar_done(&mut self, result: &BarResult, is_root: bool) {
        if lv::PRINT_LEVEL.get() < lv::Print::Normal {
            return;
        }
        if !is_root && self.anime_target.is_some() {
            // if bar is animated, don't print child's done messages
            return;
        }
        let message = match result {
            BarResult::DontKeep => return,
            BarResult::Done(message) => {
                self.format_buffer
                    .reset(self.colors.gray, self.colors.green);
                self.format_buffer.push_control(self.colors.green);
                message
            }
            BarResult::Interrupted(message) => {
                self.format_buffer
                    .reset(self.colors.gray, self.colors.yellow);
                self.format_buffer.push_control(self.colors.yellow);
                message
            }
        };
        self.format_buffer.push_control("\u{283f}]");
        if !message.starts_with('[') {
            self.format_buffer.push_control(" ");
        }
        self.format_buffer.push_str(message);
        self.format_buffer.push_lf();
        self.print_format_buffer();
    }

    /// Format and print the message
    pub(crate) fn print_message(&mut self, lv: lv::Lv, message: &str) {
        let mut lines = message.lines();
        let text_color = match lv {
            lv::Lv::Off => return,
            lv::Lv::Error => self.colors.red,
            lv::Lv::Hint => self.colors.yellow,
            lv::Lv::Print => self.colors.reset,
            lv::Lv::Warn => self.colors.yellow,
            lv::Lv::Info => self.colors.reset,
            lv::Lv::Debug => self.colors.cyan,
            lv::Lv::Trace => self.colors.magenta,
        };
        self.format_buffer.reset(self.colors.gray, text_color);
        match lv {
            lv::Lv::Off => unreachable!(),
            lv::Lv::Error => {
                self.format_buffer.push_control(self.colors.red);
                self.format_buffer.push('E', 1);
                self.format_buffer.push(']', 1);
            }
            lv::Lv::Hint => {
                self.format_buffer.push_control(self.colors.cyan);
                self.format_buffer.push('H', 1);
                self.format_buffer.push_control(self.colors.gray);
                self.format_buffer.push(']', 1);
            }
            lv::Lv::Print => {
                self.format_buffer.push_control(self.colors.gray);
                self.format_buffer.push(':', 1);
                self.format_buffer.push(':', 1);
            }
            lv::Lv::Warn => {
                self.format_buffer.push_control(self.colors.yellow);
                self.format_buffer.push('W', 1);
                self.format_buffer.push(']', 1);
            }
            lv::Lv::Info => {
                self.format_buffer.push_control(self.colors.green);
                self.format_buffer.push('I', 1);
                self.format_buffer.push_control(self.colors.gray);
                self.format_buffer.push(']', 1);
            }
            lv::Lv::Debug => {
                self.format_buffer.push_control(self.colors.gray);
                self.format_buffer.push('D', 1);
                self.format_buffer.push(']', 1);
            }
            lv::Lv::Trace => {
                self.format_buffer.push_control(self.colors.magenta);
                self.format_buffer.push('*', 1);
                self.format_buffer.push(']', 1);
            }
        }
        THREAD_NAME.with_borrow(|x| {
            if let Some(x) = x {
                self.format_buffer.push_control(self.colors.magenta);
                self.format_buffer.push('[', 1);
                self.format_buffer.push_str(x);
                self.format_buffer.push(']', 1);
            }
        });
        self.format_buffer.push_control(text_color);
        if let Some(line) = lines.next() {
            self.format_buffer.push(' ', 1);
            self.format_buffer.push_str(line);
        }
        for line in lines {
            self.format_buffer.new_line();
            self.format_buffer.push_str(line);
        }
        self.format_buffer.push_lf();
        self.print_format_buffer();
    }
    fn print_format_buffer(&mut self) {
        if !self.print_task.active() {
            use std::io::Write;
            let _ = write!(self.stdout, "{}", self.format_buffer.as_str());
            let _ = self.stdout.flush();
        } else {
            self.buffered.push_str(self.format_buffer.as_str());
        }
    }
    fn flush_buffered_to_stdout(&mut self) {
        use std::io::Write as _;
        let _ = write!(self.stdout, "{}", self.buffered);
        let _ = self.stdout.flush();
        self.buffered.clear();
    }

    pub(crate) fn take_print_task_if_should_join(&mut self) -> Option<JoinHandle<()>> {
        if self.print_task.needs_join {
            return self.print_task.take();
        }
        // if there are no bars and no prompts, then eventually the task will end
        // we have to check the strong count and not the bars size, because
        // we need to force the last bar to join the printing thread before
        // the program exits
        let bar_strong_count = self.bars.iter().filter(|x| x.upgrade().is_some()).count();
        if bar_strong_count != 0 {
            return None;
        }
        #[cfg(feature = "prompt")]
        if !self.pending_prompts.is_empty() {
            return None;
        }
        self.print_task.take()
    }
}

#[cfg(feature = "prompt")]
struct PromptTask {
    send: OnceSend<cu::Result<Option<cu::ZString>>>,
    prompt: String,
    is_password: bool,
}

/// For synchornizing with the printer
#[derive(Default)]
struct PrintingThreadHandle {
    needs_join: bool,
    /// Handle for the printing task, None means
    /// either no printing task is running, or, the printing
    /// task is terminating
    handle: Option<JoinHandle<()>>,
}
impl PrintingThreadHandle {
    /// Take the handle for joining
    fn take(&mut self) -> Option<JoinHandle<()>> {
        self.needs_join = false;
        self.handle.take()
    }
    /// Mark the task as will end, so it can be joined
    fn mark_join(&mut self) {
        self.needs_join = true;
    }
    /// If the task is active
    fn active(&self) -> bool {
        !self.needs_join && self.handle.is_some()
    }
    /// Blockingly join the task on the current thread
    fn join(&mut self) {
        self.needs_join = false;
        if let Some(handle) = self.handle.take() {
            let _: Result<_, _> = handle.join();
        }
    }
    /// Assign a new handle
    fn assign(&mut self, handle: Option<JoinHandle<()>>) {
        self.needs_join = handle.is_none();
        self.handle = handle;
    }
}

struct PrintingThread {
    /// main buffer to format outputs into
    buffer: String,
    /// temporary buffer to help formatting stuff
    temp: String,
    /// track how many lines are animated
    /// i.e. needs to be erased on the next cycle
    lines: i32,
    /// animation tick counter
    tick: Tick,
}

impl PrintingThread {
    fn spawn() -> Option<JoinHandle<()>> {
        std::thread::Builder::new()
            .name("cu-printer".to_string())
            .spawn(move || {
                let mut state = PrintingThread {
                    buffer: String::new(),
                    temp: String::new(),
                    lines: 0,
                    tick: 0,
                };
                loop {
                    match state.run_loop() {
                        ControlFlow::Break(_) => break,
                        _ => {
                            std::thread::sleep(TICK_INTERVAL);
                            state.tick = state.tick.wrapping_add(1);
                        }
                    };
                }
            })
            .ok()
    }
    fn run_loop(&mut self) -> ControlFlow<()> {
        // first check if there are any pending prompts
        // scope for locking the printer for checking prompts
        #[cfg(not(feature = "prompt"))]
        let mut printer_guard = {
            let Ok(printer_guard) = PRINTER.lock() else {
                return ControlFlow::Break(());
            };
            printer_guard
        };
        #[cfg(feature = "prompt")]
        let mut printer_guard = {
            let Ok(mut printer_guard) = PRINTER.lock() else {
                return ControlFlow::Break(());
            };
            let Some(printer) = printer_guard.as_mut() else {
                return ControlFlow::Break(());
            };
            let is_stdin_terminal = printer.is_stdin_terminal;
            // extract the next prompt task
            let task = printer.pending_prompts.pop_front();
            if let Some(mut task) = task {
                use std::io::Write as _;
                // if a task exists, check if there are any currently buffered messages
                // while the print thread is active, code might print some messages
                // which will be buffered, then call prompt.
                // we need to ensure those messages are displayed before the prompt
                // note if the buffer is currently empty, then
                // we can save the extra cost of re-print the bars and just proceed
                // with the prompt
                if printer.anime_target.is_none() {
                    if !printer.buffered.is_empty() {
                        printer.flush_buffered_to_stdout();
                    }
                    // still print the prompt to stderr, but don't print control characters
                    let _ = write!(printer.stderr, "{}", task.prompt);
                    let _ = printer.stderr.flush();
                    // now the prompt is printed, we can drop the print guard while blocking
                    // for user input
                    drop(printer_guard);
                    // process this prompt
                    let result = read_prompt(&task);
                    // since there is no animation, we don't need to re-print the prompt
                    // send the result of the prompt
                    let _ = task.send.send(result);
                } else {
                    if !printer.buffered.is_empty() {
                        // clear previous bars and prompts
                        self.format_clear_codes();
                        // print buffered messages to stdout
                        // this won't cause conflict with stderr
                        // because animation will also print to stdout
                        // if stdout is terminal
                        self.flush_buffered(printer);
                        self.format_bars(printer);
                    }
                    self.buffer.push_str("\r\x1b[K"); // erase the last spacing line
                    self.buffer.push_str(&task.prompt);
                    self.print_buffer_to_anime_target(printer);

                    // now the prompt is printed, we can drop the print guard while blocking
                    // for user input
                    drop(printer_guard);

                    // we know the prompt string does not end with a new line (because of
                    // the prompt prefix), so the number of lines to display
                    // is exactly .lines().count()
                    let mut l = task.prompt.lines().count() as i32;
                    // however, if stdin is not terminal, then user won't press enter,
                    // and we actually have 1 fewer line
                    // if it's password, it's always read from terminal
                    let mut no_newline_after_prompt = !is_stdin_terminal && !task.is_password;

                    // process this prompt
                    let result = read_prompt(&task);
                    if let Ok(None) = &result {
                        // user cancelled, so there is no newline input from the user
                        no_newline_after_prompt = true;
                    }
                    if no_newline_after_prompt {
                        l = l.saturating_sub(1)
                    }
                    self.lines += l;

                    // now we need to re-print the prompt above the progress bars
                    // by adding it to the buffer
                    if !task.is_password {
                        while !task.prompt.ends_with('\n') {
                            task.prompt.pop();
                        }
                        task.prompt.pop(); // pop the final new line
                    }
                    // add the prompt to the print buffer
                    if let Ok(mut printer) = PRINTER.lock() {
                        if let Some(printer) = printer.as_mut() {
                            printer.buffered.push_str(&task.prompt);
                            printer.buffered.push('\n');
                        }
                    }
                    // send the result of the prompt
                    let _ = task.send.send(result);
                }
                // we only process one prompt at a time, let the progress bar update

                // lock the printer again for printing progress bars
                let Ok(printer_guard) = PRINTER.lock() else {
                    return ControlFlow::Break(());
                };
                printer_guard
            } else {
                printer_guard
            }
        };
        let Some(printer) = printer_guard.as_mut() else {
            return ControlFlow::Break(());
        };
        if printer.anime_target.is_some() {
            // clear previous bars and prompts
            self.format_clear_codes();
            self.flush_buffered(printer);
            self.format_bars(printer);
            self.print_buffer_to_anime_target(printer);
        } else {
            printer.flush_buffered_to_stdout();
        }
        let bars_empty = printer.bars.is_empty();
        #[cfg(feature = "prompt")]
        let prompts_empty = printer.pending_prompts.is_empty();
        #[cfg(not(feature = "prompt"))]
        let prompts_empty = true;

        if bars_empty && printer.anime_target.is_some() {
            // erase the bars
            self.format_clear_codes();
            self.print_buffer_to_anime_target(printer);
        }

        // check exit
        if bars_empty && prompts_empty {
            // nothing else to do, mark the task done,
            // so the printer knows to join this thread (after we drop the lock guard)
            // whenever someone calls, even before this thread is done
            printer.print_task.mark_join();
            // we know the printer buffer is empty
            // because we just printed all of it while having
            // the lock on the printer, no need to print again
            return ControlFlow::Break(());
        }

        ControlFlow::Continue(())
    }

    fn format_bars(&mut self, printer: &mut Printer) {
        // remeasure terminal width on every cycle
        let width = fmt::term_width_or_max();
        self.buffer.push_str(printer.colors.yellow);

        // progress bar animation chars
        #[rustfmt::skip]
        const CHARS: [char; 30] = [
            '\u{280b}', '\u{280b}', '\u{280b}', '\u{280b}', '\u{280b}',
            '\u{2819}', '\u{2819}', '\u{2819}', '\u{2819}', '\u{2819}',
            '\u{2838}', '\u{2838}', '\u{2838}', '\u{2838}', '\u{2838}',
            '\u{2834}', '\u{2834}', '\u{2834}', '\u{2834}', '\u{2834}',
            '\u{2826}', '\u{2826}', '\u{2826}', '\u{2826}', '\u{2826}',
            '\u{2807}', '\u{2807}', '\u{2807}', '\u{2807}', '\u{2807}',
        ];
        let anime = CHARS[(self.tick as usize) % CHARS.len()];

        let mut formatter = BarFormatter {
            colors: printer.colors,
            bar_color: printer.colors.yellow,
            width,
            tick: self.tick,
            now: &mut None,
            out: &mut self.buffer,
            temp: &mut self.temp,
        };

        printer.bars.retain(|bar| {
            let Some(bar) = bar.upgrade() else {
                // bar is done
                return false;
            };
            if width >= 2 {
                formatter.out.push(anime);
                formatter.out.push(']');
                self.lines += bar.format(&mut formatter);
            } else {
                formatter.out.push('\n');
                self.lines += 1;
            }

            true
        });
        self.buffer.push_str(printer.colors.reset);
    }

    /// Format codes to clear the animated part
    #[inline]
    fn format_clear_codes(&mut self) {
        self.buffer.push_str("\r\x1b[K"); // erase the last spacing line
        for _ in 0..self.lines {
            self.buffer.push_str("\x1b[1A\x1b[K"); // move up one line and erase it
        }
        self.lines = 0;
    }

    /// Print `buffer` to progress bar target
    fn print_buffer_to_anime_target(&mut self, printer: &mut Printer) {
        use std::io::Write as _;
        match printer.anime_target {
            None => {}
            Some(Target::Stdout) => {
                let _ = write!(printer.stdout, "{}", self.buffer);
                let _ = printer.stdout.flush();
            }
            Some(Target::Stderr) => {
                let _ = write!(printer.stderr, "{}", self.buffer);
                let _ = printer.stderr.flush();
            }
        }
        self.buffer.clear();
    }

    /// Flush the printer buffered messages
    fn flush_buffered(&mut self, printer: &mut Printer) {
        match printer.anime_target {
            // if the animation target is also stdout,
            // it's important that we take the buffered messages
            // into our own buffer, so we don't immediately
            // flush stdout. this prevents flushing partial output,
            // which cause the progress animation to flicker
            Some(Target::Stdout) => {
                self.buffer.push_str(&printer.buffered);
                printer.buffered.clear();
            }
            _ => {
                printer.flush_buffered_to_stdout();
            }
        }
    }
}

#[derive(Clone, Copy, PartialEq, Eq)]
enum Target {
    /// Print to Stdout
    Stdout,
    /// Print to Stderr
    Stderr,
}
#[cfg(feature = "prompt")]
fn read_prompt(task: &PromptTask) -> cu::Result<Option<cu::ZString>> {
    let is_password = task.is_password;
    let result = ctrlc::ctrlc_frame().execute(|ctrlc| {
        if is_password {
            prompter::read_password(ctrlc)
        } else {
            prompter::read_plaintext(ctrlc)
        }
    })?;
    match result {
        None | Some(None) => Ok(None),
        Some(Some(x)) => Ok(Some(x)),
    }
}