aboutsummaryrefslogtreecommitdiff
path: root/more.c
blob: 0f67aed49bb92a191fa8a064a547fdc94b8e0708 (plain) (blame)
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
/* SPDX-License-Identifier: BSD-3-Clause */
/*
 * Copyright (C) 2022, 2023 Ferass El Hafidi <vitali64pmemail@protonmail.com>
 */
#include <unistd.h>
#include <stdio.h>
#include <errno.h>
#include <stdlib.h>
#include <string.h>
#include <termios.h>
#include <sys/ioctl.h>

#define REQ_PRINT_USAGE /* Require print_usage() from common.h */
#define REQ_ERRPRINT /* Require errprint() from common.h */
#define DESCRIPTION "Display files in a page-by-page basis."
#define OPERANDS    "file ..."
#include "common.h"

#ifdef FASESBOX
int more_main(int argc, char *argv[]) {
#else
int main(int argc, char *argv[]) {
#endif
	int i = 0, argument, success = 0, read_file = 1;
	long int /* columns, */ lines;
	char buffer[4096], cmd, *argv0 = strdup(argv[0]);
	struct winsize w;
	FILE *file;
	struct termios oldattr, newattr;
	ioctl(STDOUT_FILENO, TIOCGWINSZ, &w);
	if (getenv("LINES")) lines = strtol(getenv("LINES"), NULL, 10) - 1;
	else lines = w.ws_row - 1;
	//if (getenv("COLUMNS")) columns = strtol(getenv("COLUMNS"), NULL, 10);
	//else columns = w.ws_col - 1;

	while ((argument = getopt(argc, argv, "")) != -1) {
		if (argument == '?') {
			print_usage(argv[0], DESCRIPTION, OPERANDS, VERSION);
			return 1;
		}
	} argc -= optind; argv += optind;
	if (argc != 1) {
		print_usage(argv0, DESCRIPTION, OPERANDS, VERSION); return 1;
	}
	file = fopen(argv[0], "r");
	if (errno) return errprint(argv0, argv[0], errno);
	while (!success) {
		if (!read_file) read_file = 1; /* 1 => read on a page-by-page basis
		                                * 0 => don't read at all 
									    * 2 => read on a line-by-line basis
									    */
		for (i = 0; i < lines && read_file != 0; i++) {
			if (fgets(buffer, 4096, file) != NULL) {
				printf("%s", buffer);
			}
			else if (errno) return errprint(argv0, "fgets()", errno);
			else
				putchar((int)'\n');
			if (read_file == 2) {
				break;
			}
		}
		read_file = 0;
		
		/* Get a character */
		tcgetattr(0, &oldattr); /* Get previous terminal parameters */
		newattr = oldattr;
		newattr.c_lflag &= ~( ICANON | ECHO ); /* Disable ECHO and ICANON */
		tcsetattr(0, TCSANOW, &newattr); /* Set net parameters */
		cmd = getchar();
		tcsetattr(0, TCSANOW, &oldattr); /* Restore old parameters */

		if (errno) return errprint(argv0, NULL, errno);
		switch (cmd) {
			case 'q':
				return 0;
			case 'h':
				print_usage(argv0, DESCRIPTION, OPERANDS, VERSION);
				read_file = 0;
				break;
			case ' ':
				read_file = 1; /* page-by-page */
				break;
			default:
				read_file = 2; /* line-by-line */
				break;
		}
	}
	return errprint(argv0, NULL, errno);
}