-- text editor, particularly text drawing, horizontal wrap, vertical scrolling Text = {} local utf8 = require 'utf8' require 'search' require 'select' require 'undo' require 'text_tests' -- return values: -- y coordinate drawn until in px -- position of start of final screen line drawn function Text.draw(line, line_index, top, left, right) --? print('text.draw', line_index) love.graphics.setColor(0,0,0) -- wrap long lines local x = left local y = top local pos = 1 local screen_line_starting_pos = 1 if line.fragments == nil then Text.compute_fragments(line) end Text.populate_screen_line_starting_pos(line) --? print('--') for _, f in ipairs(line.fragments) do local frag, frag_text = f.data, f.text -- render fragment local frag_width = App.width(frag_text) local frag_len = utf8.len(frag) --? local s=tostring --? print('('..s(x)..','..s(y)..') '..frag..'('..s(frag_width)..' vs '..s(right)..') '..s(line_index)..' vs '..s(Screen_top1.line)..'; '..s(pos)..' vs '..s(Screen_top1.pos)..'; bottom: '..s(Screen_bottom1.line)..'/'..s(Screen_bottom1.pos)) if x + frag_width > right then assert(x > left) -- no overfull lines -- update y only after drawing the first screen line of screen top if Text.lt1(Screen_top1, {line=line_index, pos=pos}) then y = y + Line_height if y + Line_height > App.screen.height then --? print('b', y, App.screen.height, '=>', screen_line_starting_pos) return y, screen_line_starting_pos end screen_line_starting_pos = pos --? print('text: new screen line', y, App.screen.height, screen_line_starting_pos) end x = left end --? print('checking to draw', pos, Screen_top1.pos) -- don't draw text above screen top if Text.le1(Screen_top1, {line=line_index, pos=pos}) then if Selection1.line then local lo, hi = Text.clip_selection(line_index, pos, pos+frag_len, left, right) Text.draw_highlight(line, x,y, pos, lo,hi) end --? print('drawing '..frag) App.screen.draw(frag_text, x,y) end -- render cursor if necessary if line_index == Cursor1.line then if pos <= Cursor1.pos and pos + frag_len > Cursor1.pos then if Search_term then if Lines[Cursor1.line].data:sub(Cursor1.pos, Cursor1.pos+utf8.len(Search_term)-1) == Search_term then local lo_px = Text.draw_highlight(line, x,y, pos, Cursor1.pos, Cursor1.pos+utf8.len(Search_term)) love.graphics.setColor(0,0,0) love.graphics.print(Search_term, x+lo_px,y) end else Text.draw_cursor(x+Text.x(frag, Cursor1.pos-pos+1), y) end end end x = x + frag_width pos = pos + frag_len end if Search_term == nil then if line_index == Cursor1.line and Cursor1.pos == pos then Text.draw_cursor(x, y) end end return y, screen_line_starting_pos end -- manual tests: -- draw with small screen width of 100 function Text.draw_cursor(x, y) -- blink every 0.5s if math.floor(Cursor_time*2)%2 == 0 then love.graphics.setColor(1,0,0) love.graphics.rectangle('fill', x,y, 3,Line_height) love.graphics.setColor(0,0,0) end Cursor_x = x Cursor_y = y+Line_height end function Text.compute_fragments(line) --? print('compute_fragments', App.screen.width-Margin_right) line.fragments = {} local x = Margin_left -- try to wrap at word boundaries for frag in line.data:gmatch('%S*%s*') do local frag_text = App.newText(love.graphics.getFont(), frag) local frag_width = App.width(frag_text) --? print('x: '..tostring(x)..'; '..tostring(App.screen.width-Margin_right-x)..'px to go') --? print('frag: ^'..frag..'$ is '..tostring(frag_width)..'px wide') if x + frag_width > App.screen.width-Margin_right then while x + frag_width > App.screen.width-Margin_right do --? print(x, frag, frag_width, App.screen.width-Margin_right) if x < 0.8*(App.screen.width-Margin_right) then --? print(frag, x, frag_width, App.screen.width-Margin_right) -- long word; chop it at some letter -- We're not going to reimplement TeX here. local bpos = Text.nearest_pos_less_than(frag, App.screen.width-Margin_right - x) assert(bpos > 0) -- avoid infinite loop when window is too narrow local boffset = Text.offset(frag, bpos+1) -- byte _after_ bpos --? print('space for '..tostring(bpos)..' graphemes, '..tostring(boffset)..' bytes') local frag1 = string.sub(frag, 1, boffset-1) local frag1_text = App.newText(love.graphics.getFont(), frag1) local frag1_width = App.width(frag1_text) --? print(frag, x, frag1_width, App.screen.width-Margin_right) assert(x + frag1_width <= App.screen.width-Margin_right) --? print('inserting '..frag1..' of width '..tostring(frag1_width)..'px') table.insert(line.fragments, {data=frag1, text=frag1_text}) frag = string.sub(frag, boffset) frag_text = App.newText(love.graphics.getFont(), frag) frag_width = App.width(frag_text) end x = Margin_left -- new line end end if #frag > 0 then --? print('inserting '..frag..' of width '..tostring(frag_width)..'px') table.insert(line.fragments, {data=frag, text=frag_text}) end x = x + frag_width end end function Text.textinput(t) if App.mouse_down(1) then return end if App.ctrl_down() or App.alt_down() or App.cmd_down() then return end local before = snapshot(Cursor1.line) --? print(Screen_top1.line, Screen_top1.pos, Cursor1.line, Cursor1.pos, Screen_bottom1.line, Screen_bottom1.pos) Text.insert_at_cursor(t) if Cursor_y >= App.screen.height - Line_height then Text.populate_screen_line_starting_pos(Lines[Cursor1.line]) Text.snap_cursor_to_bottom_of_screen() --? print('=>', Screen_top1.line, Screen_top1.pos, Cursor1.line, Cursor1.pos, Screen_bottom1.line, Screen_bottom1.pos) end record_undo_event({before=before, after=snapshot(Cursor1.line)}) end function Text.insert_at_cursor(t) local byte_offset = Text.offset(Lines[Cursor1.line].data, Cursor1.pos) Lines[Cursor1.line].data = string.sub(Lines[Cursor1.line].data, 1, byte_offset-1)..t..string.sub(Lines[Cursor1.line].data, byte_offset) Text.clear_cache(Lines[Cursor1.line]) Cursor1.pos = Cursor1.pos+1 end -- Don't handle any keys here that would trigger love.textinput above. function Text.keychord_pressed(chord) --? print('chord', chord, Selection1.line, Selection1.pos) --== shortcuts that mutate text if chord == 'return' then local before_line = Cursor1.line local before = snapshot(before_line) Text.insert_return() Selection1 = {} if (Cursor_y + Line_height) > App.screen.height then Text.snap_cursor_to_bottom_of_screen() end schedule_save() record_undo_event({before=before, after=snapshot(before_line, Cursor1.line)}) elseif chord == 'tab' then local before = snapshot(Cursor1.line) --? print(Screen_top1.line, Screen_top1.pos, Cursor1.line, Cursor1.pos, Screen_bottom1.line, Screen_bottom1.pos) Text.insert_at_cursor('\t') if Cursor_y >= App.screen.height - Line_height then Text.populate_screen_line_starting_pos(Lines[Cursor1.line]) Text.snap_cursor_to_bottom_of_screen() --? print('=>', Screen_top1.line, Screen_top1.pos, Cursor1.line, Cursor1.pos, Screen_bottom1.line, Screen_bottom1.pos) end schedule_save() record_undo_event({before=before, after=snapshot(Cursor1.line)}) elseif chord == 'backspace' then if Selection1.line then Text.delete_selection(Margin_left, App.screen.width-Margin_right) schedule_save() return end local before if Cursor1.pos > 1 then before = snapshot(Cursor1.line) local byte_start = utf8.offset(Lines[Cursor1.line].data, Cursor1.pos-1) local byte_end = utf8.offset(Lines[Cursor1.line].data, Cursor1.pos) if byte_start then if byte_end then Lines[Cursor1.line].data = string.sub(Lines[Cursor1.line].data, 1, byte_start-1)..string.sub(Lines[Cursor1.line].data, byte_end) else Lines[Cursor1.line].data = string.sub(Lines[Cursor1.line].data, 1, byte_start-1) end Cursor1.pos = Cursor1.pos-1 end elseif Cursor1.line > 1 then before = snapshot(Cursor1.line-1, Cursor1.line) if Lines[Cursor1.line-1].mode == 'drawing' then table.remove(Lines, Cursor1.line-1) else -- join lines Cursor1.pos = utf8.len(Lines[Cursor1.line-1].data)+1 Lines[Cursor1.line-1].data = Lines[Cursor1.line-1].data..Lines[Cursor1.line].data table.remove(Lines, Cursor1.line) end Cursor1.line = Cursor1.line-1 end if Text.lt1(Cursor1, Screen_top1) then local top2 = Text.to2(Screen_top1) top2 = Text.previous_screen_line(top2) Screen_top1 = Text.to1(top2) Text.redraw_all() -- if we're scrolling, reclaim all fragments to avoid memory leaks end Text.clear_cache(Lines[Cursor1.line]) assert(Text.le1(Screen_top1, Cursor1)) schedule_save() record_undo_event({before=before, after=snapshot(Cursor1.line)}) elseif chord == 'delete' then if Selection1.line then Text.delete_selection(Margin_left, App.screen.width-Margin_right) schedule_save() return end local before if Cursor1.pos <= utf8.len(Lines[Cursor1.line].data) then before = snapshot(Cursor1.line) else before = snapshot(Cursor1.line, Cursor1.line+1) end if Cursor1.pos <= utf8.len(Lines[Cursor1.line].data) then local byte_start = utf8.offset(Lines[Cursor1.line].data, Cursor1.pos) local byte_end = utf8.offset(Lines[Cursor1.line].data, Cursor1.pos+1) if byte_start then if byte_end then Lines[Cursor1.line].data = string.sub(Lines[Cursor1.line].data, 1, byte_start-1)..string.sub(Lines[Cursor1.line].data, byte_end) else Lines[Cursor1.line].data = string.sub(Lines[Cursor1.line].data, 1, byte_start-1) end -- no change to Cursor1.pos end elseif Cursor1.line < #Lines then if Lines[Cursor1.line+1].mode == 'drawing' then table.remove(Lines, Cursor1.line+1) else -- join lines Lines[Cursor1.line].data = Lines[Cursor1.line].data..Lines[Cursor1.line+1].data table.remove(Lines, Cursor1.line+1) end end Text.clear_cache(Lines[Cursor1.line]) schedule_save() record_undo_event({before=before, after=snapshot(Cursor1.line)}) --== shortcuts that move the cursor elseif chord == 'left' then Text.left(Margin_left, App.screen.width-Margin_right) Selection1 = {} elseif chord == 'right' then Text.right(Margin_left, App.screen.width-Margin_right) Selection1 = {} elseif chord == 'S-left' then if Selection1.line == nil then Selection1 = {line=Cursor1.line, pos=Cursor1.pos} end Text.left(Margin_left, App.screen.width-Margin_right) elseif chord == 'S-right' then if Selection1.line == nil then Selection1 = {line=Cursor1.line, pos=Cursor1.pos} end Text.right(Margin_left, App.screen.width-Margin_right) -- C- hotkeys reserved for drawings, so we'll use M- elseif chord == 'M-left' then Text.word_left(Margin_left, App.screen.width-Margin_right) Selection1 = {} elseif chord == 'M-right' then Text.word_right(Margin_left, App.screen.width-Margin_right) Selection1 = {} elseif chord == 'M-S-left' then if Selection1.line == nil then Selection1 = {line=Cursor1.line, pos=Cursor1.pos} end Text.word_left(Margin_left, App.screen.width-Margin_right) elseif chord == 'M-S-right' then if Selection1.line == nil then Selection1 = {line=Cursor1.line, pos=Cursor1.pos} end Text.word_right(Margin_left, App.screen.width-Margin_right) elseif chord == 'home' then Text.start_of_line() Selection1 = {} elseif chord == 'end' then Text.end_of_line(Margin_left, App.screen.width-Margin_right) Selection1 = {} elseif chord == 'S-home' then if Selection1.line == nil then Selection1 = {line=Cursor1.line, pos=Cursor1.pos} end Text.start_of_line() elseif chord == 'S-end' then if Selection1.line == nil then Selection1 = {line=Cursor1.line, pos=Cursor1.pos} end Text.end_of_line(Margin_left, App.screen.width-Margin_right) elseif chord == 'up' then Text.up(Margin_left, App.screen.width-Margin_right) Selection1 = {} elseif chord == 'down' then Text.down(Margin_left, App.screen.width-Margin_right) Selection1 = {} elseif chord == 'S-up' then if Selection1.line == nil then Selection1 = {line=Cursor1.line, pos=Cursor1.pos} end Text.up(Margin_left, App.screen.width-Margin_right) elseif chord == 'S-down' then if Selection1.line == nil then Selection1 = {line=Cursor1.line, pos=Cursor1.pos} end Text.down(Margin_left, App.screen.width-Margin_right) elseif chord == 'pageup' then Text.pageup(Margin_left, App.screen.width-Margin_right) Selection1 = {} elseif chord == 'pagedown' then Text.pagedown(Margin_left, App.screen.width-Margin_right) Selection1 = {} elseif chord == 'S-pageup' then if Selection1.line == nil then Selection1 = {line=Cursor1.line, pos=Cursor1.pos} end Text.pageup(Margin_left, App.screen.width-Margin_right) elseif chord == 'S-pagedown' then if Selection1.line == nil then Selection1 = {line=Cursor1.line, pos=Cursor1.pos} end Text.pagedown(Margin_left, App.screen.width-Margin_right) end end function Text.insert_return() local byte_offset = Text.offset(Lines[Cursor1.line].data, Cursor1.pos) table.insert(Lines, Cursor1.line+1, {mode='text', data=string.sub(Lines[Cursor1.line].data, byte_offset)}) Lines[Cursor1.line].data = string.sub(Lines[Cursor1.line].data, 1, byte_offset-1) Text.clear_cache(Lines[Cursor1.line]) Text.clear_cache(Lines[Cursor1.line+1]) Cursor1.line = Cursor1.line+1 Cursor1.pos = 1 end function Text.pageup(left, right) --? print('pageup') -- duplicate some logic from love.draw local top2 = Text.to2(Screen_top1) --? print(App.screen.height) local y = App.screen.height - Line_height while y >= Margin_top do --? print(y, top2.line, top2.screen_line, top2.screen_pos) if Screen_top1.line == 1 and Screen_top1.pos == 1 then break end if Lines[Screen_top1.line].mode == 'text' then y = y - Line_height elseif Lines[Screen_top1.line].mode == 'drawing' then y = y - Drawing_padding_height - Drawing.pixels(Lines[Screen_top1.line].h) end top2 = Text.previous_screen_line(top2) end Screen_top1 = Text.to1(top2) Cursor1.line = Screen_top1.line Cursor1.pos = Screen_top1.pos Text.move_cursor_down_to_next_text_line_while_scrolling_again_if_necessary() --? print(Cursor1.line, Cursor1.pos, Screen_top1.line, Screen_top1.pos) --? print('pageup end') end function Text.pagedown(left, right) --? print('pagedown') -- If a line/paragraph gets to a page boundary, I often want to scroll -- before I get to the bottom. -- However, only do this if it makes forward progress. local top2 = Text.to2(Screen_bottom1) if top2.screen_line > 1 then top2.screen_line = math.max(top2.screen_line-10, 1) end local new_top1 = Text.to1(top2) if Text.lt1(Screen_top1, new_top1) then Screen_top1 = new_top1 else Screen_top1.line = Screen_bottom1.line Screen_top1.pos = Screen_bottom1.pos end --? print('setting top to', Screen_top1.line, Screen_top1.pos) Cursor1.line = Screen_top1.line Cursor1.pos = Screen_top1.pos Text.move_cursor_down_to_next_text_line_while_scrolling_again_if_necessary() --? print('top now', Screen_top1.line) Text.redraw_all() -- if we're scrolling, reclaim all fragments to avoid memory leaks --? print('pagedown end') end function Text.up(left, right) assert(Lines[Cursor1.line].mode == 'text') --? print('up', Cursor1.line, Cursor1.pos, Screen_top1.line, Screen_top1.pos) local screen_line_index,screen_line_starting_pos = Text.pos_at_start_of_cursor_screen_line() if screen_line_starting_pos == 1 then --? print('cursor is at first screen line of its line') -- line is done; skip to previous text line local new_cursor_line = Cursor1.line while new_cursor_line > 1 do new_cursor_line = new_cursor_line-1 if Lines[new_cursor_line].mode == 'text' then --? print('found previous text line') Cursor1.line = new_cursor_line Text.populate_screen_line_starting_pos(Lines[Cursor1.line]) -- previous text line found, pick its final screen line --? print('has multiple screen lines') local screen_line_starting_pos = Lines[Cursor1.line].screen_line_starting_pos --? print(#screen_line_starting_pos) screen_line_starting_pos = screen_line_starting_pos[#screen_line_starting_pos] --? print('previous screen line starts at pos '..tostring(screen_line_starting_pos)..' of its line') if Screen_top1.line > Cursor1.line then Screen_top1.line = Cursor1.line Screen_top1.pos = screen_line_starting_pos --? print('pos of top of screen is also '..tostring(Screen_top1.pos)..' of the same line') end local screen_line_starting_byte_offset = Text.offset(Lines[Cursor1.line].data, screen_line_starting_pos) local s = string.sub(Lines[Cursor1.line].data, screen_line_starting_byte_offset) Cursor1.pos = screen_line_starting_pos + Text.nearest_cursor_pos(s, Cursor_x) - 1 break end end if Cursor1.line < Screen_top1.line then Screen_top1.line = Cursor1.line end else -- move up one screen line in current line --? print('cursor is NOT at first screen line of its line') assert(screen_line_index > 1) new_screen_line_starting_pos = Lines[Cursor1.line].screen_line_starting_pos[screen_line_index-1] --? print('switching pos of screen line at cursor from '..tostring(screen_line_starting_pos)..' to '..tostring(new_screen_line_starting_pos)) if Screen_top1.line == Cursor1.line and Screen_top1.pos == screen_line_starting_pos then Screen_top1.pos = new_screen_line_starting_pos --? print('also setting pos of top of screen to '..tostring(Screen_top1.pos)) end local new_screen_line_starting_byte_offset = Text.offset(Lines[Cursor1.line].data, new_screen_line_starting_pos) local s = string.sub(Lines[Cursor1.line].data, new_screen_line_starting_byte_offset) Cursor1.pos = new_screen_line_starting_pos + Text.nearest_cursor_pos(s, Cursor_x) - 1 --? print('cursor pos is now '..tostring(Cursor1.pos)) end end function Text.down(left, right) assert(Lines[Cursor1.line].mode == 'text') --? print('down', Cursor1.line, Cursor1.pos, Screen_top1.line, Screen_top1.pos, Screen_bottom1.line, Screen_bottom1.pos) if Text.cursor_at_final_screen_line() then -- line is done, skip to next text line --? print('cursor at final screen line of its line') local new_cursor_line = Cursor1.line while new_cursor_line < #Lines do new_cursor_line = new_cursor_line+1 if Lines[new_cursor_line].mode == 'text' then Cursor1.line = new_cursor_line Cursor1.pos = Text.nearest_cursor_pos(Lines[Cursor1.line].data, Cursor_x) --? print(Cursor1.pos) break end end if Cursor1.line > Screen_bottom1.line then --? print('screen top before:', Screen_top1.line, Screen_top1.pos) --? print('scroll up preserving cursor') Text.snap_cursor_to_bottom_of_screen() --? print('screen top after:', Screen_top1.line, Screen_top1.pos) end else -- move down o
/*
 * (C)opyright MMVI Anselm R. Garbe <garbeam at gmail dot com>
 * See LICENSE file for license details.
 */
