mod/profile_photo.php

   1 <?php
   2 /**
   3  * @file mod/profile_photo.php
   4  */
   5 use Friendica\App;
   6 use Friendica\Core\Config;
   7 use Friendica\Core\System;
   8 use Friendica\Core\Worker;
   9 use Friendica\Database\DBM;
  10 use Friendica\Model\Photo;
  11 use Friendica\Object\Image;
  12
  13 function profile_photo_init(App $a) {
  14
  15         if (! local_user()) {
  16                 return;
  17         }
  18
  19         profile_load($a,$a->user['nickname']);
  20 }
  21
  22 function profile_photo_post(App $a) {
  23
  24         if (! local_user()) {
  25                 notice ( t('Permission denied.') . EOL );
  26                 return;
  27         }
  28
  29         check_form_security_token_redirectOnErr('/profile_photo', 'profile_photo');
  30
  31         if((x($_POST,'cropfinal')) && ($_POST['cropfinal'] == 1)) {
  32
  33                 // unless proven otherwise
  34                 $is_default_profile = 1;
  35
  36                 if($_REQUEST['profile']) {
  37                         $r = q("select id, `is-default` from profile where id = %d and uid = %d limit 1",
  38                                 intval($_REQUEST['profile']),
  39                                 intval(local_user())
  40                         );
  41                         if (DBM::is_result($r) && (! intval($r[0]['is-default'])))
  42                                 $is_default_profile = 0;
  43                 }
  44
  45
  46
  47                 // phase 2 - we have finished cropping
  48
  49                 if($a->argc != 2) {
  50                         notice( t('Image uploaded but image cropping failed.') . EOL );
  51                         return;
  52                 }
  53
  54                 $image_id = $a->argv[1];
  55
  56                 if(substr($image_id,-2,1) == '-') {
  57                         $scale = substr($image_id,-1,1);
  58                         $image_id = substr($image_id,0,-2);
  59                 }
  60
  61
  62                 $srcX = $_POST['xstart'];
  63                 $srcY = $_POST['ystart'];
  64                 $srcW = $_POST['xfinal'] - $srcX;
  65                 $srcH = $_POST['yfinal'] - $srcY;
  66
  67                 $r = q("SELECT * FROM `photo` WHERE `resource-id` = '%s' AND `uid` = %d AND `scale` = %d LIMIT 1",
  68                         dbesc($image_id),
  69                         dbesc(local_user()),
  70                         intval($scale));
  71
  72                 if (DBM::is_result($r)) {
  73
  74                         $base_image = $r[0];
  75
  76                         $Image = new Image($base_image['data'], $base_image['type']);
  77                         if ($Image->isValid()) {
  78                                 $Image->crop(175,$srcX,$srcY,$srcW,$srcH);
  79
  80                                 $r = Photo::store($Image, local_user(), 0, $base_image['resource-id'],$base_image['filename'], t('Profile Photos'), 4, $is_default_profile);
  81
  82                                 if ($r === false) {
  83                                         notice ( sprintf(t('Image size reduction [%s] failed.'),"175") . EOL );
  84                                 }
  85
  86                                 $Image->scaleDown(80);
  87
  88                                 $r = Photo::store($Image, local_user(), 0, $base_image['resource-id'],$base_image['filename'], t('Profile Photos'), 5, $is_default_profile);
  89
  90                                 if ($r === false) {
  91                                         notice( sprintf(t('Image size reduction [%s] failed.'),"80") . EOL );
  92                                 }
  93
  94                                 $Image->scaleDown(48);
  95
  96                                 $r = Photo::store($Image, local_user(), 0, $base_image['resource-id'],$base_image['filename'], t('Profile Photos'), 6, $is_default_profile);
  97
  98                                 if ($r === false) {
  99                                         notice( sprintf(t('Image size reduction [%s] failed.'),"48") . EOL );
 100                                 }
 101
 102                                 // If setting for the default profile, unset the profile photo flag from any other photos I own
 103
 104                                 if($is_default_profile) {
 105                                         $r = q("UPDATE `photo` SET `profile` = 0 WHERE `profile` = 1 AND `resource-id` != '%s' AND `uid` = %d",
 106                                                 dbesc($base_image['resource-id']),
 107                                                 intval(local_user())
 108                                         );
 109
 110                                         $r = q("UPDATE `contact` SET `photo` = '%s', `thumb` = '%s', `micro` = '%s'  WHERE `self` AND `uid` = %d",
 111                                                 dbesc(System::baseUrl() . '/photo/' . $base_image['resource-id'] . '-4.' . $Image->getExt()),
 112                                                 dbesc(System::baseUrl() . '/photo/' . $base_image['resource-id'] . '-5.' . $Image->getExt()),
 113                                                 dbesc(System::baseUrl() . '/photo/' . $base_image['resource-id'] . '-6.' . $Image->getExt()),
 114                                                 intval(local_user())
 115                                         );
 116                                 } else {
 117                                         $r = q("update profile set photo = '%s', thumb = '%s' where id = %d and uid = %d",
 118                                                 dbesc(System::baseUrl() . '/photo/' . $base_image['resource-id'] . '-4.' . $Image->getExt()),
 119                                                 dbesc(System::baseUrl() . '/photo/' . $base_image['resource-id'] . '-5.' . $Image->getExt()),
 120                                                 intval($_REQUEST['profile']),
 121                                                 intval(local_user())
 122                                         );
 123                                 }
 124
 125                                 // we'll set the updated profile-photo timestamp even if it isn't the default profile,
 126                                 // so that browsers will do a cache update unconditionally
 127
 128                                 $r = q("UPDATE `contact` SET `avatar-date` = '%s' WHERE `self` = 1 AND `uid` = %d",
 129                                         dbesc(datetime_convert()),
 130                                         intval(local_user())
 131                                 );
 132
 133                                 info( t('Shift-reload the page or clear browser cache if the new photo does not display immediately.') . EOL);
 134                                 // Update global directory in background
 135                                 $url = System::baseUrl() . '/profile/' . $a->user['nickname'];
 136                                 if ($url && strlen(Config::get('system','directory'))) {
 137                                         Worker::add(PRIORITY_LOW, "Directory", $url);
 138                                 }
 139
 140                                 Worker::add(PRIORITY_LOW, 'ProfileUpdate', local_user());
 141                         } else {
 142                                 notice( t('Unable to process image') . EOL);
 143                         }
 144                 }
 145
 146                 goaway(System::baseUrl() . '/profiles');
 147                 return; // NOTREACHED
 148         }
 149
 150         $src      = $_FILES['userfile']['tmp_name'];
 151         $filename = basename($_FILES['userfile']['name']);
 152         $filesize = intval($_FILES['userfile']['size']);
 153         $filetype = $_FILES['userfile']['type'];
 154         if ($filetype == "") {
 155                 $filetype = Image::guessType($filename);
 156         }
 157
 158         $maximagesize = Config::get('system', 'maximagesize');
 159
 160         if (($maximagesize) && ($filesize > $maximagesize)) {
 161                 notice(sprintf(t('Image exceeds size limit of %s'), formatBytes($maximagesize)) . EOL);
 162                 @unlink($src);
 163                 return;
 164         }
 165
 166         $imagedata = @file_get_contents($src);
 167         $ph = new Image($imagedata, $filetype);
 168
 169         if (! $ph->isValid()) {
 170                 notice(t('Unable to process image.') . EOL);
 171                 @unlink($src);
 172                 return;
 173         }
 174
 175         $ph->orient($src);
 176         @unlink($src);
 177         return profile_photo_crop_ui_head($a, $ph);
 178 }
 179
 180
 181 if(! function_exists('profile_photo_content')) {
 182 function profile_photo_content(App $a) {
 183
 184         if (! local_user()) {
 185                 notice( t('Permission denied.') . EOL );
 186                 return;
 187         }
 188
 189         $newuser = false;
 190
 191         if($a->argc == 2 && $a->argv[1] === 'new')
 192                 $newuser = true;
 193
 194         if( $a->argv[1]=='use'){
 195                 if ($a->argc<3){
 196                         notice( t('Permission denied.') . EOL );
 197                         return;
 198                 };
 199
 200 //              check_form_security_token_redirectOnErr('/profile_photo', 'profile_photo');
 201
 202                 $resource_id = $a->argv[2];
 203                 //die(":".local_user());
 204                 $r=q("SELECT * FROM `photo` WHERE `uid` = %d AND `resource-id` = '%s' ORDER BY `scale` ASC",
 205                         intval(local_user()),
 206                         dbesc($resource_id)
 207                         );
 208                 if (!DBM::is_result($r)){
 209                         notice( t('Permission denied.') . EOL );
 210                         return;
 211                 }
 212                 $havescale = false;
 213                 foreach ($r as $rr) {
 214                         if($rr['scale'] == 5)
 215                                 $havescale = true;
 216                 }
 217
 218                 // set an already uloaded photo as profile photo
 219                 // if photo is in 'Profile Photos', change it in db
 220                 if (($r[0]['album']== t('Profile Photos')) && ($havescale)){
 221                         $r=q("UPDATE `photo` SET `profile`=0 WHERE `profile`=1 AND `uid`=%d",
 222                                 intval(local_user()));
 223
 224                         $r=q("UPDATE `photo` SET `profile`=1 WHERE `uid` = %d AND `resource-id` = '%s'",
 225                                 intval(local_user()),
 226                                 dbesc($resource_id)
 227                                 );
 228
 229                         $r = q("UPDATE `contact` SET `avatar-date` = '%s' WHERE `self` = 1 AND `uid` = %d",
 230                                 dbesc(datetime_convert()),
 231                                 intval(local_user())
 232                         );
 233
 234                         // Update global directory in background
 235                         $url = $_SESSION['my_url'];
 236                         if ($url && strlen(Config::get('system','directory'))) {
 237                                 Worker::add(PRIORITY_LOW, "Directory", $url);
 238                         }
 239
 240                         goaway(System::baseUrl() . '/profiles');
 241                         return; // NOTREACHED
 242                 }
 243                 $ph = new Image($r[0]['data'], $r[0]['type']);
 244                 profile_photo_crop_ui_head($a, $ph);
 245                 // go ahead as we have jus uploaded a new photo to crop
 246         }
 247
 248         $profiles = q("select `id`,`profile-name` as `name`,`is-default` as `default` from profile where uid = %d",
 249                 intval(local_user())
 250         );
 251
 252
 253         if(! x($a->config,'imagecrop')) {
 254
 255                 $tpl = get_markup_template('profile_photo.tpl');
 256
 257                 $o .= replace_macros($tpl,array(
 258                         '$user' => $a->user['nickname'],
 259                         '$lbl_upfile' => t('Upload File:'),
 260                         '$lbl_profiles' => t('Select a profile:'),
 261                         '$title' => t('Upload Profile Photo'),
 262                         '$submit' => t('Upload'),
 263                         '$profiles' => $profiles,
 264                         '$form_security_token' => get_form_security_token("profile_photo"),
 265                         '$select' => sprintf('%s %s', t('or'), ($newuser) ? '<a href="' . System::baseUrl() . '">' . t('skip this step') . '</a>' : '<a href="'. System::baseUrl() . '/photos/' . $a->user['nickname'] . '">' . t('select a photo from your photo albums') . '</a>')
 266                 ));
 267
 268                 return $o;
 269         }
 270         else {
 271                 $filename = $a->config['imagecrop'] . '-' . $a->config['imagecrop_resolution'] . '.'.$a->config['imagecrop_ext'];
 272                 $resolution = $a->config['imagecrop_resolution'];
 273                 $tpl = get_markup_template("cropbody.tpl");
 274                 $o .= replace_macros($tpl,array(
 275                         '$filename' => $filename,
 276                         '$profile' => intval($_REQUEST['profile']),
 277                         '$resource' => $a->config['imagecrop'] . '-' . $a->config['imagecrop_resolution'],
 278                         '$image_url' => System::baseUrl() . '/photo/' . $filename,
 279                         '$title' => t('Crop Image'),
 280                         '$desc' => t('Please adjust the image cropping for optimum viewing.'),
 281                         '$form_security_token' => get_form_security_token("profile_photo"),
 282                         '$done' => t('Done Editing')
 283                 ));
 284                 return $o;
 285         }
 286
 287         return; // NOTREACHED
 288 }}
 289
 290
 291 if(! function_exists('profile_photo_crop_ui_head')) {
 292 function profile_photo_crop_ui_head(App $a, Image $Image) {
 293         $max_length = Config::get('system','max_image_length');
 294         if (! $max_length) {
 295                 $max_length = MAX_IMAGE_LENGTH;
 296         }
 297         if ($max_length > 0) {
 298                 $Image->scaleDown($max_length);
 299         }
 300
 301         $width = $Image->getWidth();
 302         $height = $Image->getHeight();
 303
 304         if ($width < 175 || $height < 175) {
 305                 $Image->scaleUp(200);
 306                 $width = $Image->getWidth();
 307                 $height = $Image->getHeight();
 308         }
 309
 310         $hash = photo_new_resource();
 311
 312
 313         $smallest = 0;
 314
 315         $r = Photo::store($Image, local_user(), 0 , $hash, $filename, t('Profile Photos'), 0 );
 316
 317         if ($r) {
 318                 info( t('Image uploaded successfully.') . EOL );
 319         } else {
 320                 notice( t('Image upload failed.') . EOL );
 321         }
 322
 323         if ($width > 640 || $height > 640) {
 324                 $Image->scaleDown(640);
 325                 $r = Photo::store($Image, local_user(), 0 , $hash, $filename, t('Profile Photos'), 1 );
 326
 327                 if ($r === false) {
 328                         notice( sprintf(t('Image size reduction [%s] failed.'),"640") . EOL );
 329                 } else {
 330                         $smallest = 1;
 331                 }
 332         }
 333
 334         $a->config['imagecrop'] = $hash;
 335         $a->config['imagecrop_resolution'] = $smallest;
 336         $a->config['imagecrop_ext'] = $Image->getExt();
 337         $a->page['htmlhead'] .= replace_macros(get_markup_template("crophead.tpl"), array());
 338         $a->page['end'] .= replace_macros(get_markup_template("cropend.tpl"), array());
 339         return;
 340 }}
 341