diff options
Diffstat (limited to 'kscurses/print.jai')
| -rw-r--r-- | kscurses/print.jai | 148 |
1 files changed, 0 insertions, 148 deletions
diff --git a/kscurses/print.jai b/kscurses/print.jai deleted file mode 100644 index a023fea..0000000 --- a/kscurses/print.jai +++ /dev/null @@ -1,148 +0,0 @@ -ks_bell :: () { - bell_str : string; - bell := 7; - bell_str.data, bell_str.count = xx *bell, 1; - ks_write(bell_str); -} - -ui_bell :: inline () { - #if ENABLE_UI_BELL ks_bell(); -} - - -b_move_cursor :: inline (builder : *String_Builder, coord : ivec2) { - print_to_builder(builder, "\e[%;%H", coord.y + 1, coord.x + 1); -} -t_move_cursor :: inline (coord : ivec2) -> string { - return tprint("\e[%;%H", coord.y, coord.x); -} -ks_move_cursor :: inline (coord : ivec2) { - ks_write(tprint("\e[%;%H", coord.y + 1, coord.x + 1)); -} -b_cursor_set_visibility :: inline (builder : *String_Builder, $$visible : bool) { - append(builder, ifx visible "\e[?25h" else "\e[?25l"); -} - -b_print :: (builder : *String_Builder, coord : ivec2, mode : Graphics_Mode, fmt : string, args : ..Any) { - if coord != .{-1, -1} b_move_cursor(builder, coord); - b_mode_set(builder, mode); - print_to_builder(builder, fmt, ..args); -} -t_print :: (coord : ivec2, mode : Graphics_Mode, fmt : string, args : ..Any) -> string { - builder := String_Builder.{allocator = temp}; - b_print(*builder, coord, mode, fmt, ..args); - return builder_to_string(*builder, temp); -} -ks_print :: inline (coord : ivec2, mode : Graphics_Mode, fmt : string, args : ..Any) { - ks_write(t_print(coord, mode, fmt, ..args)); -} - - -b_clear_screen :: (builder : *String_Builder) { - append(builder, "\e[2J"); -} -t_clear_screen :: inline () -> string { - return "\e[2J"; -} -ks_clear_screen :: inline () { - ks_write("\e[2J"); -} - - -b_esc_m :: inline (builder : *String_Builder, $$code : int) { - print_to_builder(builder, "\e[%m", code); -} -t_esc_m :: inline ($$code : int) -> string { - return tprint("\e[%m", code); -} -ks_esc_m :: inline ($$code : int) { - ks_write(t_esc_m(code)); -} - - -#scope_file -b_mode_difference :: (builder : *String_Builder, prev : Graphics_Mode, using current : Graphics_Mode) { - printed_first := false; - add_code :: (code : u8) #expand { - // assert(code != xx Attr.BOLD); - // assert(code != xx Attr.DIM); - if printed_first { - print_to_builder(builder, ";%", code); - } else { - print_to_builder(builder, "\e[%", code); - printed_first = true; - } - } - add_code_on_off :: (prev : bool, current : bool, on_code : Attr, off_code : Attr) #expand { - if prev != current add_code(xx(ifx current on_code else off_code)); - } - if foreground != prev.foreground || fcol256 != prev.fcol256 { - if foreground != Color.COLOR256 { - add_code(xx foreground); - } else { - add_code(38); add_code(5); add_code(xx fcol256); - } - } - if background != prev.background || bcol256 != prev.bcol256 { - if background != (Color.COLOR256 + 10) { - add_code(xx background); - } else { - add_code(48); add_code(5); add_code(xx bcol256); - } - } - if (prev.attr_flags & 1) != (attr_flags & 1) || (prev.attr_flags & 2) != (attr_flags & 2) { - off0 := (prev.attr_flags & 1) && !(attr_flags & 1); - off1 := (prev.attr_flags & 2) && !(attr_flags & 2); - if off0 || off1 { - add_code(xx Attr.BOLD_AND_DIM_OFF); - if (attr_flags & 1) add_code(xx Attr.BOLD); - if (attr_flags & 2) add_code(xx Attr.DIM); - } else { - if (attr_flags & 1) && !(prev.attr_flags & 1) add_code(xx Attr.BOLD); - if (attr_flags & 2) && !(prev.attr_flags & 2) add_code(xx Attr.DIM); - } - } - add_code_on_off(xx prev.attr_flags & 4, xx attr_flags & 4, .ITALIC, .ITALIC_OFF); - add_code_on_off(xx prev.attr_flags & 8, xx attr_flags & 8, .UNDERLINE, .UNDERLINE_OFF); - add_code_on_off(xx prev.attr_flags & 16, xx attr_flags & 16, .BLINKING, .BLINKING_OFF); - add_code_on_off(xx prev.attr_flags & 32, xx attr_flags & 32, .INVERSE, .INVERSE_OFF); - add_code_on_off(xx prev.attr_flags & 64, xx attr_flags & 64, .STRIKETHROUGH, .STRIKETHROUGH_OFF); - if printed_first append(builder, "m"); -} -#scope_export - -//TODO update_state := true -b_mode_set :: (builder : *String_Builder, using mode : Graphics_Mode, update_state := true) { - b_mode_difference(builder, terminal_state.last_mode, mode); - if update_state terminal_state.last_mode = mode; -} -t_mode_set :: (mode : Graphics_Mode, update_state := true) -> string { - builder := String_Builder.{allocator = temp}; - b_mode_set(*builder, mode, update_state); - return builder_to_string(*builder, temp); -} - -ks_mode_reset :: (update_state := true) { - ks_write("\e[0m"); - if update_state terminal_state.last_mode = .{}; -} -t_mode_reset :: inline (update_state := true) -> string { - if update_state terminal_state.last_mode = .{}; - return "\e[0m"; -} -b_mode_reset :: inline (builder : *String_Builder, update_state := true) { - if update_state terminal_state.last_mode = .{}; - append(builder, "\e[0m"); -} - -b_putchar :: (builder : *String_Builder, c : Char) { - b_mode_set(builder, c.mode); - b_putchar(builder, c.code); -} - -b_putchar :: inline (builder : *String_Builder, code : u64) { - char_str : string; - char_str.data = xx *(code); - char_str.count = length_code(code); - append(builder, char_str); -} |