diff options
Diffstat (limited to 'mod/profiles.php')
| -rw-r--r-- | mod/profiles.php | 40 |
1 files changed, 40 insertions, 0 deletions
diff --git a/mod/profiles.php b/mod/profiles.php index e2cb02184..ea0b9afcb 100644 --- a/mod/profiles.php +++ b/mod/profiles.php @@ -131,6 +131,46 @@ function profiles_content(&$a) { goaway($a->get_baseurl() . '/profiles'); } + if(($a->argc > 2) && ($a->argv[1] == 'clone')) { + + $r0 = q("SELECT `id` FROM `profile` WHERE `uid` = %d", + intval($_SESSION['uid'])); + $num_profiles = count($r0); + + $name = "Profile-" . ($num_profiles + 1); + $r1 = q("SELECT * FROM `profile` WHERE `uid` = %d AND `id` = %d LIMIT 1", + intval($_SESSION['uid']), + intval($a->argv[2]) + ); + if(! count($r1)) { + notice("Profile unavailable to clone." . EOL); + return; + } + unset($r1[0]['id']); + $r1[0]['is-default'] = 0; + $r1[0]['publish'] = 0; + $r1[0]['profile-name'] = dbesc($name); + + $r2 = q("INSERT INTO `profile` (`" + . implode("`, `", array_keys($r1[0])) + . "`) VALUES ('" + . implode("', '", array_values($r1[0])) + . "')" ); + + $r3 = q("SELECT `id` FROM `profile` WHERE `uid` = %d AND `profile-name` = '%s' LIMIT 1", + intval($_SESSION['uid']), + dbesc($name) + ); + $_SESSION['sysmsg'] .= "New profile created." . EOL; + if(count($r3) == 1) + goaway($a->get_baseurl() . '/profiles/' . $r3[0]['id']); + goaway($a->get_baseurl() . '/profiles'); + return; // NOTREACHED + } + + + + if(intval($a->argv[1])) { $r = q("SELECT * FROM `profile` WHERE `id` = %d AND `uid` = %d LIMIT 1", |