Add Cat Avatar Generator Addon

catavatar/README.md

@@ -0,0 +1,13 @@
+# Friendica Cat Avatar Generator Addon
+
+Generate a default avatar based on David Revoy's cat-avatar-generator https://framagit.org/Deevad/cat-avatar-generator
+
+## License:
+
+**Artworks:**
+PNG and ORA files licensed under: [CC-By 4.0](https://creativecommons.org/licenses/by/4.0/) 
+attribution: David Revoy with the following exception: 
+Generated cats used as Avatar (for blog,forum,social-network) don't need direct 
+attribution and so, can be used as regular avatars without pasting David Revoy's 
+name all over the place.
+

catavatar/catavatar.php

@@ -0,0 +1,306 @@
+<?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);
+}
+
+

catavatar/templates/settings.tpl

@@ -0,0 +1,24 @@
+<span id="settings_catavatar_inflated" class="settings-block fakelink" 
+	style="{{if $postpost}}display: none;{{else}}display: block;{{/if}}" 
+	onclick="openClose('settings_catavatar_expanded'); openClose('settings_catavatar_inflated');">
+		<h3>{{$header}}</h3>
+</span>
+<div id="settings_catavatar_expanded" class="settings-block" 
+	style="{{if $postpost}}display: block;{{else}}display: none;{{/if}}">
+	<span class="fakelink" onclick="openClose('settings_catavatar_expanded'); openClose('settings_catavatar_inflated');">
+		<h3>{{$header}}</h3>
+	</span>
+	<img src="{{$basepath}}/catavatar/{{$uid}}?{{$uncache}}">
+	<p>Set default profile avatar or randomize the cat</p>
+	<div class="settings-submit-wrapper" >
+		<input type="submit" name="catavatar-usecat" 
+			class="btn btn-primary settings-submit" value="{{$usecat}}" />
+		
+		<div class="btn-group" role="group" aria-label="...">
+			<input type="submit" name="catavatar-morecat" 
+				class="btn btn-default settings-submit" value="{{$morecat}}" />
+			<input type="submit" name="catavatar-emailcat" {{if !$seed}}disabled{{/if}}
+				class="btn btn-default settings-submit" value="{{$emailcat}}" />
+		</div>
+	</div>
+</div>