update-channels.sh

   1 #!/bin/sh
   2 channels="
   3         bartlett.laurent-laville.org
   4         components.ez.no
   5         pear.docblox-project.org
   6         pear.firephp.org
   7         pear.horde.org
   8         pear.indeyets.ru
   9         pear.michelf.com
  10         pear.netpirates.net
  11         pear.pdepend.org
  12         pear.phing.info
  13         pear.phpdb.org
  14         pear.phpdoc.org
  15         pear.phpmd.org
  16         pear.phpunit.de
  17         pear.propelorm.org
  18         pear.roundcube.net
  19         pear.symfony-project.com
  20         pear.symfony.com
  21         pear.twig-project.org
  22         phpseclib.sourceforge.net
  23         saucelabs.github.com/pear
  24         zustellzentrum.cweiske.de
  25 "
  26
  27 fetch() {
  28         local url="$1"
  29         local target="$2"
  30         wget -q --timeout=10 --tries=1 ${target:+-O "$target"} "$url"
  31 }
  32
  33 for channel in ${@:-$channels}; do
  34         url=http://$channel/channel.xml
  35         fetch $url tmp.xml  || continue
  36         alias=$(sed -nre 's,.*<suggestedalias>(.+)</suggestedalias>.*$,\1,p' tmp.xml)
  37         sed -i -e 's,\r$,,g; s,\r,\n,g' tmp.xml
  38         mv -f tmp.xml channel-$alias.xml
  39
  40         url=http://$channel/feed.xml
  41         fetch $url tmp.xml  || continue
  42         mv -f tmp.xml feed-$alias.xml
  43 done
  44
  45 rm -f tmp.xml