#include "dwm.h"

#include <stdlib.h>
#include <string.h>
#include <X11/Xatom.h>
#include <X11/Xutil.h>

/* static functions */

static void
resizetitle(Client *c)
{
	int i;

	c->tw = 0;
	for(i = 0; i < TLast; i++)
		if(c->tags[i])
			c->tw += textw(c->tags[i]);
	c->tw += textw(c->name);
	if(c->tw > c->w)
		c->tw = c->w + 2;
	c->tx = c->x + c->w - c->tw + 2;
	c->ty = c->y;
	if(c->tags[tsel])
		XMoveResizeWindow(dpy, c->title, c->tx, c->ty, c->tw, c->th);
	else
		XMoveResizeWindow(dpy, c->title, c->tx + 2 * sw, c->ty, c->tw, c->th);

}

static int
xerrordummy(Display *dsply, XErrorEvent *ee)
{
	return 0;
}

/* extern functions */

void
ban(Client *c)
{
	XMoveWindow(dpy, c->win, c->x + 2 * sw, c->y);
	XMoveWindow(dpy, c->title, c->tx + 2 * sw, c->ty);
}

void
focus(Client *c)
{
	Client *old = sel;
	XEvent ev;

	sel = c;
	if(old && old != c)
		drawtitle(old);
	drawtitle(c);
	XSetInputFocus(dpy, c->win, RevertToPointerRoot, CurrentTime);