2009-05-11 18:45:00 +01:00
< ? php
/*
* Laconica - a distributed open - source microblogging tool
2009-06-21 00:12:55 +01:00
* Copyright ( C ) 2008 , 2009 , Control Yourself , Inc .
2009-05-11 18:45:00 +01:00
*
* This program is free software : you can redistribute it and / or modify
* it under the terms of the GNU Affero General Public License as published by
* the Free Software Foundation , either version 3 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 Affero General Public License for more details .
*
* You should have received a copy of the GNU Affero General Public License
* along with this program . If not , see < http :// www . gnu . org / licenses />.
*/
if ( ! defined ( 'LACONICA' )) { exit ( 1 ); }
require_once INSTALLDIR . '/classes/Memcached_DataObject.php' ;
2009-05-13 19:27:32 +01:00
require_once INSTALLDIR . '/classes/File_redirection.php' ;
require_once INSTALLDIR . '/classes/File_oembed.php' ;
require_once INSTALLDIR . '/classes/File_thumbnail.php' ;
require_once INSTALLDIR . '/classes/File_to_post.php' ;
//require_once INSTALLDIR.'/classes/File_redirection.php';
2009-05-11 18:45:00 +01:00
/**
* Table Definition for file
*/
2009-06-22 23:48:31 +01:00
class File extends Memcached_DataObject
2009-05-11 18:45:00 +01:00
{
###START_AUTOCODE
/* the code below is auto generated do not remove the above tag */
public $__table = 'file' ; // table name
2009-06-22 22:19:41 +01:00
public $id ; // int(4) primary_key not_null
2009-05-11 18:45:00 +01:00
public $url ; // varchar(255) unique_key
2009-06-22 23:48:31 +01:00
public $mimetype ; // varchar(50)
public $size ; // int(4)
public $title ; // varchar(255)
public $date ; // int(4)
public $protected ; // int(4)
public $filename ; // varchar(255)
2009-06-22 22:19:41 +01:00
public $modified ; // timestamp() not_null default_CURRENT_TIMESTAMP
2009-05-11 18:45:00 +01:00
/* Static get */
2009-06-22 22:24:40 +01:00
function staticGet ( $k , $v = NULL ) { return Memcached_DataObject :: staticGet ( 'File' , $k , $v ); }
2009-05-11 18:45:00 +01:00
/* the code above is auto generated do not remove the tag below */
###END_AUTOCODE
2009-05-13 19:27:32 +01:00
function isProtected ( $url ) {
return 'http://www.facebook.com/login.php' === $url ;
}
2009-05-15 20:04:58 +01:00
function getAttachments ( $post_id ) {
$query = " select file.* from file join file_to_post on (file_id = file.id) join notice on (post_id = notice.id) where post_id = " . $this -> escape ( $post_id );
$this -> query ( $query );
$att = array ();
while ( $this -> fetch ()) {
$att [] = clone ( $this );
}
$this -> free ();
return $att ;
}
2009-05-13 19:27:32 +01:00
function saveNew ( $redir_data , $given_url ) {
$x = new File ;
$x -> url = $given_url ;
if ( ! empty ( $redir_data [ 'protected' ])) $x -> protected = $redir_data [ 'protected' ];
if ( ! empty ( $redir_data [ 'title' ])) $x -> title = $redir_data [ 'title' ];
if ( ! empty ( $redir_data [ 'type' ])) $x -> mimetype = $redir_data [ 'type' ];
if ( ! empty ( $redir_data [ 'size' ])) $x -> size = intval ( $redir_data [ 'size' ]);
if ( isset ( $redir_data [ 'time' ]) && $redir_data [ 'time' ] > 0 ) $x -> date = intval ( $redir_data [ 'time' ]);
$file_id = $x -> insert ();
if ( isset ( $redir_data [ 'type' ])
&& ( 'text/html' === substr ( $redir_data [ 'type' ], 0 , 9 ))
2009-07-15 22:10:36 +01:00
&& ( $oembed_data = File_oembed :: _getOembed ( $given_url ))) {
File_oembed :: saveNew ( $oembed_data , $file_id );
2009-05-13 19:27:32 +01:00
}
return $x ;
}
function processNew ( $given_url , $notice_id ) {
if ( empty ( $given_url )) return - 1 ; // error, no url to process
$given_url = File_redirection :: _canonUrl ( $given_url );
if ( empty ( $given_url )) return - 1 ; // error, no url to process
$file = File :: staticGet ( 'url' , $given_url );
2009-06-25 19:10:34 +01:00
if ( empty ( $file )) {
2009-05-13 19:27:32 +01:00
$file_redir = File_redirection :: staticGet ( 'url' , $given_url );
2009-06-25 19:10:34 +01:00
if ( empty ( $file_redir )) {
2009-05-13 19:27:32 +01:00
$redir_data = File_redirection :: where ( $given_url );
$redir_url = $redir_data [ 'url' ];
2009-08-12 05:00:46 +01:00
// TODO: max field length
if ( $redir_url === $given_url || strlen ( $redir_url ) > 255 ) {
2009-05-13 19:27:32 +01:00
$x = File :: saveNew ( $redir_data , $given_url );
$file_id = $x -> id ;
} else {
$x = File :: processNew ( $redir_url , $notice_id );
$file_id = $x -> id ;
File_redirection :: saveNew ( $redir_data , $file_id , $given_url );
}
} else {
$file_id = $file_redir -> file_id ;
}
} else {
$file_id = $file -> id ;
$x = $file ;
}
if ( empty ( $x )) {
$x = File :: staticGet ( $file_id );
2009-07-30 21:55:09 +01:00
if ( empty ( $x )) {
throw new ServerException ( " Robin thinks something is impossible. " );
}
2009-05-13 19:27:32 +01:00
}
2009-06-22 23:48:31 +01:00
2009-05-13 19:27:32 +01:00
File_to_post :: processNew ( $file_id , $notice_id );
return $x ;
}
2009-06-01 02:03:55 +01:00
2009-07-07 20:55:10 +01:00
function isRespectsQuota ( $user , $fileSize ) {
2009-07-22 06:05:44 +01:00
2009-07-07 20:55:10 +01:00
if ( $fileSize > common_config ( 'attachments' , 'file_quota' )) {
2009-06-01 02:03:55 +01:00
return sprintf ( _ ( 'No file may be larger than %d bytes ' .
2009-06-23 15:29:43 +01:00
'and the file you sent was %d bytes. Try to upload a smaller version.' ),
2009-07-07 20:55:10 +01:00
common_config ( 'attachments' , 'file_quota' ), $fileSize );
2009-06-01 02:03:55 +01:00
}
$query = " select sum(size) as total from file join file_to_post on file_to_post.file_id = file.id join notice on file_to_post.post_id = notice.id where profile_id = { $user -> id } and file.url like '%/notice/%/file' " ;
$this -> query ( $query );
$this -> fetch ();
2009-07-07 20:55:10 +01:00
$total = $this -> total + $fileSize ;
2009-06-01 02:03:55 +01:00
if ( $total > common_config ( 'attachments' , 'user_quota' )) {
return sprintf ( _ ( 'A file this large would exceed your user quota of %d bytes.' ), common_config ( 'attachments' , 'user_quota' ));
}
2009-07-22 06:05:44 +01:00
$query .= ' AND EXTRACT(month FROM file.modified) = EXTRACT(month FROM now()) and EXTRACT(year FROM file.modified) = EXTRACT(year FROM now())' ;
2009-06-01 02:03:55 +01:00
$this -> query ( $query );
$this -> fetch ();
2009-07-07 20:55:10 +01:00
$total = $this -> total + $fileSize ;
2009-06-01 02:03:55 +01:00
if ( $total > common_config ( 'attachments' , 'monthly_quota' )) {
return sprintf ( _ ( 'A file this large would exceed your monthly quota of %d bytes.' ), common_config ( 'attachments' , 'monthly_quota' ));
}
return true ;
}
2009-06-22 23:48:31 +01:00
// where should the file go?
2009-06-23 15:29:43 +01:00
static function filename ( $profile , $basename , $mimetype )
{
require_once 'MIME/Type/Extension.php' ;
$mte = new MIME_Type_Extension ();
$ext = $mte -> getExtension ( $mimetype );
$nickname = $profile -> nickname ;
$datestamp = strftime ( '%Y%m%dT%H%M%S' , time ());
$random = strtolower ( common_confirmation_code ( 32 ));
return " $nickname - $datestamp - $random . $ext " ;
}
2009-06-22 23:48:31 +01:00
2009-06-23 15:29:43 +01:00
static function path ( $filename )
{
$dir = common_config ( 'attachments' , 'dir' );
2009-06-22 23:48:31 +01:00
2009-06-23 15:29:43 +01:00
if ( $dir [ strlen ( $dir ) - 1 ] != '/' ) {
$dir .= '/' ;
}
2009-06-22 23:48:31 +01:00
2009-06-23 15:29:43 +01:00
return $dir . $filename ;
}
2009-06-22 23:48:31 +01:00
2009-06-23 15:29:43 +01:00
static function url ( $filename )
{
$path = common_config ( 'attachments' , 'path' );
2009-06-22 23:48:31 +01:00
2009-06-23 15:29:43 +01:00
if ( $path [ strlen ( $path ) - 1 ] != '/' ) {
$path .= '/' ;
}
2009-06-22 23:48:31 +01:00
2009-06-23 15:29:43 +01:00
if ( $path [ 0 ] != '/' ) {
$path = '/' . $path ;
}
2009-06-22 23:48:31 +01:00
2009-06-23 15:29:43 +01:00
$server = common_config ( 'attachments' , 'server' );
2009-06-22 23:48:31 +01:00
2009-06-23 15:29:43 +01:00
if ( empty ( $server )) {
$server = common_config ( 'site' , 'server' );
}
2009-06-22 23:48:31 +01:00
2009-06-23 15:29:43 +01:00
// XXX: protocol
2009-06-22 23:48:31 +01:00
2009-06-23 15:29:43 +01:00
return 'http://' . $server . $path . $filename ;
}
2009-07-14 18:33:40 +01:00
2009-08-26 20:40:51 +01:00
function getEnclosure (){
$enclosure = ( object ) array ();
$enclosure -> title = $this -> title ;
$enclosure -> url = $this -> url ;
$enclosure -> title = $this -> title ;
$enclosure -> date = $this -> date ;
$enclosure -> modified = $this -> modified ;
$enclosure -> size = $this -> size ;
$enclosure -> mimetype = $this -> mimetype ;
2009-08-27 02:51:54 +01:00
if ( ! isset ( $this -> filename )){
2009-08-26 20:40:51 +01:00
$notEnclosureMimeTypes = array ( 'text/html' , 'application/xhtml+xml' );
$mimetype = strtolower ( $this -> mimetype );
$semicolon = strpos ( $mimetype , ';' );
if ( $semicolon ){
$mimetype = substr ( $mimetype , 0 , $semicolon );
}
if ( in_array ( $mimetype , $notEnclosureMimeTypes )){
2009-08-27 02:51:54 +01:00
$oembed = File_oembed :: staticGet ( 'file_id' , $this -> id );
2009-08-26 20:40:51 +01:00
if ( $oembed ){
2009-08-27 02:51:54 +01:00
$mimetype = strtolower ( $oembed -> mimetype );
2009-08-26 20:40:51 +01:00
$semicolon = strpos ( $mimetype , ';' );
if ( $semicolon ){
$mimetype = substr ( $mimetype , 0 , $semicolon );
}
if ( in_array ( $mimetype , $notEnclosureMimeTypes )){
return false ;
} else {
2009-08-27 02:51:54 +01:00
if ( $oembed -> mimetype ) $enclosure -> mimetype = $oembed -> mimetype ;
if ( $oembed -> url ) $enclosure -> url = $oembed -> url ;
if ( $oembed -> title ) $enclosure -> title = $oembed -> title ;
if ( $oembed -> modified ) $enclosure -> modified = $oembed -> modified ;
unset ( $oembed -> size );
2009-08-26 20:40:51 +01:00
}
}
}
2009-07-14 18:33:40 +01:00
}
2009-08-27 02:51:54 +01:00
return $enclosure ;
2009-07-14 18:33:40 +01:00
}
2009-05-11 18:45:00 +01:00
}
2009-06-01 02:03:55 +01:00