####### # # 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 # or at . # See also , # , # , # , # and . # ####### # «.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 maybe 1.248= 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: