|
Warning: this is an htmlized version!
The original is across this link, and the conversion rules are here. |
#######
#
# E-scripts on CVS, RCS, rsync and friends.
#
# Note 1: use the eev command (defined in eev.el) and the
# ee alias (in my .zshrc) to execute parts of this file.
# Executing this file as a whole makes no sense.
#
# Note 2: be VERY careful and make sure you understand what
# you're doing.
#
# Note 3: If you use a shell other than zsh things like |&
# and the for loops may not work.
#
# Note 4: I always run as root.
#
# Note 5: some parts are too old and don't work anymore. Some
# never worked.
#
# Note 6: the definitions for the find-xxxfile commands are on my
# .emacs.
#
# Note 7: if you see a strange command check my .zshrc -- it may
# be defined there as a function or an alias.
#
# Note 8: the sections without dates are always older than the
# sections with dates.
#
# This file is at <http://angg.twu.net/e/cvs.e>
# or at <http://angg.twu.net/e/cvs.e.html>.
# See also <http://angg.twu.net/emacs.html>,
# <http://angg.twu.net/.emacs[.html]>,
# <http://angg.twu.net/.zshrc[.html]>,
# <http://angg.twu.net/escripts.html>,
# and <http://angg.twu.net/>.
#
#######
# «.cvs_client» (to "cvs_client")
# «.rsync» (to "rsync")
# «.rsync_debian-test» (to "rsync_debian-test")
# «.rsync_server» (to "rsync_server")
# «.rsync_over_ssh» (to "rsync_over_ssh")
# «.start-stop-daemon» (to "start-stop-daemon")
# «.wanna-build» (to "wanna-build")
# «.svnbook» (to "svnbook")
# «.svn» (to "svn")
# «.svn-branches» (to "svn-branches")
# «.cvs-old-versions» (to "cvs-old-versions")
# «.psvn.el» (to "psvn.el")
# «.cvs-book» (to "cvs-book")
# «.silas-tutorial» (to "silas-tutorial")
# «.darcs» (to "darcs")
# «.viewvc» (to "viewvc")
# «.understanding-merging» (to "understanding-merging")
# «.update-dP» (to "update-dP")
#####
#
# Downloading a package that exists only in CVS form
# 2000aug01
#
#####
# «cvs_client» (to ".cvs_client")
#*
rm -Rv ~/tmp/cvs/
mkdir ~/tmp/cvs/
cd ~/tmp/cvs/
# (find-node "(grub)Obtaining and Building GRUB")
export CVSROOT=:pserver:anoncvs@anoncvs.gnu.org:/gd/gnu/anoncvsroot
cvs login
cvs checkout grub
# (find-fline "~/tmp/cvs/grub/")
# (find-fline "~/tmp/cvs/grub/CVS/")
#*
cd $S/http/www.gnu.org/
agrep -i cvs $(find *)
# (find-shttpw3 "www.gnu.org/server/standards/README.cvs.html")
# (find-shttpw3 "www.gnu.org/software/gnugo/devel.html")
# (find-shttpw3 "www.gnu.org/software/devel.html")
lynx http://www.gnu.org/software/devel.html
CVSROOT=:pserver:anoncvs@anoncvs.gnu.org:/gd/gnu/anoncvsroot
#####
#
# mod_virgule
# 2000sep08
#
#####
# http://cvs.gnome.org/bonsai/rview.cgi?cvsroot=/cvs/gnome&dir=mod_virgule
# (find-shttpw3 "developer.gnome.org/tools/cvs.html")
rm -Rv ~/tmp/cvs/mod_virgule
mkdir ~/tmp/cvs/mod_virgule
cd ~/tmp/cvs/
export CVSROOT=:pserver:anonymous@anoncvs.gnome.org:/cvs/gnome
cvs login
cvs -z9 checkout mod_virgule
rm -Rv ~/tmp/cvs/
mkdir ~/tmp/cvs/
cd ~/tmp/cvs/
# (find-node "(grub)Obtaining and Building GRUB")
export CVSROOT=:pserver:anoncvs@anoncvs.gnu.org:/gd/gnu/anoncvsroot
cvs login
cvs checkout grub
# (find-status "cvs-buildpackage")
# (find-vldifile "cvs-buildpackage.list")
# (find-fline "/usr/doc/cvs-buildpackage/")
#####
#
# rsync
# 2000oct06
#
#####
# «rsync» (to ".rsync")
# (find-status "rsync")
# (find-vldifile "rsync.list")
# (find-vldifile "" "rsync.list")
# (find-fline "/usr/doc/rsync/")
# (find-fline "/usr/doc/rsync/README.gz")
# (eeman "5 rsyncd.conf")
# (eeman "5 rsyncd.conf" "When +run +via +inetd")
# (find-fline "/etc/services" "rsync")
# (find-fline "/etc/inetd.conf" "rsync")
# «rsync_debian-test» (to ".rsync_debian-test")
# (find-status "debian-test")
# (find-vldifile "debian-test.list")
# (find-fline "/usr/doc/debian-test/")
# (find-fline "/usr/doc/debian-test/README")
# (eeman "1 debian-test")
# (find-fline "/usr/lib/debian-test/tests/rsync")
#*
debian-test -v rsync |& tee /tmp/odtr
# (find-fline "/tmp/odtr")
#*
#####
#
# rsync server
# 2000dec17
#
#####
# «rsync_server» (to ".rsync_server")
#*
cd /tmp/
rm -Rv /tmp/from/
mkdir /tmp/from/
rsync --help > /tmp/from/rsync-opts
laf /tmp/from/
# (eeman "5 rsyncd.conf")
cat > rsyncd.conf <<'%%%'
pidfile = /tmp/rsyncd.pid
[from]
path = /tmp/from/
comment = test area
%%%
start-stop-daemon -S --exec /usr/bin/rsync \
-- --daemon --config=/tmp/rsyncd.conf
#*
# (find-fline "/etc/services" "rsync")
ps ax | grep rsync
lsof | egrep 'COMMAND|rsync'
# and "*:rsync" means 873...
grep rsync /etc/services
#*
rm -Rv /tmp/to/
mkdir /tmp/to/
cd /tmp/to/
# (eeman "1 rsync")
# (eeman "1 rsync" "CONNECTING TO AN RSYNC SERVER")
# (find-fline "/usr/doc/rsync/README.gz")
# (find-fline "/tmp/from/rsync-opts")
# rsync -avvvvz rsync://127.0.0.1/from/ .
rsync 127.0.0.1::
rsync -avz rsync://127.0.0.1/from/ .
laf
#*
start-stop-daemon -K --pidfile /tmp/rsyncd.pid
#sleep 1
ps ax | grep rsync
#*
#####
#
# rsync over ssh
# 2001nov05
#
#####
# «rsync_over_ssh» (to ".rsync_over_ssh")
# (find-man "1 rsync" "-e, --rsh=COMMAND\n")
#*
cp -v $S/ftp/ftp.debian.org/debian/pool/main/g/gcc-2.95/g++-2.95_2.95.4-0.010810_hurd-i386.deb /tmp/
cd /tmp/
rsync -e ssh -v -v -v -v edrx@sucuri:snarf/ftp/ftp.debian.org/debian/pool/main/g/gcc-2.95/g++-2.95_2.95.4-0.010810_hurd-i386.deb g++-2.95_2.95.4-0.010810_hurd-i386.deb
#*
#####
#
# rsync server - misc notes
#
#####
#*
# (find-fline "/tmp/from/rsync-opts")
cd /tmp/to/
rsync -e ssh -avvvz 127.0.0.1::from .
laf
#*
# Argh, I did something silly when testing by hand and /tmp's
# permissions became 0755...
laf -d /tmp /hdd2/tmp
chmod -v --reference=/hdd2/tmp /hdd2/tmp
chmod -v --reference=/tmp /tmp
# (find-node "(fileutils)Numeric Modes")
#chmod 1777 /tmp; laf -d /tmp /hdd2/tmp
#*
cd /tmp/to/
echo hello > hello
# Not that I would need that, but shouldn't this rsync call upload "hello"?
rsync -avz . 127.0.0.1::from
laf
laf /tmp/from/
#*
#####
#
# rsh (for rsync; not used)
# 2001jul13
#
#####
# (find-status "rsh-client")
# (find-vldifile "rsh-client.list")
# (find-fline "/usr/doc/rsh-client/")
# (eeman "1 rsh")
# (eeman "1 rcp")
# (find-status "rsh-server")
# (find-vldifile "rsh-server.list")
# (find-fline "/usr/doc/rsh-server/")
#####
#
# start-stop-daemon
# 2000dec17
#
#####
# «start-stop-daemon» (to ".start-stop-daemon")
cd /etc/init.d/
mycat $(agrep -l daemon *) | l +/start-stop-daemon
# (eeman "8 start-stop-daemon")
# (find-fline "/etc/init.d/")
# «update-inetd»
#*
cd /var/lib/dpkg/info/
agrep update-inetd * | tee ~/o
# (find-fline "~/o")
#*
# (eeman "8 update-inetd")
# (eeman "8 update-inetd" "You +just +finished +writing +a +POP3 +server")
#####
#
# wanna-build, rbuild
# 2001aug13
#
#####
# «wanna-build» (to ".wanna-build")
# (find-shttpw3 "cvs.debian.org/")
# not working, I'm getting "rejected access"
#*
rm -Rv /tmp/wanna-build/
mkdir /tmp/wanna-build/
cd /tmp/wanna-build/
# (find-node "(grub)Obtaining and Building GRUB")
export CVSROOT=:pserver:anonymous@cvs.debian.org:/cvs/wanna-build
cvs login
cvs checkout wanna-build
#*
# (find-efile "")
# (find-evariable 'version-control)
#*
e20glimpse version-control | l -S
#*
#####
#
# subversion book (HTML and PDF)
# 2007apr12
#
#####
# «svnbook» (to ".svnbook")
# http://svnbook.red-bean.com/en/1.2/svn-book.pdf
# http://svnbook.red-bean.com/en/1.2/svn-book-html-chunk.tar.bz2
# http://subversion.tigris.org/files/documents/15/177/svn-ref.ps
#*
rm -Rv ~/usrc/svn-book-html-chunk/
tar -C ~/usrc/ -xvjf \
$S/http/svnbook.red-bean.com/en/1.2/svn-book-html-chunk.tar.bz2
cd ~/usrc/svn-book-html-chunk/
#*
# (code-c-d "svnbook" "~/usrc/svn-book-html-chunk/")
# (find-svnbookfile "")
# (find-svnbookw3m "index.html")
# (find-svnbookw3m "svn.serverconfig.netmodel.html" "~/.subversion/auth/")
# (find-fline "~/.subversion/auth/")
# (code-ps "svnbook" "$S/http/svnbook.red-bean.com/en/1.2/svn-book.pdf")
# (find-svnbookpage 4)
#####
#
# subversion
# 2007apr11
#
#####
# «svn» (to ".svn")
# (find-status "subversion")
# (find-vldifile "subversion.list")
# (find-udfile "subversion/")
# http://subversion.tigris.org
# (find-man "1 svndumpfilter")
# (find-man "1 svnlook")
# (find-man "1 svnsync")
# (find-man "1 svnversion")
# (find-man "1 svn")
# (find-man "1 svnadmin")
# (find-man "5 svnserve.conf")
# (find-man "8 svnserve")
# (find-fline "/usr/share/emacs/site-lisp/psvn.el")
# (find-udfile "subversion/HACKING")
# (find-udfile "subversion/README")
# (find-udfile "subversion/README.Debian")
# (find-udfile "subversion/copyright")
# (find-udfile "subversion/examples/gnuify-changelog.pl.gz")
# (find-udfile "subversion/NEWS.Debian.gz")
# (find-udfile "subversion/changelog.gz")
# (find-udfile "subversion/changelog.Debian.gz")
# (find-sh "svn help")
# (find-sh "svn help checkout")
# http://subversion.tigris.org/faq.html
* (eepitch-shell)
rm -Rv /tmp/testsvn
mkdir /tmp/testsvn
cd /tmp/testsvn
svn checkout http://svn.prv.digirati.com.br/repos/adm/trunk/todo
svn checkout --username edrx.dig \
http://svn.prv.digirati.com.br/repos/adm/trunk/todo
* (eechannel-xterm "A")
rm -Rv /tmp/testsvn
mkdir /tmp/testsvn
cd /tmp/testsvn
svn checkout --username edrx.dig \
http://svn.prv.digirati.com.br/repos/adm/trunk/todo
$ cd ~; mkdir -p svn/adm
$ cd svn/adm
$ svn checkout http://svn.prv.digirati.com.br/repos/adm
Para checkout somente um módulo, lembrar do trunk na URI. Exemplo para o módulo machines:
$ svn checkout http://svn.prv.digirati.com.br/repos/adm/trunk/machines
inteiro:
$ svn checkout http://svn.prv.digirati.com.br/repos/adm/trunk/machines
$ svn checkout http://svn.prv.digirati.com.br/repos/adm/trunk/todo
$ svn checkout http://svn.prv.digirati.com.br/repos/adm/trunk/todo (/web /bak <-)
$ svn checkout http://svn.prv.digirati.com.br/repos/adm/trunk/task
#####
#
# svn branches
# 2007may04
#
#####
# «svn-branches» (to ".svn-branches")
# (find-svnbookpage 4)
# (find-svnbookpage (+ 17 44))
# (find-svnbooktext "Chapter 4. Branching and Merging")
#####
#
# subversion (rubikitch)
# 2007apr11
#
#####
# http://lists.gnu.org/archive/html/eev/2006-01/msg00005.html
# http://article.gmane.org/gmane.emacs.eev.devel/41
#####
#
# cvs - downloading an old version
# 2005oct01
#
#####
# «cvs-old-versions» (to ".cvs-old-versions")
# (find-node "(cvs)Top")
# http://savannah.nongnu.org/cgi-bin/viewcvs/rcirc/rcirc/rcirc.el
<kensanata> maybe 1.248=
<kensanata> eh, i mean maybe 1.248 introduced the bug, so try 1.247 to
make sure?
#####
#
# psvn.el
# 2007may02
#
#####
# «psvn.el» (to ".psvn.el")
# (find-vldifile "subversion.list")
# (find-fline "/usr/share/emacs/site-lisp/psvn.el")
# (svn-status "~/svn/adm/todo/bak/srv/")
# (find-node "(pcl-cvs)Top")
# http://www.gnu.org/software/emacs/manual/html_node/pcl-cvs/index.html
#####
#
# cvs book
# 2008jan04
#
#####
# «cvs-book» (to ".cvs-book")
# http://cvsbook.red-bean.com/cvsbook.html
# http://cvsbook.red-bean.com/cvsbook.ps.gz
# (find-node "(cvs)Top")
#####
#
# silas's tutorial notes
# 2008jan04
#
#####
# «silas-tutorial» (to ".silas-tutorial")
# (find-zumbihomefile "silas/public_html/_/tmp/setting_up_cvs")
# (find-node "(cvs)Adding files")
# (find-node "(cvs)Index")
* (eepitch-shell)
* (eepitch-kill)
* (eepitch-shell)
rm -Rfv /home/edrx/cvs
export CVSROOT=/home/edrx/cvs
cvs -d /home/edrx/cvs init
rm -Rv /tmp/foo/
mkdir /tmp/foo/
cd /tmp/foo/
cvs import -m "Log Message" project_name_in_cvs/ vendortag releasetag
cvs checkout project_name_in_cvs/
cd /tmp/foo/project_name_in_cvs/
echo Foo > filename
cvs add filename
cvs commit -m "commentary for changelog" filename
cvs commit -m "commentary for changelog, 2" filename
echo Bar > filename
cvs commit -m "commentary for changelog, 3" filename
cvs add filename
mkdir /tmp/foo/project_name_in_cvs/directory/
cvs add directory/
cd /tmp/foo/project_name_in_cvs/directory/
echo Bletch > file
cvs add file
cvs commit -m " file in subdirectory" file
cd ..
rm -Rv /tmp/foo2/
mkdir /tmp/foo2/
cd /tmp/foo2/
export CVSROOT=/home/edrx/cvs
cvs checkout project_name_in_cvs/
# (find-fline "/home/edrx/cvs")
# (find-fline "/tmp/foo/project_name_in_cvs/")
# (find-fline "/tmp/foo2/project_name_in_cvs/")
# (find-node "(cvs)Adding files")
# (find-node "(cvs)Assigning revisions")
#####
#
# darcs
# 2008feb18
#
#####
# «darcs» (to ".darcs")
# (find-status "darcs")
# (find-vldifile "darcs.list")
# (find-udfile "darcs/")
# (find-man "1 darcs")
# (find-udw3m "darcs/manual/darcs.html")
# (find-udw3m "darcs/manual/index.html")
# (find-udw3m "darcs/manual/index.html#x1-210001.2")
#####
#
# viewvc
# 2008feb20
#
#####
# «viewvc» (to ".viewvc")
# http://cvs.savannah.gnu.org/viewvc/emacs/emacs/lisp/version.el
# http://viewvc.tigris.org/
# http://viewvc.tigris.org/files/documents/3330/37319/viewvc-1.0.4.tar.gz
#*
rm -Rv ~/usrc/viewvc-1.0.4/
tar -C ~/usrc/ -xvzf \
$S/http/viewvc.tigris.org/files/documents/3330/37319/viewvc-1.0.4.tar.gz
cd ~/usrc/viewvc-1.0.4/
#*
# (code-c-d "viewvc" "~/usrc/viewvc-1.0.4/")
# (find-viewvcfile "")
# (find-viewvcfile "INSTALL" "tiny ViewVC server")
#####
#
# understanding branches and merging
# 2008feb20
#
#####
# «understanding-merging» (to ".understanding-merging")
# http://www.emacswiki.org/cgi-bin/wiki/EmacsCVSFeatures
# http://cvs.savannah.gnu.org/viewvc/emacs/emacs/lisp/version.el
# (find-node "(cvs)Branching and merging")
# (find-node "(cvs)Common options" "`-D DATE_SPEC'")
#####
#
# update -dP
# 2008jun10
#
#####
# «update-dP» (to ".update-dP")
# http://article.gmane.org/gmane.emacs.devel/98639
# (find-node "(cvs)update options" "`-P'")
# (find-node "(cvs)Updating a file" "`cvs update -d'")
# Local Variables:
# coding: raw-text-unix
# ee-delimiter-hash: "\n#*\n"
# ee-delimiter-percent: "\n%*\n"
# ee-anchor-format: "«%s»"
# End: