фото
1 заметка
терапия
Сейчас этот блог в основном про психотерапию.
как правильно
Слушайте меня, я вас научу правильно жить.
психология
Буржуазная лже-наука, пытающаяся выявить закономерности в людях.
практика
Случаи и выводы из психотерапевтической практики.
кино
Фильмы и сериалы.
книги
Это как кино, но только на бумаге.
nutshells
«В двух словах», обо всем.
дорогой дневник
Записи из жизни (скорее всего, не интересные).
беллетристика
Мои литературные произведения и идеи.
духовный рост
Когда физический рост кончается, начинается этот.
дивинация
Как предсказывать будущее.
половой вопрос
Про секс и сексуальность.
заяижопа
Творческий дуэт с моей женой.
магия
«Магическое — другое название психического».
Карл Юнг
игровой дизайн
Раньше я делал игры.
игры
Компьютерные игры.
язык
Слова там всякие.
людишки
Уменьшительно-ласкательно и с любовью.
культ личности
Про великих людей (то есть, в основном про меня).
hwyd
Уникальная Система Прививания Привычек.
буклет
я
идеи
блоги
spectator.ru
дети
wow
вебдев
музыка
контент
программирование
религия
дейтинг
диалоги
яндекс
кулинария
coub
fitness
символы
йога
шаманизм
tiny
ребенок

Фотосортер

9 лет назад в категориях php фото

Поставил сначала Пикасу. Потом подумал и написал скрипт (вы не поверите — на php), который сортирует все фотографии по директориям, вида год/название камеры/месяц.

Отсортировал все за десять лет.

Оказалось очень удобно, особенно название камеры, сразу видны профессиональные фотосессии и хипстерские фотки с айфона.

Ну и что-то лучше, чем сортировки по годам сложно представить.

Заодно думаю о покупке Canon PowerShot S100, потому что PowerShot G5 уже старенький (и он за эти годы не уменьшился).


/*
$from = "D:\acerbial_media";
$to = "P:";
$copy = "D:\photos";
*/

$Directory = new RecursiveDirectoryIterator($from);
$Iterator = new RecursiveIteratorIterator($Directory);

foreach ($Iterator as $key => $value)
{
$path = pathinfo ($key);

$exif = @exif_read_data($key);
if ($exif[Model]=="iPhone 4") $exif[Model]="iPhone";

$dest = "";

if (!$exif[FileDateTime])
$dest.="/misc/".$path[extension];
else
$dest.="/".date ("Y",$exif[FileDateTime]);

if ($exif[Model])
{
$dest.= "/{$exif[Model]}";
$dest.="/".date ("m.F",$exif[FileDateTime]);
}

$dest.="/".$path[basename];
$dest = str_replace ('//','/',$dest);
$copydest = $copy.$dest;
$dest = $to.$dest;

echo $c.".".$key." -> ".$dest."
";
$c++;

$newpath = pathinfo ($dest);
@mkdir ($newpath[dirname],0777,true);
copy ($key,$dest);

$newpath = pathinfo ($copydest);
@mkdir ($newpath[dirname],0777,true);
rename ($key,$copydest);

}

0
Мой инструмент по развитию силы воли и прививанию полезных привычек.