util.c File Reference

#include <config.h>
#include <ctype.h>
#include <errno.h>
#include "tailor.h"
#include "gzip.h"
#include "crypt.h"
#include <xalloc.h>

Go to the source code of this file.

Defines
#define	CHAR_BIT   8
#define	const
#define	SEPARATOR   " \t"
Functions
static int write_buffer	OF ((int, voidp, unsigned int))
int	copy (int in, int out)
ulg	updcrc (uch *s, unsigned n)
void	clear_bufs ()
int	fill_inbuf (int eof_ok)
int	read_buffer (int fd, voidp buf, unsigned int cnt)
static int	write_buffer (int fd, voidp buf, unsigned int cnt)
void	flush_outbuf ()
void	flush_window ()
void	write_buf (int fd, voidp buf, unsigned cnt)
char *	strlwr (char *s)
char *	gzip_base_name (char *fname)
int	xunlink (char *filename)
void	make_simple_name (char *name)
int	strspn (char *s, const char *accept) const
int	strcspn (char *s, const char *reject) const
char *	add_envopt (int *argcp, char ***argvp, char *env)
void	gzip_error (char *m)
void	xalloc_die ()
void	warning (char *m)
void	read_error ()
void	write_error ()
void	display_ratio (off_t num, off_t den, FILE *file)
void	fprint_off (FILE *file, off_t offset, int width)
Variables
int	errno
ulg	crc_32_tab []

---

Define Documentation

#define CHAR_BIT   8

Definition at line 52 of file util.c.

#define const

Definition at line 310 of file util.c.

#define SEPARATOR   " \t"

Definition at line 362 of file util.c. Referenced by add_envopt().

---

Function Documentation

char* add_envopt (  int *  argcp, char ***  argvp, char *  env )

Definition at line 364 of file util.c. References gzip_error(), NULL, SEPARATOR, strcspn(), strspn(), xcalloc(), and xstrdup(). Referenced by main(). { char *p; /* running pointer through env variable */ char **oargv; /* runs through old argv array */ char **nargv; /* runs through new argv array */ int oargc = *argcp; /* old argc */ int nargc = 0; /* number of arguments in env variable */ env = (char*)getenv(env); if (env == NULL) return NULL; env = xstrdup (env); for (p = env; *p; nargc++ ) { /* move through env */ p += strspn(p, SEPARATOR); /* skip leading separators */ if (*p == '\0') break; p += strcspn(p, SEPARATOR); /* find end of word */ if (*p) *p++ = '\0'; /* mark it */ } if (nargc == 0) { free(env); return NULL; } *argcp += nargc; /* Allocate the new argv array, with an extra element just in case * the original arg list did not end with a NULL. */ nargv = (char **) xcalloc (*argcp + 1, sizeof (char *)); oargv = *argvp; *argvp = nargv; /* Copy the program name first */ if (oargc-- < 0) gzip_error ("argc<=0"); *(nargv++) = *(oargv++); /* Then copy the environment args */ for (p = env; nargc > 0; nargc--) { p += strspn(p, SEPARATOR); /* skip separators */ *(nargv++) = p; /* store start */ while (*p++) ; /* skip over word */ } /* Finally copy the old args and add a NULL (usual convention) */ while (oargc--) *(nargv++) = *(oargv++); *nargv = NULL; return env; }

void clear_bufs (   )

Definition at line 107 of file util.c. References bytes_in, bytes_out, inptr, insize, and outcnt. Referenced by treat_file(), and treat_stdin(). { outcnt = 0; insize = inptr = 0; bytes_in = bytes_out = 0L; }

int copy (  int  in, int  out )

Definition at line 63 of file util.c. References bytes_in, bytes_out, errno, INBUFSIZ, insize, OK, read_buffer(), read_error(), and write_buf(). Referenced by get_method(). { errno = 0; while (insize != 0 && (int)insize != -1) { write_buf(out, (char*)inbuf, insize); bytes_out += insize; insize = read_buffer (in, (char *) inbuf, INBUFSIZ); } if ((int)insize == -1) { read_error(); } bytes_in = bytes_out; return OK; }

