Add koi8-r device (russian charset)

4 files changed, 302 insertions, 0 deletions

diff --git a/gnu/usr.bin/groff/devkoi8-r/DESC.proto b/gnu/usr.bin/groff/devkoi8-r/DESC.proto
new file mode 100644
index 0000000..88399ab
--- /dev/null
+++ b/gnu/usr.bin/groff/devkoi8-r/DESC.proto
@@ -0,0 +1,8 @@
+res 240
+hor 24
+vert 40
+unitwidth 10
+sizes 10 0
+fonts 4 R I B BI
+tcommand
+postpro grotty
diff --git a/gnu/usr.bin/groff/devkoi8-r/Makefile b/gnu/usr.bin/groff/devkoi8-r/Makefile
new file mode 100644
index 0000000..09f5a91
--- /dev/null
+++ b/gnu/usr.bin/groff/devkoi8-r/Makefile
@@ -0,0 +1,6 @@
+# Makefile for devkoi8-r
+
+DEVICE=         koi8-r
+
+.include "../Makefile.tty"
+.include "../Makefile.dev"
diff --git a/gnu/usr.bin/groff/devkoi8-r/Makefile.sub b/gnu/usr.bin/groff/devkoi8-r/Makefile.sub
new file mode 100644
index 0000000..8962e5b
--- /dev/null
+++ b/gnu/usr.bin/groff/devkoi8-r/Makefile.sub
@@ -0,0 +1,32 @@
+DEV=koi8-r
+FONTS=R I B BI
+DEVFILES=$(FONTS) DESC
+CLEANADD=$(FONTS) DESC
+
+RES=240
+CPI=10
+LPI=6
+
+$(FONTS): R.proto
+	@echo Making $@
+	@-rm -f $@
+	@(charwidth=`expr $(RES) / $(CPI)` ; \
+ 	 sed -e "s/^name [A-Z]*$$/name $@/" \
+	     -e "s/^\\([^	]*\\)	[0-9]+	/\\1	$$charwidth	/" \
+	     -e "s/^spacewidth [0-9]+$$/spacewidth $$charwidth/" \
+	     -e "s/^internalname .*$$/internalname $@/" \
+	     -e "/^internalname/s/BI/3/" \
+	     -e "/^internalname/s/B/2/" \
+	     -e "/^internalname/s/I/1/" \
+	     -e "/^internalname .*[^ 0-9]/d" \
+	     $(srcdir)/R.proto >$@)
+
+DESC: DESC.proto
+	@echo Making $@
+	@-rm -f $@
+	@sed -e "s/^res .*$$/res $(RES)/" \
+	    -e "s/^hor .*$$/hor `expr $(RES) / $(CPI)`/" \
+	    -e "s/^vert .*$$/vert `expr $(RES) / $(LPI)`/" \
+	    -e "s/^fonts .*$$/fonts `set $(FONTS); echo $$#` $(FONTS)/" \
+	    $(srcdir)/DESC.proto >$@
+
diff --git a/gnu/usr.bin/groff/devkoi8-r/R.proto b/gnu/usr.bin/groff/devkoi8-r/R.proto
new file mode 100644
index 0000000..d2944df
--- /dev/null
+++ b/gnu/usr.bin/groff/devkoi8-r/R.proto
@@ -0,0 +1,256 @@
+name R
+internalname 0
+spacewidth 24
+charset
+!	24	0	0041
+r!	"
+TP	"
+Tp	"
+"	24	0	0042
+lq	"
+rq	"
+#	24	0	0043
+sh	"
+sc	"
+$	24	0	0044
+Do	"
+%	24	0	0045
+&	24	0	0046
+'	24	0	0047
+aa	"
+fm	"
+aq	"
+ac	"
+(	24	0	0050
+)	24	0	0051
+*	24	0	0052
+**	"
+ho	"
++	24	0	0053
+pl	"
+dg	"
+dd	"
+ad	"
+ah	"
+-D	"
+Sd	"
+,	24	0	0054
+\-	24	0	0055
+hy	"
+-	"
+mi	"
+en	"
+.	24	0	0056
+/	24	0	0057
+sl	"
+f/	"
+0	24	0	0060
+1	24	0	0061
+2	24	0	0062
+3	24	0	0063
+4	24	0	0064
+5	24	0	0065
+6	24	0	0066
+7	24	0	0067
+8	24	0	0070
+9	24	0	0071
+:	24	0	0072
+;	24	0	0073
+<	24	0	0074
+la	"
+fo	"
+=	24	0	0075
+eq	"
+ss	"
+>	24	0	0076
+ra	"
+fc	"
+?	24	0	0077
+r?	"
+@	24	0	0100
+at	"
+A	24	0	0101
+*A	"
+B	24	0	0102
+*B	"
+C	24	0	0103
+D	24	0	0104
+E	24	0	0105
+*E	"
+F	24	0	0106
+G	24	0	0107
+H	24	0	0110
+*Y	"
+I	24	0	0111
+*I	"
+J	24	0	0112
+K	24	0	0113
+*K	"
+L	24	0	0114
+M	24	0	0115
+*M	"
+N	24	0	0116
+*N	"
+O	24	0	0117
+ci	"
+*O	"
+P	24	0	0120
+*R	"
+Q	24	0	0121
+R	24	0	0122
+S	24	0	0123
+T	24	0	0124
+*T	"
+U	24	0	0125
+V	24	0	0126
+W	24	0	0127
+X	24	0	0130
+*X	"
+Y	24	0	0131
+*U	"
+Z	24	0	0132
+*Z	"
+[	24	0	0133
+lB	"
+\	24	0	0134
+rs	"
+]	24	0	0135
+rB	"
+a^	24	0	0136
+^	"
+ha	"
+ua	"
+_	24	0	0137
+ru	"
+ul	"
+`	24	0	0140
+oq	"
+ga	"
+a	24	0	0141
+b	24	0	0142
+c	24	0	0143
+d	24	0	0144
+e	24	0	0145
+f	24	0	0146
+g	24	0	0147
+h	24	0	0150
+i	24	0	0151
+.i	"
+j	24	0	0152
+k	24	0	0153
+l	24	0	0154
+m	24	0	0155
+n	24	0	0156
+o	24	0	0157
+*o	"
+a-	"
+ao	"
+p	24	0	0160
+q	24	0	0161
+r	24	0	0162
+s	24	0	0163
+t	24	0	0164
+u	24	0	0165
+v	24	0	0166
+da	"
+w	24	0	0167
+x	24	0	0170
+mu	"
+y	24	0	0171
+z	24	0	0172
+lC	24	0	0173
+{	"
+ba	24	0	0174
+or	"
+bv	"
+br	"
+|	"
+lb	"
+lc	"
+lf	"
+lk	"
+lt	"
+rb	"
+rc	"
+rf	"
+rk	"
+rt	"
+rC	24	0	0175
+}	"
+a~	24	0	0176
+~	"
+ap	"
+ti	"
+em      24      0       0200
+bu      24      0       0224
+~=      24      0       0227
+<=      24      0       0230
+>=      24      0       0231
+de      24      0       0234
+char163 24      0       0243
+char179 24      0       0263
+co      24      0       0277
+char192 24      0       0300
+char193 24      0       0301
+char194 24      0       0302
+char195 24      0       0303
+char196 24      0       0304
+char197 24      0       0305
+char198 24      0       0306
+char199 24      0       0307
+char200 24      0       0310
+char201 24      0       0311
+char202 24      0       0312
+char203 24      0       0313
+char204 24      0       0314
+char205 24      0       0315
+char206 24      0       0316
+char207 24      0       0317
+char208 24      0       0320
+char209 24      0       0321
+char210 24      0       0322
+char211 24      0       0323
+char212 24      0       0324
+char213 24      0       0325
+char214 24      0       0326
+char215 24      0       0327
+char216 24      0       0330
+char217 24      0       0331
+char218 24      0       0332
+char219 24      0       0333
+char220 24      0       0334
+char221 24      0       0335
+char222 24      0       0336
+char223 24      0       0337
+char224 24      0       0340
+char225 24      0       0341
+char226 24      0       0342
+char227 24      0       0343
+char228 24      0       0344
+char229 24      0       0345
+char230 24      0       0346
+char231 24      0       0347
+char232 24      0       0350
+char233 24      0       0351
+char234 24      0       0352
+char235 24      0       0353
+char236 24      0       0354
+char237 24      0       0355
+char238 24      0       0356
+char239 24      0       0357
+char240 24      0       0360
+char241 24      0       0361
+char242 24      0       0362
+char243 24      0       0363
+char244 24      0       0364
+char245 24      0       0365
+char246 24      0       0366
+char247 24      0       0367
+char248 24      0       0370
+char249 24      0       0371
+char250 24      0       0372
+char251 24      0       0373
+char252 24      0       0374
+char253 24      0       0375
+char254 24      0       0376
+char255 24      0       0377