typr.sh


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175

#!/bin/sh

words="the be of and a to in he have it that for they i with as not on she at by this we you do but from or which one would all will there say who make when can more if no man out other so what time up go about than into could state only new year some take come these know see use get like then first any work now may such give over think most even find day also after way many must look before great back through long where much should well people down own just because good each those feel seem how high too place little world very still nation hand old life tell write become here show house both between need mean call develop under last right move thing general school never same another begin while number part turn real leave might want point form off child few small since against ask late home interest large person end open public follow during present without again hold govern around possible head consider word program problem however lead system set order eye plan run keep face fact group play stand increase early course change help line"

entered_text=""
text=""

tty_init () {
    tput clear
    export SAVED_TTY_SETTINGS=$(stty -g)
    stty raw -echo
    trap typr_cleanup 1 2 3 6

    printf "[6 q[0;0H"
}

tty_cleanup () {
    tput clear
    tput cnorm
    stty $SAVED_TTY_SETTINGS

}

tty_readc () {
    stty -echo -icanon min 1 time 0
    s="$(dd bs=1 count=1 of=/dev/stdout 2>/dev/null)"
    stty -icanon min 0 time 0
    [ "$s" = "" ]  && {
        s="$s$(dd bs=1 count=2 of=/dev/stdout 2>/dev/null)"
    }
    printf "$s"
}

typr_draw_text () {
    color="[0;37m"
    line=${areay}
    startcol=${areax}

    cpos="${line};${startcol}"
    draw="[${cpos}H${color}"

    i=0
    t="$text"
    e="$entered_text"
    while [ "$t" ] ; do
        ct=${t%${t#?}}
        ce=${e%${e#?}}
        t="${t#?}"
        e="${e#?}"


        [ "$ct" != "$ce" ] \
            && newcolor="[0;31m" \
            || newcolor="[0;32m"

        [ ! "$ce" ] && newcolor="[0;37m" \

        [ "$color" != "$newcolor" ] && {
            color="$newcolor"
            draw="${draw}$newcolor"
            [ "$color" = "[0;37m" ] && cpos="${line};$((i+$startcol))"
        }


        [ "$i" -gt "$startcol" ] && {
            line=$((line+1))
            draw="${draw}[${line};${startcol}H"
            i=0
        }

        [ "$ct" = " " ] && [ "$color" = "[0;31m" ] \
         && draw="${draw}_" \
         || draw="$draw$ct"

        i=$((i+1))
    done
    printf "%s[${cpos}H" "$draw"
    tput cnorm
}

typr_get_time () {
    now="$(date +%s%N)"
    time_ns=$((now-start))

    time_ms=$(((time_ns/1000000)%1000))
    time_seconds=$(((time_ns/1000000000)%60))
    time_minutes=$((time_ns/60000000000))
    
    printf "%02d:%02d.%03d" "$time_minutes" "$time_seconds" "$time_ms"
}

typr_draw_time () {
    printf "[s[$((areay-1));${areax}H[0m%s[u" "$(typr_get_time)"
}

typr_show_results () {
    tput clear
    tput civis

    now="$(date +%s%N)"
    time_ns=$((now-start))

    words="$(set -- $text ; printf "%s" "$#")"
    wpm="$((time_ns*words/60000000000))"
    acc="100%"
    
    printf "[%s;${areax}H%s" \
        "${areay}" "[0;37mwpm" \
        "$((areay+1))" "[0m$wpm" \
        "$((areay+2))" "[0;37macc" \
        "$((areay+3))" "[0m$acc" \
        "$((areay+4))" "[0;37mtime" \
        "$((areay+5))" "[0m$(typr_get_time)"
}

typr_generate_text () {
    wordcount=100
    text="$(printf "%s\n" $words | shuf -r -n $wordcount | xargs printf "%s ")"
    text="${text% }"
}


typr_draw_loop () {
    while true; do
        typr_draw_time
    done
}


typr_main () {
    start="$(date +%s%N)"

    typr_draw_loop &
    draw_pid="$!"

    while true; do
        typr_draw_text
        c="$(tty_readc)"
        case "$c" in
            ''|'') break;;
            '')
                entered_text="${entered_text%?}"
                ;;
            *)
                echo "$c" >> LOG
                entered_text="$entered_text$c"
                ;;
        esac

        [ "${#entered_text}" = "${#text}" ] && break
    done
    kill "$draw_pid"

    typr_show_results

    while true; do
        case "$(tty_readc)" in
            '
'|'') break;;
        esac
    done
}

typr_init () {
    cols="$(tput cols)"
    lines="$(tput lines)"

    areax=$((cols / 3))
    areay=$((lines / 3))
    tty_init
    typr_generate_text
    typr_main
    tty_cleanup
}

typr_init