void display_ratio (  off_t  num, off_t  den, FILE *  file )

Definition at line 466 of file util.c. Referenced by do_list(), treat_file(), and treat_stdin(). { fprintf(file, "%5.1f%%", den == 0 ? 0 : 100.0 * num / den); }

int fill_inbuf (  int  eof_ok  )

Definition at line 117 of file util.c. References bytes_in, errno, flush_window(), ifd, INBUFSIZ, inptr, insize, read_buffer(), and read_error(). Referenced by input_eof(). { int len; /* Read as much as possible */ insize = 0; do { len = read_buffer (ifd, (char *) inbuf + insize, INBUFSIZ - insize); if (len == 0) break; if (len == -1) { read_error(); break; } insize += len; } while (insize < INBUFSIZ); if (insize == 0) { if (eof_ok) return EOF; flush_window(); errno = 0; read_error(); } bytes_in += (off_t)insize; inptr = 1; return inbuf[0]; }

void flush_outbuf (   )

Definition at line 178 of file util.c. References bytes_out, ofd, outcnt, and write_buf(). Referenced by zip(). { if (outcnt == 0) return; write_buf(ofd, (char *)outbuf, outcnt); bytes_out += (off_t)outcnt; outcnt = 0; }

void flush_window (   )

Definition at line 191 of file util.c. References bytes_out, ofd, outcnt, test, updcrc(), and write_buf(). Referenced by fill_inbuf(), unpack(), and unzip(). { if (outcnt == 0) return; updcrc(window, outcnt); if (!test) { write_buf(ofd, (char *)window, outcnt); } bytes_out += (off_t)outcnt; outcnt = 0; }

void fprint_off (  FILE *  file, off_t  offset, int  width )

Definition at line 478 of file util.c. References CHAR_BIT. Referenced by do_list(). { char buf[CHAR_BIT * sizeof (off_t)]; char *p = buf + sizeof buf; /* Don't negate offset here; it might overflow. */ if (offset < 0) { do *--p = '0' - offset % 10; while ((offset /= 10) != 0); *--p = '-'; } else { do *--p = '0' + offset % 10; while ((offset /= 10) != 0); } width -= buf + sizeof buf - p; while (0 < width--) { putc (' ', file); } for (; p < buf + sizeof buf; p++) putc (*p, file); }

char* gzip_base_name (  char *  fname  )

