aboutsummaryrefslogtreecommitdiff
path: root/unix/hlib/util.csh/fget
blob: 23af7c6af87165092b763c0285fdcc85722e7e34 (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
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
#!/bin/csh -f
#
#  FGET -- Download a URL.
#
#  Usage:     fget [-h] [-n] [-q | -v] url
#
#  Where	-n	no-op flag
#		-q 	suppress output
#		-v 	verbose output
#		-d 	set download directory
#		-o 	set output filename
#		-h 	this message
#
#  Example:
#	% fget -q ftp://iraf.noao.edu/iraf/extern/foo-linux.tar.gz
#
# ----------------------------------------------------------------------------


unset	noclobber
onintr	cleanup_
unalias cd cp cmp echo ln mv rm sed set grep ls chmod chown pwd touch sort which
unalias ftp wget

setenv	path  "(../util /sbin /usr/sbin /bin /usr/bin /usr/5bin /usr/ucb /etc /usr/etc $path /usr/local/bin /opt/local/bin /local/bin /home/local/bin)"

# set echo


##############################################################################
# START OF MACHDEP DEFINITIONS.
##############################################################################

# MACHDEP definitions which may be reset below.


# Find the iraf root directory.
if (! $?iraf) then
  set iraf = ""
  foreach f ( ~/.iraf.h ~/.iraf/iraf.h /usr/include/iraf.h)
     # $iraf is defined, use a well-known path for the system
     if (-e ${f}) then
       set i = `egrep IRAF ${f} | egrep \#define | sed -e 's/"//g'`
       set iraf = $i[3]
echo $i
       break
     endif
  end
endif
if ("$iraf" == "") then
    if (-e /iraf/iraf) then
	set iraf = /iraf/iraf/
    else
	set iraf = `dirname $0`/../
    endif
endif

# Determine platform architecture.
set arch = `$iraf/unix/hlib/irafarch.csh`


##############################################################################
# END OF MACHDEP DEFINITIONS.
##############################################################################

#=============================================================================
# Declarations and initializations.
#=============================================================================

set exec	= yes
set verb	= no
set url		= ""
set fname	= ""
set ddir	= ""


# Process cmdline flags.
while ("$1" != "")
    switch ("$1")
    case -n:                            # no execute
        set exec  = no
        breaksw
    case -q:                            # be quiet
        set verb  = no
        set quiet = yes
        breaksw
    case -v:                            # be chatty
        set verb  = yes
        set quiet = no
        breaksw
    case -h:                            # print help summary
        goto Usage
    case -d:                            # set download directory
        set ddir = $2
	shift
        breaksw
    case -o:                            # set output file name
        set fname = $2
	shift
        breaksw
    default:
        set url = $1
        break
    endsw

    if ("$2" == "") then
        break
    else
        shift
    endif
end


#  Error checks.
if ("$url" == "") then
   if ("$verb" == "yes") then
      echo "ERROR: URL not specified"
   endif
   exit 1
endif

# Get the download filename.  Delete an existing copy of the file
if ($fname == "") then
    set fname = $url:t
endif
if (-e "$fname") then
    /bin/rm -f $fname
endif

# Ensure URL is an HTTP protocol.
set prot =  `echo $url | cut -c1-3`
if ("$prot" == "ftp") then
  set u = `echo $url | sed -e 's;ftp://iraf.noao.edu/iraf;http://iraf.noao.edu/ftp;'`
  set url = $u
endif

#  Do it.
if ("$exec" == "yes") then
   if ("$verb" == "yes") then
      echo "Downloading "$url" ...."
   endif

   set args = "url='$url' fname='${ddir}${fname}' cache='/tmp' verbose=no extn='' use_cache=no"
   if ("$verb" == "no") then
      $iraf/bin.$arch/x_system.e urlget ${args} \$nargs=2	>& /dev/null
   else
      $iraf/bin.$arch/x_system.e urlget ${args} \$nargs=2
   endif

   if ("$verb" == "yes") then
      echo "done"
   endif
endif


#  Verify we have the file.
if (! -e $url:t) then
   if ("$verb" == "yes") then
      echo "Error downloading file '"$fname"'"
   endif
   exit 1
else
   if ($#argv > 1) then
      mv $url:t $2
   endif
endif

#  Normal exit.
exit 0



#=============================================================================
# Usage
#=============================================================================

Usage:
    echo "Usage: fget [-h] [-n] [-q | -v] url"
    echo ""
    echo "    where -n          # no execute"
    echo "          -q          # suppress output"
    echo "          -v          # verbose output"
    echo "          -h          # this message"

exit 0