
=head1 NAME

Mail::Box::Manage::User - manage the folders of a user


=head1 INHERITANCE

 Mail::Box::Manage::User
   is a Mail::Box::Manager
   is a Mail::Reporter


=head1 SYNOPSIS

 use Mail::Box::Manage::User;
 use User::Identity;

 my $id      = User::Identity->new(...);
 my $user    = Mail::Box::Manage::User->new
   ( identity  => $id
   , folderdir => "$ENV{HOME}/Mail"
   , inbox     => $ENV{MAIL}
   );

 my $inbox   = $user->open($user->inbox);
 my $top     = $user->topfolder;


=head1 DESCRIPTION

Where the L<Mail::Box::Manager|Mail::Box::Manager> takes care of some set of open folder,
this extension will add knowledge about some related person.  At the
same time, it will try to cache some information about that person's
folder files.



=head1 METHODS


=head2 Constructors


Mail::Box::Manage::User-E<gt>B<new>(ARGS)

=over 4

Use L<new(default_folder_type)|Mail::Box::Manager/"METHODS"> to explicitly state which kind of folders
you use.

 Option               Defined in       Default                                       
 autodetect           L<Mail::Box::Manager>  C<undef>                                      
 collection_type                       L<Mail::Box::Collection|Mail::Box::Collection>
 default_folder_type  L<Mail::Box::Manager>  C<'mbox'>                                     
 delimiter                             "/"                                           
 folder_id_type                        L<Mail::Box::Identity|Mail::Box::Identity>    
 folder_types         L<Mail::Box::Manager>  <all standard types>                          
 folderdir            L<Mail::Box::Manager>  C<[ '.' ]>                                    
 folderdirs           L<Mail::Box::Manager>  <synonym for C<folderdir>>                    
 identity                              <required>                                    
 inbox                                 C<undef>                                      
 log                  L<Mail::Reporter>  C<'WARNINGS'>                                 
 topfolder_name                        C<'='>                                        
 trace                L<Mail::Reporter>  C<'WARNINGS'>                                 

. autodetect TYPE|ARRAY-OF-TYPES

. collection_type CLASS

=over 4

Subfolders grouped together.

=back

. default_folder_type NAME|CLASS

. delimiter STRING

=over 4

The separator used in folder names.  This doesn't need to be the
same as your directory system is using.

=back

. folder_id_type CLASS|OBJECT

. folder_types NEW-TYPE | ARRAY-OF-NEW-TYPES

. folderdir DIRECTORY

. folderdirs [DIRECTORIES]

. identity OBJECT

=over 4

The main difference between the L<Mail::Box::Manager|Mail::Box::Manager> and this class, is
the concept of some person (or virtual person) who's files are being
administered by this object.  The OBJECT is an L<User::Identity|User::Identity>.

The smallest identity that will do:
C<< my $id = User::Identity->new('myname') >>

=back

. inbox NAME

=over 4

The name of the user's inbox.

=back

. log LEVEL

. topfolder_name STRING

. trace LEVEL

=back

=head2 Attributes


$obj-E<gt>B<defaultFolderType>

=over 4

See L<Mail::Box::Manager/"Attributes">

=back

$obj-E<gt>B<folderTypes>

=over 4

See L<Mail::Box::Manager/"Attributes">

=back

$obj-E<gt>B<folderdir>

=over 4

See L<Mail::Box::Manager/"Attributes">

=back

$obj-E<gt>B<identity>

=over 4

Returns a L<User::Identity|User::Identity> object.

=back

$obj-E<gt>B<inbox>([NAME])

=over 4

(Set and) get the NAME of the mailbox which is considered the folder
for incoming mail.  In many protocols, this folder is handled seperately.
For instance in IMAP this is the only case-insensitive folder name.

=back

$obj-E<gt>B<registerType>(TYPE, CLASS [,OPTIONS])

=over 4

See L<Mail::Box::Manager/"Attributes">

=back

=head2 Manage open folders


$obj-E<gt>B<close>(FOLDER, OPTIONS)

=over 4

See L<Mail::Box::Manager/"Manage open folders">

=back

$obj-E<gt>B<closeAllFolders>(, OPTIONS)

=over 4

See L<Mail::Box::Manager/"Manage open folders">

=back

$obj-E<gt>B<isOpenFolder>(FOLDER)

=over 4

See L<Mail::Box::Manager/"Manage open folders">

=back

$obj-E<gt>B<open>([FOLDERNAME], OPTIONS)

=over 4

See L<Mail::Box::Manager/"Manage open folders">

=back

$obj-E<gt>B<openFolders>

=over 4

See L<Mail::Box::Manager/"Manage open folders">

=back

=head2 Manage existing folders


$obj-E<gt>B<create>(NAME, OPTIONS)

=over 4

Creates a new folder with the specified name.  An folder's administrative
structure (L<Mail::Box::Identity|Mail::Box::Identity>) is returned, but the folder is not
opened.