Definition at line 241 of file util.c. References casemap, NULL, PATH_SEP, strlwr(), and strrchr. Referenced by get_method(), main(), and zip(). { char *p; if ((p = strrchr(fname, PATH_SEP)) != NULL) fname = p+1; #ifdef PATH_SEP2 if ((p = strrchr(fname, PATH_SEP2)) != NULL) fname = p+1; #endif #ifdef PATH_SEP3 if ((p = strrchr(fname, PATH_SEP3)) != NULL) fname = p+1; #endif #ifdef SUFFIX_SEP if ((p = strrchr(fname, SUFFIX_SEP)) != NULL) *p = '\0'; #endif if (casemap('A') == 'a') strlwr(fname); return fname; }

void gzip_error (  char *  m  )

Definition at line 421 of file util.c. References abort_gzip(), ifname, and program_name. Referenced by add_envopt(), flush_block(), get_method(), lm_init(), make_table(), read_pt_len(), read_tree(), shorten_name(), unlzw(), unpack(), and unzip(). { fprintf (stderr, "\n%s: %s: %s\n", program_name, ifname, m); abort_gzip(); }

void make_simple_name (  char *  name  )

Definition at line 293 of file util.c. References NULL, and strrchr. { char *p = strrchr(name, '.'); if (p == NULL) return; if (p == name) p++; do { if (*--p == '.') *p = '_'; } while (p != name); }

static int write_buffer OF (  (int, voidp, unsigned int)   )  [static]

int read_buffer (  int  fd, voidp  buf, unsigned int  cnt )

Definition at line 148 of file util.c. Referenced by copy(), file_read(), fill_inbuf(), and unlzw(). { #ifdef SSIZE_MAX if (SSIZE_MAX < cnt) cnt = SSIZE_MAX; #endif return read (fd, buf, cnt); }

void read_error (   )

Definition at line 441 of file util.c. References abort_gzip(), errno, ifname, and program_name. Referenced by copy(), do_list(), file_read(), fill_inbuf(), treat_file(), and unlzw(). { int e = errno; fprintf (stderr, "\n%s: ", program_name); if (e != 0) { errno = e; perror(ifname); } else { fprintf(stderr, "%s: unexpected end of file\n", ifname); } abort_gzip(); }

int strcspn (  char *  s, const char *  reject )  const

Definition at line 342 of file util.c. References NULL, and strchr. Referenced by add_envopt(), and shorten_name(). { register int count = 0; while (*s != '\0') { if (strchr(reject, *s++) != NULL) return count; ++count; } return count; }

char* strlwr (  char *  s  )

Definition at line 226 of file util.c. References tolow. Referenced by get_suffix(), gzip_base_name(), and make_ofname(). { char *t; for (t = s; *t; t++) *t = tolow ((unsigned char) *t); return s; }

int strspn (  char *  s, const char *  accept )  const

Definition at line 320 of file util.c. References a. Referenced by add_envopt(). { register const char *p; register const char *a; register int count = 0; for (p = s; *p != '\0'; ++p) { for (a = accept; *a != '\0'; ++a) { if (*p == *a) break; } if (*a == '\0') return count; ++count; } return count; }

ulg updcrc (  uch *  s, unsigned  n )

Definition at line 84 of file util.c. References crc, and NULL. Referenced by file_read(), flush_window(), unzip(), and zip(). { register ulg c; /* temporary variable */ static ulg crc = (ulg)0xffffffffL; /* shift register contents */ if (s == NULL) { c = 0xffffffffL; } else { c = crc; if (n) do { c = crc_32_tab[((int)c ^ (*s++)) & 0xff] ^ (c >> 8); } while (--n); } crc = c; return c ^ 0xffffffffL; /* (instead of ~c for 64-bit machines) */ }

void warning (  char *  m  )

Definition at line 435 of file util.c. References ifname, program_name, and WARN. Referenced by set_file_type(). { WARN ((stderr, "%s: %s: warning: %s\n", program_name, ifname, m)); }

void write_buf (  int  fd, voidp  buf, unsigned  cnt )

Definition at line 207 of file util.c. References write_buffer(), and write_error(). Referenced by copy(), flush_outbuf(), flush_window(), unlzh(), and unlzw(). { unsigned n; while ((n = write_buffer (fd, buf, cnt)) != cnt) { if (n == (unsigned)(-1)) { write_error(); } cnt -= n; buf = (voidp)((char*)buf+n); } }

static int write_buffer (  int  fd, voidp  buf, unsigned int  cnt )  [static]

Definition at line 162 of file util.c. Referenced by write_buf(). { #ifdef SSIZE_MAX if (SSIZE_MAX < cnt) cnt = SSIZE_MAX; #endif return write (fd, buf, cnt); }

void write_error (   )

Definition at line 454 of file util.c. References abort_gzip(), errno, ofname, and program_name. Referenced by treat_file(), and write_buf(). { int e = errno; fprintf (stderr, "\n%s: ", program_name); errno = e; perror(ofname); abort_gzip(); }

void xalloc_die (  void   )

Definition at line 429 of file util.c. References _, abort_gzip(), error(), exit_failure, and program_name. { fprintf (stderr, "\n%s: memory_exhausted\n", program_name); abort_gzip (); }

int xunlink (  char *  filename  )

Definition at line 263 of file util.c. References errno, and S_IWUSR. Referenced by check_ofname(), remove_output_file(), and treat_file(). { int r = unlink (filename); #ifdef UNLINK_READONLY_BUG if (r != 0) { int e = errno; if (chmod (filename, S_IWUSR) != 0) { errno = e; return -1; } r = unlink (filename); } #endif return r; }

---

Variable Documentation

ulg crc_32_tab

Definition at line 510 of file util.c.

int errno

---

© sourcejam.com 2005-2008