.RB [ \-form
.IR formatfile ]
.RB [ \-normalize " | " \-nonormalize ]
-.RB [ \-width
-.IR columns ]
.RB [ \-version ]
.RB [ \-help ]
.I addrs
.nf
.RB ` \-form "' defaults as described above"
.RB ` \-normalize '
-.RB ` \-width "' defaults to the width of the terminal"
.fi
.SH CONTEXT
.B %libdir%/dp
.RB [ \-form
.IR formatfile ]
-.RB [ \-width
-.IR columns ]
.RB [ \-version ]
.RB [ \-help ]
.I dates
.SH DEFAULTS
.nf
.RB ` \-form "' default as described above"
-.RB ` \-width "' default to the width of the terminal"
.fi
.SH CONTEXT
.RB [ \-form
.IR formatfile ]
.RB [ \-normalize " | " \-nonormalize ]
-.RB [ \-width
-.IR columns ]
.RB [ \-version ]
.RB [ \-help ]
.I addrs
.B %libdir%/dp
.RB [ \-form
.IR formatfile ]
-.RB [ \-width
-.IR columns ]
.RB [ \-version ]
.RB [ \-help ]
.I dates
ali: ali.o aliasbr.o $(LOCALLIBS)
$(LINK) ali.o aliasbr.o $(LINKLIBS)
-ap: ap.o termsbr.o $(LOCALLIBS)
- $(LINK) ap.o termsbr.o $(LINKLIBS) $(TERMLIB)
+ap: ap.o $(LOCALLIBS)
+ $(LINK) ap.o $(LINKLIBS)
anno: anno.o annosbr.o $(LOCALLIBS)
$(LINK) anno.o annosbr.o $(LINKLIBS)
dist: dist.o whatnowproc.o $(LOCALLIBS)
$(LINK) dist.o whatnowproc.o $(LINKLIBS)
-dp: dp.o termsbr.o $(LOCALLIBS)
- $(LINK) dp.o termsbr.o $(LINKLIBS) $(TERMLIB)
+dp: dp.o $(LOCALLIBS)
+ $(LINK) dp.o $(LINKLIBS)
flist: flist.o $(LOCALLIBS)
$(LINK) flist.o $(LINKLIBS)
#define NADDRS 100
-#define WIDTH 78
-#define WBUFSIZ BUFSIZ
-
#define FORMAT "=%<{error}%{error}: %{text}%|%(putstr(proper{text}))%>"
static struct swit switches[] = {
{ "normalize", 0 },
#define NNORMSW 2
{ "nonormalize", 0 },
-#define WIDTHSW 3
- { "width columns", 0 },
-#define VERSIONSW 4
+#define VERSIONSW 3
{ "version", 0 },
-#define HELPSW 5
+#define HELPSW 4
{ "help", 0 },
{ NULL, 0 }
};
static int dat[5];
/*
-** prototypes
-*/
-int sc_width(void); /* from termsbr.c */
-
-/*
** static prototypes
*/
-static int process(char *, int, int);
+static int process(char *, int);
int
main(int argc, char **argv)
{
int addrp = 0, normalize = AD_HOST;
- int width = 0, status = 0;
+ int status = 0;
char *cp, *form = NULL, *nfs;
char buf[BUFSIZ], **argp;
char **arguments, *addrs[NADDRS];
adios(NULL, "missing argument to %s", argp[-2]);
continue;
- case WIDTHSW:
- if (!(cp = *argp++) || *cp == '-')
- adios(NULL, "missing argument to %s", argp[-2]);
- width = atoi(cp);
- continue;
-
case NORMSW:
normalize = AD_HOST;
continue;
/* get new format string */
nfs = new_fs(form, FORMAT);
- if (width == 0) {
- if ((width = sc_width()) < WIDTH / 2)
- width = WIDTH / 2;
- width -= 2;
- }
- if (width > WBUFSIZ)
- width = WBUFSIZ;
fmt_norm = normalize;
fmt_compile(nfs, &fmt);
dat[0] = 0;
dat[1] = 0;
dat[2] = 0;
- dat[3] = width;
+ dat[3] = BUFSIZ;
dat[4] = 0;
for (addrp = 0; addrs[addrp]; addrp++)
- status += process(addrs[addrp], width, normalize);
+ status += process(addrs[addrp], normalize);
done(status);
return 1;
static int
-process(char *arg, int length, int norm)
+process(char *arg, int norm)
{
int status = 0;
register char *cp;
- char buffer[WBUFSIZ + 1], error[BUFSIZ];
+ char buffer[BUFSIZ + 1], error[BUFSIZ];
register struct comp *cptr;
register struct pqpair *p, *q;
struct pqpair pq;
if (cptr)
cptr->c_text = p->pq_error;
- fmt_scan(fmt, buffer, length, dat);
+ fmt_scan(fmt, buffer, BUFSIZ, dat);
fputs(buffer, stdout);
free(p->pq_text);
#define NDATES 100
-#define WIDTH 78
-#define WBUFSIZ BUFSIZ
-
#define FORMAT "=%<(nodate{text})error: %{text}%|%(putstr(pretty{text}))%>"
static struct swit switches[] = {
#define FORMSW 0
{ "form formatfile", 0 },
-#define WIDTHSW 1
- { "width columns", 0 },
-#define VERSIONSW 2
+#define VERSIONSW 1
{ "version", 0 },
-#define HELPSW 3
+#define HELPSW 2
{ "help", 0 },
{ NULL, 0 }
};
static int dat[5];
/*
-** prototypes
-*/
-int sc_width(void); /* from termsbr.c */
-
-/*
** static prototypes
*/
-static int process(char *, int);
+static int process(char *);
int
main(int argc, char **argv)
{
- int datep = 0, width = 0, status = 0;
+ int datep = 0, status = 0;
char *cp, *form = NULL, *nfs;
char buf[BUFSIZ], **argp, **arguments;
char *dates[NDATES];
argp[-2]);
continue;
- case WIDTHSW:
- if (!(cp = *argp++) || *cp == '-')
- adios(NULL, "missing argument to %s",
- argp[-2]);
- width = atoi(cp);
- continue;
}
}
if (datep > NDATES)
/* get new format string */
nfs = new_fs(form, FORMAT);
- if (width == 0) {
- if ((width = sc_width()) < WIDTH / 2)
- width = WIDTH / 2;
- width -= 2;
- }
- if (width > WBUFSIZ)
- width = WBUFSIZ;
fmt_compile(nfs, &fmt);
dat[0] = 0;
dat[1] = 0;
dat[2] = 0;
- dat[3] = width;
+ dat[3] = BUFSIZ;
dat[4] = 0;
for (datep = 0; dates[datep]; datep++)
- status += process(dates[datep], width);
+ status += process(dates[datep]);
context_save(); /* save the context file */
done(status);
static int
-process(char *date, int length)
+process(char *date)
{
int status = 0;
- char buffer[WBUFSIZ + 1];
+ char buffer[BUFSIZ + 1];
register struct comp *cptr;
FINDCOMP(cptr, "text");
if (cptr)
cptr->c_text = date;
- fmt_scan(fmt, buffer, length, dat);
+ fmt_scan(fmt, buffer, BUFSIZ, dat);
fputs(buffer, stdout);
return status;