3 * Name: Cat Avatar Generator
4 * Description: Generate a default avatar based on David Revoy's cat-avatar-generator https://framagit.org/Deevad/cat-avatar-generator
6 * Author: Fabio <https://kirgroup.com/profile/fabrixxm>
10 use Friendica\Core\Config;
11 use Friendica\Core\Hook;
12 use Friendica\Core\L10n;
13 use Friendica\Core\Logger;
14 use Friendica\Core\PConfig;
15 use Friendica\Core\Renderer;
16 use Friendica\Core\Worker;
17 use Friendica\Database\DBA;
19 use Friendica\Model\Contact;
20 use Friendica\Model\Photo;
21 use Friendica\Network\HTTPException\NotFoundException;
23 define("CATAVATAR_SIZE", 256);
26 * Installs the addon hook
28 function catavatar_install()
30 Hook::register('avatar_lookup', 'addon/catavatar/catavatar.php', 'catavatar_lookup');
31 Hook::register('addon_settings', 'addon/catavatar/catavatar.php', 'catavatar_addon_settings');
32 Hook::register('addon_settings_post', 'addon/catavatar/catavatar.php', 'catavatar_addon_settings_post');
34 Logger::log('registered catavatar');
38 * Removes the addon hook
40 function catavatar_uninstall()
42 Hook::unregister('avatar_lookup', 'addon/catavatar/catavatar.php', 'catavatar_lookup');
43 Hook::unregister('addon_settings', 'addon/catavatar/catavatar.php', 'catavatar_addon_settings');
44 Hook::unregister('addon_settings_post', 'addon/catavatar/catavatar.php', 'catavatar_addon_settings_post');
46 Logger::log('unregistered catavatar');
50 * Cat avatar user settings page
52 function catavatar_addon_settings(App $a, &$s)
58 $t = Renderer::getMarkupTemplate('settings.tpl', 'addon/catavatar/');
59 $s .= Renderer::replaceMacros($t, [
60 '$postpost' => !empty($_POST['catavatar-morecat']) || !empty($_POST['catavatar-emailcat']),
62 '$uid' => local_user(),
63 '$usecat' => L10n::t('Use Cat as Avatar'),
64 '$morecat' => L10n::t('More Random Cat!'),
65 '$emailcat' => L10n::t('Reset to email Cat'),
66 '$seed' => DI::pConfig()->get(local_user(), 'catavatar', 'seed', false),
67 '$header' => L10n::t('Cat Avatar Settings'),
72 * Cat avatar user settings POST handle
74 function catavatar_addon_settings_post(App $a, &$s)
80 // delete the current cached cat avatar
81 $condition = ['uid' => local_user(), 'blocked' => false,
82 'account_expired' => false, 'account_removed' => false];
83 $user = DBA::selectFirst('user', ['email'], $condition);
85 $seed = DI::pConfig()->get(local_user(), 'catavatar', 'seed', md5(trim(strtolower($user['email']))));
87 if (!empty($_POST['catavatar-usecat'])) {
88 $url = DI::baseUrl()->get() . '/catavatar/' . local_user() . '?ts=' . time();
90 $self = DBA::selectFirst('contact', ['id'], ['uid' => local_user(), 'self' => true]);
91 if (!DBA::isResult($self)) {
92 notice(L10n::t("The cat hadn't found itself."));
96 Photo::importProfilePhoto($url, local_user(), $self['id']);
98 $condition = ['uid' => local_user(), 'contact-id' => $self['id']];
99 $photo = DBA::selectFirst('photo', ['resource-id'], $condition);
100 if (!DBA::isResult($photo)) {
101 notice(L10n::t('There was an error, the cat ran away.'));
105 DBA::update('photo', ['profile' => false], ['profile' => true, 'uid' => local_user()]);
107 $fields = ['profile' => true, 'album' => L10n::t('Profile Photos'), 'contact-id' => 0];
108 DBA::update('photo', $fields, ['uid' => local_user(), 'resource-id' => $photo['resource-id']]);
110 Photo::importProfilePhoto($url, local_user(), $self['id']);
112 Contact::updateSelfFromUserID(local_user(), true);
114 // Update global directory in background
115 $url = DI::baseUrl()->get() . '/profile/' . $a->user['nickname'];
116 if ($url && strlen(Config::get('system', 'directory'))) {
117 Worker::add(PRIORITY_LOW, 'Directory', $url);
120 Worker::add(PRIORITY_LOW, 'ProfileUpdate', local_user());
122 info(L10n::t('Meow!'));
126 if (!empty($_POST['catavatar-morecat'])) {
127 DI::pConfig()->set(local_user(), 'catavatar', 'seed', time());
130 if (!empty($_POST['catavatar-emailcat'])) {
131 PConfig::delete(local_user(), 'catavatar', 'seed');
136 * Returns the URL to the cat avatar
141 function catavatar_lookup(App $a, &$b)
143 $user = DBA::selectFirst('user', ['uid'], ['email' => $b['email']]);
144 $url = DI::baseUrl()->get() . '/catavatar/' . $user['uid'];
147 case 300: $url .= "/4"; break;
148 case 80: $url .= "/5"; break;
149 case 47: $url .= "/6"; break;
153 $b['success'] = true;
156 function catavatar_module() {}
159 * Returns image for user id
161 * @throws NotFoundException
164 function catavatar_content(App $a)
166 if ($a->argc < 2 || $a->argc > 3) {
167 throw new NotFoundException(); // this should be catched on index and show default "not found" page.
170 $uid = intval($a->argv[1]);
174 $size = intval($a->argv[2]);
177 $condition = ['uid' => $uid,
178 'account_expired' => false, 'account_removed' => false];
179 $user = DBA::selectFirst('user', ['email'], $condition);
181 if ($user === false) {
182 throw new NotFoundException();
185 $seed = DI::pConfig()->get($uid, "catavatar", "seed", md5(trim(strtolower($user['email']))));
187 // ...Or start generation
190 // render the picture:
191 build_cat($seed, $size);
201 * ====================
202 * CAT-AVATAR-GENERATOR
203 * ====================
205 * @authors: Andreas Gohr, David Revoy
207 * This PHP is licensed under the short and simple permissive:
208 * [MIT License](https://en.wikipedia.org/wiki/MIT_License)
212 function build_cat($seed = '', $size = 0)
216 srand(hexdec(substr(md5($seed), 0, 6)));
219 // throw the dice for body parts
221 'body' => rand(1, 15),
222 'fur' => rand(1, 10),
223 'eyes' => rand(1, 15),
224 'mouth' => rand(1, 10),
225 'accessorie' => rand(1, 20)
229 $cat = @imagecreatetruecolor(CATAVATAR_SIZE, CATAVATAR_SIZE)
230 or die("GD image create failed");
231 $white = imagecolorallocate($cat, 255, 255, 255);
232 imagefill($cat, 0, 0, $white);
235 foreach ($parts as $part => $num) {
236 $file = dirname(__FILE__) . '/avatars/' . $part . '_' . $num . '.png';
238 $im = @imagecreatefrompng($file);
240 die('Failed to load ' . $file);
242 imageSaveAlpha($im, true);
243 imagecopy($cat, $im, 0, 0, 0, 0, CATAVATAR_SIZE, CATAVATAR_SIZE);
248 if ($size > 3 && $size < 7) {
261 $dest = imagecreatetruecolor($size, $size);
262 imagealphablending($dest, false);
263 imagesavealpha($dest, true);
264 imagecopyresampled($dest, $cat, 0, 0, 0, 0, $size, $size, CATAVATAR_SIZE, CATAVATAR_SIZE);
269 // restore random seed
274 header('Pragma: public');
275 header('Cache-Control: max-age=86400');
276 header('Expires: ' . gmdate('D, d M Y H:i:s \G\M\T', time() + 86400));
277 header('Content-Type: image/jpg');
278 imagejpeg($cat, NULL, 90);