--- imapcopy-1.04.orig/imapcopymain.pas +++ imapcopy-1.04/imapcopymain.pas @@ -137,7 +137,8 @@ WriteLn; WriteLn ('You should have received a copy of the GNU General Public License'); WriteLn ('along with this program; if not, write to the Free Software'); - WriteLn ('Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.'); + WriteLn ('Foundation, Inc., 51 Franklin St, Fifth Floor, Boston,'); + WriteLn ('MA 02110-1301, USA.'); WriteLn ('---------------------------------------------------------------------------'); END; --- imapcopy-1.04.orig/Makefile +++ imapcopy-1.04/Makefile @@ -0,0 +1,21 @@ +DB2MAN = /usr/share/sgml/docbook/stylesheet/xsl/docbook-xsl/manpages/docbook.xsl +XP = xsltproc --nonet --param man.charmap.use.subset "0" + +all: imapcopy imapcopy.1 + +imapcopy: imapcopymain.pas imaptools.pas inet.pp + fpc -g imapcopy + +imapcopy.1: debian/manpage.xml + $(XP) $(DB2MAN) $< + +clean: + rm -f *.ppu *.o imapcopy imapcopy.1 + +install: imapcopy + install -d $(DESTDIR)/usr/bin + install -d $(DESTDIR)/usr/share/man/man1 + install imapcopy $(DESTDIR)/usr/bin/imapcopy + install imapcopy.1 $(DESTDIR)/usr/share/man/man1/imapcopy.1 + +.PHONY: clean install all --- imapcopy-1.04.orig/imaptools.pas +++ imapcopy-1.04/imaptools.pas @@ -239,8 +239,8 @@ Addr.port := ShortHostToNet (Port); {WriteLn ('IP: ',hostaddrtostr (Host.IPAddress));} Addr.addr := HostToNet (LONGINT (Host.IPAddress)); - aSocket := Socket(AF_INET,SOCK_STREAM,0); - IF NOT Sockets.Connect (aSocket,ADDR,SIZEOF(ADDR)) THEN + aSocket := fpSocket(AF_INET,SOCK_STREAM,0); + IF -1 = Sockets.fpconnect (aSocket,@ADDR,SIZEOF(ADDR)) THEN BEGIN Result := errno; IF errno = 0 THEN Result:= 1; @@ -418,7 +418,7 @@ @FA); IF Err > 0 THEN BEGIN - ReadBufLen := Recv (ServSock, ReadBuf, SIZEOF(ReadBuf), 0); + ReadBufLen := fpRecv (ServSock, @ReadBuf, SIZEOF(ReadBuf), 0); IF ReadBufLen > 0 THEN Result := ReadAChar (C, 0) ELSE @@ -521,7 +521,7 @@ VAR P : INTEGER; S : STRING; BEGIN - Result := {$IFDEF Win32}WinSock.{$ENDIF}send (Socket, PChar(Txt)^, Length (Txt), 0); + Result := {$IFDEF Win32}WinSock.{$ENDIF}fpsend (Socket, PChar(Txt), Length (Txt), 0); IF Result = Length (Txt) THEN Result := 0; IF DebugCommands THEN --- imapcopy-1.04.orig/debian/examples +++ imapcopy-1.04/debian/examples @@ -0,0 +1 @@ +Dist/ImapCopy.cfg --- imapcopy-1.04.orig/debian/compat +++ imapcopy-1.04/debian/compat @@ -0,0 +1 @@ +7 --- imapcopy-1.04.orig/debian/control +++ imapcopy-1.04/debian/control @@ -0,0 +1,17 @@ +Source: imapcopy +Section: mail +Priority: optional +Maintainer: RISKO Gergely +Build-Depends: debhelper (>= 7), fp-compiler, xsltproc, docbook-xsl +Standards-Version: 3.8.4.0 + +Package: imapcopy +Architecture: any +Depends: ${misc:Depends}, ${shlibs:Depends} +Description: IMAP backup, copy and migration tool + IMAPCopy is a small command line tool to copy messages for multiple + users from one imap server to another. You can use it with any IMAP + implementation, for example you can migrate from Cyrus to MS Exchange + or from MS Exchange to Courier IMAP. + . + The package imapsync serves a similar purpose. --- imapcopy-1.04.orig/debian/changelog +++ imapcopy-1.04/debian/changelog @@ -0,0 +1,36 @@ +imapcopy (1.04-1) unstable; urgency=low + + * New upstream version 1.04. + * Moved to collab-maint on git.debian.org -> debian/patches is not + needed anymore, patches are maintained on the master git branch from + now on + * Removed explicit architectures from debian/control + (closes: #525272, #457041) + * Changed section from mail to net (closes: #369548) + * Fixed typo in description (closes: #480675) + * made debian/manpage.xml compatible with current docbook + * documents stunnel usage in debian/manpage.xml, thanks goes to Mattia + Monga for the tip (also added a Suggests on stunnel) (closes: #322090) + * patched imaptools.pas to make it compile with FP 2.4 + * converted debian/rules from cdbs to dh + * modified Makefile to compile with debugging symbols (closes: #437201) + * bumped standards-version to 3.8.4 + + -- RISKO Gergely Sat, 26 Jun 2010 20:47:57 +0300 + +imapcopy (1.01+20060420-1) unstable; urgency=low + + * New upstream release + * included amd64 in arch list (closes: #335250) + * modified package description, added examples for 'any IMAP + implementation' (closes: #319459) + * changed FSF's address + + -- RISKO Gergely Tue, 30 May 2006 16:19:30 +0200 + +imapcopy (1.01-1) unstable; urgency=low + + * initial upload (closes: #302008) + + -- RISKO Gergely Mon, 5 Jul 2005 00:10:00 +0200 + --- imapcopy-1.04.orig/debian/rules +++ imapcopy-1.04/debian/rules @@ -0,0 +1,4 @@ +#!/usr/bin/make -f + +%: + dh $@ --- imapcopy-1.04.orig/debian/manpage.xml +++ imapcopy-1.04/debian/manpage.xml @@ -0,0 +1,154 @@ + +.
will be generated. You may view the +manual page with: nroff -man .
| less'. A typical entry +in a Makefile or Makefile.am is: + +DB2MAN = /usr/share/sgml/docbook/stylesheet/xsl/docbook-xsl/manpages/docbook.xsl +XP = xsltproc -''-nonet -''-param man.charmap.use.subset "0" + +manpage.1: manpage.xml + $(XP) $(DB2MAN) $< + +The xsltproc binary is found in the xsltproc package. The XSL files are in +docbook-xsl. A description of the parameters you can use can be found in the +docbook-xsl-doc-* packages. Please remember that if you create the nroff +version in one of the debian/rules file targets (such as build), you will need +to include xsltproc and docbook-xsl in your Build-Depends control field. +Alternatively use the xmlto command/package. That will also automatically +pull in xsltproc and docbook-xsl. + +Notes for using docbook2x: docbook2x-man does not automatically create the +AUTHOR(S) and COPYRIGHT sections. In this case, please add them manually as + ... . + +To disable the automatic creation of the AUTHOR(S) and COPYRIGHT sections +read /usr/share/doc/docbook-xsl/doc/manpages/authors.html. This file can be +found in the docbook-xsl-doc-html package. + +Validation can be done using: `xmllint -''-noout -''-valid manpage.xml` + +General documentation about man-pages and man-page-formatting: +man(1), man(7), http://www.tldp.org/HOWTO/Man-Page/ + +--> + + + + + + + + + + + + + +]> + + + + &dhtitle; + &dhpackage; + + + Armin + Diehl + Author of IMAPCopy. +
+ ad@ardiehl.de +
+ + + &dhfirstname; + &dhsurname; + Wrote this manpage for the Debian system. +
+ &dhemail; +
+ + + + 2001 + 2002 + 2003 + 2004 + 2005 + 2006 + 2007 + 2008 + 2009 + 2010 + Armin Diehl + &dhusername; + + + This manual page was written for the Debian system + (and may be used by others). + Permission is granted to copy, distribute and/or modify this + document under the terms of the GNU General Public License, + Version 2 or (at your option) any later version published by + the Free Software Foundation. + On Debian systems, the complete text of the GNU General Public + License can be found in + /usr/share/common-licenses/GPL. + + + + &dhucpackage; + &dhsection; + + + &dhpackage; + IMAP backup, copy and migration tool + + + + &dhpackage; + + + + DESCRIPTION + + Read &dhpackage; -h for reference. An + example configuration file can be found in the directory + /usr/share/doc/&dhpackage;/examples. + + + Sadly IMAPCopy does not have builtin SSL/TLS support, so you can + not connect to most modern IMAP servers. A workaround is to run + stunnel -c -f -d 1143 -r imap.boh.org:993 -P + '' in parallel with IMAPCopy and then modify the + configuration to connect to port 1143 on localhost. Here we + have assumed that imap.boh.org is your IMAP server. Note, that + if you need this hack for both source and destination, then you + have to use two instances of stunnel and you have to configure + them for different ports, of course (e.g. 1143 and 2143). + + + + SEE ALSO + + + stunnel + 8 + , + http://home.arcor.de/armin.diehl/imapcopy/imapcopy.html + + + --- imapcopy-1.04.orig/debian/copyright +++ imapcopy-1.04/debian/copyright @@ -0,0 +1,42 @@ +This package was debianized by RISKO Gergely on +Thu, 05 Jul 2005 23:55:02 +0200. + +It was downloaded from http://home.arcor.de/armin.diehl/imapcopy/IMAPCopySrc.zip + +Upstream Author: Armin Diehl + +Copyright in the imapcopymain.pas file: +********************************************************************* + $Id: imapcopymain.pas,v 1.00 + This file is part of imapcopy + Copyright (c) 2001-2009 Armin Diehl + + This program is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. + **********************************************************************} + +When run with -h parameter: +IMAPCopy 1.04 - 2009/07/18 [compiled with FreePascal] +written 2001-2009 by Armin Diehl +Running on Linux + +This program is free software; you can redistribute it and/or +modify it under the terms of the GNU General Public License +as published by the Free Software Foundation; either version 2 +of the License, or (at your option) any later version. + +This program is distributed in the hope that it will be useful, +but WITHOUT ANY WARRANTY; without even the implied warranty of +MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +GNU General Public License for more details. + +You should have received a copy of the GNU General Public License +along with this program; if not, write to the Free Software +Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. + +-=- + +You can find the mentioned GNU General Public License (GPL) (on a +Debian system) in the file /usr/share/common-licenses/GPL.