Compare commits
83 Commits
Author | SHA1 | Date | |
---|---|---|---|
e90d25e30f | |||
71f372d2c2 | |||
27ff64dffa | |||
becb3bac4e | |||
e7a6632b41 | |||
48dbea0228 | |||
64f3f73d96 | |||
eda5385058 | |||
7a0ad78000 | |||
8dc763f05e | |||
20692d581a | |||
8d693b6664 | |||
37804aab6b | |||
3b76254599 | |||
e972ff468a | |||
1b3b03cae0 | |||
efb3ce626d | |||
16f23e11c0 | |||
d87c278be5 | |||
5caefbb465 | |||
8d743dab7a | |||
2f2270322a | |||
699893af89 | |||
9addfc9284 | |||
8f8de5de2b | |||
0df2c9f566 | |||
b7bc1f16ad | |||
ca6865688a | |||
1fd768057c | |||
35d54d84b0 | |||
a141b95293 | |||
bf06e91be5 | |||
5d5a6d2172 | |||
691e94c0c1 | |||
cf744efc1b | |||
bab3cdd90e | |||
abfe7046e7 | |||
6ed7089b25 | |||
571796fe0d | |||
9e8b82c4bb | |||
906eb92f5a | |||
9f420131ee | |||
1fab60d779 | |||
fe175cab19 | |||
8c33f0116c | |||
f8c0e0570c | |||
fc0d9e374b | |||
f49a2d2eb8 | |||
4004a4a006 | |||
cc64561388 | |||
5b1d4fef88 | |||
2b593559af | |||
b74160fa4e | |||
3e1735f778 | |||
adda0d9580 | |||
2167f35f58 | |||
f4b97be1f1 | |||
7fe122ac3b | |||
944feef434 | |||
66ca4b9a12 | |||
3897f44cf8 | |||
6548a448c7 | |||
aff658d611 | |||
76252305f9 | |||
1cf67af281 | |||
064abb82a6 | |||
d1eefcb37e | |||
984c1c1f9a | |||
69510d76af | |||
6b28a12b73 | |||
e38ea5b35d | |||
261c98ad14 | |||
3b5ddede98 | |||
67b60e20cc | |||
3a66022c6d | |||
2cfae0e8d7 | |||
fb74e7bef0 | |||
e65f6b650d | |||
b70b356ce5 | |||
66f5498232 | |||
45a880455d | |||
95f7992e0f | |||
d3f5246242 |
21
Makefile
21
Makefile
|
@ -16,9 +16,12 @@
|
||||||
DESTDIR ?= dist
|
DESTDIR ?= dist
|
||||||
PREFIX ?= /usr/local
|
PREFIX ?= /usr/local
|
||||||
|
|
||||||
MANDIR != [ $(PREFIX) = / ] && printf '/usr/share/man\n' \
|
# normalized prefix
|
||||||
|
PREFIX_N != (test -d $(PREFIX) && [ '-' != $(PREFIX) ] \
|
||||||
|
&& CDPATH= cd -P -- $(PREFIX) && pwd -P)
|
||||||
|
MANDIR != [ $(PREFIX_N) = / ] && printf '/usr/share/man\n' \
|
||||||
|| printf '/share/man\n'
|
|| printf '/share/man\n'
|
||||||
SYSEXITS != printf '\043include <sysexits.h>\n' | cpp -M - | sed 's/ /\n/g' \
|
SYSEXITS != printf '\043include <sysexits.h>\n' | cpp -M - | tr ' ' '\n' \
|
||||||
| sed -n 's/sysexits\.h//p' || printf 'include\n'
|
| sed -n 's/sysexits\.h//p' || printf 'include\n'
|
||||||
|
|
||||||
CC ?= cc
|
CC ?= cc
|
||||||
|
@ -29,7 +32,7 @@ RUSTLIBS = --extern getopt=build/o/libgetopt.rlib \
|
||||||
CFLAGS += -I$(SYSEXITS)
|
CFLAGS += -I$(SYSEXITS)
|
||||||
|
|
||||||
.PHONY: all
|
.PHONY: all
|
||||||
all: docs dj false fop hru intcmp mm npc rpn scrut str strcmp swab true
|
all: dj false fop hru intcmp mm npc rpn scrut str strcmp swab true
|
||||||
|
|
||||||
# keep build/include until bindgen(1) has stdin support
|
# keep build/include until bindgen(1) has stdin support
|
||||||
# https://github.com/rust-lang/rust-bindgen/issues/2703
|
# https://github.com/rust-lang/rust-bindgen/issues/2703
|
||||||
|
@ -40,8 +43,8 @@ build:
|
||||||
clean:
|
clean:
|
||||||
rm -rf build dist
|
rm -rf build dist
|
||||||
|
|
||||||
dist: all
|
dist: all docs
|
||||||
mkdir -p $(DESTDIR)/$(PREFIX)/bin $(DESTDIR)/$(PREFIX)/share/man/man1
|
mkdir -p $(DESTDIR)/$(PREFIX)/bin $(DESTDIR)/$(PREFIX)/$(MANDIR)/man1
|
||||||
cp build/bin/* $(DESTDIR)/$(PREFIX)/bin
|
cp build/bin/* $(DESTDIR)/$(PREFIX)/bin
|
||||||
cp build/docs/*.1 $(DESTDIR)/$(PREFIX)/$(MANDIR)/man1
|
cp build/docs/*.1 $(DESTDIR)/$(PREFIX)/$(MANDIR)/man1
|
||||||
|
|
||||||
|
@ -106,13 +109,13 @@ build/bin/hru: src/hru.rs build rustlibs
|
||||||
|
|
||||||
.PHONY: intcmp
|
.PHONY: intcmp
|
||||||
intcmp: build/bin/intcmp
|
intcmp: build/bin/intcmp
|
||||||
build/bin/intcmp: src/intcmp.c build
|
build/bin/intcmp: src/intcmp.rs build rustlibs
|
||||||
$(CC) $(CFLAGS) -o $@ src/intcmp.c
|
$(RUSTC) $(RUSTFLAGS) $(RUSTLIBS) -o $@ src/intcmp.rs
|
||||||
|
|
||||||
.PHONY: mm
|
.PHONY: mm
|
||||||
mm: build/bin/mm
|
mm: build/bin/mm
|
||||||
build/bin/mm: src/mm.c build
|
build/bin/mm: src/mm.rs build rustlibs
|
||||||
$(CC) $(CFLAGS) -o $@ src/mm.c
|
$(RUSTC) $(RUSTFLAGS) $(RUSTLIBS) -o $@ src/mm.rs
|
||||||
|
|
||||||
.PHONY: npc
|
.PHONY: npc
|
||||||
npc: build/bin/npc
|
npc: build/bin/npc
|
||||||
|
|
145
docs/dj.1
145
docs/dj.1
|
@ -4,14 +4,14 @@
|
||||||
.\" This work is licensed under CC BY-SA 4.0. To see a copy of this license,
|
.\" This work is licensed under CC BY-SA 4.0. To see a copy of this license,
|
||||||
.\" visit <http://creativecommons.org/licenses/by-sa/4.0/>.
|
.\" visit <http://creativecommons.org/licenses/by-sa/4.0/>.
|
||||||
.\"
|
.\"
|
||||||
.TH DJ 1 2024-06-17 "Harakit X.X.X"
|
.TH DJ 1 2024-07-03 "Harakit X.X.X"
|
||||||
.SH NAME
|
.SH NAME
|
||||||
dj \(en disk jockey
|
dj \(en disk jockey
|
||||||
.\"
|
.\"
|
||||||
.SH SYNOPSIS
|
.SH SYNOPSIS
|
||||||
|
|
||||||
dj
|
dj
|
||||||
.RB [ -AdHnq ]
|
.RB [ -Hn ]
|
||||||
.RB [ -a\ byte ]
|
.RB [ -a\ byte ]
|
||||||
.RB [ -c\ count ]
|
.RB [ -c\ count ]
|
||||||
|
|
||||||
|
@ -34,8 +34,13 @@ respectively. This language is inherited from the
|
||||||
.BR dd (1p)
|
.BR dd (1p)
|
||||||
utility and used here to decrease ambiguity.
|
utility and used here to decrease ambiguity.
|
||||||
|
|
||||||
When seeking or skipping to a byte, writing or reading starts at the byte
|
The offset used when skipping or seeking refers to how many bytes are skipped
|
||||||
immediately subsequent to the specified byte.
|
or sought. Running
|
||||||
|
.BR dj (1)
|
||||||
|
with a skip offset of 1 skips one byte into the input and reads from the second
|
||||||
|
byte onwards. A programmer may think of a file as a zero-indexed array of
|
||||||
|
bytes; in this analogy, the offset given is the index of the byte at which to
|
||||||
|
start reading or writing.
|
||||||
.\"
|
.\"
|
||||||
.SH OPTIONS
|
.SH OPTIONS
|
||||||
|
|
||||||
|
@ -44,58 +49,94 @@ Takes a file path as an argument and opens it for use as an input.
|
||||||
.IP \fB-b\fP\ \fIblock_size\fP
|
.IP \fB-b\fP\ \fIblock_size\fP
|
||||||
Takes a numeric argument as the size in bytes of the input buffer, the default
|
Takes a numeric argument as the size in bytes of the input buffer, the default
|
||||||
being 1024.
|
being 1024.
|
||||||
.IP \fB-s\fP\ \fIoffset\fP
|
.IP \fB-s\fP
|
||||||
Takes a numeric argument as the number of bytes to skip into the input
|
Takes a numeric argument as the index of the byte at which reading will
|
||||||
before starting to read. If the standard input is used, bytes read to this point
|
commence; \(lqskips\(rq that number of bytes. If the standard input is used,
|
||||||
are discarded.
|
bytes read to this point are discarded.
|
||||||
.IP \fB-o\fP\ \fIfile\fP
|
.IP \fB-o\fP
|
||||||
Takes a file path as an argument and opens it for use as an output.
|
Takes a file path as an argument and opens it for use as an output.
|
||||||
.IP \fB-B\fP\ \fIblock_size\fP
|
.IP \fB-B\fP\ \fIblock_size\fP
|
||||||
Does the same as
|
Does the same as
|
||||||
.B -b
|
.B -b
|
||||||
but for the output buffer.
|
but for the output buffer.
|
||||||
.IP \fB-S\fP\ \fIoffset\fP
|
.IP \fB-S\fP
|
||||||
Seeks a number of bytes through the output before starting to write from
|
Takes a numeric argument as the index of the byte at which writing will
|
||||||
the input. If the output is a stream, null characters are printed.
|
commence; \(lqseeks\(rq that number of bytes. If the standard output is used,
|
||||||
.IP \fB-a\fP\ \fIbyte\fP
|
null characters are printed.
|
||||||
|
.IP \fB-a\fP
|
||||||
Accepts a single literal byte with which the input buffer is padded in the event
|
Accepts a single literal byte with which the input buffer is padded in the event
|
||||||
of an incomplete read from the input file.
|
of an incomplete read from the input file. If the option argument is empty, the
|
||||||
.IP \fB-A\fP
|
null byte is used.
|
||||||
Specifying this option pads the input buffer with null bytes in the event of an
|
.IP \fB-c\fP
|
||||||
incomplete read. This is equivalent to specifying
|
|
||||||
.B -a
|
|
||||||
with a null byte instead of a character.
|
|
||||||
.IP \fB-c\fP\ \fIcount\fP
|
|
||||||
Specifies a number of reads to make. The default is 0, in which case the
|
Specifies a number of reads to make. The default is 0, in which case the
|
||||||
input is read until a partial or empty read is made.
|
input is read until a partial or empty read is made.
|
||||||
.IP \fB-d\fP
|
|
||||||
Prints invocation information before program execution as described in the
|
|
||||||
DIAGNOSTICS section. Each invocation increments the debug level of the
|
|
||||||
program.
|
|
||||||
.IP \fB-H\fP
|
.IP \fB-H\fP
|
||||||
Prints diagnostics messages in a human-readable manner as described in the
|
Prints diagnostic messages in a human-readable manner as described in the
|
||||||
DIAGNOSTICS section.
|
DIAGNOSTICS section.
|
||||||
.IP \fB-n\fP
|
.IP \fB-n\fP
|
||||||
Retries failed reads once before exiting.
|
Retries failed reads once before exiting.
|
||||||
.IP \fB-q\fP
|
|
||||||
Suppresses error messages which print when a read or write is partial or
|
|
||||||
empty. Each invocation decrements the debug level of the program.
|
|
||||||
.\"
|
.\"
|
||||||
.SH STANDARD INPUT
|
.SH STANDARD INPUT
|
||||||
|
|
||||||
The standard input shall be used as an input if no inputs are specified or if
|
The standard input shall be used as an input if no inputs are specified or if
|
||||||
one or more of the input files is \(lq-\(rq.
|
input file is \(lq-\(rq.
|
||||||
.\"
|
.\"
|
||||||
.SH STANDARD OUTPUT
|
.SH STANDARD OUTPUT
|
||||||
The standard output shall be used as an output if no inputs are specified or if
|
The standard output shall be used as an output if no inputs are specified or if
|
||||||
one or more of the input files is \(lq-\(rq.
|
the output file is \(lq-\(rq.
|
||||||
|
.\"
|
||||||
|
.SH EXAMPLES
|
||||||
|
|
||||||
|
The following
|
||||||
|
.BR sh (1p)
|
||||||
|
line:
|
||||||
|
|
||||||
|
.RS
|
||||||
|
printf 'Hello, world!\(rsn' | dj -c 1 -b 7 -s 7 2>/dev/null
|
||||||
|
.RE
|
||||||
|
|
||||||
|
Produces the following output:
|
||||||
|
|
||||||
|
.RS
|
||||||
|
world!
|
||||||
|
.RE
|
||||||
|
|
||||||
|
The following
|
||||||
|
.BR sh (1p)
|
||||||
|
lines run sequentially:
|
||||||
|
|
||||||
|
.RS
|
||||||
|
tr '\(rs0' 0 </dev/zero | dj -c 1 -b 6 -o hello.txt
|
||||||
|
|
||||||
|
tr '\(rs0' H </dev/zero | dj -c 1 -b 1 -o hello.txt
|
||||||
|
|
||||||
|
tr '\(rs0' e </dev/zero | dj -c 1 -b 1 -o hello.txt -S 1
|
||||||
|
|
||||||
|
tr '\(rs0' l </dev/zero | dj -c 1 -b 2 -o hello.txt -S 2
|
||||||
|
|
||||||
|
tr '\(rs0' o </dev/zero | dj -c 1 -b 1 -o hello.txt -S 4
|
||||||
|
|
||||||
|
tr '\(rs0' '\(rsn' </dev/zero | dj -c 1 -b 1 -o hello.txt -S 5
|
||||||
|
|
||||||
|
dj -i hello.txt
|
||||||
|
.RE
|
||||||
|
|
||||||
|
Produce the following output:
|
||||||
|
|
||||||
|
.RS
|
||||||
|
Hello
|
||||||
|
.RE
|
||||||
|
|
||||||
|
It may be particularly illuminating to print the contents of the example
|
||||||
|
.B hello.txt
|
||||||
|
after each
|
||||||
|
.BR dj (1)
|
||||||
|
invocation.
|
||||||
.\"
|
.\"
|
||||||
.SH DIAGNOSTICS
|
.SH DIAGNOSTICS
|
||||||
|
|
||||||
On a partial or empty read, unless the
|
On a partial or empty read, a diagnostic message is printed. Then, the program
|
||||||
.B -q
|
exits unless the
|
||||||
option is specified, a diagnostic message is printed. Then, the program exits
|
|
||||||
unless the
|
|
||||||
.B -n
|
.B -n
|
||||||
option is specified.
|
option is specified.
|
||||||
|
|
||||||
|
@ -120,20 +161,6 @@ option may be specified. In this event, the following format is used instead:
|
||||||
{ASCII line feed}
|
{ASCII line feed}
|
||||||
.RE
|
.RE
|
||||||
|
|
||||||
If the
|
|
||||||
.B -d
|
|
||||||
option is specified, debug information will be printed at the beginning of
|
|
||||||
execution. This output contains information regarding how the program was
|
|
||||||
invoked. The following example is the result of running the program with
|
|
||||||
.B -d
|
|
||||||
as the only argument:
|
|
||||||
|
|
||||||
.RS
|
|
||||||
argv0=dj
|
|
||||||
in=<stdin> ibs=1024 skip=0 align=ff count=0
|
|
||||||
out=<stdout> obs=1024 seek=0 debug= 3 noerror=0
|
|
||||||
.RE
|
|
||||||
|
|
||||||
In non-recoverable errors that don\(cqt pertain to the read-write cycle, a
|
In non-recoverable errors that don\(cqt pertain to the read-write cycle, a
|
||||||
diagnostic message is printed and the program exits with the appropriate
|
diagnostic message is printed and the program exits with the appropriate
|
||||||
.BR sysexits.h (3)
|
.BR sysexits.h (3)
|
||||||
|
@ -148,17 +175,26 @@ is specified along with the
|
||||||
option and a count, actual byte output is the product of the count and the input
|
option and a count, actual byte output is the product of the count and the input
|
||||||
block size and therefore may be lower than expected. If the
|
block size and therefore may be lower than expected. If the
|
||||||
.B -a
|
.B -a
|
||||||
or
|
option is specified, this could make written data nonsensical.
|
||||||
.B -A
|
|
||||||
options are specified, this could make written data nonsensical.
|
|
||||||
.\"
|
.\"
|
||||||
.SH CAVEATS
|
.SH CAVEATS
|
||||||
|
|
||||||
Existing files are not truncated on ouput and are instead overwritten.
|
Existing files are not truncated on ouput and are instead overwritten.
|
||||||
|
|
||||||
Many lowercase options have capitalized variants and vice-versa which can be
|
The options
|
||||||
confusing. Capitalized options tend to affect output or are more intense
|
.B -b
|
||||||
versions of lowercase options.
|
and
|
||||||
|
.B -B
|
||||||
|
could be confused for each other, and so could
|
||||||
|
.B -s
|
||||||
|
and
|
||||||
|
.BR -S .
|
||||||
|
The lowercase option affects input and the capitalized option affects output.
|
||||||
|
|
||||||
|
The skipped or sought bytes while processing irregular files, such as streams,
|
||||||
|
are reported in the diagnostic output, because they were actually read or
|
||||||
|
written. This is as opposed to bytes skipped while processing regular files,
|
||||||
|
which are not reported.
|
||||||
.\"
|
.\"
|
||||||
.SH RATIONALE
|
.SH RATIONALE
|
||||||
|
|
||||||
|
@ -179,3 +215,4 @@ Copyright \(co 2023 DTB. License AGPLv3+: GNU AGPL version 3 or later
|
||||||
.\"
|
.\"
|
||||||
.SH SEE ALSO
|
.SH SEE ALSO
|
||||||
.BR dd (1p)
|
.BR dd (1p)
|
||||||
|
.BR lseek (3p)
|
||||||
|
|
32
docs/mm.1
32
docs/mm.1
|
@ -3,14 +3,14 @@
|
||||||
.\" This work is licensed under CC BY-SA 4.0. To see a copy of this license,
|
.\" This work is licensed under CC BY-SA 4.0. To see a copy of this license,
|
||||||
.\" visit <http://creativecommons.org/licenses/by-sa/4.0/>.
|
.\" visit <http://creativecommons.org/licenses/by-sa/4.0/>.
|
||||||
.\"
|
.\"
|
||||||
.TH MM 1 2024-06-17 "Harakit X.X.X"
|
.TH MM 1 2024-07-14 "Harakit X.X.X"
|
||||||
.SH NAME
|
.SH NAME
|
||||||
mm \(en middleman
|
mm \(en middleman
|
||||||
.\"
|
.\"
|
||||||
.SH SYNOPSIS
|
.SH SYNOPSIS
|
||||||
|
|
||||||
mm
|
mm
|
||||||
.RB [ -aenu ]
|
.RB [ -aetu ]
|
||||||
.RB [ -i\ input ]
|
.RB [ -i\ input ]
|
||||||
.RB [ -o\ output ]
|
.RB [ -o\ output ]
|
||||||
.\"
|
.\"
|
||||||
|
@ -21,19 +21,25 @@ Catenate input files and write them to the start of each output file or stream.
|
||||||
.SH OPTIONS
|
.SH OPTIONS
|
||||||
|
|
||||||
.IP \fB-a\fP
|
.IP \fB-a\fP
|
||||||
Opens subsequent outputs for appending rather than updating.
|
Opens outputs for appending rather than updating.
|
||||||
.IP \fB-e\fP
|
.IP \fB-e\fP
|
||||||
Use the standard error as an output.
|
Use the standard error as an output.
|
||||||
.IP \fB-i\fP\ \fIinput\fP
|
.IP \fB-t\fP
|
||||||
Opens a path as an input. If one or more of the input files is \(lq-\(rq or if
|
Causes outputs to be overwritten instead of being truncated.
|
||||||
no inputs are specified, the standard input shall be used.
|
|
||||||
.IP \fB-o\fP\ \fIoutput\fP
|
|
||||||
Opens a path as an output. If one or more of the output files is \(lq-\(rq or if
|
|
||||||
no outputs are specified, the standard output shall be used.
|
|
||||||
.IP \fB-u\fP
|
.IP \fB-u\fP
|
||||||
Ensures neither input or output will be buffered.
|
Ensures neither input or output will be buffered.
|
||||||
.IP \fB-n\fP
|
.IP \fB-i\fP\ \fIinput\fP
|
||||||
Causes SIGINT signals to be ignored.
|
Opens a path as an input. If one or more of the input files is \(lq-\(rq or if
|
||||||
|
no inputs are specified, the standard input shall be used. If specified as the
|
||||||
|
last option and if there are trailing arguments to the program, they shall be
|
||||||
|
appended to the list of files to use as inputs.
|
||||||
|
.IP \fB-o\fP\ \fIoutput\fP
|
||||||
|
Opens a path as an output. If one or more of the output files is \(lq-\(rq or if
|
||||||
|
no outputs are specified and the
|
||||||
|
.B -e
|
||||||
|
option is not specified, the standard output shall be used. If specified as the
|
||||||
|
last option and if there are trailing arguments to the program, they shall be
|
||||||
|
appended to the list of files to use as outputs.
|
||||||
.\"
|
.\"
|
||||||
.SH DIAGNOSTICS
|
.SH DIAGNOSTICS
|
||||||
|
|
||||||
|
@ -45,10 +51,6 @@ exits with the appropriate
|
||||||
.BR sysexits.h (3)
|
.BR sysexits.h (3)
|
||||||
status.
|
status.
|
||||||
.\"
|
.\"
|
||||||
.SH CAVEATS
|
|
||||||
|
|
||||||
Existing files are not truncated on ouput and are instead overwritten.
|
|
||||||
.\"
|
|
||||||
.SH RATIONALE
|
.SH RATIONALE
|
||||||
|
|
||||||
The
|
The
|
||||||
|
|
|
@ -4,7 +4,7 @@
|
||||||
.\" This work is licensed under CC BY-SA 4.0. To see a copy of this license,
|
.\" This work is licensed under CC BY-SA 4.0. To see a copy of this license,
|
||||||
.\" visit <http://creativecommons.org/licenses/by-sa/4.0/>.
|
.\" visit <http://creativecommons.org/licenses/by-sa/4.0/>.
|
||||||
.\"
|
.\"
|
||||||
.TH STRCMP 1 2024-06-17 "Harakit X.X.X"
|
.TH STRCMP 1 2024-07-15 "Harakit X.X.X"
|
||||||
.SH NAME
|
.SH NAME
|
||||||
strcmp \(en compare strings
|
strcmp \(en compare strings
|
||||||
.\"
|
.\"
|
||||||
|
@ -20,15 +20,15 @@ Check whether string arguments are the same.
|
||||||
.SH DIAGNOSTICS
|
.SH DIAGNOSTICS
|
||||||
|
|
||||||
The program will exit successfully if the strings are identical. Otherwise, it
|
The program will exit successfully if the strings are identical. Otherwise, it
|
||||||
will exit with an error code of 1 if a string passed has a lesser byte value
|
will exit with an error code less than 128 if a string passed has a lesser byte
|
||||||
than one of the prior strings:
|
value than one of the prior strings:
|
||||||
|
|
||||||
.RS
|
.RS
|
||||||
strcmp b a
|
strcmp b a
|
||||||
.RE
|
.RE
|
||||||
|
|
||||||
or with an error code of 255 if it has a greater byte value than one of the
|
or with an error code greater than 128 if it has a greater byte value than one
|
||||||
prior strings:
|
of the prior strings:
|
||||||
|
|
||||||
.RS
|
.RS
|
||||||
strcmp a b
|
strcmp a b
|
||||||
|
|
|
@ -11,7 +11,6 @@ swab \(en swap bytes
|
||||||
.SH SYNOPSIS
|
.SH SYNOPSIS
|
||||||
|
|
||||||
swab
|
swab
|
||||||
.RB [ -f ]
|
|
||||||
.RB [ -w\ word_size ]
|
.RB [ -w\ word_size ]
|
||||||
.\"
|
.\"
|
||||||
.SH DESCRIPTION
|
.SH DESCRIPTION
|
||||||
|
@ -20,8 +19,6 @@ Swap the latter and former halves of a block of bytes.
|
||||||
.\"
|
.\"
|
||||||
.SH OPTIONS
|
.SH OPTIONS
|
||||||
|
|
||||||
.IP \fB-f\fP
|
|
||||||
Ignore SIGINT signal.
|
|
||||||
.IP \fB-w\fP\ \fIword_size\fP
|
.IP \fB-w\fP\ \fIword_size\fP
|
||||||
Configures the word size; that is, the size in bytes of the block size on which
|
Configures the word size; that is, the size in bytes of the block size on which
|
||||||
to operate. The default word size is 2. The word size must be cleanly divisible
|
to operate. The default word size is 2. The word size must be cleanly divisible
|
||||||
|
|
531
src/dj.c
531
src/dj.c
|
@ -16,282 +16,113 @@
|
||||||
* along with this program. If not, see https://www.gnu.org/licenses/.
|
* along with this program. If not, see https://www.gnu.org/licenses/.
|
||||||
*/
|
*/
|
||||||
|
|
||||||
#include <ctype.h> /* isupper(3), tolower(3) */
|
#include <assert.h> /* assert(3) */
|
||||||
#include <errno.h> /* errno */
|
#include <errno.h> /* errno */
|
||||||
#include <fcntl.h> /* open(2) */
|
#include <fcntl.h> /* open(2) */
|
||||||
#include <stdio.h> /* fprintf(3), stderr */
|
#include <stdio.h> /* fprintf(3), stderr */
|
||||||
#include <stdlib.h> /* free(3), malloc(3), strtol(3), size_t */
|
#include <stdlib.h> /* malloc(3), strtol(3), size_t */
|
||||||
#include <string.h> /* memcpy(3), memmove(3), memset(3) */
|
#include <string.h> /* memcpy(3), memmove(3), memset(3) */
|
||||||
#include <sysexits.h> /* EX_OK, EX_USAGE */
|
#if !defined EX_OK || !defined EX_OSERR || !defined EX_USAGE
|
||||||
|
# include <sysexits.h>
|
||||||
|
#endif
|
||||||
#include <unistd.h> /* close(2), getopt(3), lseek(2), read(2), write(2),
|
#include <unistd.h> /* close(2), getopt(3), lseek(2), read(2), write(2),
|
||||||
* optarg, optind, STDIN_FILENO, STDOUT_FILENO */
|
* optarg, optind, STDIN_FILENO, STDOUT_FILENO */
|
||||||
|
#include <sys/stat.h> /* S_IRGRP, S_IROTH, S_IRUSR, S_IWGRP, S_IWOTH,
|
||||||
|
S_IWUSR */
|
||||||
extern int errno;
|
extern int errno;
|
||||||
|
|
||||||
|
char *program_name = "dj";
|
||||||
|
|
||||||
/* dj uses two structures that respectively correspond to the reading and
|
/* dj uses two structures that respectively correspond to the reading and
|
||||||
* writing ends of its jockeyed "pipe". User-configurable members are noted
|
* writing ends of its jockeyed "pipe". User-configurable members are noted
|
||||||
* with their relevant options. */
|
* with their relevant options. */
|
||||||
struct Io{
|
struct Io{
|
||||||
int bs; /* buffer size (-bB) */
|
|
||||||
size_t bufuse; /* buffer usage */
|
|
||||||
char *buf; /* buffer */
|
char *buf; /* buffer */
|
||||||
int bytes; /* bytes processed */
|
char *fn; /* file name (-io) */
|
||||||
|
size_t bs; /* buffer size (-bB) */
|
||||||
|
size_t bufuse; /* buffer usage */
|
||||||
|
size_t bytes; /* bytes processed */
|
||||||
|
size_t prec; /* partial records processed */
|
||||||
|
size_t rec; /* records processed */
|
||||||
|
long seek; /* remaining bytes to seek/skip (-sS) */
|
||||||
|
int error; /* errno */
|
||||||
int fd; /* file descriptor */
|
int fd; /* file descriptor */
|
||||||
int fl; /* file opening flags */
|
int fl; /* file opening flags */
|
||||||
char *fn; /* file name (may be stdin_name or stdout_name) (-io) */
|
};
|
||||||
int prec; /* partial records processed */
|
|
||||||
int rec; /* records processed */
|
|
||||||
long seek; /* bytes to seek/skip (will be 0 after skippage) (-sS) */
|
|
||||||
} ep[2]; /* "engineered pipe"; also "extended play", for the deejay */
|
|
||||||
|
|
||||||
/* Additionally, the following global variables are used to store user options.
|
/* To be assigned to main:fmt and used with printio(). */
|
||||||
*/
|
static char *fmt_asv = "%d\037%d\036%d\037%d\035%d\036%d\034";
|
||||||
|
static char *fmt_human = "%d+%d > %d+%d; %d > %d\n";
|
||||||
|
|
||||||
/* (-a) */ static int align; /* Only the lower 8b are used but align is
|
|
||||||
* negative if no alignment is being done. */
|
|
||||||
|
|
||||||
/* (-c) */ static int count; /* 0 if dj(1) runs until no more reads are
|
|
||||||
* possible. */
|
|
||||||
|
|
||||||
/* ASCII field separator delimited statistics */
|
|
||||||
static char *fmt_asv = "%d\037%d\036%d\037%d\035%d\036%d\034";
|
|
||||||
/* human-readable statistics */
|
|
||||||
static char *fmt_human = "%d+%d > %d+%d; %d > %d\n";
|
|
||||||
/* pointer to chosen formatting */
|
|
||||||
/* (-H) */ static char *fmt_output; /* fmt_asv (default) or fmt_human (-H) */
|
|
||||||
|
|
||||||
/* (-dq) */ static char debug; /*
|
|
||||||
* -d increments dj -qq | 0 - no diagnostic output whatsoever
|
|
||||||
* -q decrements dj -q | 1 - typical output without
|
|
||||||
* | notifications on partial reads or
|
|
||||||
* | writes
|
|
||||||
* dj | 2 - typical output (default)
|
|
||||||
* dj -d | 3 - verbose status messages */
|
|
||||||
|
|
||||||
/* (-n) */ static char noerror; /* 0 - exits on partial reads or writes
|
|
||||||
* (default)
|
|
||||||
* 1 - retries on partial reads/writes
|
|
||||||
* (-n) */
|
|
||||||
|
|
||||||
/* Non-configurable defaults. */
|
|
||||||
#define bs_default 1024 /* GNU dd(1) default; twice POSIX but a neat 2^10 */
|
|
||||||
static char *program_name = "<no argv[0]>";
|
|
||||||
static char *stdin_name = "<stdin>";
|
static char *stdin_name = "<stdin>";
|
||||||
static char *stdout_name = "<stdout>";
|
static char *stdout_name = "<stdout>";
|
||||||
static int read_flags = O_RDONLY; /* These flags are consistent with Busybox */
|
|
||||||
static int write_flags = O_WRONLY | O_CREAT; /* dd(1). */
|
|
||||||
|
|
||||||
/* Macro to set defaults for user-configurable options. */
|
static int creat_mode = S_IRUSR | S_IWUSR | S_IRGRP | S_IWGRP | S_IROTH
|
||||||
#define setdefaults do{ \
|
| S_IWOTH; /* Consistent with touch(1p). */
|
||||||
align = -1; \
|
static int read_flags = O_RDONLY; /* Consistent with Busybox dd(1). */
|
||||||
count = 0; \
|
static int write_flags = O_WRONLY | O_CREAT;
|
||||||
debug = 2; \
|
|
||||||
fmt_output = fmt_asv; \
|
|
||||||
noerror = 0; \
|
|
||||||
ep[0].fl = read_flags; \
|
|
||||||
Io_setdefaults(&ep[0]); \
|
|
||||||
ep[1].fl = write_flags; \
|
|
||||||
Io_setdefaults(&ep[1]); }while(0)
|
|
||||||
|
|
||||||
#define MIN(a, b) (((a) < (b)) ? (a) : (b))
|
#define MIN(a, b) (((a) < (b)) ? (a) : (b))
|
||||||
|
|
||||||
/* Macro to check if fd is a std* file, e.g. stdin. */
|
/* Macro to check if fd is stdin or stdout */
|
||||||
#define fdisstd(fd) \
|
#define fdisstd(fd) ((fd) == STDIN_FILENO || (fd) == STDOUT_FILENO)
|
||||||
((fd) == STDIN_FILENO \
|
|
||||||
|| (fd) == STDOUT_FILENO \
|
|
||||||
|| (fd) == STDERR_FILENO)
|
|
||||||
|
|
||||||
/* Macro to call the cleanup functions that operate on struct io on the
|
|
||||||
* particular io[2] used in main. Error conditions are not checked because this
|
|
||||||
* is only used when the program is about to terminate (hence its name). */
|
|
||||||
#define terminate(io) do{ \
|
|
||||||
Io_buffree(&(io)[0]); \
|
|
||||||
Io_buffree(&(io)[1]); \
|
|
||||||
Io_fdclose(&(io)[0]); \
|
|
||||||
Io_fdclose(&(io)[1]); }while(0)
|
|
||||||
|
|
||||||
/* Allocates *io's buffer. Returns NULL if unsuccessful. */
|
|
||||||
static void *
|
|
||||||
Io_bufalloc(struct Io *io){
|
|
||||||
|
|
||||||
return (io->buf = malloc(io->bs * (sizeof *io->buf)));
|
|
||||||
}
|
|
||||||
|
|
||||||
/* Frees *io's buffer. Returns io. */
|
|
||||||
static struct Io *
|
|
||||||
Io_buffree(struct Io *io){
|
|
||||||
|
|
||||||
free(io->buf);
|
|
||||||
|
|
||||||
return io;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* Fills the unused portion of io's buffer with padding, updating io->bufuse.
|
|
||||||
* Returns io. */
|
|
||||||
static struct Io *
|
|
||||||
Io_bufrpad(struct Io *io, int padding){
|
|
||||||
|
|
||||||
memset(io->buf + io->bufuse, padding, io->bs - io->bufuse);
|
|
||||||
io->bufuse = io->bs;
|
|
||||||
|
|
||||||
return io;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* Copies from the buffer in src as much as possible to the free space in the
|
|
||||||
* dest buffer, removing the copied units from src and permuting the remaining
|
|
||||||
* units in the src buffer to the start of the buffer, modifying both the src
|
|
||||||
* and dest bufuse and returning dest. */
|
|
||||||
static struct Io*
|
|
||||||
Io_bufxapp(struct Io *dest, struct Io *src){
|
|
||||||
int n;
|
|
||||||
|
|
||||||
n = MIN(src->bufuse, dest->bs - dest->bufuse);
|
|
||||||
memcpy(dest->buf + dest->bufuse, src->buf, n);
|
|
||||||
dest->bufuse += n;
|
|
||||||
memmove(src->buf, src->buf + n, src->bs - n);
|
|
||||||
src->bufuse -= n;
|
|
||||||
|
|
||||||
return dest;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* Copies from the buffer in src to the buffer in dest no more than n units,
|
|
||||||
* removing the copied units from src and permuting the remaining units in the
|
|
||||||
* src buffer to the start of the buffer, modifying both the src and dest
|
|
||||||
* bufuse and returning dest. */
|
|
||||||
static struct Io*
|
|
||||||
Io_bufxfer(struct Io *dest, struct Io *src, int n){
|
|
||||||
|
|
||||||
memcpy(dest->buf, src->buf, (dest->bufuse = n));
|
|
||||||
memmove(src->buf, src->buf + n, (src->bufuse -= n));
|
|
||||||
|
|
||||||
return dest;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* Closes io->fn and returns -1 on error, otherwise io->fd. */
|
|
||||||
static int
|
|
||||||
Io_fdclose(struct Io *io){
|
|
||||||
|
|
||||||
return fdisstd(io->fd)
|
|
||||||
? 0
|
|
||||||
: close(io->fd);
|
|
||||||
}
|
|
||||||
|
|
||||||
/* Opens io->fn and saves the file descriptor into io->fd. Returns io->fd,
|
|
||||||
* which will be -1 if an error occured. */
|
|
||||||
static int
|
|
||||||
Io_fdopen(struct Io *io, char *fn){
|
|
||||||
int fd;
|
|
||||||
|
|
||||||
if((fd = open(fn, io->fl,
|
|
||||||
/* these are the flags used by touch(1p) */
|
|
||||||
S_IRUSR | S_IWUSR | S_IRGRP | S_IWGRP | S_IROTH | S_IWOTH))
|
|
||||||
!= -1
|
|
||||||
&& Io_fdclose(io) == 0){
|
|
||||||
io->fd = fd;
|
|
||||||
io->fn = fn;
|
|
||||||
}
|
|
||||||
|
|
||||||
return fd;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* Seeks io->seek bytes through *io's file descriptor, (counter-intuitively)
|
|
||||||
* returning -1 if successful and a sysexits.h exit code if an unrecoverable
|
|
||||||
* error occurred. io->buf will be cleared of useful bytes and io->seek will
|
|
||||||
* be set to zero to indicate the seek occurred. */
|
|
||||||
static int
|
|
||||||
Io_fdseek(struct Io *io){
|
|
||||||
int (*op)(int, void *, size_t);
|
|
||||||
|
|
||||||
if(!fdisstd(io->fd) && lseek(io->fd, io->seek, SEEK_SET) != -1)
|
|
||||||
return -1;
|
|
||||||
|
|
||||||
/* repeated code to get the condition out of the loop */
|
|
||||||
if(io->fl == write_flags){
|
|
||||||
memset(io->buf, '\0', io->bs);
|
|
||||||
/* We're going to cheat and use bufuse as the retval for write(2),
|
|
||||||
* which is fine because it'll be zeroed as this function returns
|
|
||||||
* anyway. */
|
|
||||||
do{
|
|
||||||
if((io->bufuse = write(io->fd, io->buf, MIN(io->bs, io->seek)))
|
|
||||||
== 0)
|
|
||||||
/* second chance */
|
|
||||||
io->bufuse = write(io->fd, io->buf, MIN(io->bs, io->seek));
|
|
||||||
}while((io->seek -= io->bufuse) > 0 && io->bufuse != 0);
|
|
||||||
}else if(io->fl == read_flags){
|
|
||||||
do{
|
|
||||||
if((io->bufuse = read(io->fd, io->buf, MIN(io->bs, io->seek)))
|
|
||||||
== 0)
|
|
||||||
/* second chance */
|
|
||||||
io->bufuse = read(io->fd, io->buf, MIN(io->bs, io->seek));
|
|
||||||
}while((io->seek -= io->bufuse) > 0 && io->bufuse != 0);
|
|
||||||
}else
|
|
||||||
return EX_SOFTWARE;
|
|
||||||
|
|
||||||
io->bufuse = 0;
|
|
||||||
|
|
||||||
return -1;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* Reads io->bs bytes from *io's file descriptor into io->buf, storing the
|
|
||||||
* number of read bytes in io->bufuse and updating io->bytes. If io->bufuse is
|
|
||||||
* 0, errno will probably be set. Returns io. */
|
|
||||||
static struct Io *
|
static struct Io *
|
||||||
Io_read(struct Io *io){
|
Io_read(struct Io *io){
|
||||||
|
int t;
|
||||||
|
|
||||||
io->bytes += (io->bufuse = read(io->fd, io->buf, io->bs));
|
assert(io->bs > 0);
|
||||||
|
assert(io->bufuse < io->bs);
|
||||||
|
|
||||||
|
if((t = read(io->fd, &(io->buf)[io->bufuse], io->bs - io->bufuse)) < 0){
|
||||||
|
io->error = errno;
|
||||||
|
t = 0;
|
||||||
|
}
|
||||||
|
|
||||||
|
io->bufuse += t;
|
||||||
|
io->bytes += t;
|
||||||
|
io->prec += (0 < io->bufuse && io->bufuse < io->bs);
|
||||||
|
io->rec += (io->bufuse == io->bs);
|
||||||
|
|
||||||
|
assert(io->bufuse <= io->bs);
|
||||||
|
|
||||||
return io;
|
return io;
|
||||||
}
|
}
|
||||||
|
|
||||||
/* Sets the variables in a struct *io to the defaults. Identifies the read/
|
|
||||||
* write ends of the "pipe" by checking io->fl. Returns io. */
|
|
||||||
static struct Io *
|
|
||||||
Io_setdefaults(struct Io *io){
|
|
||||||
|
|
||||||
io->bs = bs_default;
|
|
||||||
io->buf = NULL;
|
|
||||||
io->bytes = 0;
|
|
||||||
io->fd = (io->fl == read_flags) ? STDIN_FILENO : STDOUT_FILENO;
|
|
||||||
io->fn = (io->fl == read_flags) ? stdin_name : stdout_name;
|
|
||||||
io->prec = 0;
|
|
||||||
io->rec = 0;
|
|
||||||
io->seek = 0;
|
|
||||||
|
|
||||||
return io;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* Writes io->bufuse units from io->buf to io->fd, permuting any unwritten
|
|
||||||
* bytes to the start of io->buf and updating io->bufuse. If io->bufuse doesn't
|
|
||||||
* change, errno will probably be set. Returns io. */
|
|
||||||
static struct Io *
|
static struct Io *
|
||||||
Io_write(struct Io *io){
|
Io_write(struct Io *io){
|
||||||
int t;
|
int t;
|
||||||
|
|
||||||
if((t = write(io->fd, io->buf, io->bufuse)) > 0)
|
assert(io->bufuse > 0);
|
||||||
memmove(io->buf, io->buf + t, (io->bufuse -= t));
|
assert(io->bufuse <= io->bs);
|
||||||
|
|
||||||
|
if((t = write(io->fd, io->buf, io->bufuse)) < 0){
|
||||||
|
io->error = errno;
|
||||||
|
t = 0;
|
||||||
|
}else if(t > 0)
|
||||||
|
memmove(io->buf, &(io->buf)[t], (io->bufuse -= t));
|
||||||
|
|
||||||
io->bytes += t;
|
io->bytes += t;
|
||||||
|
io->prec += (t > 0 && io->bufuse > 0);
|
||||||
|
io->rec += (t > 0 && io->bufuse == 0);
|
||||||
|
|
||||||
return io;
|
return io;
|
||||||
}
|
}
|
||||||
|
|
||||||
/* Prints an error message suitable for the event of an operating system error,
|
|
||||||
* with the error itself to be described in the string s. */
|
|
||||||
static int
|
static int
|
||||||
oserr(char *s){
|
oserr(char *e, int n){
|
||||||
|
fprintf(stderr, "%s: %s: %s\n", program_name, e, strerror(n));
|
||||||
fprintf(stderr, "%s: %s: %s\n", program_name, s, strerror(errno));
|
|
||||||
|
|
||||||
return EX_OSERR;
|
return EX_OSERR;
|
||||||
}
|
}
|
||||||
|
|
||||||
/* Prints statistics regarding the use of dj, particularly partially and
|
/* Prints statistics regarding the use of dj, particularly partially and
|
||||||
* completely read and written records, accessing debug, ep, and fmt_output. */
|
* completely read and written records. */
|
||||||
static void
|
static void
|
||||||
output(void){
|
fprintio(FILE *stream, char *fmt, struct Io io[2]){
|
||||||
|
|
||||||
if(debug >= 1)
|
fprintf(stream, fmt,
|
||||||
fprintf(stderr, fmt_output,
|
io[0].rec, io[0].prec, io[1].rec, io[1].prec,
|
||||||
ep[0].rec, ep[0].prec, ep[1].rec, ep[1].prec,
|
io[0].bytes, io[1].bytes);
|
||||||
ep[0].bytes, ep[1].bytes);
|
|
||||||
|
|
||||||
return;
|
return;
|
||||||
}
|
}
|
||||||
|
@ -311,9 +142,9 @@ parse(char *s){
|
||||||
}
|
}
|
||||||
|
|
||||||
static int
|
static int
|
||||||
usage(void){
|
usage(char *s){
|
||||||
|
|
||||||
fprintf(stderr, "Usage: %s [-AdfHqQ] [-a byte] [-c count]\n"
|
fprintf(stderr, "Usage: %s [-Hn] [-a byte] [-c count]\n"
|
||||||
"\t[-i file] [-b block_size] [-s offset]\n"
|
"\t[-i file] [-b block_size] [-s offset]\n"
|
||||||
"\t[-o file] [-B block_size] [-S offset]\n",
|
"\t[-o file] [-B block_size] [-S offset]\n",
|
||||||
program_name);
|
program_name);
|
||||||
|
@ -322,131 +153,201 @@ usage(void){
|
||||||
}
|
}
|
||||||
|
|
||||||
int main(int argc, char *argv[]){
|
int main(int argc, char *argv[]){
|
||||||
int c;
|
int align; /* low 8b used, negative if no alignment is being done */
|
||||||
int i;
|
int count; /* 0 if dj(1) runs until no more reads are possible */
|
||||||
|
char *fmt; /* == fmt_asv (default) or fmt_human (-H) */
|
||||||
|
size_t i; /* side of io being modified */
|
||||||
|
char noerror; /* 0=exits (default) 1=retries on partial reads or writes */
|
||||||
|
struct Io io[2 /* { in, out } */];
|
||||||
|
|
||||||
setdefaults;
|
/* Set defaults. */
|
||||||
|
align = -1;
|
||||||
|
count = 0;
|
||||||
|
fmt = fmt_asv;
|
||||||
|
noerror = 0;
|
||||||
|
for(i = 0; i < (sizeof io) / (sizeof *io); ++i){
|
||||||
|
io[i].bs = 1024 /* 1 KiB */; /* GNU dd(1) default; POSIX says 512B */
|
||||||
|
io[i].bufuse = 0;
|
||||||
|
io[i].bytes = 0;
|
||||||
|
io[i].fd = i == 0 ? STDIN_FILENO : STDOUT_FILENO;
|
||||||
|
io[i].fn = i == 0 ? stdin_name : stdout_name;
|
||||||
|
io[i].fl = i == 0 ? read_flags : write_flags;
|
||||||
|
io[i].error = 0;
|
||||||
|
io[i].prec = 0;
|
||||||
|
io[i].rec = 0;
|
||||||
|
io[i].seek = 0;
|
||||||
|
}
|
||||||
|
|
||||||
if(argc > 0){
|
if(argc > 0){
|
||||||
|
int c;
|
||||||
|
|
||||||
program_name = argv[0];
|
program_name = argv[0];
|
||||||
while((c = getopt(argc, argv, "a:Ab:B:c:di:hHnqs:S:o:")) != -1)
|
while((c = getopt(argc, argv, ":a:b:B:c:i:hHns:S:o:")) != -1)
|
||||||
switch(c){
|
switch(c){
|
||||||
case 'i': case 'o':
|
case 'i': case 'o': i = (c == 'o');
|
||||||
i = (c == 'o');
|
|
||||||
if(optarg[0] == '-' && optarg[1] == '\0'){ /* optarg == "-" */
|
if(optarg[0] == '-' && optarg[1] == '\0'){ /* optarg == "-" */
|
||||||
ep[i].fd = (i == 0) ? STDIN_FILENO : STDOUT_FILENO;
|
io[i].fd = i == 0 ? STDIN_FILENO : STDOUT_FILENO;
|
||||||
ep[i].fn = (i == 0) ? stdin_name : stdout_name;
|
io[i].fn = i == 0 ? stdin_name : stdout_name;
|
||||||
break;
|
break;
|
||||||
}else if(Io_fdopen(&ep[i], optarg) != -1)
|
}else{
|
||||||
|
int fd;
|
||||||
|
|
||||||
|
if((fd = open(optarg, io[i].fl, creat_mode)) != -1
|
||||||
|
&& (fdisstd(io[i].fd) || close(io[i].fd) == 0)){
|
||||||
|
io[i].fd = fd;
|
||||||
|
io[i].fn = optarg;
|
||||||
break;
|
break;
|
||||||
terminate(ep);
|
}
|
||||||
return oserr(optarg);
|
}
|
||||||
case 'A': align = '\0'; break;
|
return oserr(optarg, errno);
|
||||||
case 'd': ++debug; break;
|
|
||||||
case 'n': noerror = 1; break;
|
case 'n': noerror = 1; break;
|
||||||
case 'H': fmt_output = fmt_human; break;
|
case 'H': fmt = fmt_human; break;
|
||||||
case 'q': --debug; break;
|
|
||||||
case 'a':
|
case 'a':
|
||||||
if(optarg[0] != '\0' && optarg[1] == '\0'){
|
if(optarg[0] == '\0' || optarg[1] == '\0'){
|
||||||
align = optarg[0];
|
align = optarg[0];
|
||||||
break;
|
break;
|
||||||
}
|
}
|
||||||
/* FALLTHROUGH */
|
/* FALLTHROUGH */
|
||||||
case 'c': case 'b': case 's': case 'B': case 'S':
|
case 'c': case 'b': case 's': case 'B': case 'S': /* numbers */
|
||||||
if(c == 'c' && (count = parse(optarg)) >= 0)
|
if(c == 'c' && (count = parse(optarg)) >= 0)
|
||||||
break;
|
break;
|
||||||
i = isupper(c);
|
i = (c >= 'A' && c <= 'Z');
|
||||||
c = tolower(c);
|
c |= 0x20 /* 0b 0010 0000 */; /* (ASCII) make lowercase */
|
||||||
if((c == 'b' && (ep[i].bs = parse(optarg)) > 0)
|
if((c == 'b' && (io[i].bs = parse(optarg)) > 0)
|
||||||
|| (c == 's' && (ep[i].seek = parse(optarg)) >= 0))
|
|| (c == 's' && (io[i].seek = parse(optarg)) >= 0))
|
||||||
break;
|
break;
|
||||||
/* FALLTHROUGH */
|
/* FALLTHROUGH */
|
||||||
default:
|
default:
|
||||||
terminate(ep);
|
return usage(program_name);
|
||||||
return usage();
|
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
if(debug >= 3)
|
assert(io->fd != STDIN_FILENO || io->fl == read_flags);
|
||||||
fprintf(stderr,
|
assert(io->fd != STDOUT_FILENO || io->fl == write_flags);
|
||||||
"argv0=%s\n"
|
|
||||||
"in=%s\tibs=%d\tskip=%ld\talign=%hhx\tcount=%d\n"
|
|
||||||
"out=%s\tobs=%d\tseek=%ld\tdebug=%2d\tnoerror=%d\n",
|
|
||||||
program_name,
|
|
||||||
ep[0].fn, ep[0].bs, ep[0].seek, align, count,
|
|
||||||
ep[1].fn, ep[1].bs, ep[1].seek, debug, noerror);
|
|
||||||
|
|
||||||
if(argc > optind){
|
if(argc > optind)
|
||||||
terminate(ep);
|
return usage(program_name);
|
||||||
return usage();
|
|
||||||
}
|
|
||||||
|
|
||||||
for(i = 0; i <= 1; ++i){
|
for(i = 0; i < (sizeof io) / (sizeof *io); ++i){
|
||||||
if(Io_bufalloc(&ep[i]) == NULL){
|
/* buffer allocation */
|
||||||
fprintf(stderr, "%s: Failed to allocate %d bytes\n",
|
if((io[i].buf = malloc(io[i].bs * (sizeof *(io[i].buf)))) == NULL){
|
||||||
program_name, ep[i].bs);
|
fprintf(stderr, "%s: Failed to allocate %zd bytes\n",
|
||||||
terminate(ep);
|
program_name, io[i].bs);
|
||||||
return EX_OSERR;
|
return EX_OSERR;
|
||||||
}else if(ep[i].seek > 0)
|
|
||||||
switch(Io_fdseek(&ep[i])){
|
|
||||||
case EX_OK:
|
|
||||||
output();
|
|
||||||
terminate(ep);
|
|
||||||
return EX_OK;
|
|
||||||
}
|
}
|
||||||
|
/* easy seeking */
|
||||||
|
if(!fdisstd(io[i].fd) && lseek(io[i].fd, io[i].seek, SEEK_SET) != -1)
|
||||||
|
io[i].seek = 0;
|
||||||
}
|
}
|
||||||
|
|
||||||
do{ /* read */
|
/* hard seeking */
|
||||||
Io_read(&ep[0]);
|
if(io[1].seek > 0){
|
||||||
if(!noerror && ep[0].bufuse == 0)
|
size_t t;
|
||||||
Io_read(&ep[0]); /* second chance */
|
do{
|
||||||
if(ep[0].bufuse == 0) /* that's all she wrote */
|
memset(io[1].buf, '\0',
|
||||||
break;
|
(t = io[1].bufuse = MIN(io[1].bs, io[1].seek)));
|
||||||
else if(ep[0].bufuse < ep[0].bs){
|
if(Io_write(&io[1])->bufuse == t && !noerror && io[1].error == 0)
|
||||||
++ep[0].prec;
|
Io_write(&io[1]); /* second chance */
|
||||||
if(debug >= 2){
|
if(io[1].error != 0)
|
||||||
fprintf(stderr, "%s: Partial read:\n\t", program_name);
|
return oserr(io[1].fn, io[1].error);
|
||||||
output();
|
}while((io[1].seek -= (t - io[1].bufuse)) > 0 && io[1].bufuse != t);
|
||||||
|
io[1].bufuse = 0;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
if(io[1].seek > 0){
|
||||||
|
fprintio(stderr, fmt, io);
|
||||||
|
return oserr(io[1].fn, errno);
|
||||||
|
}
|
||||||
|
|
||||||
|
do{
|
||||||
|
assert(io[0].bufuse == 0);
|
||||||
|
|
||||||
|
{ /* read */
|
||||||
|
long skipping;
|
||||||
|
size_t t;
|
||||||
|
|
||||||
|
/* hack to intentionally get a partial read from Io_read */
|
||||||
|
if((skipping = MIN(io[0].seek, io[0].bs)) > 0)
|
||||||
|
io[0].bufuse = io[0].bs - (size_t)skipping;
|
||||||
|
|
||||||
|
t = io[0].bufuse;
|
||||||
|
if(Io_read(&io[0])->bufuse == t && !noerror && io[0].error == 0)
|
||||||
|
Io_read(&io[0]); /* second chance */
|
||||||
|
assert(io[0].bufuse >= t);
|
||||||
|
if(io[0].bufuse == t) /* that's all she wrote */
|
||||||
|
break;
|
||||||
|
|
||||||
|
if(/* t < io[0].bufuse && */ io[0].bufuse < io[0].bs){
|
||||||
|
fprintf(stderr, "%s: Partial read:\n\t", program_name);
|
||||||
|
fprintio(stderr, fmt, io);
|
||||||
if(!noerror)
|
if(!noerror)
|
||||||
count = 1;
|
count = 1;
|
||||||
if(align >= 0)
|
if(align >= 0){
|
||||||
Io_bufrpad(&ep[0], align);
|
/* fill the rest of the ibuf with padding */
|
||||||
}else
|
memset(&(io[0].buf)[io[0].bufuse], align,
|
||||||
++ep[0].rec;
|
io[0].bs - io[0].bufuse);
|
||||||
|
io->bufuse = io->bs;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
if(skipping > 0){
|
||||||
|
io[0].seek -= skipping;
|
||||||
|
io[0].bufuse = 0;
|
||||||
|
count += (count != 0);
|
||||||
|
continue;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
/* write */
|
/* write */
|
||||||
do{ if(ep[1].bs > ep[0].bs){ /* io[1].bs > io[0].bs */
|
do{
|
||||||
Io_bufxapp(&ep[1], &ep[0]);
|
int t;
|
||||||
if(ep[0].bs + ep[1].bufuse <= ep[1].bs && count != 1)
|
|
||||||
continue; /* we could write more */
|
|
||||||
}else
|
|
||||||
Io_bufxfer(&ep[1], &ep[0], MIN(ep[0].bufuse, ep[1].bs));
|
|
||||||
|
|
||||||
c = ep[1].bufuse;
|
if(io[0].bs <= io[1].bs){
|
||||||
Io_write(&ep[1]);
|
int n;
|
||||||
if(!noerror && ep[1].bufuse == c)
|
|
||||||
Io_write(&ep[1]); /* second chance */
|
/* saturate obuf */
|
||||||
if(c == ep[1].bufuse){ /* no more love */
|
memcpy(io[1].buf, io[0].buf,
|
||||||
|
(io[1].bufuse = (n = MIN(io[0].bufuse, io[1].bs))));
|
||||||
|
/* permute the copied units out of ibuf */
|
||||||
|
memmove(io[0].buf, &(io[0].buf)[n], (io[0].bufuse -= n));
|
||||||
|
}else /* if(io[0].bs < io[1].bs) */ {
|
||||||
|
int n;
|
||||||
|
|
||||||
|
/* drain what we can from ibuf */
|
||||||
|
memcpy(&(io[1].buf)[io[1].bufuse], io[0].buf,
|
||||||
|
(n = MIN(io[0].bufuse, io[1].bs - io[1].bufuse)));
|
||||||
|
io[1].bufuse += n;
|
||||||
|
/* permute out the copied units */
|
||||||
|
memmove(io[0].buf, &(io[0].buf)[n], io[0].bs - n);
|
||||||
|
io[0].bufuse -= n;
|
||||||
|
|
||||||
|
if(io[0].bs + io[1].bufuse <= io[1].bs && count != 1)
|
||||||
|
continue; /* obuf not saturated - we could write more */
|
||||||
|
}
|
||||||
|
|
||||||
|
t = io[1].bufuse;
|
||||||
|
if(Io_write(&io[1])->bufuse == t && !noerror && io[1].error == 0)
|
||||||
|
Io_write(&io[1]); /* second chance */
|
||||||
|
assert(io[1].bufuse <= t);
|
||||||
|
if(io[1].bufuse == t){ /* no more love */
|
||||||
count = 1;
|
count = 1;
|
||||||
break;
|
break;
|
||||||
}else if(c > ep[1].bufuse && ep[1].bufuse > 0){
|
|
||||||
ep[1].prec += 1;
|
|
||||||
if(debug >= 2){
|
|
||||||
fprintf(stderr, "%s: Partial write:\n\t", program_name);
|
|
||||||
output();
|
|
||||||
}
|
}
|
||||||
|
|
||||||
|
if(0 < io[1].bufuse /* && io[1].bufuse < t */){
|
||||||
|
fprintf(stderr, "%s: Partial write:\n\t", program_name);
|
||||||
|
fprintio(stderr, fmt, io);
|
||||||
if(!noerror)
|
if(!noerror)
|
||||||
count = 1;
|
count = 1;
|
||||||
}else if(ep[1].bufuse == 0 && c < ep[1].bs)
|
}
|
||||||
++ep[1].prec;
|
}while(io[0].bufuse > 0);
|
||||||
else
|
|
||||||
++ep[1].rec;
|
|
||||||
}while(ep[0].bufuse > 0);
|
|
||||||
}while(count == 0 || --count > 0);
|
}while(count == 0 || --count > 0);
|
||||||
|
|
||||||
output();
|
fprintio(stderr, fmt, io);
|
||||||
terminate(ep);
|
|
||||||
|
for(i = 0; i < (sizeof io) / (sizeof *io); ++i)
|
||||||
|
if(io[i].error)
|
||||||
|
return oserr(io[i].fn, io[i].error);
|
||||||
|
|
||||||
return EX_OK;
|
return EX_OK;
|
||||||
}
|
}
|
||||||
|
|
82
src/intcmp.c
82
src/intcmp.c
|
@ -1,82 +0,0 @@
|
||||||
/*
|
|
||||||
* Copyright (c) 2023 DTB <trinity@trinity.moe>
|
|
||||||
* SPDX-License-Identifier: AGPL-3.0-or-later
|
|
||||||
*
|
|
||||||
* This program is free software: you can redistribute it and/or modify it under
|
|
||||||
* the terms of the GNU Affero General Public License as published by the Free
|
|
||||||
* Software Foundation, either version 3 of the License, or (at your option) any
|
|
||||||
* later version.
|
|
||||||
*
|
|
||||||
* This program is distributed in the hope that it will be useful, but WITHOUT
|
|
||||||
* ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
|
|
||||||
* FOR A PARTICULAR PURPOSE. See the GNU Affero General Public License for more
|
|
||||||
* details.
|
|
||||||
*
|
|
||||||
* You should have received a copy of the GNU Affero General Public License
|
|
||||||
* along with this program. If not, see https://www.gnu.org/licenses/.
|
|
||||||
*/
|
|
||||||
|
|
||||||
#include <errno.h> /* errno */
|
|
||||||
#include <stdio.h> /* fprintf(3), stderr */
|
|
||||||
#include <stdlib.h> /* strtol(3), size_t, EXIT_FAILURE */
|
|
||||||
#include <unistd.h> /* getopt(3), optind */
|
|
||||||
#include <sysexits.h>
|
|
||||||
|
|
||||||
/* 0b00? */ /* Equal | -e | 0b001 | 1 */
|
|
||||||
#define EQUAL 0x01 /* Greater | -g | 0b010 | 2 */
|
|
||||||
/* 0b0?0 */ /* Greater or Equal | -ge | 0b011 | 3 */
|
|
||||||
#define GREATER 0x02 /* Less | -l | 0b100 | 4 */
|
|
||||||
/* 0b?00 */ /* Less or Equal | -le | 0b101 | 5 */
|
|
||||||
#define LESS 0x04 /* Inequal (Greater or Less) | -gl | 0b110 | 6 */
|
|
||||||
|
|
||||||
static char *program_name = "intcmp";
|
|
||||||
|
|
||||||
int main(int argc, char *argv[]){
|
|
||||||
int c;
|
|
||||||
size_t i;
|
|
||||||
unsigned char mode;
|
|
||||||
int r; /* reference integer */
|
|
||||||
|
|
||||||
mode = 0;
|
|
||||||
|
|
||||||
if(argc < 3)
|
|
||||||
goto usage;
|
|
||||||
|
|
||||||
while((c = getopt(argc, argv, "egl")) != -1)
|
|
||||||
switch(c){
|
|
||||||
case 'e': mode |= EQUAL; break;
|
|
||||||
case 'g': mode |= GREATER; break;
|
|
||||||
case 'l': mode |= LESS; break;
|
|
||||||
default: goto usage;
|
|
||||||
}
|
|
||||||
|
|
||||||
if(optind + 2 /* ref cmp */ > argc){
|
|
||||||
usage: fprintf(stderr,
|
|
||||||
"Usage: %s [-egl] integer integer...\n",
|
|
||||||
argv[0] == NULL ? program_name : argv[0]);
|
|
||||||
return EX_USAGE;
|
|
||||||
}
|
|
||||||
|
|
||||||
i = optind;
|
|
||||||
|
|
||||||
do{ r = c;
|
|
||||||
c = strtol(argv[i], &argv[i], 10);
|
|
||||||
if(*argv[i] != '\0' || errno != 0){
|
|
||||||
fprintf(stderr, "%s: argument #%d: Invalid integer\n",
|
|
||||||
argv[0], (int)i);
|
|
||||||
return EX_USAGE;
|
|
||||||
}
|
|
||||||
|
|
||||||
if(i == optind)
|
|
||||||
continue;
|
|
||||||
|
|
||||||
/* rule enforcement; if a mode isn't permitted and the numbers
|
|
||||||
* correspond to it, return 1 */
|
|
||||||
if( (!(mode & EQUAL) && r == c)
|
|
||||||
|| (!(mode & GREATER) && r > c)
|
|
||||||
|| (!(mode & LESS) && r < c))
|
|
||||||
return 1;
|
|
||||||
}while(++i < argc);
|
|
||||||
|
|
||||||
return 0;
|
|
||||||
}
|
|
79
src/intcmp.rs
Normal file
79
src/intcmp.rs
Normal file
|
@ -0,0 +1,79 @@
|
||||||
|
/*
|
||||||
|
* Copyright (c) 2023–2024 DTB <trinity@trinity.moe>
|
||||||
|
* SPDX-License-Identifier: AGPL-3.0-or-later
|
||||||
|
*
|
||||||
|
* This program is free software: you can redistribute it and/or modify it under
|
||||||
|
* the terms of the GNU Affero General Public License as published by the Free
|
||||||
|
* Software Foundation, either version 3 of the License, or (at your option) any
|
||||||
|
* later version.
|
||||||
|
*
|
||||||
|
* This program is distributed in the hope that it will be useful, but WITHOUT
|
||||||
|
* ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
|
||||||
|
* FOR A PARTICULAR PURPOSE. See the GNU Affero General Public License for more
|
||||||
|
* details.
|
||||||
|
*
|
||||||
|
* You should have received a copy of the GNU Affero General Public License
|
||||||
|
* along with this program. If not, see https://www.gnu.org/licenses/.
|
||||||
|
*/
|
||||||
|
|
||||||
|
use std::{
|
||||||
|
env::args,
|
||||||
|
process::ExitCode
|
||||||
|
};
|
||||||
|
|
||||||
|
extern crate getopt;
|
||||||
|
use getopt::GetOpt;
|
||||||
|
|
||||||
|
extern crate sysexits;
|
||||||
|
use sysexits::EX_USAGE;
|
||||||
|
|
||||||
|
fn usage(s: &str) -> ExitCode {
|
||||||
|
eprintln!("Usage: {} [-egl] integer integer...", s);
|
||||||
|
ExitCode::from(EX_USAGE as u8)
|
||||||
|
}
|
||||||
|
|
||||||
|
fn main() -> ExitCode {
|
||||||
|
let argv = args().collect::<Vec<String>>();
|
||||||
|
let mut e = false; /* args can be == */
|
||||||
|
let mut g = false; /* args can be > */
|
||||||
|
let mut l = false; /* args can be < */
|
||||||
|
let mut optind = 0;
|
||||||
|
|
||||||
|
if argv.len() < 3 { return usage(&argv[0]); }
|
||||||
|
|
||||||
|
while let Some(opt) = argv.getopt("egl") {
|
||||||
|
match opt.opt() {
|
||||||
|
Ok("e") => e = true,
|
||||||
|
Ok("g") => g = true,
|
||||||
|
Ok("l") => l = true,
|
||||||
|
_ => { return usage(&argv[0]); },
|
||||||
|
}
|
||||||
|
optind = opt.ind();
|
||||||
|
}
|
||||||
|
|
||||||
|
if argv.len() - optind < 2 /* see usage */ { return usage(&argv[0]); }
|
||||||
|
|
||||||
|
let mut prev: Option<usize> = None; /* no previous operand */
|
||||||
|
let mut currn: usize;
|
||||||
|
|
||||||
|
for arg in argv.iter().skip(optind) { /* iterate operands */
|
||||||
|
match arg.parse::<usize>() { /* parse current operand */
|
||||||
|
Ok(n) => currn = n,
|
||||||
|
_ => {
|
||||||
|
eprintln!("{}: {}: Invalid integer", &argv[0], arg);
|
||||||
|
return ExitCode::from(EX_USAGE as u8);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
if let Some(prevn) = prev { /* if there was a previous opr., test */
|
||||||
|
if (!e && prevn == currn)
|
||||||
|
|| (!g && prevn > currn)
|
||||||
|
|| (!l && prevn < currn)
|
||||||
|
{ return ExitCode::FAILURE; }
|
||||||
|
}
|
||||||
|
|
||||||
|
prev = Some(currn); /* there is a previous operand */
|
||||||
|
}
|
||||||
|
|
||||||
|
ExitCode::SUCCESS
|
||||||
|
}
|
236
src/mm.c
236
src/mm.c
|
@ -1,236 +0,0 @@
|
||||||
/*
|
|
||||||
* Copyright (c) 2024 DTB <trinity@trinity.moe>
|
|
||||||
* SPDX-License-Identifier: AGPL-3.0-or-later
|
|
||||||
*
|
|
||||||
* This program is free software: you can redistribute it and/or modify it under
|
|
||||||
* the terms of the GNU Affero General Public License as published by the Free
|
|
||||||
* Software Foundation, either version 3 of the License, or (at your option) any
|
|
||||||
* later version.
|
|
||||||
*
|
|
||||||
* This program is distributed in the hope that it will be useful, but WITHOUT
|
|
||||||
* ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
|
|
||||||
* FOR A PARTICULAR PURPOSE. See the GNU Affero General Public License for more
|
|
||||||
* details.
|
|
||||||
*
|
|
||||||
* You should have received a copy of the GNU Affero General Public License
|
|
||||||
* along with this program. If not, see https://www.gnu.org/licenses/.
|
|
||||||
*/
|
|
||||||
|
|
||||||
#include <errno.h> /* errno */
|
|
||||||
#include <signal.h> /* signal(2), SIG_ERR, SIG_IGN, SIGINT */
|
|
||||||
#include <stdio.h> /* fclose(3), fopen(3), fprintf(3), getc(3), putc(3),
|
|
||||||
* setvbuf(3), size_t, _IONBF, NULL */
|
|
||||||
#include <stdlib.h> /* free(3), realloc(3) */
|
|
||||||
#include <string.h> /* strcmp(3), strerror(3) */
|
|
||||||
#include <unistd.h> /* getopt(3) */
|
|
||||||
#if !defined EX_IOERR || !defined EX_OK || !defined EX_OSERR \
|
|
||||||
|| !defined EX_USAGE
|
|
||||||
# include <sysexits.h>
|
|
||||||
#endif
|
|
||||||
extern int errno;
|
|
||||||
|
|
||||||
/* This structure is how open files are tracked. */
|
|
||||||
struct Files{
|
|
||||||
size_t a; /* allocation */
|
|
||||||
size_t s; /* used size */
|
|
||||||
char *mode; /* file opening mode */
|
|
||||||
char **names; /* file names */
|
|
||||||
FILE **files; /* file pointers */
|
|
||||||
};
|
|
||||||
|
|
||||||
/* How much to grow the allocation when it's saturated. */
|
|
||||||
#ifndef ALLOC_INCREMENT
|
|
||||||
# define ALLOC_INCREMENT 1
|
|
||||||
#endif
|
|
||||||
|
|
||||||
/* How much to grow the allocation at program start. */
|
|
||||||
#ifndef ALLOC_INITIAL
|
|
||||||
# define ALLOC_INITIAL 10
|
|
||||||
#endif
|
|
||||||
|
|
||||||
/* pre-allocated strings */
|
|
||||||
static char *program_name = "<no argv[0]>";
|
|
||||||
static char *stdin_name = "<stdin>";
|
|
||||||
static char *stdout_name = "<stdout>";
|
|
||||||
static char *stderr_name = "<stderr>";
|
|
||||||
static char *(fmode[]) = { (char []){"rb"}, (char []){"rb+"} };
|
|
||||||
static char *wharsh = "wb";
|
|
||||||
|
|
||||||
/* Adds the open FILE pointer for the file at the path s to the files struct,
|
|
||||||
* returning the FILE if successful and NULL if not, allocating more memory in
|
|
||||||
* the files buffers as needed. */
|
|
||||||
static FILE *
|
|
||||||
Files_append(struct Files *files, FILE *file, char *name){
|
|
||||||
|
|
||||||
if(file == NULL || (files->s == files->a
|
|
||||||
&& ((files->files = realloc(files->files,
|
|
||||||
(files->a += (files->a == 0)
|
|
||||||
? ALLOC_INITIAL
|
|
||||||
: ALLOC_INCREMENT)
|
|
||||||
* sizeof *(files->files))) == NULL
|
|
||||||
|| (files->names = realloc(files->names,
|
|
||||||
files->a * sizeof *(files->names))) == NULL)))
|
|
||||||
return NULL;
|
|
||||||
|
|
||||||
files->names[files->s] = name;
|
|
||||||
return files->files[files->s++] = file;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* Opens the file at the path p and puts it in the files struct, returning NULL
|
|
||||||
* if either the opening or the placement of the open FILE pointer fail. */
|
|
||||||
#define Files_open(files, p) \
|
|
||||||
Files_append((files), fopen((p), (files)->mode), (p))
|
|
||||||
|
|
||||||
/* Prints a diagnostic message based on errno and returns an exit status
|
|
||||||
* appropriate for an OS error. */
|
|
||||||
static int
|
|
||||||
oserr(char *s, char *r){
|
|
||||||
|
|
||||||
fprintf(stderr, "%s: %s: %s\n", s, r, strerror(errno));
|
|
||||||
|
|
||||||
return EX_OSERR;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* Hijacks i and j from main and destructs the files[2] struct used by main by
|
|
||||||
* closing its files and freeing its files and names arrays, returning retval
|
|
||||||
* from main. */
|
|
||||||
#define terminate \
|
|
||||||
for(i = 0; i < 2; ++i){ \
|
|
||||||
for(j = 0; j < files[i].s; ++j) \
|
|
||||||
if(files[i].files[j] != stdin \
|
|
||||||
&& files[i].files[j] != stdout \
|
|
||||||
&& files[i].files[j] != stderr) \
|
|
||||||
fclose(files[i].files[j]); \
|
|
||||||
free(files[i].files); \
|
|
||||||
free(files[i].names); \
|
|
||||||
} \
|
|
||||||
return retval
|
|
||||||
|
|
||||||
/* Prints a usage text, in which s is the program being run (i.e. argv[0]), and
|
|
||||||
* returns an exit status appropriate for a usage error. */
|
|
||||||
int usage(char *s){
|
|
||||||
|
|
||||||
fprintf(stderr, "Usage: %s [-aenu] [-i input]... [-o output]...\n", s);
|
|
||||||
|
|
||||||
return EX_USAGE;
|
|
||||||
}
|
|
||||||
|
|
||||||
int main(int argc, char *argv[]){
|
|
||||||
int c;
|
|
||||||
struct Files files[2]; /* {read, write} */
|
|
||||||
size_t i;
|
|
||||||
size_t j;
|
|
||||||
size_t k; /* loop index but also unbuffer status */
|
|
||||||
int retval;
|
|
||||||
|
|
||||||
/* Initializes the files structs with their default values, standard
|
|
||||||
* input and standard output. If an input or an output is specified
|
|
||||||
* these initial values will be overwritten, so to, say, use mm(1)
|
|
||||||
* equivalently to tee(1p), -o - will need to be specified before
|
|
||||||
* additional files to ensure standard output is still written. */
|
|
||||||
for(i = 0; i < 2; ++i){
|
|
||||||
files[i].a = 0;
|
|
||||||
files[i].s = 0;
|
|
||||||
files[i].mode = fmode[i];
|
|
||||||
files[i].files = NULL;
|
|
||||||
files[i].names = NULL;
|
|
||||||
Files_append(&files[i], i == 0 ? stdin : stdout,
|
|
||||||
i == 0 ? stdin_name : stdout_name);
|
|
||||||
files[i].s = 0;
|
|
||||||
}
|
|
||||||
|
|
||||||
k = 0;
|
|
||||||
|
|
||||||
if(argc > 0)
|
|
||||||
program_name = argv[0];
|
|
||||||
|
|
||||||
if(argc > 1)
|
|
||||||
while((c = getopt(argc, argv, "aehi:no:u")) != -1)
|
|
||||||
switch(c){
|
|
||||||
case 'a': /* "rb+" -> "ab" */
|
|
||||||
files[1].mode[0] = 'a';
|
|
||||||
files[1].mode[2] = '\0';
|
|
||||||
break;
|
|
||||||
case 'e':
|
|
||||||
if(Files_append(&files[1], stderr, stderr_name) != NULL)
|
|
||||||
break;
|
|
||||||
retval = oserr(argv[0], "-e");
|
|
||||||
terminate;
|
|
||||||
case 'i':
|
|
||||||
if((strcmp(optarg, "-") == 0 && Files_append(&files[0],
|
|
||||||
stdin, stdin_name) != NULL)
|
|
||||||
|| Files_open(&files[0], optarg) != NULL)
|
|
||||||
break;
|
|
||||||
retval = oserr(argv[0], optarg);
|
|
||||||
terminate;
|
|
||||||
case 'o':
|
|
||||||
if((strcmp(optarg, "-") == 0 && Files_append(&files[1],
|
|
||||||
stdout, stdout_name) != NULL)
|
|
||||||
|| Files_open(&files[1], optarg) != NULL)
|
|
||||||
break;
|
|
||||||
/* does not exist, so try to create it */
|
|
||||||
if(errno == ENOENT){
|
|
||||||
files[1].mode = wharsh;
|
|
||||||
if(Files_open(&files[1], optarg) != NULL){
|
|
||||||
files[1].mode = fmode[1];
|
|
||||||
break;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
retval = oserr(argv[0], optarg);
|
|
||||||
terminate;
|
|
||||||
case 'n':
|
|
||||||
if(signal(SIGINT, SIG_IGN) != SIG_ERR)
|
|
||||||
break;
|
|
||||||
retval = oserr(argv[0], "-n");
|
|
||||||
terminate;
|
|
||||||
case 'u':
|
|
||||||
k = 1;
|
|
||||||
break;
|
|
||||||
default:
|
|
||||||
retval = usage(argv[0]);
|
|
||||||
terminate;
|
|
||||||
}
|
|
||||||
|
|
||||||
if(optind != argc){
|
|
||||||
retval = usage(argv[0]);
|
|
||||||
terminate;
|
|
||||||
}
|
|
||||||
|
|
||||||
files[0].s += files[0].s == 0;
|
|
||||||
files[1].s += files[1].s == 0;
|
|
||||||
|
|
||||||
/* Unbuffer files. */
|
|
||||||
if(k){
|
|
||||||
for(i = 0;
|
|
||||||
i < files[0].s;
|
|
||||||
setvbuf(files[0].files[i++], NULL, _IONBF, 0));
|
|
||||||
for(i = 0;
|
|
||||||
i < files[1].s;
|
|
||||||
setvbuf(files[1].files[i++], NULL, _IONBF, 0));
|
|
||||||
}
|
|
||||||
|
|
||||||
retval = EX_OK;
|
|
||||||
|
|
||||||
/* Actual program loop. */
|
|
||||||
for(i = 0; i < files[0].s; ++i) /* iterate ins */
|
|
||||||
while((c = getc(files[0].files[i])) != EOF) /* iterate chars */
|
|
||||||
for(j = 0; j < files[1].s; ++j) /* iterate outs */
|
|
||||||
if(putc(c, files[1].files[j]) == EOF){
|
|
||||||
/* notebook's full */
|
|
||||||
retval = EX_IOERR;
|
|
||||||
fprintf(stderr, "%s: %s: %s\n",
|
|
||||||
program_name, files[1].names[j], strerror(errno));
|
|
||||||
if(fclose(files[1].files[j]) == EOF)
|
|
||||||
fprintf(stderr, "%s: %s: %s\n",
|
|
||||||
program_name, files[1].names[j], strerror(errno));
|
|
||||||
/* massage out the tense muscle */
|
|
||||||
for(k = j--; k < files[1].s - 1; ++k){
|
|
||||||
files[1].files[k] = files[1].files[k+1];
|
|
||||||
files[1].names[k] = files[1].names[k+1];
|
|
||||||
}
|
|
||||||
if(--files[1].s == 0)
|
|
||||||
terminate;
|
|
||||||
}
|
|
||||||
|
|
||||||
terminate;
|
|
||||||
}
|
|
185
src/mm.rs
Normal file
185
src/mm.rs
Normal file
|
@ -0,0 +1,185 @@
|
||||||
|
/*
|
||||||
|
* Copyright (c) 2024 Emma Tebibyte <emma@tebibyte.media>
|
||||||
|
* Copyright (c) 2024 DTB <trinity@trinity.moe>
|
||||||
|
* SPDX-License-Identifier: AGPL-3.0-or-later
|
||||||
|
*
|
||||||
|
* This program is free software: you can redistribute it and/or modify it under
|
||||||
|
* the terms of the GNU Affero General Public License as published by the Free
|
||||||
|
* Software Foundation, either version 3 of the License, or (at your option) any
|
||||||
|
* later version.
|
||||||
|
*
|
||||||
|
* This program is distributed in the hope that it will be useful, but WITHOUT
|
||||||
|
* ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
|
||||||
|
* FOR A PARTICULAR PURPOSE. See the GNU Affero General Public License for more
|
||||||
|
* details.
|
||||||
|
*
|
||||||
|
* You should have received a copy of the GNU Affero General Public License
|
||||||
|
* along with this program. If not, see https://www.gnu.org/licenses/.
|
||||||
|
*/
|
||||||
|
|
||||||
|
use std::{
|
||||||
|
env::args,
|
||||||
|
fs::File,
|
||||||
|
io::{ stdin, stdout, stderr, BufWriter, Read, Write },
|
||||||
|
os::fd::{ AsRawFd, FromRawFd },
|
||||||
|
process::{ exit, ExitCode },
|
||||||
|
};
|
||||||
|
|
||||||
|
extern crate getopt;
|
||||||
|
extern crate strerror;
|
||||||
|
extern crate sysexits;
|
||||||
|
|
||||||
|
use getopt::GetOpt;
|
||||||
|
use strerror::StrError;
|
||||||
|
use sysexits::{ EX_IOERR, EX_USAGE };
|
||||||
|
|
||||||
|
use ArgMode::*;
|
||||||
|
|
||||||
|
enum ArgMode { In, Out }
|
||||||
|
|
||||||
|
fn main() -> ExitCode {
|
||||||
|
let argv = args().collect::<Vec<_>>();
|
||||||
|
let usage = format!("Usage: {} [-aetu] [-i input] [-o output]", argv[0]);
|
||||||
|
|
||||||
|
let mut a = false; /* append to the file */
|
||||||
|
let mut e = false; /* use stderr as an output */
|
||||||
|
let mut t = true; /* do not truncate the file before writing */
|
||||||
|
let mut u = false; /* unbuffer i/o */
|
||||||
|
let mut ins = Vec::new(); /* initial input file path vector */
|
||||||
|
let mut outs = Vec::new(); /* initial output file path vector */
|
||||||
|
let mut mode: Option<ArgMode> = None; /* mode set by last-used option */
|
||||||
|
let mut optind = 0;
|
||||||
|
|
||||||
|
while let Some(opt) = argv.getopt("aei:o:tu") {
|
||||||
|
match opt.opt() {
|
||||||
|
Ok("a") => a = true,
|
||||||
|
Ok("e") => e = true,
|
||||||
|
Ok("u") => u = true,
|
||||||
|
Ok("t") => t = false,
|
||||||
|
Ok("i") => { /* add inputs */
|
||||||
|
let input = opt.arg().unwrap();
|
||||||
|
ins.push(input);
|
||||||
|
mode = Some(In); /* latest argument == -i */
|
||||||
|
},
|
||||||
|
Ok("o") => { /* add output */
|
||||||
|
let output = opt.arg().unwrap();
|
||||||
|
outs.push(output);
|
||||||
|
mode = Some(Out); /* latest argument == -o */
|
||||||
|
},
|
||||||
|
Err(_) | Ok(_) => {
|
||||||
|
eprintln!("{}", usage);
|
||||||
|
return ExitCode::from(EX_USAGE as u8);
|
||||||
|
},
|
||||||
|
};
|
||||||
|
|
||||||
|
optind = opt.ind();
|
||||||
|
}
|
||||||
|
|
||||||
|
let remaining = argv.iter().skip(optind);
|
||||||
|
|
||||||
|
/* check the last flag specified */
|
||||||
|
if let Some(m) = mode {
|
||||||
|
for arg in remaining {
|
||||||
|
/* move the subsequent arguments to the list of inputs or outputs */
|
||||||
|
match m {
|
||||||
|
In => ins.push(arg.to_string()),
|
||||||
|
Out => outs.push(arg.to_string()),
|
||||||
|
};
|
||||||
|
}
|
||||||
|
} else {
|
||||||
|
eprintln!("{}", usage);
|
||||||
|
return ExitCode::from(EX_USAGE as u8);
|
||||||
|
}
|
||||||
|
|
||||||
|
/* use stdin if no inputs are specified */
|
||||||
|
if ins.is_empty() { ins.push("-".to_string()); }
|
||||||
|
|
||||||
|
/* use stdout if no outputs are specified */
|
||||||
|
if outs.is_empty() && !e { outs.push("-".to_string()); }
|
||||||
|
|
||||||
|
/* map all path strings to files */
|
||||||
|
let inputs = ins.iter().map(|file| {
|
||||||
|
/* if a file is “-”, it is stdin */
|
||||||
|
if *file == "-" {
|
||||||
|
/* portable way to access stdin as a file */
|
||||||
|
return unsafe { File::from_raw_fd(stdin().as_raw_fd()) };
|
||||||
|
}
|
||||||
|
|
||||||
|
match File::open(file) {
|
||||||
|
Ok(f) => f,
|
||||||
|
Err(e) => {
|
||||||
|
eprintln!("{}: {}: {}", argv[0], file, e.strerror());
|
||||||
|
exit(EX_IOERR);
|
||||||
|
},
|
||||||
|
}
|
||||||
|
}).collect::<Vec<_>>();
|
||||||
|
|
||||||
|
/* map all path strings to files */
|
||||||
|
let mut outputs = outs.iter().map(|file| {
|
||||||
|
/* of a file is “-”, it is stdout */
|
||||||
|
if *file == "-" {
|
||||||
|
/* portable way to access stdout as a file */
|
||||||
|
return unsafe { File::from_raw_fd(stdout().as_raw_fd()) };
|
||||||
|
}
|
||||||
|
|
||||||
|
let options = File::options()
|
||||||
|
/* don’t truncate if -t is specified, append if -a is specified */
|
||||||
|
.truncate(t)
|
||||||
|
.append(a)
|
||||||
|
/* enable the ability to create and write to files */
|
||||||
|
.create(true)
|
||||||
|
.write(true)
|
||||||
|
/* finally, open the file! */
|
||||||
|
.open(file);
|
||||||
|
|
||||||
|
match options {
|
||||||
|
Ok(f) => return f,
|
||||||
|
Err(e) => {
|
||||||
|
eprintln!("{}: {}: {}", argv[0], file, e.strerror());
|
||||||
|
exit(EX_IOERR);
|
||||||
|
},
|
||||||
|
};
|
||||||
|
}).collect::<Vec<_>>();
|
||||||
|
|
||||||
|
/* if -e is specified, use stderr */
|
||||||
|
if e {
|
||||||
|
/* portable way to access stderr as a file */
|
||||||
|
outputs.push(unsafe { File::from_raw_fd(stderr().as_raw_fd()) });
|
||||||
|
}
|
||||||
|
|
||||||
|
let mut outputs = outputs.iter().map(|o| {
|
||||||
|
if u {
|
||||||
|
/* unbuffered writing through a buffer of capacity 0 */
|
||||||
|
BufWriter::with_capacity(0, o)
|
||||||
|
} else {
|
||||||
|
/* theoretically buffered writing */
|
||||||
|
BufWriter::new(o)
|
||||||
|
}
|
||||||
|
}).collect::<Vec<_>>();
|
||||||
|
|
||||||
|
for file in inputs {
|
||||||
|
for byte in file.bytes().map(|b| {
|
||||||
|
b.unwrap_or_else(|e| {
|
||||||
|
eprintln!("{}: {}", argv[0], e.strerror());
|
||||||
|
exit(EX_IOERR);
|
||||||
|
})
|
||||||
|
}) {
|
||||||
|
for out in &mut outputs {
|
||||||
|
if let Err(e) = out.write(&[byte]) {
|
||||||
|
eprintln!("{}: {}", argv[0], e.strerror());
|
||||||
|
return ExitCode::from(EX_IOERR as u8);
|
||||||
|
}
|
||||||
|
|
||||||
|
if u {
|
||||||
|
/* immediately flush the output for -u */
|
||||||
|
if let Err(e) = out.flush() {
|
||||||
|
eprintln!("{}: {}", argv[0], e.strerror());
|
||||||
|
return ExitCode::from(EX_IOERR as u8);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
ExitCode::SUCCESS
|
||||||
|
}
|
47
src/strcmp.c
47
src/strcmp.c
|
@ -1,24 +1,43 @@
|
||||||
#include <stdio.h> /* fprintf(3), stderr */
|
/*
|
||||||
#include <stdlib.h> /* EXIT_FAILURE */
|
* Copyright (c) 2022–2024 DTB <trinity@trinity.moe>
|
||||||
#include <sysexits.h>
|
* SPDX-License-Identifier: AGPL-3.0-or-later
|
||||||
|
*
|
||||||
|
* This program is free software: you can redistribute it and/or modify it under
|
||||||
|
* the terms of the GNU Affero General Public License as published by the Free
|
||||||
|
* Software Foundation, either version 3 of the License, or (at your option) any
|
||||||
|
* later version.
|
||||||
|
*
|
||||||
|
* This program is distributed in the hope that it will be useful, but WITHOUT
|
||||||
|
* ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
|
||||||
|
* FOR A PARTICULAR PURPOSE. See the GNU Affero General Public License for more
|
||||||
|
* details.
|
||||||
|
*
|
||||||
|
* You should have received a copy of the GNU Affero General Public License
|
||||||
|
* along with this program. If not, see https://www.gnu.org/licenses/.
|
||||||
|
*/
|
||||||
|
|
||||||
static char *program_name = "strcmp";
|
#include <stdio.h> /* fprintf(3), stderr */
|
||||||
|
#include <stdlib.h> /* size_t */
|
||||||
|
#include <sysexits.h> /* EX_USAGE */
|
||||||
|
|
||||||
|
char *program_name = "strcmp";
|
||||||
|
|
||||||
int main(int argc, char *argv[]){
|
int main(int argc, char *argv[]){
|
||||||
int i;
|
if (argc < 3) {
|
||||||
|
|
||||||
if(argc < 3){
|
|
||||||
fprintf(stderr, "Usage: %s string string...\n",
|
fprintf(stderr, "Usage: %s string string...\n",
|
||||||
argv[0] == NULL ? program_name : argv[0]);
|
argv[0] == NULL ? program_name : argv[0]
|
||||||
|
);
|
||||||
return EX_USAGE;
|
return EX_USAGE;
|
||||||
}
|
}
|
||||||
|
|
||||||
for(; *argv[1] != '\0'; ++argv[1])
|
/* This compares the Nth character of arg[2] onward with argv[1]'s Nth
|
||||||
for(i = 2; i < argc; ++i)
|
* character, rather than comparing each arg with argv[1] sequentially. */
|
||||||
if(*argv[i-1] > *argv[i])
|
for (; *argv[1] != '\0'; ++argv[1]) { /* iterate chars in argv[1] */
|
||||||
return 1;
|
for (size_t i = 2; i < argc; ++argv[i], ++i) { /* iterate &argv[2] */
|
||||||
else if(*argv[i-1] < *argv[i]++)
|
/* this never overruns because of nul termination */
|
||||||
return -1; /* actually 255 */
|
if (*argv[i-1] != *argv[i]) { return *argv[i-1] - *argv[i]; }
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
return 0;
|
return 0;
|
||||||
}
|
}
|
||||||
|
|
29
src/swab.rs
29
src/swab.rs
|
@ -1,5 +1,6 @@
|
||||||
/*
|
/*
|
||||||
* Copyright (c) 2024 DTB <trinity@trinity.moe>
|
* Copyright (c) 2024 DTB <trinity@trinity.moe>
|
||||||
|
* Copyright (c) 2024 Emma Tebibyte <emma@tebibyte.media>
|
||||||
* SPDX-License-Identifier: AGPL-3.0-or-later
|
* SPDX-License-Identifier: AGPL-3.0-or-later
|
||||||
*
|
*
|
||||||
* This program is free software: you can redistribute it and/or modify it under
|
* This program is free software: you can redistribute it and/or modify it under
|
||||||
|
@ -18,7 +19,7 @@
|
||||||
|
|
||||||
use std::{
|
use std::{
|
||||||
env::args,
|
env::args,
|
||||||
io::{ stdin, stdout, Error, ErrorKind, Read, Write },
|
io::{ stdin, stdout, Error, Read, Write },
|
||||||
process::ExitCode,
|
process::ExitCode,
|
||||||
vec::Vec
|
vec::Vec
|
||||||
};
|
};
|
||||||
|
@ -29,13 +30,16 @@ use getopt::GetOpt;
|
||||||
extern crate sysexits;
|
extern crate sysexits;
|
||||||
use sysexits::{ EX_OK, EX_OSERR, EX_USAGE };
|
use sysexits::{ EX_OK, EX_OSERR, EX_USAGE };
|
||||||
|
|
||||||
|
extern crate strerror;
|
||||||
|
use strerror::StrError;
|
||||||
|
|
||||||
fn oserr(s: &str, e: Error) -> ExitCode {
|
fn oserr(s: &str, e: Error) -> ExitCode {
|
||||||
eprintln!("{}: {}", s, e);
|
eprintln!("{}: {}", s, e.strerror());
|
||||||
ExitCode::from(EX_OSERR as u8)
|
ExitCode::from(EX_OSERR as u8)
|
||||||
}
|
}
|
||||||
|
|
||||||
fn usage(s: &str) -> ExitCode {
|
fn usage(s: &str) -> ExitCode {
|
||||||
eprintln!("Usage: {} [-f] [-w word_size]", s);
|
eprintln!("Usage: {} [-w word_size]", s);
|
||||||
ExitCode::from(EX_USAGE as u8)
|
ExitCode::from(EX_USAGE as u8)
|
||||||
}
|
}
|
||||||
|
|
||||||
|
@ -45,24 +49,26 @@ fn main() -> ExitCode {
|
||||||
let mut input = stdin();
|
let mut input = stdin();
|
||||||
let mut output = stdout().lock();
|
let mut output = stdout().lock();
|
||||||
|
|
||||||
let mut force = false;
|
let mut optind: usize = 1; // argv[0]
|
||||||
let mut wordsize: usize = 2;
|
let mut wordsize: usize = 2; // Equivalent to dd(1p).
|
||||||
|
|
||||||
while let Some(opt) = argv.getopt("fw:") {
|
while let Some(opt) = argv.getopt("w:") {
|
||||||
match opt.opt() {
|
match opt.opt() {
|
||||||
Ok("f") => force = true,
|
|
||||||
Ok("w") => {
|
Ok("w") => {
|
||||||
if let Some(arg) = opt.arg() {
|
match opt.arg().unwrap().parse::<usize>() {
|
||||||
match arg.parse::<usize>() {
|
Ok(w) if w % 2 == 0 => { wordsize = w; },
|
||||||
Ok(w) if w % 2 == 0 => { wordsize = w; () },
|
|
||||||
_ => { return usage(&argv[0]); },
|
_ => { return usage(&argv[0]); },
|
||||||
}
|
}
|
||||||
}
|
optind = opt.ind();
|
||||||
},
|
},
|
||||||
_ => { return usage(&argv[0]); }
|
_ => { return usage(&argv[0]); }
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
if optind < argv.len() {
|
||||||
|
return usage(&argv[0]);
|
||||||
|
}
|
||||||
|
|
||||||
buf.resize(wordsize, 0);
|
buf.resize(wordsize, 0);
|
||||||
|
|
||||||
loop {
|
loop {
|
||||||
|
@ -80,7 +86,6 @@ fn main() -> ExitCode {
|
||||||
break oserr(&argv[0], e)
|
break oserr(&argv[0], e)
|
||||||
}
|
}
|
||||||
},
|
},
|
||||||
Err(e) if e.kind() == ErrorKind::Interrupted && force => continue,
|
|
||||||
Err(e) => break oserr(&argv[0], e)
|
Err(e) => break oserr(&argv[0], e)
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
Loading…
Reference in New Issue
Block a user