friendica-addons/catavatar/catavatar.php
2018-04-05 10:56:36 +02:00

306 lines
7.7 KiB
PHP

<?php
/**
* Name: Cat Avatar Generator
* Description: Generate a default avatar based on David Revoy's cat-avatar-generator https://framagit.org/Deevad/cat-avatar-generator
* Version: 1.1
* Author: Fabio <https://kirgroup.com/profile/fabrixxm>
*/
use Friendica\Core\Addon;
use Friendica\Core\Config;
use Friendica\Core\L10n;
use Friendica\Core\Worker;
use Friendica\Core\PConfig;
use Friendica\Util\DateTimeFormat;
use Friendica\Network\HTTPException\NotFoundException;
define("CATAVATAR_SIZE", 256);
/**
* Installs the addon hook
*/
function catavatar_install() {
Addon::registerHook('avatar_lookup', 'addon/catavatar/catavatar.php', 'catavatar_lookup');
Addon::registerHook('addon_settings', 'addon/catavatar/catavatar.php', 'catavatar_addon_settings');
Addon::registerHook('addon_settings_post', 'addon/catavatar/catavatar.php', 'catavatar_addon_settings_post');
logger("registered catavatar");
}
/**
* Removes the addon hook
*/
function catavatar_uninstall() {
Addon::unregisterHook('avatar_lookup', 'addon/catavatar/catavatar.php', 'catavatar_lookup');
Addon::unregisterHook('addon_settings', 'addon/catavatar/catavatar.php', 'catavatar_addon_settings');
Addon::unregisterHook('addon_settings_post', 'addon/catavatar/catavatar.php', 'catavatar_addon_settings_post');
logger("unregistered catavatar");
}
function catavatar_addon_settings(&$a, &$s) {
if(! local_user())
return;
$t = get_markup_template("settings.tpl", "addon/catavatar/" );
$s = replace_macros ($t, [
'$postpost' => x($_POST,"catavatar-morecat") || x($_POST,"catavatar-emailcat"),
'$uncache' => time(),
'$uid' => local_user(),
'$usecat' => L10n::t('Use Cat as Avatar'),
'$morecat' => L10n::t('More Random Cat!'),
'$emailcat' => L10n::t('Reset to email Cat'),
'$seed' => PConfig::get(local_user(), "catavatar", "seed", false),
'$header' => L10n::t('Cat Avatar').' '.L10n::t('Settings'),
]);
return;
}
function catavatar_addon_settings_post(&$a, &$s) {
if(! local_user())
return;
// delete the current cached cat avatar
$user = dba::selectFirst('user', ['email'],
[
'uid' => $uid,
'blocked' => 0,
'account_expired' => 0,
'account_removed' => 0,
]
);
$seed = PConfig::get(local_user(), "catavatar", "seed", md5(trim(strtolower($user['email']))));
$imageurl = preg_replace('/[^A-Za-z0-9\._-]/', '', $seed);
$imageurl = substr($imageurl,0,35).'';
$cachefile = get_cachefile($imageurl);
if ($cachefile != "" && file_exists($cachefile)) {
unlink($cachefile);
}
if (x($_POST,"catavatar-usecat")) {
$url = $a->get_baseurl()."/catavatar/".local_user();
// set the catavatar url as avatar url in contact and default profile
// and set profile to 0 to current photo
// I'm not sure it's the correct way to do this...
$r = dba::update('contact',
['photo'=>$url."/4", 'thumb'=>$url."/5", 'micro'=>$url."/6", 'avatar-date'=>DateTimeFormat::utcNow()],
['uid'=>local_user(), 'self'=>1]
);
if ($r===false) {
notice(L10n::t('There was an error, the cat ran away.'));
return;
}
$r = dba::update('profile',
['photo'=>$url."/4", 'thumb'=>$url."/5"],
['uid'=>local_user(), 'is-default'=>1]
);
if ($r===false) {
notice(L10n::t('There was an error, the cat ran away.'));
return;
}
$r = dba::update('photo',
['profile'=>0],
['uid'=>local_user(), 'profile'=>1]
);
if ($r===false) {
notice(L10n::t('There was an error, the cat ran away.'));
return;
}
// Update global directory in background
$url = $a->get_baseurl() . '/profile/' . $a->user['nickname'];
if ($url && strlen(Config::get('system','directory'))) {
Worker::add(PRIORITY_LOW, "Directory", $url);
}
Worker::add(PRIORITY_LOW, 'ProfileUpdate', local_user());
info(L10n::t("Meow!"));
return;
}
if (x($_POST,"catavatar-morecat")) {
PConfig::set(local_user(), "catavatar", "seed", time());
}
if (x($_POST,"catavatar-emailcat")) {
PConfig::delete(local_user(), "catavatar", "seed");
}
}
/**
* Returns the URL to the cat avatar
*
* @param $a array
* @param &$b array
*/
function catavatar_lookup($a, &$b) {
$user = dba::selectFirst('user', ['uid'],['email'=>$b['email']]);
$url = $a->get_baseurl().'/catavatar/'.$user['uid'];
switch($b['size']) {
case 175: $url.="/4"; break;
case 80: $url.="/5"; break;
case 47: $url.="/6"; break;
}
$b['url'] = $url;
$b['success'] = true;
}
function catavatar_module(){}
/**
* Returns image for user id
*
* @throws NotFoundException
*
* @TODO: support sizes
*/
function catavatar_content($a) {
if ($a->argc < 2 || $a->argc > 3)
throw new NotFoundException(); // this should be catched on index and show default "not found" page.
$uid = intval($a->argv[1]);
$size = 0;
if ($a->argc == 3) {
$size = intval($a->argv[2]);
}
$user = dba::selectFirst('user', ['email'],
[
'uid' => $uid,
'blocked' => 0,
'account_expired' => 0,
'account_removed' => 0,
]
);
if ($user === False)
throw new NotFoundException();
$seed = PConfig::get(local_user(), "catavatar", "seed", md5(trim(strtolower($user['email']))));
//echo "<pre>"; var_dump($hash); killme();
// from cat-avatar-generator.php
$imageurl = $seed."-".$size;
$imageurl = preg_replace('/[^A-Za-z0-9\._-]/', '', $imageurl);
$imageurl = substr($imageurl,0,35).'';
$cachefile = get_cachefile($imageurl);
$cachetime = 604800; # 1 week (1 day = 86400)
// Serve from the cache if it is younger than $cachetime
if ($cachefile != "" && file_exists($cachefile) && time() - $cachetime < filemtime($cachefile)) {
header('Pragma: public');
header('Cache-Control: max-age=86400');
header('Expires: '. gmdate('D, d M Y H:i:s \G\M\T', time() + 86400));
header('Content-Type: image/jpg');
readfile($cachefile);
exit;
}
// ...Or start generation
ob_start();
// render the picture:
build_cat($seed, $size);
// Save/cache the output to a file
if ($cachefile!=""){
$savedfile = fopen($cachefile, 'w+'); # w+ to be at start of the file, write mode, and attempt to create if not existing.
fwrite($savedfile, ob_get_contents());
fclose($savedfile);
chmod($cachefile, 0755);
}
ob_end_flush();
killme();
}
/**
* ====================
* CAT-AVATAR-GENERATOR
* ====================
*
* @authors: Andreas Gohr, David Revoy
*
* This PHP is licensed under the short and simple permissive:
* [MIT License](https://en.wikipedia.org/wiki/MIT_License)
*
**/
function build_cat($seed='', $size=0){
// init random seed
if($seed) srand( hexdec(substr(md5($seed),0,6)) );
// throw the dice for body parts
$parts = array(
'body' => rand(1,15),
'fur' => rand(1,10),
'eyes' => rand(1,15),
'mouth' => rand(1,10),
'accessorie' => rand(1,20)
);
// create backgound
$cat = @imagecreatetruecolor(CATAVATAR_SIZE, CATAVATAR_SIZE)
or die("GD image create failed");
$white = imagecolorallocate($cat, 255, 255, 255);
imagefill($cat,0,0,$white);
// add parts
foreach($parts as $part => $num){
$file = dirname(__FILE__).'/avatars/'.$part.'_'.$num.'.png';
$im = @imagecreatefrompng($file);
if(!$im) die('Failed to load '.$file);
imageSaveAlpha($im, true);
imagecopy($cat,$im,0,0,0,0,CATAVATAR_SIZE,CATAVATAR_SIZE);
imagedestroy($im);
}
// scale image
if ($size > 3 && $size < 7) {
switch($size) {
case 4: $size = 175; break;
case 5: $size = 80; break;
case 6: $size = 48; break;
}
$dest = imagecreatetruecolor($size, $size);
imagealphablending($dest, false);
imagesavealpha($dest, true);
imagecopyresampled($dest, $cat, 0, 0, 0, 0, $size, $size, CATAVATAR_SIZE, CATAVATAR_SIZE);
imagedestroy($cat);
$cat = $dest;
}
// restore random seed
if($seed) srand();
header('Pragma: public');
header('Cache-Control: max-age=86400');
header('Expires: '. gmdate('D, d M Y H:i:s \G\M\T', time() + 86400));
header('Content-Type: image/jpg');
imagejpeg($cat, NULL, 90);
imagedestroy($cat);
}