File: User.pod

package info (click to toggle)
libmail-box-perl 2.068-1
  • links: PTS
  • area: main
  • in suites: etch, etch-m68k
  • size: 3,576 kB
  • ctags: 1,493
  • sloc: perl: 22,358; makefile: 49
file content (654 lines) | stat: -rw-r--r-- 13,437 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654

=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           Mail::Box::Manager  undef
 collection_type                       Mail::Box::Collection
 default_folder_type  Mail::Box::Manager  'mbox'
 delimiter                             "/"
 folder_id_type                        Mail::Box::Identity
 folder_types         Mail::Box::Manager  <all standard types>
 folderdir            Mail::Box::Manager  [ '.' ]
 folderdirs           Mail::Box::Manager  <synonym for C<folderdir>>
 identity                              <required>
 inbox                                 undef
 log                  Mail::Reporter   'WARNINGS'
 topfolder_name                        '='
 trace                Mail::Reporter   '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  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.068.
Written by Mark Overmeer (mark@overmeer.net).  See the ChangeLog for
other contributors.

Copyright (c) 2001-2006 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.