home *** CD-ROM | disk | FTP | other *** search
/ Columbia Kermit / kermit.zip / ckscripts / rawhide < prev    next >
Text File  |  2020-01-01  |  5KB  |  98 lines
  1. ; Red Hat Linux Rawhide Script - Daily RPM update from Rawhide.
  2. ;
  3. ; Only gets files that don't already exist on local disk (COLLISION DISCARD)
  4. ; Skips files I don't want (MGET selection patterns and /EXCEPT: clauses).
  5. ; /UPDATE could be used but buys little in this case because the filenames
  6. ; change when the files change.  Since the Rawhide connection is so slow, and
  7. ; since we are skipping the large majority of files, interactions with the
  8. ; FTP server must be kept to a minimum: thus no date or size checking and
  9. ; therefore also no recovery (sometimes a single SIZE or DATE command can
  10. ; take 30 seconds; if we did SIZE and DATE for each of 1500 files, that's
  11. ; 1500 minutes = a day and change).
  12. ;
  13. ; Requires C-Kermit 8.0 or K95 2.0 or later.
  14. ;
  15. ; Author: Vace Kundakci, Columbia University, July 2002.
  16.  
  17. ; set ftp debug on                       ; Uncomment to debug
  18.  
  19. set locus local                          ; Avoid K95 LOCUS popup
  20.  
  21. ; Make connection Red Hat Rawhide server:
  22. ;   /ANONYMOUS logs in anonymously
  23. ;   /NOINIT suppresses STRU F and MODE S commands,
  24. ;   which Red Hat server does not understand.
  25. ;
  26. ftp rawhide.redhat.com /noinit /anonymous
  27. if fail end 1 Connection failed
  28. if not \v(ftp_loggedin) end 1 Login failed
  29.  
  30. ftp cd /pub/redhat/linux/rawhide/i386/RedHat/RPMS/
  31. if fail end 1 CD to RPMS directory failed
  32.  
  33. ; Preferences for this session
  34.  
  35. set ftp dates on                        ; Preserve file dates
  36. set xfer display brief                  ; FTP-like transfer display
  37. ftp type binary                         ; Force binary mode
  38. set incomplete discard                  ; Discard incompletely received files
  39. set ftp collision discard               ; Don't download files I already have
  40.  
  41. ; SET TAKE ERROR ON makes the script quit automatically if any MGET fails,
  42. ; without having to put an IF ERROR clause after each MGET.  This won't
  43. ; work prior to C-Kermit 8.0.205 because an MGET that results in zero files
  44. ; downloaded erroneously fails.  (Ditto for K95 2.0.1 and earlier.)
  45. ;
  46. if >= \v(version) 800205 set take error on
  47.  
  48. ; Get the files...
  49.  
  50. mget libstdc++-* glibc-devel* ncurses-*
  51.  
  52. mget /except:{*-devel*} 4* GConf2* Glide3* LPR* MAKE* O* PyXML-* SysV* V*
  53.  
  54. mget /except:{{*-devel*} {a[bm]*}{anaconda*}{aspell-[a-z]*}} a*
  55. mget /except:{{*-devel*} {balsa*}{bash-doc*}} b*
  56. mget /except:{{*-devel*} {chromium*}{compat-[dgl]*}{cvs*}{cWnn*}} c*
  57. mget /except:{{*-devel*} {db4-[uj]*}{ddd-*}{d[bd]skk*}{desktop-*}{dia-*}-
  58.                          {docbook-style*}{doxygen*}} d*
  59. mget /except:{{*-devel*} {eel*}{emacs-[el]*}{emacsp*}{epic*}{evolu*}{exmh*}} e*
  60. mget /except:{{*-devel*} {festival*}{fonts-*}{freeciv*}} f*
  61. mget /except:{{*-devel*} {g[ailnt]*}{gcc-[gjo]*}{gd[bm]-*}{gedit*}-
  62.                          {gphoto2*}{gsl*}} g*
  63. mget /except:{{*-devel*} {gaim*}{galeon*}{gated*}{gtk-engines*}{gtkhtml-*}-
  64.                          {gimp-print-c*}{gimp-[d,0-9]*}} ga* gi* gt*
  65. mget /except:{{*-devel*} {*.i686.rpm}{glade*}{glibc-[dp]*}} gl*
  66. mget /except:{{*-devel*} {gnomem*}{*-game*}{*-user*}{*-pilot*}{*-audio*}-
  67.                          {gnucash*}{gnumeric*}} gn*
  68. mget /except:{{*-devel*} {ht[td]*}{im-*}{inn-*}{imap*}{isdn*}{itcl*}} h* i* j*
  69. mget /except:{{*-devel*} {k[emnopsvW]*}{kde*}{klettres*}{ktouch*}-
  70.                          {kakasi-*}{kappa*}{krb5-serv*}} k*
  71. mget /except:{{*-devel*} {kde-i18n*}{kde[2gmtv]*}{kdeartwork*}-
  72.                          {kdebindings*}{kdepim*}{kdesdk*}} kde*
  73. mget /except:{{*-devel*} {kernel-[bBdsu]*}} ke*.i386.rpm
  74. mget /except:{{*-devel*} {kmail*}{knm*}{knode*}{koffice*}{kooka*}{kppp*}-
  75.                          {kstar*}} km* kn* ko* lp* ks*
  76. mget /except:{{*-devel*} {libgcj*}{libgnat*}{libtab*}{lic*}{la[mp]*}{lftp*}} l*
  77. mget /except:{{*-devel*} {m[cguxy]*}{mailman*}{man-pages-[a-z]*}{mew*}-
  78.                          {miniChin*}{mod_*}{mrtg*}} m*
  79. mget /except:{{*-devel*} {nautilus*}{ncpfs*}{nmh-*}{noatun*}{nss_*}{nut-*}-
  80.                          {nvi-*}} n*
  81. mget /except:{{*-devel*} {*.i686.rpm}{octave*}{open[ho]*}-
  82.                          {openldap-[cs]*}{openmotif2*}{openssl0*}} o*
  83. mget /except:{{*-devel*} {p[hvwx]*}{pan-*}{perl-PDL*}-
  84.                          {post*}{pydict*}{python-d*}} p*
  85. mget /except:{{*-devel*} {qt-design*}{qt2*}{quanta*}{recode*}{ruby*}} q* r*
  86. mget /except:{{*-devel*} {s[eqwy]*}{sane*}{skkd*}{snavig*}{splint*}{stard*}} s*
  87. mget /except:{{*-devel*} {sendmail-doc*}{sylph*}{swig*}} se* sw* sy*
  88. mget /except:{{*-devel*} {t[oW]*}{t*fonts*}{tclx*}{tetex*}{timidity*}-
  89.                          {tripwire*}{tuxracer*}} t*
  90. mget /except:{{*-devel*} {unixODBC*}{uucp*}{vim-[eX]*}{vnc*}} u* v*
  91. mget /except:{{*-devel*} {w[3l]*}{wine*}{wordtrans*}} w*
  92. mget /except:{{*-devel*} {x[aef]*}{xc[dhi]*}{xine-*}{xmms*}{xpdf-[a-z]*}-
  93.                          {xsane*}{xtrace*}} x*
  94. mget /except:{{*-devel*} {XFree86-[cdIX]*}} X*
  95. mget /except:{{*-devel*} {zebra*}{zsh*}} y* z*
  96.  
  97. end 0
  98.