Difference between revisions of "API:EPrints/DataObj/EPrint"
Line 8: | Line 8: | ||
'''EPrints::DataObj::EPrint''' - Class representing an actual EPrint | '''EPrints::DataObj::EPrint''' - Class representing an actual EPrint | ||
− | |||
− | |||
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | |||
<!-- Pod2Wiki=head_description --> | <!-- Pod2Wiki=head_description --> | ||
==DESCRIPTION== | ==DESCRIPTION== | ||
Line 21: | Line 18: | ||
EPrints::DataObj::EPrint is a subclass of EPrints::DataObj with the following metadata fields (plus those defined in ArchiveMetadataFieldsConfig): | EPrints::DataObj::EPrint is a subclass of EPrints::DataObj with the following metadata fields (plus those defined in ArchiveMetadataFieldsConfig): | ||
− | |||
− | |||
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | |||
<!-- Pod2Wiki=head_system_metadata --> | <!-- Pod2Wiki=head_system_metadata --> | ||
==SYSTEM METADATA== | ==SYSTEM METADATA== | ||
− | + | * eprintid (int) | |
− | + | : The unique numerical ID of this eprint. | |
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | The unique numerical ID of this eprint | ||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | + | * rev_number (int) | |
− | + | : The number of the current revision of this record. | |
− | |||
+ | * userid (itemref) | ||
+ | : The id of the user who deposited this eprint (if any). Scripted importing could cause this not to be set. | ||
− | + | * dir (text) | |
− | + | : The directory, relative to the documents directory for this repository, which this eprints data is stored in. Eg. disk0/00/00/03/34 for record 334. | |
− | |||
− | |||
− | The date | + | * datestamp (time) |
+ | : The date this record first appeared live in the repository. | ||
− | + | * lastmod (time) | |
− | + | : The date this record was last modified. | |
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | The | ||
− | |||
− | |||
− | |||
− | |||
+ | * status_changes (time) | ||
+ | : The date/time this record was moved between inbox, buffer, archive, etc. | ||
− | + | * type (namedset) | |
− | + | : The type of this record, one of the types of the "eprint" dataset. | |
− | |||
− | |||
− | The ID of the eprint (if any) which this succeeds. This field should have been an int and may be changed in a later upgrade. | + | * succeeds (itemref) |
+ | : The ID of the eprint (if any) which this succeeds. This field should have been an int and may be changed in a later upgrade. | ||
− | + | * commentary (itemref) | |
− | + | : The ID of the eprint (if any) which this eprint is a commentary on. This field should have been an int and may be changed in a later upgrade. | |
− | |||
+ | * metadata_visibility (set) | ||
+ | : This field is automatically set. | ||
− | < | + | <pre> show - appears normally |
− | </ | + | no_search - hidden from search/views</pre> |
− | |||
− | |||
− | The | + | : The 'hide' option may be used to force an eprint to not appear in search/views but is not considered a stable option. |
− | |||
− | |||
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
<!-- Pod2Wiki=head_methods --> | <!-- Pod2Wiki=head_methods --> | ||
==METHODS== | ==METHODS== | ||
− | < | + | <!-- Pod2Wiki=head_get_system_field_info --> |
− | + | ===get_system_field_info=== | |
− | |||
+ | <source lang="perl">$metadata = EPrints::DataObj::EPrint->get_system_field_info | ||
− | + | </source> | |
− | </ | ||
− | |||
− | |||
− | |||
− | |||
Return an array describing the system metadata of the EPrint dataset. | Return an array describing the system metadata of the EPrint dataset. | ||
− | |||
− | |||
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | + | <!-- Pod2Wiki=head_fileinfo --> | |
− | <!-- Pod2Wiki= | + | ===fileinfo=== |
− | === | ||
− | + | <source lang="perl">$eprint->fileinfo() | |
− | |||
− | + | </source> | |
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
The special '''fileinfo''' field contains the icon URL and main-file URL for each non-volatile document in the eprint. This is a performance tweak to avoid having to retrieve documents when rendering eprint citations. | The special '''fileinfo''' field contains the icon URL and main-file URL for each non-volatile document in the eprint. This is a performance tweak to avoid having to retrieve documents when rendering eprint citations. | ||
Example: | Example: | ||
− | + | <pre> /style/images/fileicons/application_pdf.png;/20/1/paper.pdf|/20/4.hassmallThumbnailVersion/tdb_portrait.jpg;/20/4/tdb_portrait.jpg</pre> | |
− | + | ||
These URLs are relative to the current repository base path ('http_url'). | These URLs are relative to the current repository base path ('http_url'). | ||
− | |||
− | |||
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | + | <!-- Pod2Wiki=head_get_dataset_id --> | |
− | <!-- Pod2Wiki= | ||
===get_dataset_id=== | ===get_dataset_id=== | ||
− | + | <source lang="perl">$dataset = EPrints::DataObj::EPrint->get_dataset_id | |
+ | |||
+ | </source> | ||
Returns the id of the [[API:EPrints/DataSet|EPrints::DataSet]] object to which this record belongs. | Returns the id of the [[API:EPrints/DataSet|EPrints::DataSet]] object to which this record belongs. | ||
− | |||
− | |||
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | + | <!-- Pod2Wiki=head_get_dataset --> | |
− | <!-- Pod2Wiki= | ||
===get_dataset=== | ===get_dataset=== | ||
− | + | <source lang="perl">$dataset = $eprint->get_dataset | |
+ | |||
+ | </source> | ||
Return the dataset to which this object belongs. This will return one of the virtual datasets: inbox, buffer, archive or deletion. | Return the dataset to which this object belongs. This will return one of the virtual datasets: inbox, buffer, archive or deletion. | ||
− | |||
− | |||
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | + | <!-- Pod2Wiki=head_get_defaults --> | |
− | <!-- Pod2Wiki= | ||
===get_defaults=== | ===get_defaults=== | ||
− | + | <source lang="perl">$defaults = EPrints::DataObj::EPrint->get_defaults( $session, $data ) | |
+ | |||
+ | </source> | ||
Return default values for this object based on the starting data. | Return default values for this object based on the starting data. | ||
− | |||
− | |||
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | + | <!-- Pod2Wiki=head_clone --> | |
− | <!-- Pod2Wiki= | ||
===clone=== | ===clone=== | ||
− | + | <source lang="perl">$eprint = $eprint->clone( $dest_dataset, $copy_documents, $link ) | |
+ | |||
+ | </source> | ||
Create a copy of this EPrint with a new ID in the given dataset. Return the new eprint, or undef in the case of an error. | Create a copy of this EPrint with a new ID in the given dataset. Return the new eprint, or undef in the case of an error. | ||
Line 281: | Line 146: | ||
If $nolink is true then the new eprint is not connected to the old one. | If $nolink is true then the new eprint is not connected to the old one. | ||
− | |||
− | |||
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | + | <!-- Pod2Wiki=head_log_mail_owner --> | |
− | <!-- Pod2Wiki= | ||
===log_mail_owner=== | ===log_mail_owner=== | ||
− | + | <source lang="perl">$eprint->log_mail_owner( $mail ) | |
+ | |||
+ | </source> | ||
Log that the given mail message was send to the owner of this EPrint. | Log that the given mail message was send to the owner of this EPrint. | ||
$mail is the same XHTML DOM that was sent as the email. | $mail is the same XHTML DOM that was sent as the email. | ||
− | |||
− | |||
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | + | <!-- Pod2Wiki=head_get_editorial_contact --> | |
− | <!-- Pod2Wiki= | ||
===get_editorial_contact=== | ===get_editorial_contact=== | ||
− | + | <source lang="perl">$user = $eprint->get_editorial_contact | |
+ | |||
+ | </source> | ||
Return the user identified as the editorial contact for this item. | Return the user identified as the editorial contact for this item. | ||
Line 313: | Line 176: | ||
nb. This has nothing to do with the editor defined in the metadata | nb. This has nothing to do with the editor defined in the metadata | ||
− | |||
− | |||
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | + | <!-- Pod2Wiki=head_remove --> | |
− | <!-- Pod2Wiki= | ||
===remove=== | ===remove=== | ||
− | + | <source lang="perl">$success = $eprint->remove | |
+ | |||
+ | </source> | ||
Erase this eprint and any associated records from the database and filesystem. | Erase this eprint and any associated records from the database and filesystem. | ||
This should only be called on eprints in "inbox" or "buffer". | This should only be called on eprints in "inbox" or "buffer". | ||
− | |||
− | |||
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | + | <!-- Pod2Wiki=head_commit --> | |
− | <!-- Pod2Wiki= | ||
===commit=== | ===commit=== | ||
− | + | <source lang="perl">$success = $eprint->commit( [$force] ); | |
+ | |||
+ | </source> | ||
Commit any changes to the database. | Commit any changes to the database. | ||
Line 345: | Line 206: | ||
The actions this method does are dependent on some object attributes: | The actions this method does are dependent on some object attributes: | ||
− | + | <pre> changed - HASH of changed fields (from [[API:EPrints/DataObj|EPrints::DataObj]]) | |
non_volatile_change - BOOL (from [[API:EPrints/DataObj|EPrints::DataObj]]) | non_volatile_change - BOOL (from [[API:EPrints/DataObj|EPrints::DataObj]]) | ||
− | under_construction - BOOL | + | under_construction - BOOL</pre> |
− | + | ||
If '''datestamp''' is unset and this eprint is in the '''archive''' dataset datestamp will always be set which will in turn set '''datestamp''' as changed. | If '''datestamp''' is unset and this eprint is in the '''archive''' dataset datestamp will always be set which will in turn set '''datestamp''' as changed. | ||
− | If no field values were changed and < | + | If no field values were changed and <code>$force</code> is false returns. |
− | If < | + | If <code>under_construction</code> is false: |
- static files updated | - static files updated | ||
− | If < | + | If <code>non_volatile_change</code> is true: |
- '''lastmod''' field updated | - '''lastmod''' field updated | ||
- triples update queued | - triples update queued | ||
− | If < | + | If <code>under_construction</code> is false and <code>non_volatile_change</code> is true: |
- revision generated | - revision generated | ||
The goal of these controls is to only trigger expensive processes in response to user actions. Revisions need to be generated when the user changes metadata or uploads new files (see [[API:EPrints/DataObj/Document#commit|EPrints::DataObj::Document/commit]]). | The goal of these controls is to only trigger expensive processes in response to user actions. Revisions need to be generated when the user changes metadata or uploads new files (see [[API:EPrints/DataObj/Document#commit|EPrints::DataObj::Document/commit]]). | ||
− | |||
− | |||
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | + | <!-- Pod2Wiki=head_save_revision --> | |
− | <!-- Pod2Wiki= | ||
===save_revision=== | ===save_revision=== | ||
− | + | <source lang="perl">$eprint->save_revision( %opts ) | |
+ | |||
+ | </source> | ||
Increase the eprint revision number and save a complete copy of the record into the history (see [[API:EPrints/DataObj/History|EPrints::DataObj::History]]). | Increase the eprint revision number and save a complete copy of the record into the history (see [[API:EPrints/DataObj/History|EPrints::DataObj::History]]). | ||
Options: | Options: | ||
− | + | <pre> user - user that caused the action to occur, defaults to current user | |
action - see history.action, defaults to "modify" | action - see history.action, defaults to "modify" | ||
− | details - see history.details, defaults to a description of changed fields | + | details - see history.details, defaults to a description of changed fields</pre> |
− | + | ||
− | < | ||
− | |||
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | + | <!-- Pod2Wiki=head_validate --> | |
− | <!-- Pod2Wiki= | ||
===validate=== | ===validate=== | ||
− | + | <source lang="perl">$problems = $eprint->validate( [$for_archive], $workflow_id ) | |
+ | |||
+ | </source> | ||
Return a reference to an array of XHTML DOM objects describing validation problems with the entire eprint based on $workflow_id. | Return a reference to an array of XHTML DOM objects describing validation problems with the entire eprint based on $workflow_id. | ||
Line 401: | Line 260: | ||
A reference to an empty array indicates no problems. | A reference to an empty array indicates no problems. | ||
− | Calls [[API:EPrints/DataObj/EPrint#validate_eprint|validate_eprint]] for the < | + | Calls [[API:EPrints/DataObj/EPrint#validate_eprint|validate_eprint]] for the <code>$eprint</code>. |
− | |||
− | |||
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | + | <!-- Pod2Wiki=head_skip_validation --> | |
− | <!-- Pod2Wiki= | ||
===skip_validation=== | ===skip_validation=== | ||
− | + | <source lang="perl">$boolean = $eprint->skip_validation | |
+ | |||
+ | </source> | ||
Returns true if this eprint should pass validation without being properly validated. This is to allow the use of dodgey data imported from legacy systems. | Returns true if this eprint should pass validation without being properly validated. This is to allow the use of dodgey data imported from legacy systems. | ||
− | |||
− | |||
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | + | <!-- Pod2Wiki=head_prune_documents --> | |
− | <!-- Pod2Wiki= | ||
===prune_documents=== | ===prune_documents=== | ||
− | + | <source lang="perl">$eprint->prune_documents | |
+ | |||
+ | </source> | ||
Remove any documents associated with this eprint which don't actually have any files. | Remove any documents associated with this eprint which don't actually have any files. | ||
− | |||
− | |||
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | + | <!-- Pod2Wiki=head_get_all_documents --> | |
− | <!-- Pod2Wiki= | ||
===get_all_documents=== | ===get_all_documents=== | ||
− | + | <source lang="perl">@documents = $eprint->get_all_documents | |
+ | |||
+ | </source> | ||
Return a list of all {{API:PodLink|file=EPrint/Document|package_name=EPrint::Document|section=|text=EPrint::Document}} objects associated with this eprint excluding documents with a "isVolatileVersionOf" relation (e.g. thumbnails). | Return a list of all {{API:PodLink|file=EPrint/Document|package_name=EPrint::Document|section=|text=EPrint::Document}} objects associated with this eprint excluding documents with a "isVolatileVersionOf" relation (e.g. thumbnails). | ||
− | |||
− | |||
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | + | <!-- Pod2Wiki=head_move_to_deletion --> | |
− | <!-- Pod2Wiki= | ||
===move_to_deletion=== | ===move_to_deletion=== | ||
− | + | <source lang="perl">$success = $eprint->move_to_deletion | |
+ | |||
+ | </source> | ||
Transfer the EPrint into the "deletion" dataset. Should only be called in eprints in the "archive" dataset. | Transfer the EPrint into the "deletion" dataset. Should only be called in eprints in the "archive" dataset. | ||
− | |||
− | |||
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | + | <!-- Pod2Wiki=head_move_to_inbox --> | |
− | <!-- Pod2Wiki= | ||
===move_to_inbox=== | ===move_to_inbox=== | ||
− | + | <source lang="perl">$success = $eprint->move_to_inbox | |
+ | |||
+ | </source> | ||
Transfer the EPrint into the "inbox" dataset. Should only be called in eprints in the "buffer" dataset. | Transfer the EPrint into the "inbox" dataset. Should only be called in eprints in the "buffer" dataset. | ||
− | |||
− | |||
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | + | <!-- Pod2Wiki=head_move_to_buffer --> | |
− | <!-- Pod2Wiki= | ||
===move_to_buffer=== | ===move_to_buffer=== | ||
− | + | <source lang="perl">$success = $eprint->move_to_buffer | |
+ | |||
+ | </source> | ||
Transfer the EPrint into the "buffer" dataset. Should only be called in eprints in the "inbox" or "archive" dataset. | Transfer the EPrint into the "buffer" dataset. Should only be called in eprints in the "inbox" or "archive" dataset. | ||
− | |||
− | |||
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | + | <!-- Pod2Wiki=head_move_to_archive --> | |
− | <!-- Pod2Wiki= | ||
===move_to_archive=== | ===move_to_archive=== | ||
− | + | <source lang="perl">$success = $eprint->move_to_archive | |
+ | |||
+ | </source> | ||
Move this eprint into the main "archive" dataset. Normally only called on eprints in "deletion" or "buffer" datasets. | Move this eprint into the main "archive" dataset. Normally only called on eprints in "deletion" or "buffer" datasets. | ||
− | |||
− | |||
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | + | <!-- Pod2Wiki=head_local_path --> | |
− | <!-- Pod2Wiki= | ||
===local_path=== | ===local_path=== | ||
− | + | <source lang="perl">$path = $eprint->local_path | |
+ | |||
+ | </source> | ||
Return the full path of the EPrint directory on the local filesystem. No trailing slash. | Return the full path of the EPrint directory on the local filesystem. No trailing slash. | ||
− | |||
− | |||
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | + | <!-- Pod2Wiki=head_url_stem --> | |
− | <!-- Pod2Wiki= | ||
===url_stem=== | ===url_stem=== | ||
− | + | <source lang="perl">$url = $eprint->url_stem | |
+ | |||
+ | </source> | ||
Return the URL to this EPrint's directory. Note, this INCLUDES the trailing slash, unlike the local_path method. | Return the URL to this EPrint's directory. Note, this INCLUDES the trailing slash, unlike the local_path method. | ||
− | |||
− | |||
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | + | <!-- Pod2Wiki=head_generate_static --> | |
− | <!-- Pod2Wiki= | ||
===generate_static=== | ===generate_static=== | ||
− | + | <source lang="perl">$eprint->generate_static | |
+ | |||
+ | </source> | ||
Generate the static version of the abstract web page. In a multi-language repository this will generate one version per language. | Generate the static version of the abstract web page. In a multi-language repository this will generate one version per language. | ||
If called on inbox or buffer, remove the abstract page. | If called on inbox or buffer, remove the abstract page. | ||
− | |||
− | |||
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | + | <!-- Pod2Wiki=head_remove_static --> | |
− | <!-- Pod2Wiki= | ||
===remove_static=== | ===remove_static=== | ||
− | + | <source lang="perl">$eprint->remove_static | |
+ | |||
+ | </source> | ||
Remove the static web page or pages. | Remove the static web page or pages. | ||
− | |||
− | |||
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | + | <!-- Pod2Wiki=head_render --> | |
− | <!-- Pod2Wiki= | ||
===render=== | ===render=== | ||
− | + | <source lang="perl">( $description, $title, $links ) = $eprint->render | |
+ | |||
+ | </source> | ||
Render the eprint. The 3 returned values are references to XHTML DOM objects. $description is the public viewable description of this eprint that appears as the body of the abstract page. $title is the title of the abstract page for this eprint. $links is any elements which should go in the <head> of this page. | Render the eprint. The 3 returned values are references to XHTML DOM objects. $description is the public viewable description of this eprint that appears as the body of the abstract page. $title is the title of the abstract page for this eprint. $links is any elements which should go in the <head> of this page. | ||
− | Calls [[API:EPrints/DataObj/EPrint#eprint_render|eprint_render]] to actually render the < | + | Calls [[API:EPrints/DataObj/EPrint#eprint_render|eprint_render]] to actually render the <code>$eprint</code>, if it isn't deleted. |
− | |||
− | |||
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | + | <!-- Pod2Wiki=head_get_control_url --> | |
− | <!-- Pod2Wiki= | + | ===get_control_url=== |
− | === | ||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | < | + | <source lang="perl">$url = $eprint->get_control_url |
− | |||
− | |||
− | |||
− | + | </source> | |
Return the URL of the control page for this eprint. | Return the URL of the control page for this eprint. | ||
− | |||
− | |||
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | + | <!-- Pod2Wiki=head_get_url --> | |
− | <!-- Pod2Wiki= | ||
===get_url=== | ===get_url=== | ||
− | + | <source lang="perl">$url = $eprint->get_url | |
+ | |||
+ | </source> | ||
Return the public URL of this eprints abstract page. | Return the public URL of this eprints abstract page. | ||
− | |||
− | |||
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | + | <!-- Pod2Wiki=head_get_user --> | |
− | <!-- Pod2Wiki= | ||
===get_user=== | ===get_user=== | ||
− | + | <source lang="perl">$user = $eprint->get_user | |
+ | |||
+ | </source> | ||
Return the EPrints::DataObj::User to whom this eprint belongs (if any). | Return the EPrints::DataObj::User to whom this eprint belongs (if any). | ||
− | |||
− | |||
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | + | <!-- Pod2Wiki=head_in_thread --> | |
− | <!-- Pod2Wiki= | ||
===in_thread=== | ===in_thread=== | ||
− | + | <source lang="perl">$bool = $eprint->in_thread( $field ) | |
+ | |||
+ | </source> | ||
Returns true if this eprint is in the $field thread. | Returns true if this eprint is in the $field thread. | ||
− | |||
− | |||
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | + | <!-- Pod2Wiki=head_first_in_thread --> | |
− | <!-- Pod2Wiki= | ||
===first_in_thread=== | ===first_in_thread=== | ||
− | + | <source lang="perl">$eprint = $eprint->first_in_thread( $field ) | |
+ | |||
+ | </source> | ||
Return the first (earliest) version or first paper in the thread of commentaries of this paper in the repository. | Return the first (earliest) version or first paper in the thread of commentaries of this paper in the repository. | ||
− | |||
− | |||
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | + | <!-- Pod2Wiki=head_last_in_thread --> | |
− | <!-- Pod2Wiki= | ||
===last_in_thread=== | ===last_in_thread=== | ||
− | + | <source lang="perl">$eprint = $eprint->last_in_thread( $field ) | |
+ | |||
+ | </source> | ||
Returns the latest item in the $field thread on this eprint's branch of the thread tree. | Returns the latest item in the $field thread on this eprint's branch of the thread tree. | ||
− | |||
− | |||
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | + | <!-- Pod2Wiki=head_render_version_thread --> | |
− | <!-- Pod2Wiki= | ||
===render_version_thread=== | ===render_version_thread=== | ||
− | + | <source lang="perl">$xhtml = $eprint->render_version_thread( $field ) | |
+ | |||
+ | </source> | ||
Render XHTML DOM describing the entire thread as nested unordered lists. | Render XHTML DOM describing the entire thread as nested unordered lists. | ||
− | |||
− | |||
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | + | <!-- Pod2Wiki=head_get_type --> | |
− | <!-- Pod2Wiki= | ||
===get_type=== | ===get_type=== | ||
− | + | <source lang="perl">$type = $eprint->get_type | |
+ | |||
+ | </source> | ||
Return the type of this eprint. | Return the type of this eprint. | ||
− | |||
− | |||
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | + | <!-- Pod2Wiki=head_user_roles --> | |
− | <!-- Pod2Wiki= | ||
===user_roles=== | ===user_roles=== | ||
− | + | <source lang="perl">@roles = $eprint->user_roles( $user ) | |
+ | |||
+ | </source> | ||
Return the @roles $user has on $eprint. | Return the @roles $user has on $eprint. | ||
− | |||
− | |||
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | + | <!-- Pod2Wiki=head_in_editorial_scope_of --> | |
− | <!-- Pod2Wiki= | ||
===in_editorial_scope_of=== | ===in_editorial_scope_of=== | ||
− | + | <source lang="perl">$boolean = $eprint->in_editorial_scope_of( $possible_editor ) | |
+ | |||
+ | </source> | ||
Returns true if $possible_editor can edit this eprint. This is according to the user editperms. | Returns true if $possible_editor can edit this eprint. This is according to the user editperms. | ||
This does not mean the user has the editor priv., just that if they do then they may edit the given item. | This does not mean the user has the editor priv., just that if they do then they may edit the given item. | ||
− | |||
− | |||
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | + | <!-- Pod2Wiki=head_has_owner --> | |
− | <!-- Pod2Wiki= | ||
===has_owner=== | ===has_owner=== | ||
− | + | <source lang="perl">$boolean = $eprint->has_owner( $possible_owner ) | |
+ | |||
+ | </source> | ||
Returns true if $possible_owner can edit this eprint. This is according to the user editperms. | Returns true if $possible_owner can edit this eprint. This is according to the user editperms. | ||
Line 725: | Line 548: | ||
Uses the callback "does_user_own_eprint" if available. | Uses the callback "does_user_own_eprint" if available. | ||
− | |||
− | |||
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | + | <!-- Pod2Wiki=head_obtain_lock --> | |
− | <!-- Pod2Wiki= | ||
===obtain_lock=== | ===obtain_lock=== | ||
− | + | <source lang="perl">$boolean = $eprint->obtain_lock( $user ) | |
− | + | ||
− | + | </source> | |
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | + | <!-- Pod2Wiki=head_remove_lock --> | |
− | <!-- Pod2Wiki= | ||
===remove_lock=== | ===remove_lock=== | ||
− | + | <source lang="perl">$boolean = $eprint->remove_lock( $user ) | |
− | + | ||
− | + | </source> | |
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | + | <!-- Pod2Wiki=head_could_obtain_lock --> | |
− | <!-- Pod2Wiki= | ||
===could_obtain_lock=== | ===could_obtain_lock=== | ||
− | + | <source lang="perl">$boolean = $eprint->could_obtain_lock( $user ) | |
− | + | ||
− | + | </source> | |
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | + | <!-- Pod2Wiki=head_is_locked --> | |
− | <!-- Pod2Wiki= | ||
===is_locked=== | ===is_locked=== | ||
− | + | <source lang="perl">$boolean = $eprint->is_locked() | |
− | + | ||
− | + | </source> | |
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | + | <!-- Pod2Wiki=head_render_edit_lock --> | |
− | <!-- Pod2Wiki= | ||
===render_edit_lock=== | ===render_edit_lock=== | ||
− | + | <source lang="perl">$xhtml = render_edit_lock( $session, $value ) | |
− | + | ||
− | + | </source> | |
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | |||
<!-- Pod2Wiki=head_callbacks --> | <!-- Pod2Wiki=head_callbacks --> | ||
==CALLBACKS== | ==CALLBACKS== | ||
Callbacks may optionally be defined in the ArchiveConfig. | Callbacks may optionally be defined in the ArchiveConfig. | ||
− | + | * validate_field | |
− | < | + | <pre> validate_field( $field, $value, $session, [$for_archive] )</pre> |
− | |||
+ | * validate_eprint | ||
+ | <pre> validate_eprint( $eprint, $session, [$for_archive] )</pre> | ||
− | < | + | * set_eprint_defaults |
− | </ | + | <pre> set_eprint_defaults( $data, $session )</pre> |
− | |||
− | |||
− | + | * set_eprint_automatic_fields | |
− | + | <pre> set_eprint_automatic_fields( $eprint )</pre> | |
− | |||
− | |||
− | |||
+ | * eprint_render | ||
+ | <pre> eprint_render( $eprint, $session )</pre> | ||
− | + | : See {{API:PodLink|file=ArchiveRenderConfig|package_name=ArchiveRenderConfig|section=eprint_render|text=ArchiveRenderConfig/eprint_render}}. | |
− | |||
− | |||
− | |||
− | + | <pre> | |
− | |||
− | |||
− | |||
+ | |||
+ | </pre> | ||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | + | <!-- Pod2Wiki=head_copyright --> | |
− | <!-- Pod2Wiki= | + | ==COPYRIGHT== |
− | == | + | Copyright 2000-2011 University of Southampton. |
− | + | This file is part of EPrints http://www.eprints.org/. | |
− | |||
− | |||
− | |||
− | |||
+ | EPrints is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation, either version 3 of the License, or (at your option) any later version. | ||
− | + | EPrints 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 Lesser General Public License for more details. | |
− | |||
− | |||
− | |||
− | + | You should have received a copy of the GNU Lesser General Public License along with EPrints. If not, see http://www.gnu.org/licenses/. | |
− | |||
− | |||
− | |||
− | |||
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
<!-- Pod2Wiki= --> | <!-- Pod2Wiki= --> | ||
− | + | <!-- Pod2Wiki=_postamble_ --> | |
− | <!-- Pod2Wiki= | ||
− | |||
− | |||
− | |||
<!-- Edit below this comment --> | <!-- Edit below this comment --> | ||
− | |||
− | |||
− | |||
− | |||
− |
Revision as of 09:57, 22 January 2013
EPrints 3 Reference: Directory Structure - Metadata Fields - Repository Configuration - XML Config Files - XML Export Format - EPrints data structure - Core API - Data Objects
Latest Source Code (3.4, 3.3) | Revision Log | Before editing this page please read Pod2Wiki
Contents
- 1 NAME
- 2 DESCRIPTION
- 3 SYSTEM METADATA
- 4 METHODS
- 4.1 get_system_field_info
- 4.2 fileinfo
- 4.3 get_dataset_id
- 4.4 get_dataset
- 4.5 get_defaults
- 4.6 clone
- 4.7 log_mail_owner
- 4.8 get_editorial_contact
- 4.9 remove
- 4.10 commit
- 4.11 save_revision
- 4.12 validate
- 4.13 skip_validation
- 4.14 prune_documents
- 4.15 get_all_documents
- 4.16 move_to_deletion
- 4.17 move_to_inbox
- 4.18 move_to_buffer
- 4.19 move_to_archive
- 4.20 local_path
- 4.21 url_stem
- 4.22 generate_static
- 4.23 remove_static
- 4.24 render
- 4.25 get_control_url
- 4.26 get_url
- 4.27 get_user
- 4.28 in_thread
- 4.29 first_in_thread
- 4.30 last_in_thread
- 4.31 render_version_thread
- 4.32 get_type
- 4.33 user_roles
- 4.34 in_editorial_scope_of
- 4.35 has_owner
- 4.36 obtain_lock
- 4.37 remove_lock
- 4.38 could_obtain_lock
- 4.39 is_locked
- 4.40 render_edit_lock
- 5 CALLBACKS
- 6 COPYRIGHT
NAME
EPrints::DataObj::EPrint - Class representing an actual EPrint
DESCRIPTION
This class represents a single eprint record and the metadata associated with it. This is associated with one of more EPrint::Document objects.
EPrints::DataObj::EPrint is a subclass of EPrints::DataObj with the following metadata fields (plus those defined in ArchiveMetadataFieldsConfig):
SYSTEM METADATA
- eprintid (int)
- The unique numerical ID of this eprint.
- rev_number (int)
- The number of the current revision of this record.
- userid (itemref)
- The id of the user who deposited this eprint (if any). Scripted importing could cause this not to be set.
- dir (text)
- The directory, relative to the documents directory for this repository, which this eprints data is stored in. Eg. disk0/00/00/03/34 for record 334.
- datestamp (time)
- The date this record first appeared live in the repository.
- lastmod (time)
- The date this record was last modified.
- status_changes (time)
- The date/time this record was moved between inbox, buffer, archive, etc.
- type (namedset)
- The type of this record, one of the types of the "eprint" dataset.
- succeeds (itemref)
- The ID of the eprint (if any) which this succeeds. This field should have been an int and may be changed in a later upgrade.
- commentary (itemref)
- The ID of the eprint (if any) which this eprint is a commentary on. This field should have been an int and may be changed in a later upgrade.
- metadata_visibility (set)
- This field is automatically set.
show - appears normally no_search - hidden from search/views
- The 'hide' option may be used to force an eprint to not appear in search/views but is not considered a stable option.
METHODS
get_system_field_info
$metadata = EPrints::DataObj::EPrint->get_system_field_info
Return an array describing the system metadata of the EPrint dataset.
fileinfo
$eprint->fileinfo()
The special fileinfo field contains the icon URL and main-file URL for each non-volatile document in the eprint. This is a performance tweak to avoid having to retrieve documents when rendering eprint citations.
Example:
/style/images/fileicons/application_pdf.png;/20/1/paper.pdf|/20/4.hassmallThumbnailVersion/tdb_portrait.jpg;/20/4/tdb_portrait.jpg
These URLs are relative to the current repository base path ('http_url').
get_dataset_id
$dataset = EPrints::DataObj::EPrint->get_dataset_id
Returns the id of the EPrints::DataSet object to which this record belongs.
get_dataset
$dataset = $eprint->get_dataset
Return the dataset to which this object belongs. This will return one of the virtual datasets: inbox, buffer, archive or deletion.
get_defaults
$defaults = EPrints::DataObj::EPrint->get_defaults( $session, $data )
Return default values for this object based on the starting data.
clone
$eprint = $eprint->clone( $dest_dataset, $copy_documents, $link )
Create a copy of this EPrint with a new ID in the given dataset. Return the new eprint, or undef in the case of an error.
If $copy_documents is set and true then the documents (and files) will be copied in addition to the metadata.
If $nolink is true then the new eprint is not connected to the old one.
log_mail_owner
$eprint->log_mail_owner( $mail )
Log that the given mail message was send to the owner of this EPrint.
$mail is the same XHTML DOM that was sent as the email.
get_editorial_contact
$user = $eprint->get_editorial_contact
Return the user identified as the editorial contact for this item.
By default returns undef.
nb. This has nothing to do with the editor defined in the metadata
remove
$success = $eprint->remove
Erase this eprint and any associated records from the database and filesystem.
This should only be called on eprints in "inbox" or "buffer".
commit
$success = $eprint->commit( [$force] );
Commit any changes to the database.
Calls update_triggers just before the database is updated.
The actions this method does are dependent on some object attributes:
changed - HASH of changed fields (from [[API:EPrints/DataObj|EPrints::DataObj]]) non_volatile_change - BOOL (from [[API:EPrints/DataObj|EPrints::DataObj]]) under_construction - BOOL
If datestamp is unset and this eprint is in the archive dataset datestamp will always be set which will in turn set datestamp as changed.
If no field values were changed and $force
is false returns.
If under_construction
is false:
- static files updated
If non_volatile_change
is true:
- lastmod field updated - triples update queued
If under_construction
is false and non_volatile_change
is true:
- revision generated
The goal of these controls is to only trigger expensive processes in response to user actions. Revisions need to be generated when the user changes metadata or uploads new files (see EPrints::DataObj::Document/commit).
save_revision
$eprint->save_revision( %opts )
Increase the eprint revision number and save a complete copy of the record into the history (see EPrints::DataObj::History).
Options:
user - user that caused the action to occur, defaults to current user action - see history.action, defaults to "modify" details - see history.details, defaults to a description of changed fields
validate
$problems = $eprint->validate( [$for_archive], $workflow_id )
Return a reference to an array of XHTML DOM objects describing validation problems with the entire eprint based on $workflow_id.
If $workflow_id is undefined defaults to "default".
A reference to an empty array indicates no problems.
Calls validate_eprint for the $eprint
.
skip_validation
$boolean = $eprint->skip_validation
Returns true if this eprint should pass validation without being properly validated. This is to allow the use of dodgey data imported from legacy systems.
prune_documents
$eprint->prune_documents
Remove any documents associated with this eprint which don't actually have any files.
get_all_documents
@documents = $eprint->get_all_documents
Return a list of all EPrint::Document objects associated with this eprint excluding documents with a "isVolatileVersionOf" relation (e.g. thumbnails).
move_to_deletion
$success = $eprint->move_to_deletion
Transfer the EPrint into the "deletion" dataset. Should only be called in eprints in the "archive" dataset.
move_to_inbox
$success = $eprint->move_to_inbox
Transfer the EPrint into the "inbox" dataset. Should only be called in eprints in the "buffer" dataset.
move_to_buffer
$success = $eprint->move_to_buffer
Transfer the EPrint into the "buffer" dataset. Should only be called in eprints in the "inbox" or "archive" dataset.
move_to_archive
$success = $eprint->move_to_archive
Move this eprint into the main "archive" dataset. Normally only called on eprints in "deletion" or "buffer" datasets.
local_path
$path = $eprint->local_path
Return the full path of the EPrint directory on the local filesystem. No trailing slash.
url_stem
$url = $eprint->url_stem
Return the URL to this EPrint's directory. Note, this INCLUDES the trailing slash, unlike the local_path method.
generate_static
$eprint->generate_static
Generate the static version of the abstract web page. In a multi-language repository this will generate one version per language.
If called on inbox or buffer, remove the abstract page.
remove_static
$eprint->remove_static
Remove the static web page or pages.
render
( $description, $title, $links ) = $eprint->render
Render the eprint. The 3 returned values are references to XHTML DOM objects. $description is the public viewable description of this eprint that appears as the body of the abstract page. $title is the title of the abstract page for this eprint. $links is any elements which should go in the <head> of this page.
Calls eprint_render to actually render the $eprint
, if it isn't deleted.
get_control_url
$url = $eprint->get_control_url
Return the URL of the control page for this eprint.
get_url
$url = $eprint->get_url
Return the public URL of this eprints abstract page.
get_user
$user = $eprint->get_user
Return the EPrints::DataObj::User to whom this eprint belongs (if any).
in_thread
$bool = $eprint->in_thread( $field )
Returns true if this eprint is in the $field thread.
first_in_thread
$eprint = $eprint->first_in_thread( $field )
Return the first (earliest) version or first paper in the thread of commentaries of this paper in the repository.
last_in_thread
$eprint = $eprint->last_in_thread( $field )
Returns the latest item in the $field thread on this eprint's branch of the thread tree.
render_version_thread
$xhtml = $eprint->render_version_thread( $field )
Render XHTML DOM describing the entire thread as nested unordered lists.
get_type
$type = $eprint->get_type
Return the type of this eprint.
user_roles
@roles = $eprint->user_roles( $user )
Return the @roles $user has on $eprint.
in_editorial_scope_of
$boolean = $eprint->in_editorial_scope_of( $possible_editor )
Returns true if $possible_editor can edit this eprint. This is according to the user editperms.
This does not mean the user has the editor priv., just that if they do then they may edit the given item.
has_owner
$boolean = $eprint->has_owner( $possible_owner )
Returns true if $possible_owner can edit this eprint. This is according to the user editperms.
This does not mean the user has the editor priv., just that if they do then they may edit the given item.
Uses the callback "does_user_own_eprint" if available.
obtain_lock
$boolean = $eprint->obtain_lock( $user )
remove_lock
$boolean = $eprint->remove_lock( $user )
could_obtain_lock
$boolean = $eprint->could_obtain_lock( $user )
is_locked
$boolean = $eprint->is_locked()
render_edit_lock
$xhtml = render_edit_lock( $session, $value )
CALLBACKS
Callbacks may optionally be defined in the ArchiveConfig.
- validate_field
validate_field( $field, $value, $session, [$for_archive] )
- validate_eprint
validate_eprint( $eprint, $session, [$for_archive] )
- set_eprint_defaults
set_eprint_defaults( $data, $session )
- set_eprint_automatic_fields
set_eprint_automatic_fields( $eprint )
- eprint_render
eprint_render( $eprint, $session )
COPYRIGHT
Copyright 2000-2011 University of Southampton.
This file is part of EPrints http://www.eprints.org/.
EPrints is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation, either version 3 of the License, or (at your option) any later version.
EPrints 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 Lesser General Public License for more details.
You should have received a copy of the GNU Lesser General Public License along with EPrints. If not, see http://www.gnu.org/licenses/.