In the accidental case that the folder already
exists, a warning will be issued, and an empty list/undef returned.

The OPTIONS are passed to L<Mail::Box::create()|Mail::Box/"Internals"> of your default folder
type, except for the options intended for this method itself.

 Option         Defined in       Default
 create_real                     <true> 
 create_supers                   <false>
 deleted                         <false>
 id_options                      []     

. create_real BOOLEAN

=over 4

When this option is false, the pysical folder will not be created, but
only the administration is updated.

=back

. create_supers BOOLEAN

=over 4

When you create a folder where upper hierarchy level are missing, they
will be created as well.

=back

. deleted BOOLEAN

=over 4

The folder starts as deleted.

=back

. id_options ARRAY

=over 4

Values passed to the instantiated L<Mail::Box::Identity|Mail::Box::Identity>.  That object
is very picky about the initiation values it accepts.

=back

=back

$obj-E<gt>B<delete>(NAME)

=over 4

Remove all signs from the folder on the file-system.  Messages still in
the folder will be removed.  This method returns a true value when the
folder has been removed or not found, so "false" means failure.

It is also possible to delete a folder using C<< $folder->delete >>,
which will call this method here.  OPTIONS, which are used for some
other folder types, will be ignored here: the user's index contains the
required details.

 Option     Defined in             Default           
 recursive  L<Mail::Box::Manager>  <folder's default>

. recursive BOOLEAN

I<Example:> how to delete a folder


 print "no xyz (anymore)\n" if $user->delete('xyz');

=back

$obj-E<gt>B<folder>(NAME)

=over 4

Returns the folder description, a L<Mail::Box::Identity|Mail::Box::Identity>.

=back

$obj-E<gt>B<folderCollection>(NAME)

=over 4

Returns a pair: the folder collection (L<Mail::Box::Collection|Mail::Box::Collection>) and
the base name of NAME.

=back

$obj-E<gt>B<rename>(OLDNAME, NEWNAME, OPTIONS)

=over 4

Rename the folder with name OLDNAME to NEWNAME.  Both names are full
pathnames.

 Option         Defined in  Default
 create_supers              <false>

. create_supers BOOLEAN

=over 4

When you rename a folder to a place where upper hierarchy levels are
missing, they will get be defined, but with the deleted flag set.

=back

=back

$obj-E<gt>B<topfolder>

=over 4

Returns the top folder of the user's mailbox storage.

=back

=head2 Move messages to folders


$obj-E<gt>B<appendMessage>([FOLDER|FOLDERNAME,] MESSAGES, OPTIONS)

=over 4

See L<Mail::Box::Manager/"Move messages to folders">

=back

$obj-E<gt>B<copyMessage>([FOLDER|FOLDERNAME,] MESSAGES, OPTIONS)

=over 4

See L<Mail::Box::Manager/"Move messages to folders">

=back

$obj-E<gt>B<moveMessage>([FOLDER|FOLDERNAME,] MESSAGES, OPTIONS)

=over 4

See L<Mail::Box::Manager/"Move messages to folders">

=back

=head2 Manage message threads


$obj-E<gt>B<threads>([FOLDERS], OPTIONS)

=over 4

See L<Mail::Box::Manager/"Manage message threads">

=back

=head2 Internals


$obj-E<gt>B<decodeFolderURL>(URL)

=over 4

See L<Mail::Box::Manager/"Internals">

=back

$obj-E<gt>B<toBeThreaded>(FOLDER, MESSAGES)

=over 4

See L<Mail::Box::Manager/"Internals">

=back

$obj-E<gt>B<toBeUnthreaded>(FOLDER, MESSAGES)

=over 4

See L<Mail::Box::Manager/"Internals">

=back

=head2 Error handling


$obj-E<gt>B<AUTOLOAD>

=over 4

See L<Mail::Reporter/"Error handling">

=back

$obj-E<gt>B<addReport>(OBJECT)

=over 4

See L<Mail::Reporter/"Error handling">

=back

$obj-E<gt>B<defaultTrace>([LEVEL]|[LOGLEVEL, TRACELEVEL]|[LEVEL, CALLBACK])

Mail::Box::Manage::User-E<gt>B<defaultTrace>([LEVEL]|[LOGLEVEL, TRACELEVEL]|[LEVEL, CALLBACK])

=over 4

See L<Mail::Reporter/"Error handling">

=back

$obj-E<gt>B<errors>

=over 4

See L<Mail::Reporter/"Error handling">

=back

$obj-E<gt>B<log>([LEVEL [,STRINGS]])

Mail::Box::Manage::User-E<gt>B<log>([LEVEL [,STRINGS]])

=over 4

See L<Mail::Reporter/"Error handling">

=back

$obj-E<gt>B<logPriority>(LEVEL)

Mail::Box::Manage::User-E<gt>B<logPriority>(LEVEL)

=over 4

See L<Mail::Reporter/"Error handling">

