Mercurial > octave
annotate scripts/miscellaneous/bunzip2.m @ 19258:a4e993343e93
Overhaul the archive family (bzip2, gzip, zip, tar) of m-files.
* NEWS: Announce changes to archive family of functions.
* bunzip2.m: Redo docstring. Use common variable names between docstring and
function. Remove file from test statistics. Default to placing uncompressed
files in same directory as the compressed one.
* bzip2.m: Redo docstring. Use common variable names between docstring and
function. Add extensive BIST test.
* gunzip.m: Redo docstring. Use common variable names between docstring and
function. Remove file from test statistics. Default to placing uncompressed
files in same directory as the compressed one.
* gzip.m: Redo docstring. Remove input validation test that is no longer
applicable.
* __xzip__.m: Create output directory if it is named, but does not yet exist.
Check return code of mkdir and issue an error if it is unsuccesful. Use the
caller's name (gzip or bzip2) in error messages. Rename subfunction myfileparts
to fname_only for slightly more clarity. Add FIXME note that compression of
directories does not work.
* tar.m: Redo docstring. Use common variable names between docstring and
function. Add extensive BIST test.
* untar.m: Redo docstring. Use common variable names between docstring and
function. Remove file from test statistics. Default to placing uncompressed
files in same directory as the compressed one.
* unzip.m: Redo docstring. Use common variable names between docstring and
function. Remove file from test statistics. Default to placing uncompressed
files in same directory as the zip archive.
* zip.m: Redo docstring. Use common variable names between docstring and
function. Add extensive BIST test.
author | Rik <rik@octave.org> |
---|---|
date | Fri, 17 Oct 2014 10:45:25 -0700 |
parents | d63878346099 |
children | 4197fc428c7d |
rev | line source |
---|---|
17744
d63878346099
maint: Update copyright notices for release.
John W. Eaton <jwe@octave.org>
parents:
17338
diff
changeset
|
1 ## Copyright (C) 2006-2013 Bill Denney |
11587
c792872f8942
all script files: untabify and strip trailing whitespace
John W. Eaton <jwe@octave.org>
parents:
11523
diff
changeset
|
2 ## |
6082 | 3 ## This file is part of Octave. |
4 ## | |
5 ## Octave is free software; you can redistribute it and/or modify it | |
6 ## under the terms of the GNU General Public License as published by | |
7016 | 7 ## the Free Software Foundation; either version 3 of the License, or (at |
8 ## your option) any later version. | |
6082 | 9 ## |
10 ## Octave is distributed in the hope that it will be useful, but | |
11 ## WITHOUT ANY WARRANTY; without even the implied warranty of | |
12 ## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | |
13 ## General Public License for more details. | |
14 ## | |
15 ## You should have received a copy of the GNU General Public License | |
7016 | 16 ## along with Octave; see the file COPYING. If not, see |
17 ## <http://www.gnu.org/licenses/>. | |
6082 | 18 |
19 ## -*- texinfo -*- | |
19258
a4e993343e93
Overhaul the archive family (bzip2, gzip, zip, tar) of m-files.
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
20 ## @deftypefn {Function File} {@var{filelist} =} bunzip2 (@var{bzfile}) |
a4e993343e93
Overhaul the archive family (bzip2, gzip, zip, tar) of m-files.
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
21 ## @deftypefnx {Function File} {@var{filelist} =} bunzip2 (@var{bzfile}, @var{dir}) |
a4e993343e93
Overhaul the archive family (bzip2, gzip, zip, tar) of m-files.
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
22 ## Unpack the bzip2 archive @var{bzfile}. |
a4e993343e93
Overhaul the archive family (bzip2, gzip, zip, tar) of m-files.
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
23 ## |
a4e993343e93
Overhaul the archive family (bzip2, gzip, zip, tar) of m-files.
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
24 ## If @var{dir} is specified the files are unpacked in this directory rather |
a4e993343e93
Overhaul the archive family (bzip2, gzip, zip, tar) of m-files.
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
25 ## than the one where @var{bzfile} is located. |
a4e993343e93
Overhaul the archive family (bzip2, gzip, zip, tar) of m-files.
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
26 ## |
a4e993343e93
Overhaul the archive family (bzip2, gzip, zip, tar) of m-files.
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
27 ## The optional output @var{filelist} is a list of the uncompressed files. |
12500
8f2056646dba
Improve docstrings for archive functions (gzip, bzip2, etc.)
Rik <octave@nomad.inbox5.com>
parents:
11587
diff
changeset
|
28 ## @seealso{bzip2, unpack, gunzip, unzip, untar} |
6082 | 29 ## @end deftypefn |
30 | |
31 ## Author: Bill Denney <denney@seas.upenn.edu> | |
32 | |
19258
a4e993343e93
Overhaul the archive family (bzip2, gzip, zip, tar) of m-files.
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
33 function filelist = bunzip2 (bzfile, dir = []) |
6082 | 34 |
19258
a4e993343e93
Overhaul the archive family (bzip2, gzip, zip, tar) of m-files.
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
35 if (nargin < 1 || nargin > 2) |
6082 | 36 print_usage (); |
37 endif | |
38 | |
19258
a4e993343e93
Overhaul the archive family (bzip2, gzip, zip, tar) of m-files.
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
39 if (isempty (dir)) |
a4e993343e93
Overhaul the archive family (bzip2, gzip, zip, tar) of m-files.
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
40 dir = fileparts (bzfile); |
a4e993343e93
Overhaul the archive family (bzip2, gzip, zip, tar) of m-files.
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
41 endif |
a4e993343e93
Overhaul the archive family (bzip2, gzip, zip, tar) of m-files.
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
42 |
6599 | 43 if (nargout > 0) |
19258
a4e993343e93
Overhaul the archive family (bzip2, gzip, zip, tar) of m-files.
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
44 filelist = unpack (bzfile, dir, "bunzip2"); |
6599 | 45 else |
19258
a4e993343e93
Overhaul the archive family (bzip2, gzip, zip, tar) of m-files.
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
46 unpack (bzfile, dir, "bunzip2"); |
6599 | 47 endif |
6082 | 48 |
49 endfunction | |
17338
1c89599167a6
maint: End m-files with 1 blank line.
Rik <rik@octave.org>
parents:
14138
diff
changeset
|
50 |
19258
a4e993343e93
Overhaul the archive family (bzip2, gzip, zip, tar) of m-files.
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
51 |
a4e993343e93
Overhaul the archive family (bzip2, gzip, zip, tar) of m-files.
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
52 ## Tests for this m-file are located in bzip2.m |
a4e993343e93
Overhaul the archive family (bzip2, gzip, zip, tar) of m-files.
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
53 ## Remove from test statistics |
a4e993343e93
Overhaul the archive family (bzip2, gzip, zip, tar) of m-files.
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
54 %!assert (1) |
a4e993343e93
Overhaul the archive family (bzip2, gzip, zip, tar) of m-files.
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
55 |