=back

$obj-E<gt>B<logSettings>

=over 4

See L<Mail::Reporter/"Error handling">

=back

$obj-E<gt>B<notImplemented>

=over 4

See L<Mail::Reporter/"Error handling">

=back

$obj-E<gt>B<report>([LEVEL])

=over 4

See L<Mail::Reporter/"Error handling">

=back

$obj-E<gt>B<reportAll>([LEVEL])

=over 4

See L<Mail::Reporter/"Error handling">

=back

$obj-E<gt>B<trace>([LEVEL])

=over 4

See L<Mail::Reporter/"Error handling">

=back

$obj-E<gt>B<warnings>

=over 4

See L<Mail::Reporter/"Error handling">

=back

=head2 Cleanup


$obj-E<gt>B<DESTROY>

=over 4

See L<Mail::Reporter/"Cleanup">

=back

$obj-E<gt>B<inGlobalDestruction>

=over 4

See L<Mail::Reporter/"Cleanup">

=back



=head1 DIAGNOSTICS

I<Error:> Cannot create $name: higher levels missing

Unless you set L<create(create_supers)|Mail::Box::Manage::User/"Manage existing folders">, all higher level folders must
exist before this new one can be created.

I<Error:> Cannot rename $name to $new: higher levels missing

Unless you set L<create(create_supers)|Mail::Box::Manage::User/"Manage existing folders">, all higher level folders must
exist before this new one can be created.

I<Error:> Folder $name is already open.

You cannot ask the manager for a folder which is already open. In some
older releases (before MailBox 2.049), this was permitted, but then
behaviour changed, because many nasty side-effects are to be expected.
For instance, an L<Mail::Box::update()|Mail::Box/"The folder"> on one folder handle would
influence the second, probably unexpectedly.

I<Error:> Folder $name is not a Mail::Box; cannot add a message.

The folder where the message should be appended to is an object which is
not a folder type which extends L<Mail::Box|Mail::Box>.  Probably, it is not a folder
at all.

I<Warning:> Folder does not exist, failed opening $type folder $name.

The folder does not exist and creating is not permitted (see
L<open(create)|Mail::Box::Manager/"Manage open folders">) or did not succeed.  When you do not have sufficient
access rights to the folder (for instance wrong password for POP3),
this warning will be produced as well.

The manager tried to open a folder of the specified type.  It may help
to explicitly state the type of your folder with the C<type> option.
There will probably be another warning or error message which is related
to this report and provides more details about its cause.  You may also
have a look at L<new(autodetect)|Mail::Box::Manager/"METHODS"> and L<new(folder_types)|Mail::Box::Manager/"METHODS">.

I<Warning:> Folder type $type is unknown, using autodetect.

The specified folder type (see L<open(type)|Mail::Box::Manager/"Manage open folders">, possibly derived from
the folder name when specified as url) is not known to the manager.
This may mean that you forgot to require the L<Mail::Box|Mail::Box> extension
which implements this folder type, but probably it is a typo.  Usually,
the manager is able to figure-out which type to use by itself.

I<Error:> Illegal folder URL '$url'.

The folder name was specified as URL, but not according to the syntax.
See L<decodeFolderURL()|Mail::Box::Manager/"Internals"> for an description of the syntax.

I<Error:> No foldername specified to open.

C<open()> needs a folder name as first argument (before the list of options),
or with the C<folder> option within the list.  If no name was found, the
MAIL environment variable is checked.  When even that does not result in
a usable folder, then this error is produced.  The error may be caused by
an accidental odd-length option list.

I<Error:> Package $package does not implement $method.

Fatal error: the specific package (or one of its superclasses) does not
implement this method where it should. This message means that some other
related classes do implement this method however the class at hand does
not.  Probably you should investigate this and probably inform the author
of the package.

I<Error:> Unable to remove folder $dir


I<Error:> Use appendMessage() to add messages which are not in a folder.

You do not need to copy this message into the folder, because you do
not share the message between folders.

I<Warning:> Use moveMessage() or copyMessage() to move between open folders.

The message is already part of a folder, and now it should be appended
to a different folder.  You need to decide between copy or move, which
both will clone the message (not the body, because they are immutable).

I<Warning:> Will never create a folder $name without having write access.

You have set L<open(create)|Mail::Box::Manager/"Manage open folders">, but only want to read the folder.  Create is
only useful for folders which have write or append access modes
(see L<Mail::Box::new(access)|Mail::Box/"Constructors">).


=head1 DETAILS






=head1 REFERENCES

See the MailBox website at L<http://perl.overmeer.net/mailbox/> for more details.

=head1 COPYRIGHTS

Distribution version 2.058.
Written by Mark Overmeer (mark@overmeer.net).  See the ChangeLog for
other contributors.

Copyright (c) 2001-2003 by the author(s). All rights reserved.
This program is free software; you can redistribute it and/or modify it
under the same terms as Perl itself.


