Packages.php 91 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363136413651366136713681369137013711372137313741375137613771378137913801381138213831384138513861387138813891390139113921393139413951396139713981399140014011402140314041405140614071408140914101411141214131414141514161417141814191420142114221423142414251426142714281429143014311432143314341435143614371438143914401441144214431444144514461447144814491450145114521453145414551456145714581459146014611462146314641465146614671468146914701471147214731474147514761477147814791480148114821483148414851486148714881489149014911492149314941495149614971498149915001501150215031504150515061507150815091510151115121513151415151516151715181519152015211522152315241525152615271528152915301531153215331534153515361537153815391540154115421543154415451546154715481549155015511552155315541555155615571558155915601561156215631564156515661567156815691570157115721573157415751576157715781579158015811582158315841585158615871588158915901591159215931594159515961597159815991600160116021603160416051606160716081609161016111612161316141615161616171618161916201621162216231624162516261627162816291630163116321633163416351636163716381639164016411642164316441645164616471648164916501651165216531654165516561657165816591660166116621663166416651666166716681669167016711672167316741675167616771678167916801681168216831684168516861687168816891690169116921693169416951696169716981699170017011702170317041705170617071708170917101711171217131714171517161717171817191720172117221723172417251726172717281729173017311732173317341735173617371738173917401741174217431744174517461747174817491750175117521753175417551756175717581759176017611762176317641765176617671768176917701771177217731774177517761777177817791780178117821783178417851786178717881789179017911792179317941795179617971798179918001801180218031804180518061807180818091810181118121813181418151816181718181819182018211822182318241825182618271828182918301831183218331834183518361837183818391840184118421843184418451846184718481849185018511852185318541855185618571858185918601861186218631864186518661867186818691870187118721873187418751876187718781879188018811882188318841885188618871888188918901891189218931894189518961897189818991900190119021903190419051906190719081909191019111912191319141915191619171918191919201921192219231924192519261927192819291930193119321933193419351936193719381939194019411942194319441945194619471948194919501951195219531954195519561957195819591960196119621963196419651966196719681969197019711972197319741975197619771978197919801981198219831984198519861987198819891990199119921993199419951996199719981999200020012002200320042005200620072008200920102011201220132014201520162017201820192020202120222023202420252026202720282029203020312032203320342035203620372038203920402041204220432044204520462047204820492050205120522053205420552056205720582059206020612062206320642065206620672068206920702071207220732074207520762077207820792080208120822083208420852086208720882089209020912092209320942095209620972098209921002101210221032104210521062107210821092110211121122113211421152116211721182119212021212122212321242125212621272128212921302131213221332134213521362137213821392140214121422143214421452146214721482149215021512152215321542155215621572158215921602161216221632164216521662167216821692170217121722173217421752176217721782179218021812182218321842185218621872188218921902191219221932194219521962197219821992200220122022203220422052206220722082209221022112212221322142215221622172218221922202221222222232224222522262227222822292230223122322233223422352236223722382239224022412242224322442245224622472248224922502251225222532254225522562257225822592260226122622263226422652266226722682269227022712272227322742275227622772278227922802281228222832284228522862287228822892290229122922293229422952296229722982299230023012302230323042305230623072308230923102311231223132314231523162317231823192320232123222323232423252326232723282329233023312332233323342335233623372338233923402341234223432344234523462347234823492350235123522353235423552356235723582359236023612362236323642365236623672368236923702371237223732374237523762377237823792380238123822383238423852386238723882389239023912392239323942395239623972398239924002401240224032404240524062407240824092410241124122413241424152416241724182419242024212422242324242425242624272428242924302431243224332434243524362437243824392440244124422443244424452446244724482449245024512452245324542455245624572458245924602461246224632464246524662467246824692470247124722473247424752476247724782479248024812482248324842485248624872488248924902491249224932494249524962497249824992500250125022503250425052506250725082509251025112512251325142515251625172518251925202521252225232524252525262527252825292530253125322533253425352536253725382539254025412542254325442545254625472548254925502551255225532554255525562557255825592560256125622563256425652566256725682569257025712572257325742575257625772578257925802581258225832584258525862587258825892590259125922593259425952596259725982599260026012602260326042605260626072608260926102611261226132614261526162617261826192620262126222623
  1. <?php
  2. /**
  3. * This file is the main Package Manager.
  4. *
  5. * Simple Machines Forum (SMF)
  6. *
  7. * @package SMF
  8. * @author Simple Machines http://www.simplemachines.org
  9. * @copyright 2012 Simple Machines
  10. * @license http://www.simplemachines.org/about/smf/license.php BSD
  11. *
  12. * @version 2.1 Alpha 1
  13. */
  14. if (!defined('SMF'))
  15. die('Hacking attempt...');
  16. /**
  17. * This is the notoriously defunct package manager..... :/.
  18. */
  19. function Packages()
  20. {
  21. global $txt, $scripturl, $sourcedir, $context;
  22. // @todo Remove this!
  23. if (isset($_GET['get']) || isset($_GET['pgdownload']))
  24. {
  25. require_once($sourcedir . '/PackageGet.php');
  26. return PackageGet();
  27. }
  28. isAllowedTo('admin_forum');
  29. // Load all the basic stuff.
  30. require_once($sourcedir . '/Subs-Package.php');
  31. loadLanguage('Packages');
  32. loadTemplate('Packages', 'admin');
  33. $context['page_title'] = $txt['package'];
  34. // Delegation makes the world... that is, the package manager go 'round.
  35. $subActions = array(
  36. 'browse' => 'PackageBrowse',
  37. 'remove' => 'PackageRemove',
  38. 'list' => 'PackageList',
  39. 'ftptest' => 'PackageFTPTest',
  40. 'install' => 'PackageInstallTest',
  41. 'install2' => 'PackageInstall',
  42. 'uninstall' => 'PackageInstallTest',
  43. 'uninstall2' => 'PackageInstall',
  44. 'installed' => 'PackageBrowse',
  45. 'options' => 'PackageOptions',
  46. 'perms' => 'PackagePermissions',
  47. 'flush' => 'FlushInstall',
  48. 'examine' => 'ExamineFile',
  49. 'showoperations' => 'ViewOperations',
  50. );
  51. // Work out exactly who it is we are calling.
  52. if (isset($_REQUEST['sa']) && isset($subActions[$_REQUEST['sa']]))
  53. $context['sub_action'] = $_REQUEST['sa'];
  54. else
  55. $context['sub_action'] = 'browse';
  56. // Set up some tabs...
  57. $context[$context['admin_menu_name']]['tab_data'] = array(
  58. 'title' => $txt['package_manager'],
  59. // @todo 'help' => 'registrations',
  60. 'description' => $txt['package_manager_desc'],
  61. 'tabs' => array(
  62. 'browse' => array(
  63. ),
  64. 'packageget' => array(
  65. 'description' => $txt['download_packages_desc'],
  66. ),
  67. 'installed' => array(
  68. 'description' => $txt['installed_packages_desc'],
  69. ),
  70. 'perms' => array(
  71. 'description' => $txt['package_file_perms_desc'],
  72. ),
  73. 'options' => array(
  74. 'description' => $txt['package_install_options_desc'],
  75. ),
  76. ),
  77. );
  78. // Call the function we're handing control to.
  79. $subActions[$context['sub_action']]();
  80. }
  81. /**
  82. * Test install a package.
  83. */
  84. function PackageInstallTest()
  85. {
  86. global $boarddir, $txt, $context, $scripturl, $sourcedir, $modSettings, $smcFunc, $settings;
  87. // You have to specify a file!!
  88. if (!isset($_REQUEST['package']) || $_REQUEST['package'] == '')
  89. redirectexit('action=admin;area=packages');
  90. $context['filename'] = preg_replace('~[\.]+~', '.', $_REQUEST['package']);
  91. // Do we have an existing id, for uninstalls and the like.
  92. $context['install_id'] = isset($_REQUEST['pid']) ? (int) $_REQUEST['pid'] : 0;
  93. require_once($sourcedir . '/Subs-Package.php');
  94. // Load up the package FTP information?
  95. create_chmod_control();
  96. // Make sure temp directory exists and is empty.
  97. if (file_exists($boarddir . '/Packages/temp'))
  98. deltree($boarddir . '/Packages/temp', false);
  99. if (!mktree($boarddir . '/Packages/temp', 0755))
  100. {
  101. deltree($boarddir . '/Packages/temp', false);
  102. if (!mktree($boarddir . '/Packages/temp', 0777))
  103. {
  104. deltree($boarddir . '/Packages/temp', false);
  105. create_chmod_control(array($boarddir . '/Packages/temp/delme.tmp'), array('destination_url' => $scripturl . '?action=admin;area=packages;sa=' . $_REQUEST['sa'] . ';package=' . $_REQUEST['package'], 'crash_on_error' => true));
  106. deltree($boarddir . '/Packages/temp', false);
  107. if (!mktree($boarddir . '/Packages/temp', 0777))
  108. fatal_lang_error('package_cant_download', false);
  109. }
  110. }
  111. $context['uninstalling'] = $_REQUEST['sa'] == 'uninstall';
  112. // Change our last link tree item for more information on this Packages area.
  113. $context['linktree'][count($context['linktree']) - 1] = array(
  114. 'url' => $scripturl . '?action=admin;area=packages;sa=browse',
  115. 'name' => $context['uninstalling'] ? $txt['package_uninstall_actions'] : $txt['install_actions']
  116. );
  117. $context['page_title'] .= ' - ' . ($context['uninstalling'] ? $txt['package_uninstall_actions'] : $txt['install_actions']);
  118. $context['sub_template'] = 'view_package';
  119. if (!file_exists($boarddir . '/Packages/' . $context['filename']))
  120. {
  121. deltree($boarddir . '/Packages/temp');
  122. fatal_lang_error('package_no_file', false);
  123. }
  124. // Extract the files so we can get things like the readme, etc.
  125. if (is_file($boarddir . '/Packages/' . $context['filename']))
  126. {
  127. $context['extracted_files'] = read_tgz_file($boarddir . '/Packages/' . $context['filename'], $boarddir . '/Packages/temp');
  128. if ($context['extracted_files'] && !file_exists($boarddir . '/Packages/temp/package-info.xml'))
  129. foreach ($context['extracted_files'] as $file)
  130. if (basename($file['filename']) == 'package-info.xml')
  131. {
  132. $context['base_path'] = dirname($file['filename']) . '/';
  133. break;
  134. }
  135. if (!isset($context['base_path']))
  136. $context['base_path'] = '';
  137. }
  138. elseif (is_dir($boarddir . '/Packages/' . $context['filename']))
  139. {
  140. copytree($boarddir . '/Packages/' . $context['filename'], $boarddir . '/Packages/temp');
  141. $context['extracted_files'] = listtree($boarddir . '/Packages/temp');
  142. $context['base_path'] = '';
  143. }
  144. else
  145. fatal_lang_error('no_access', false);
  146. // Load up any custom themes we may want to install into...
  147. $request = $smcFunc['db_query']('', '
  148. SELECT id_theme, variable, value
  149. FROM {db_prefix}themes
  150. WHERE (id_theme = {int:default_theme} OR id_theme IN ({array_int:known_theme_list}))
  151. AND variable IN ({string:name}, {string:theme_dir})',
  152. array(
  153. 'known_theme_list' => explode(',', $modSettings['knownThemes']),
  154. 'default_theme' => 1,
  155. 'name' => 'name',
  156. 'theme_dir' => 'theme_dir',
  157. )
  158. );
  159. $theme_paths = array();
  160. while ($row = $smcFunc['db_fetch_assoc']($request))
  161. $theme_paths[$row['id_theme']][$row['variable']] = $row['value'];
  162. $smcFunc['db_free_result']($request);
  163. // Get the package info...
  164. $packageInfo = getPackageInfo($context['filename']);
  165. if (!is_array($packageInfo))
  166. fatal_lang_error($packageInfo);
  167. $packageInfo['filename'] = $context['filename'];
  168. $context['package_name'] = isset($packageInfo['name']) ? $packageInfo['name'] : $context['filename'];
  169. // Set the type of extraction...
  170. $context['extract_type'] = isset($packageInfo['type']) ? $packageInfo['type'] : 'modification';
  171. // The mod isn't installed.... unless proven otherwise.
  172. $context['is_installed'] = false;
  173. // See if it is installed?
  174. $request = $smcFunc['db_query']('', '
  175. SELECT version, themes_installed, db_changes
  176. FROM {db_prefix}log_packages
  177. WHERE package_id = {string:current_package}
  178. AND install_state != {int:not_installed}
  179. ORDER BY time_installed DESC
  180. LIMIT 1',
  181. array(
  182. 'not_installed' => 0,
  183. 'current_package' => $packageInfo['id'],
  184. )
  185. );
  186. while ($row = $smcFunc['db_fetch_assoc']($request))
  187. {
  188. $old_themes = explode(',', $row['themes_installed']);
  189. $old_version = $row['version'];
  190. $db_changes = empty($row['db_changes']) ? array() : unserialize($row['db_changes']);
  191. }
  192. $smcFunc['db_free_result']($request);
  193. $context['database_changes'] = array();
  194. if (!empty($db_changes))
  195. {
  196. foreach ($db_changes as $change)
  197. {
  198. if (isset($change[2]) && isset($txt['package_db_' . $change[0]]))
  199. $context['database_changes'][] = sprintf($txt['package_db_' . $change[0]], $change[1], $change[2]);
  200. elseif (isset($txt['package_db_' . $change[0]]))
  201. $context['database_changes'][] = sprintf($txt['package_db_' . $change[0]], $change[1]);
  202. else
  203. $context['database_changes'][] = $change[0] . '-' . $change[1] . (isset($change[2]) ? '-' . $change[2] : '');
  204. }
  205. }
  206. // Uninstalling?
  207. if ($context['uninstalling'])
  208. {
  209. // Wait, it's not installed yet!
  210. if (!isset($old_version) && $context['uninstalling'])
  211. {
  212. deltree($boarddir . '/Packages/temp');
  213. fatal_lang_error('package_cant_uninstall', false);
  214. }
  215. $actions = parsePackageInfo($packageInfo['xml'], true, 'uninstall');
  216. // Gadzooks! There's no uninstaller at all!?
  217. if (empty($actions))
  218. {
  219. deltree($boarddir . '/Packages/temp');
  220. fatal_lang_error('package_uninstall_cannot', false);
  221. }
  222. // Can't edit the custom themes it's edited if you're unisntalling, they must be removed.
  223. $context['themes_locked'] = true;
  224. // Only let them uninstall themes it was installed into.
  225. foreach ($theme_paths as $id => $data)
  226. if ($id != 1 && !in_array($id, $old_themes))
  227. unset($theme_paths[$id]);
  228. }
  229. elseif (isset($old_version) && $old_version != $packageInfo['version'])
  230. {
  231. // Look for an upgrade...
  232. $actions = parsePackageInfo($packageInfo['xml'], true, 'upgrade', $old_version);
  233. // There was no upgrade....
  234. if (empty($actions))
  235. $context['is_installed'] = true;
  236. else
  237. {
  238. // Otherwise they can only upgrade themes from the first time around.
  239. foreach ($theme_paths as $id => $data)
  240. if ($id != 1 && !in_array($id, $old_themes))
  241. unset($theme_paths[$id]);
  242. }
  243. }
  244. elseif (isset($old_version) && $old_version == $packageInfo['version'])
  245. $context['is_installed'] = true;
  246. if (!isset($old_version) || $context['is_installed'])
  247. $actions = parsePackageInfo($packageInfo['xml'], true, 'install');
  248. $context['actions'] = array();
  249. $context['ftp_needed'] = false;
  250. $context['has_failure'] = false;
  251. $chmod_files = array();
  252. // no actions found, return so we can display an error
  253. if (empty($actions))
  254. return;
  255. // This will hold data about anything that can be installed in other themes.
  256. $themeFinds = array(
  257. 'candidates' => array(),
  258. 'other_themes' => array(),
  259. );
  260. // Now prepare things for the template.
  261. foreach ($actions as $action)
  262. {
  263. // Not failed until proven otherwise.
  264. $failed = false;
  265. $thisAction = array();
  266. if ($action['type'] == 'chmod')
  267. {
  268. $chmod_files[] = $action['filename'];
  269. continue;
  270. }
  271. elseif ($action['type'] == 'readme' || $action['type'] == 'license')
  272. {
  273. $type = 'package_' . $action['type'];
  274. if (file_exists($boarddir . '/Packages/temp/' . $context['base_path'] . $action['filename']))
  275. $context[$type] = htmlspecialchars(trim(file_get_contents($boarddir . '/Packages/temp/' . $context['base_path'] . $action['filename']), "\n\r"));
  276. elseif (file_exists($action['filename']))
  277. $context[$type] = htmlspecialchars(trim(file_get_contents($action['filename']), "\n\r"));
  278. if (!empty($action['parse_bbc']))
  279. {
  280. require_once($sourcedir . '/Subs-Post.php');
  281. preparsecode($context[$type]);
  282. $context[$type] = parse_bbc($context[$type]);
  283. }
  284. else
  285. $context[$type] = nl2br($context[$type]);
  286. continue;
  287. }
  288. // Don't show redirects.
  289. elseif ($action['type'] == 'redirect')
  290. continue;
  291. elseif ($action['type'] == 'error')
  292. {
  293. $context['has_failure'] = true;
  294. if (isset($action['error_msg']) && isset($action['error_var']))
  295. $context['failure_details'] = sprintf($txt['package_will_fail_' . $action['error_msg']], $action['error_var']);
  296. elseif (isset($action['error_msg']))
  297. $context['failure_details'] = isset($txt['package_will_fail_' . $action['error_msg']]) ? $txt['package_will_fail_' . $action['error_msg']] : $action['error_msg'];
  298. }
  299. elseif ($action['type'] == 'modification')
  300. {
  301. if (!file_exists($boarddir . '/Packages/temp/' . $context['base_path'] . $action['filename']))
  302. {
  303. $context['has_failure'] = true;
  304. $context['actions'][] = array(
  305. 'type' => $txt['execute_modification'],
  306. 'action' => $smcFunc['htmlspecialchars'](strtr($action['filename'], array($boarddir => '.'))),
  307. 'description' => $txt['package_action_error'],
  308. 'failed' => true,
  309. );
  310. }
  311. else
  312. {
  313. if ($action['boardmod'])
  314. $mod_actions = parseBoardMod(@file_get_contents($boarddir . '/Packages/temp/' . $context['base_path'] . $action['filename']), true, $action['reverse'], $theme_paths);
  315. else
  316. $mod_actions = parseModification(@file_get_contents($boarddir . '/Packages/temp/' . $context['base_path'] . $action['filename']), true, $action['reverse'], $theme_paths);
  317. if (count($mod_actions) == 1 && isset($mod_actions[0]) && $mod_actions[0]['type'] == 'error' && $mod_actions[0]['filename'] == '-')
  318. $mod_actions[0]['filename'] = $action['filename'];
  319. foreach ($mod_actions as $key => $mod_action)
  320. {
  321. // Lets get the last section of the file name.
  322. if (isset($mod_action['filename']) && substr($mod_action['filename'], -13) != '.template.php')
  323. $actual_filename = strtolower(substr(strrchr($mod_action['filename'], '/'), 1) . '||' . $action['filename']);
  324. elseif (isset($mod_action['filename']) && preg_match('~([\w]*)/([\w]*)\.template\.php$~', $mod_action['filename'], $matches))
  325. $actual_filename = strtolower($matches[1] . '/' . $matches[2] . '.template.php' . '||' . $action['filename']);
  326. else
  327. $actual_filename = $key;
  328. if ($mod_action['type'] == 'opened')
  329. $failed = false;
  330. elseif ($mod_action['type'] == 'failure')
  331. {
  332. if (empty($mod_action['is_custom']))
  333. $context['has_failure'] = true;
  334. $failed = true;
  335. }
  336. elseif ($mod_action['type'] == 'chmod')
  337. {
  338. $chmod_files[] = $mod_action['filename'];
  339. }
  340. elseif ($mod_action['type'] == 'saved')
  341. {
  342. if (!empty($mod_action['is_custom']))
  343. {
  344. if (!isset($context['theme_actions'][$mod_action['is_custom']]))
  345. $context['theme_actions'][$mod_action['is_custom']] = array(
  346. 'name' => $theme_paths[$mod_action['is_custom']]['name'],
  347. 'actions' => array(),
  348. 'has_failure' => $failed,
  349. );
  350. else
  351. $context['theme_actions'][$mod_action['is_custom']]['has_failure'] |= $failed;
  352. $context['theme_actions'][$mod_action['is_custom']]['actions'][$actual_filename] = array(
  353. 'type' => $txt['execute_modification'],
  354. 'action' => $smcFunc['htmlspecialchars'](strtr($mod_action['filename'], array($boarddir => '.'))),
  355. 'description' => $failed ? $txt['package_action_failure'] : $txt['package_action_success'],
  356. 'failed' => $failed,
  357. );
  358. }
  359. elseif (!isset($context['actions'][$actual_filename]))
  360. {
  361. $context['actions'][$actual_filename] = array(
  362. 'type' => $txt['execute_modification'],
  363. 'action' => $smcFunc['htmlspecialchars'](strtr($mod_action['filename'], array($boarddir => '.'))),
  364. 'description' => $failed ? $txt['package_action_failure'] : $txt['package_action_success'],
  365. 'failed' => $failed,
  366. );
  367. }
  368. else
  369. {
  370. $context['actions'][$actual_filename]['failed'] |= $failed;
  371. $context['actions'][$actual_filename]['description'] = $context['actions'][$actual_filename]['failed'] ? $txt['package_action_failure'] : $txt['package_action_success'];
  372. }
  373. }
  374. elseif ($mod_action['type'] == 'skipping')
  375. {
  376. $context['actions'][$actual_filename] = array(
  377. 'type' => $txt['execute_modification'],
  378. 'action' => $smcFunc['htmlspecialchars'](strtr($mod_action['filename'], array($boarddir => '.'))),
  379. 'description' => $txt['package_action_skipping']
  380. );
  381. }
  382. elseif ($mod_action['type'] == 'missing' && empty($mod_action['is_custom']))
  383. {
  384. $context['has_failure'] = true;
  385. $context['actions'][$actual_filename] = array(
  386. 'type' => $txt['execute_modification'],
  387. 'action' => $smcFunc['htmlspecialchars'](strtr($mod_action['filename'], array($boarddir => '.'))),
  388. 'description' => $txt['package_action_missing'],
  389. 'failed' => true,
  390. );
  391. }
  392. elseif ($mod_action['type'] == 'error')
  393. $context['actions'][$actual_filename] = array(
  394. 'type' => $txt['execute_modification'],
  395. 'action' => $smcFunc['htmlspecialchars'](strtr($mod_action['filename'], array($boarddir => '.'))),
  396. 'description' => $txt['package_action_error'],
  397. 'failed' => true,
  398. );
  399. }
  400. // We need to loop again just to get the operations down correctly.
  401. foreach ($mod_actions as $operation_key => $mod_action)
  402. {
  403. // Lets get the last section of the file name.
  404. if (isset($mod_action['filename']) && substr($mod_action['filename'], -13) != '.template.php')
  405. $actual_filename = strtolower(substr(strrchr($mod_action['filename'], '/'), 1) . '||' . $action['filename']);
  406. elseif (isset($mod_action['filename']) && preg_match('~([\w]*)/([\w]*)\.template\.php$~', $mod_action['filename'], $matches))
  407. $actual_filename = strtolower($matches[1] . '/' . $matches[2] . '.template.php' . '||' . $action['filename']);
  408. else
  409. $actual_filename = $key;
  410. // We just need it for actual parse changes.
  411. if (!in_array($mod_action['type'], array('error', 'result', 'opened', 'saved', 'end', 'missing', 'skipping', 'chmod')))
  412. {
  413. if (empty($mod_action['is_custom']))
  414. $context['actions'][$actual_filename]['operations'][] = array(
  415. 'type' => $txt['execute_modification'],
  416. 'action' => $smcFunc['htmlspecialchars'](strtr($mod_action['filename'], array($boarddir => '.'))),
  417. 'description' => $mod_action['failed'] ? $txt['package_action_failure'] : $txt['package_action_success'],
  418. 'position' => $mod_action['position'],
  419. 'operation_key' => $operation_key,
  420. 'filename' => $action['filename'],
  421. 'is_boardmod' => $action['boardmod'],
  422. 'failed' => $mod_action['failed'],
  423. 'ignore_failure' => !empty($mod_action['ignore_failure']),
  424. );
  425. // Themes are under the saved type.
  426. if (isset($mod_action['is_custom']) && isset($context['theme_actions'][$mod_action['is_custom']]))
  427. $context['theme_actions'][$mod_action['is_custom']]['actions'][$actual_filename]['operations'][] = array(
  428. 'type' => $txt['execute_modification'],
  429. 'action' => $smcFunc['htmlspecialchars'](strtr($mod_action['filename'], array($boarddir => '.'))),
  430. 'description' => $mod_action['failed'] ? $txt['package_action_failure'] : $txt['package_action_success'],
  431. 'position' => $mod_action['position'],
  432. 'operation_key' => $operation_key,
  433. 'filename' => $action['filename'],
  434. 'is_boardmod' => $action['boardmod'],
  435. 'failed' => $mod_action['failed'],
  436. 'ignore_failure' => !empty($mod_action['ignore_failure']),
  437. );
  438. }
  439. }
  440. }
  441. }
  442. elseif ($action['type'] == 'code')
  443. {
  444. $thisAction = array(
  445. 'type' => $txt['execute_code'],
  446. 'action' => $smcFunc['htmlspecialchars']($action['filename']),
  447. );
  448. }
  449. elseif ($action['type'] == 'database')
  450. {
  451. $thisAction = array(
  452. 'type' => $txt['execute_database_changes'],
  453. 'action' => $smcFunc['htmlspecialchars']($action['filename']),
  454. );
  455. }
  456. elseif (in_array($action['type'], array('create-dir', 'create-file')))
  457. {
  458. $thisAction = array(
  459. 'type' => $txt['package_create'] . ' ' . ($action['type'] == 'create-dir' ? $txt['package_tree'] : $txt['package_file']),
  460. 'action' => $smcFunc['htmlspecialchars'](strtr($action['destination'], array($boarddir => '.')))
  461. );
  462. }
  463. elseif ($action['type'] == 'hook')
  464. {
  465. $action['description'] = !isset($action['hook'], $action['function']) ? $txt['package_action_failure'] : $txt['package_action_success'];
  466. if (!isset($action['hook'], $action['function']))
  467. $context['has_failure'] = true;
  468. $thisAction = array(
  469. 'type' => $action['reverse'] ? $txt['execute_hook_remove'] : $txt['execute_hook_add'],
  470. 'action' => sprintf($txt['execute_hook_action'], $smcFunc['htmlspecialchars']($action['hook'])),
  471. );
  472. }
  473. elseif ($action['type'] == 'credits')
  474. {
  475. $thisAction = array(
  476. 'type' => $txt['execute_credits_add'],
  477. 'action' => sprintf($txt['execute_credits_action'], $smcFunc['htmlspecialchars']($action['title'])),
  478. );
  479. }
  480. elseif ($action['type'] == 'requires')
  481. {
  482. $installed = false;
  483. $version = true;
  484. // package missing required values?
  485. if (!isset($action['id']))
  486. $context['has_failure'] = true;
  487. else
  488. {
  489. // See if this dependancy is installed
  490. $request = $smcFunc['db_query']('', '
  491. SELECT version
  492. FROM {db_prefix}log_packages
  493. WHERE package_id = {string:current_package}
  494. AND install_state != {int:not_installed}
  495. ORDER BY time_installed DESC
  496. LIMIT 1',
  497. array(
  498. 'not_installed' => 0,
  499. 'current_package' => $action['id'],
  500. )
  501. );
  502. $installed = ($smcFunc['db_num_rows']($request) !== 0);
  503. if ($installed)
  504. list($version) = $smcFunc['db_fetch_row']($request);
  505. $smcFunc['db_free_result']($request);
  506. // do a version level check (if requested) in the most basic way
  507. $version = (isset($action['version']) ? $version == $action['version'] : true);
  508. }
  509. // Set success or failure information
  510. $action['description'] = ($installed && $version) ? $txt['package_action_success'] : $txt['package_action_failure'];
  511. $context['has_failure'] = !($installed && $version);
  512. $thisAction = array(
  513. 'type' => $txt['package_requires'],
  514. 'action' => $txt['package_check_for'] . ' ' . $action['id'] . (isset($action['version']) ? (' / ' . ($version ? $action['version'] : '<span class="error">' . $action['version'] . '</span>')) : ''),
  515. );
  516. }
  517. elseif (in_array($action['type'], array('require-dir', 'require-file')))
  518. {
  519. // Do this one...
  520. $thisAction = array(
  521. 'type' => $txt['package_extract'] . ' ' . ($action['type'] == 'require-dir' ? $txt['package_tree'] : $txt['package_file']),
  522. 'action' => $smcFunc['htmlspecialchars'](strtr($action['destination'], array($boarddir => '.')))
  523. );
  524. // Could this be theme related?
  525. if (!empty($action['unparsed_destination']) && preg_match('~^\$(languagedir|languages_dir|imagesdir|themedir|themes_dir)~i', $action['unparsed_destination'], $matches))
  526. {
  527. // Is the action already stated?
  528. $theme_action = !empty($action['theme_action']) && in_array($action['theme_action'], array('no', 'yes', 'auto')) ? $action['theme_action'] : 'auto';
  529. // If it's not auto do we think we have something we can act upon?
  530. if ($theme_action != 'auto' && !in_array($matches[1], array('languagedir', 'languages_dir', 'imagesdir', 'themedir')))
  531. $theme_action = '';
  532. // ... or if it's auto do we even want to do anything?
  533. elseif ($theme_action == 'auto' && $matches[1] != 'imagesdir')
  534. $theme_action = '';
  535. // So, we still want to do something?
  536. if ($theme_action != '')
  537. $themeFinds['candidates'][] = $action;
  538. // Otherwise is this is going into another theme record it.
  539. elseif ($matches[1] == 'themes_dir')
  540. $themeFinds['other_themes'][] = strtolower(strtr(parse_path($action['unparsed_destination']), array('\\' => '/')) . '/' . basename($action['filename']));
  541. }
  542. }
  543. elseif (in_array($action['type'], array('move-dir', 'move-file')))
  544. $thisAction = array(
  545. 'type' => $txt['package_move'] . ' ' . ($action['type'] == 'move-dir' ? $txt['package_tree'] : $txt['package_file']),
  546. 'action' => $smcFunc['htmlspecialchars'](strtr($action['source'], array($boarddir => '.'))) . ' => ' . $smcFunc['htmlspecialchars'](strtr($action['destination'], array($boarddir => '.')))
  547. );
  548. elseif (in_array($action['type'], array('remove-dir', 'remove-file')))
  549. {
  550. $thisAction = array(
  551. 'type' => $txt['package_delete'] . ' ' . ($action['type'] == 'remove-dir' ? $txt['package_tree'] : $txt['package_file']),
  552. 'action' => $smcFunc['htmlspecialchars'](strtr($action['filename'], array($boarddir => '.')))
  553. );
  554. // Could this be theme related?
  555. if (!empty($action['unparsed_filename']) && preg_match('~^\$(languagedir|languages_dir|imagesdir|themedir|themes_dir)~i', $action['unparsed_filename'], $matches))
  556. {
  557. // Is the action already stated?
  558. $theme_action = !empty($action['theme_action']) && in_array($action['theme_action'], array('no', 'yes', 'auto')) ? $action['theme_action'] : 'auto';
  559. $action['unparsed_destination'] = $action['unparsed_filename'];
  560. // If it's not auto do we think we have something we can act upon?
  561. if ($theme_action != 'auto' && !in_array($matches[1], array('languagedir', 'languages_dir', 'imagesdir', 'themedir')))
  562. $theme_action = '';
  563. // ... or if it's auto do we even want to do anything?
  564. elseif ($theme_action == 'auto' && $matches[1] != 'imagesdir')
  565. $theme_action = '';
  566. // So, we still want to do something?
  567. if ($theme_action != '')
  568. $themeFinds['candidates'][] = $action;
  569. // Otherwise is this is going into another theme record it.
  570. elseif ($matches[1] == 'themes_dir')
  571. $themeFinds['other_themes'][] = strtolower(strtr(parse_path($action['unparsed_filename']), array('\\' => '/')) . '/' . basename($action['filename']));
  572. }
  573. }
  574. if (empty($thisAction))
  575. continue;
  576. if ($context['uninstalling'])
  577. $file = in_array($action['type'], array('remove-dir', 'remove-file')) ? $action['filename'] : $boarddir . '/Packages/temp/' . $context['base_path'] . $action['filename'];
  578. else
  579. $file = $boarddir . '/Packages/temp/' . $context['base_path'] . $action['filename'];
  580. if (isset($action['filename']) && !file_exists($file))
  581. {
  582. $context['has_failure'] = true;
  583. $thisAction += array(
  584. 'description' => $txt['package_action_error'],
  585. 'failed' => true,
  586. );
  587. }
  588. // @todo None given?
  589. if (empty($thisAction['description']))
  590. $thisAction['description'] = isset($action['description']) ? $action['description'] : '';
  591. $context['actions'][] = $thisAction;
  592. }
  593. // Have we got some things which we might want to do "multi-theme"?
  594. if (!empty($themeFinds['candidates']))
  595. {
  596. foreach ($themeFinds['candidates'] as $action_data)
  597. {
  598. // Get the part of the file we'll be dealing with.
  599. preg_match('~^\$(languagedir|languages_dir|imagesdir|themedir)(\\|/)*(.+)*~i', $action_data['unparsed_destination'], $matches);
  600. if ($matches[1] == 'imagesdir')
  601. $path = '/' . basename($settings['default_images_url']);
  602. elseif ($matches[1] == 'languagedir' || $matches[1] == 'languages_dir')
  603. $path = '/languages';
  604. else
  605. $path = '';
  606. if (!empty($matches[3]))
  607. $path .= $matches[3];
  608. if (!$context['uninstalling'])
  609. $path .= '/' . basename($action_data['filename']);
  610. // Loop through each custom theme to note it's candidacy!
  611. foreach ($theme_paths as $id => $theme_data)
  612. {
  613. if (isset($theme_data['theme_dir']) && $id != 1)
  614. {
  615. $real_path = $theme_data['theme_dir'] . $path;
  616. // Confirm that we don't already have this dealt with by another entry.
  617. if (!in_array(strtolower(strtr($real_path, array('\\' => '/'))), $themeFinds['other_themes']))
  618. {
  619. // Check if we will need to chmod this.
  620. if (!mktree(dirname($real_path), false))
  621. {
  622. $temp = dirname($real_path);
  623. while (!file_exists($temp) && strlen($temp) > 1)
  624. $temp = dirname($temp);
  625. $chmod_files[] = $temp;
  626. }
  627. if ($action_data['type'] == 'require-dir' && !is_writable($real_path) && (file_exists($real_path) || !is_writable(dirname($real_path))))
  628. $chmod_files[] = $real_path;
  629. if (!isset($context['theme_actions'][$id]))
  630. $context['theme_actions'][$id] = array(
  631. 'name' => $theme_data['name'],
  632. 'actions' => array(),
  633. );
  634. if ($context['uninstalling'])
  635. $context['theme_actions'][$id]['actions'][] = array(
  636. 'type' => $txt['package_delete'] . ' ' . ($action_data['type'] == 'require-dir' ? $txt['package_tree'] : $txt['package_file']),
  637. 'action' => strtr($real_path, array('\\' => '/', $boarddir => '.')),
  638. 'description' => '',
  639. 'value' => base64_encode(serialize(array('type' => $action_data['type'], 'orig' => $action_data['filename'], 'future' => $real_path, 'id' => $id))),
  640. 'not_mod' => true,
  641. );
  642. else
  643. $context['theme_actions'][$id]['actions'][] = array(
  644. 'type' => $txt['package_extract'] . ' ' . ($action_data['type'] == 'require-dir' ? $txt['package_tree'] : $txt['package_file']),
  645. 'action' => strtr($real_path, array('\\' => '/', $boarddir => '.')),
  646. 'description' => '',
  647. 'value' => base64_encode(serialize(array('type' => $action_data['type'], 'orig' => $action_data['destination'], 'future' => $real_path, 'id' => $id))),
  648. 'not_mod' => true,
  649. );
  650. }
  651. }
  652. }
  653. }
  654. }
  655. // Trash the cache... which will also check permissions for us!
  656. package_flush_cache(true);
  657. if (file_exists($boarddir . '/Packages/temp'))
  658. deltree($boarddir . '/Packages/temp');
  659. if (!empty($chmod_files))
  660. {
  661. $ftp_status = create_chmod_control($chmod_files);
  662. $context['ftp_needed'] = !empty($ftp_status['files']['notwritable']) && !empty($context['package_ftp']);
  663. }
  664. checkSubmitOnce('register');
  665. }
  666. /**
  667. * Apply another type of (avatar, language, etc.) package.
  668. */
  669. function PackageInstall()
  670. {
  671. global $boarddir, $txt, $context, $boardurl, $scripturl, $sourcedir, $modSettings;
  672. global $user_info, $smcFunc;
  673. // Make sure we don't install this mod twice.
  674. checkSubmitOnce('check');
  675. checkSession();
  676. // If there's no file, what are we installing?
  677. if (!isset($_REQUEST['package']) || $_REQUEST['package'] == '')
  678. redirectexit('action=admin;area=packages');
  679. $context['filename'] = $_REQUEST['package'];
  680. // If this is an uninstall, we'll have an id.
  681. $context['install_id'] = isset($_REQUEST['pid']) ? (int) $_REQUEST['pid'] : 0;
  682. require_once($sourcedir . '/Subs-Package.php');
  683. // @todo Perhaps do it in steps, if necessary?
  684. $context['uninstalling'] = $_REQUEST['sa'] == 'uninstall2';
  685. // Set up the linktree for other.
  686. $context['linktree'][count($context['linktree']) - 1] = array(
  687. 'url' => $scripturl . '?action=admin;area=packages;sa=browse',
  688. 'name' => $context['uninstalling'] ? $txt['uninstall'] : $txt['extracting']
  689. );
  690. $context['page_title'] .= ' - ' . ($context['uninstalling'] ? $txt['uninstall'] : $txt['extracting']);
  691. $context['sub_template'] = 'extract_package';
  692. if (!file_exists($boarddir . '/Packages/' . $context['filename']))
  693. fatal_lang_error('package_no_file', false);
  694. // Load up the package FTP information?
  695. create_chmod_control(array(), array('destination_url' => $scripturl . '?action=admin;area=packages;sa=' . $_REQUEST['sa'] . ';package=' . $_REQUEST['package']));
  696. // Make sure temp directory exists and is empty!
  697. if (file_exists($boarddir . '/Packages/temp'))
  698. deltree($boarddir . '/Packages/temp', false);
  699. else
  700. mktree($boarddir . '/Packages/temp', 0777);
  701. // Let the unpacker do the work.
  702. if (is_file($boarddir . '/Packages/' . $context['filename']))
  703. {
  704. $context['extracted_files'] = read_tgz_file($boarddir . '/Packages/' . $context['filename'], $boarddir . '/Packages/temp');
  705. if (!file_exists($boarddir . '/Packages/temp/package-info.xml'))
  706. foreach ($context['extracted_files'] as $file)
  707. if (basename($file['filename']) == 'package-info.xml')
  708. {
  709. $context['base_path'] = dirname($file['filename']) . '/';
  710. break;
  711. }
  712. if (!isset($context['base_path']))
  713. $context['base_path'] = '';
  714. }
  715. elseif (is_dir($boarddir . '/Packages/' . $context['filename']))
  716. {
  717. copytree($boarddir . '/Packages/' . $context['filename'], $boarddir . '/Packages/temp');
  718. $context['extracted_files'] = listtree($boarddir . '/Packages/temp');
  719. $context['base_path'] = '';
  720. }
  721. else
  722. fatal_lang_error('no_access', false);
  723. // Are we installing this into any custom themes?
  724. $custom_themes = array(1);
  725. $known_themes = explode(',', $modSettings['knownThemes']);
  726. if (!empty($_POST['custom_theme']))
  727. {
  728. foreach ($_POST['custom_theme'] as $tid)
  729. if (in_array($tid, $known_themes))
  730. $custom_themes[] = (int) $tid;
  731. }
  732. // Now load up the paths of the themes that we need to know about.
  733. $request = $smcFunc['db_query']('', '
  734. SELECT id_theme, variable, value
  735. FROM {db_prefix}themes
  736. WHERE id_theme IN ({array_int:custom_themes})
  737. AND variable IN ({string:name}, {string:theme_dir})',
  738. array(
  739. 'custom_themes' => $custom_themes,
  740. 'name' => 'name',
  741. 'theme_dir' => 'theme_dir',
  742. )
  743. );
  744. $theme_paths = array();
  745. $themes_installed = array(1);
  746. while ($row = $smcFunc['db_fetch_assoc']($request))
  747. $theme_paths[$row['id_theme']][$row['variable']] = $row['value'];
  748. $smcFunc['db_free_result']($request);
  749. // Are there any theme copying that we want to take place?
  750. $context['theme_copies'] = array(
  751. 'require-file' => array(),
  752. 'require-dir' => array(),
  753. );
  754. if (!empty($_POST['theme_changes']))
  755. {
  756. foreach ($_POST['theme_changes'] as $change)
  757. {
  758. if (empty($change))
  759. continue;
  760. $theme_data = unserialize(base64_decode($change));
  761. if (empty($theme_data['type']))
  762. continue;
  763. $themes_installed[] = $theme_data['id'];
  764. $context['theme_copies'][$theme_data['type']][$theme_data['orig']][] = $theme_data['future'];
  765. }
  766. }
  767. // Get the package info...
  768. $packageInfo = getPackageInfo($context['filename']);
  769. if (!is_array($packageInfo))
  770. fatal_lang_error($packageInfo);
  771. $packageInfo['filename'] = $context['filename'];
  772. // Set the type of extraction...
  773. $context['extract_type'] = isset($packageInfo['type']) ? $packageInfo['type'] : 'modification';
  774. // Create a backup file to roll back to! (but if they do this more than once, don't run it a zillion times.)
  775. if (!empty($modSettings['package_make_full_backups']) && (!isset($_SESSION['last_backup_for']) || $_SESSION['last_backup_for'] != $context['filename'] . ($context['uninstalling'] ? '$$' : '$')))
  776. {
  777. $_SESSION['last_backup_for'] = $context['filename'] . ($context['uninstalling'] ? '$$' : '$');
  778. // @todo Internationalize this?
  779. package_create_backup(($context['uninstalling'] ? 'backup_' : 'before_') . strtok($context['filename'], '.'));
  780. }
  781. // The mod isn't installed.... unless proven otherwise.
  782. $context['is_installed'] = false;
  783. // Is it actually installed?
  784. $request = $smcFunc['db_query']('', '
  785. SELECT version, themes_installed, db_changes
  786. FROM {db_prefix}log_packages
  787. WHERE package_id = {string:current_package}
  788. AND install_state != {int:not_installed}
  789. ORDER BY time_installed DESC
  790. LIMIT 1',
  791. array(
  792. 'not_installed' => 0,
  793. 'current_package' => $packageInfo['id'],
  794. )
  795. );
  796. while ($row = $smcFunc['db_fetch_assoc']($request))
  797. {
  798. $old_themes = explode(',', $row['themes_installed']);
  799. $old_version = $row['version'];
  800. $db_changes = empty($row['db_changes']) ? array() : unserialize($row['db_changes']);
  801. }
  802. $smcFunc['db_free_result']($request);
  803. // Wait, it's not installed yet!
  804. // @todo Replace with a better error message!
  805. if (!isset($old_version) && $context['uninstalling'])
  806. {
  807. deltree($boarddir . '/Packages/temp');
  808. fatal_error('Hacker?', false);
  809. }
  810. // Uninstalling?
  811. elseif ($context['uninstalling'])
  812. {
  813. $install_log = parsePackageInfo($packageInfo['xml'], false, 'uninstall');
  814. // Gadzooks! There's no uninstaller at all!?
  815. if (empty($install_log))
  816. fatal_lang_error('package_uninstall_cannot', false);
  817. // They can only uninstall from what it was originally installed into.
  818. foreach ($theme_paths as $id => $data)
  819. if ($id != 1 && !in_array($id, $old_themes))
  820. unset($theme_paths[$id]);
  821. }
  822. elseif (isset($old_version) && $old_version != $packageInfo['version'])
  823. {
  824. // Look for an upgrade...
  825. $install_log = parsePackageInfo($packageInfo['xml'], false, 'upgrade', $old_version);
  826. // There was no upgrade....
  827. if (empty($install_log))
  828. $context['is_installed'] = true;
  829. else
  830. {
  831. // Upgrade previous themes only!
  832. foreach ($theme_paths as $id => $data)
  833. if ($id != 1 && !in_array($id, $old_themes))
  834. unset($theme_paths[$id]);
  835. }
  836. }
  837. elseif (isset($old_version) && $old_version == $packageInfo['version'])
  838. $context['is_installed'] = true;
  839. if (!isset($old_version) || $context['is_installed'])
  840. $install_log = parsePackageInfo($packageInfo['xml'], false, 'install');
  841. $context['install_finished'] = false;
  842. // @todo Make a log of any errors that occurred and output them?
  843. if (!empty($install_log))
  844. {
  845. $failed_steps = array();
  846. $failed_count = 0;
  847. foreach ($install_log as $action)
  848. {
  849. $failed_count++;
  850. if ($action['type'] == 'modification' && !empty($action['filename']))
  851. {
  852. if ($action['boardmod'])
  853. $mod_actions = parseBoardMod(file_get_contents($boarddir . '/Packages/temp/' . $context['base_path'] . $action['filename']), false, $action['reverse'], $theme_paths);
  854. else
  855. $mod_actions = parseModification(file_get_contents($boarddir . '/Packages/temp/' . $context['base_path'] . $action['filename']), false, $action['reverse'], $theme_paths);
  856. // Any errors worth noting?
  857. foreach ($mod_actions as $key => $action)
  858. {
  859. if ($action['type'] == 'failure')
  860. $failed_steps[] = array(
  861. 'file' => $action['filename'],
  862. 'large_step' => $failed_count,
  863. 'sub_step' => $key,
  864. 'theme' => 1,
  865. );
  866. // Gather the themes we installed into.
  867. if (!empty($action['is_custom']))
  868. $themes_installed[] = $action['is_custom'];
  869. }
  870. }
  871. elseif ($action['type'] == 'code' && !empty($action['filename']))
  872. {
  873. // This is just here as reference for what is available.
  874. global $txt, $boarddir, $sourcedir, $modSettings, $context, $settings, $forum_version, $smcFunc;
  875. // Now include the file and be done with it ;).
  876. if (file_exists($boarddir . '/Packages/temp/' . $context['base_path'] . $action['filename']))
  877. require($boarddir . '/Packages/temp/' . $context['base_path'] . $action['filename']);
  878. }
  879. elseif ($action['type'] == 'credits')
  880. {
  881. // Time to build the billboard
  882. $credits_tag = array(
  883. 'url' => $action['url'],
  884. 'license' => $action['license'],
  885. 'copyright' => $action['copyright'],
  886. 'title' => $action['title'],
  887. );
  888. }
  889. elseif ($action['type'] == 'hook' && isset($action['hook'], $action['function']))
  890. {
  891. if ($action['reverse'])
  892. remove_integration_function($action['hook'], $action['function'], $action['include_file']);
  893. else
  894. add_integration_function($action['hook'], $action['function'], $action['include_file']);
  895. }
  896. // Only do the database changes on uninstall if requested.
  897. elseif ($action['type'] == 'database' && !empty($action['filename']) && (!$context['uninstalling'] || !empty($_POST['do_db_changes'])))
  898. {
  899. // These can also be there for database changes.
  900. global $txt, $boarddir, $sourcedir, $modSettings, $context, $settings, $forum_version, $smcFunc;
  901. global $db_package_log;
  902. // We'll likely want the package specific database functionality!
  903. db_extend('packages');
  904. // Let the file work its magic ;)
  905. if (file_exists($boarddir . '/Packages/temp/' . $context['base_path'] . $action['filename']))
  906. require($boarddir . '/Packages/temp/' . $context['base_path'] . $action['filename']);
  907. }
  908. // Handle a redirect...
  909. elseif ($action['type'] == 'redirect' && !empty($action['redirect_url']))
  910. {
  911. $context['redirect_url'] = $action['redirect_url'];
  912. $context['redirect_text'] = !empty($action['filename']) && file_exists($boarddir . '/Packages/temp/' . $context['base_path'] . $action['filename']) ? file_get_contents($boarddir . '/Packages/temp/' . $context['base_path'] . $action['filename']) : ($context['uninstalling'] ? $txt['package_uninstall_done'] : $txt['package_installed_done']);
  913. $context['redirect_timeout'] = $action['redirect_timeout'];
  914. // Parse out a couple of common urls.
  915. $urls = array(
  916. '$boardurl' => $boardurl,
  917. '$scripturl' => $scripturl,
  918. '$session_var' => $context['session_var'],
  919. '$session_id' => $context['session_id'],
  920. );
  921. $context['redirect_url'] = strtr($context['redirect_url'], $urls);
  922. }
  923. }
  924. package_flush_cache();
  925. // First, ensure this change doesn't get removed by putting a stake in the ground (So to speak).
  926. package_put_contents($boarddir . '/Packages/installed.list', time());
  927. // See if this is already installed, and change it's state as required.
  928. $request = $smcFunc['db_query']('', '
  929. SELECT package_id, install_state, db_changes
  930. FROM {db_prefix}log_packages
  931. WHERE install_state != {int:not_installed}
  932. AND package_id = {string:current_package}
  933. ' . ($context['install_id'] ? ' AND id_install = {int:install_id} ' : '') . '
  934. ORDER BY time_installed DESC
  935. LIMIT 1',
  936. array(
  937. 'not_installed' => 0,
  938. 'install_id' => $context['install_id'],
  939. 'current_package' => $packageInfo['id'],
  940. )
  941. );
  942. $is_upgrade = false;
  943. while ($row = $smcFunc['db_fetch_assoc']($request))
  944. {
  945. // Uninstalling?
  946. if ($context['uninstalling'])
  947. {
  948. $smcFunc['db_query']('', '
  949. UPDATE {db_prefix}log_packages
  950. SET install_state = {int:not_installed}, member_removed = {string:member_name}, id_member_removed = {int:current_member},
  951. time_removed = {int:current_time}
  952. WHERE package_id = {string:package_id}
  953. AND id_install = {int:install_id}',
  954. array(
  955. 'current_member' => $user_info['id'],
  956. 'not_installed' => 0,
  957. 'current_time' => time(),
  958. 'package_id' => $row['package_id'],
  959. 'member_name' => $user_info['name'],
  960. 'install_id' => $context['install_id'],
  961. )
  962. );
  963. }
  964. // Otherwise must be an upgrade.
  965. else
  966. {
  967. $is_upgrade = true;
  968. $old_db_changes = empty($row['db_changes']) ? array() : unserialize($row['db_changes']);
  969. }
  970. }
  971. // Assuming we're not uninstalling, add the entry.
  972. if (!$context['uninstalling'])
  973. {
  974. // Any db changes from older version?
  975. if (!empty($old_db_changes))
  976. $db_package_log = empty($db_package_log) ? $old_db_changes : array_merge($old_db_changes, $db_package_log);
  977. // If there are some database changes we might want to remove then filter them out.
  978. if (!empty($db_package_log))
  979. {
  980. // We're really just checking for entries which are create table AND add columns (etc).
  981. $tables = array();
  982. function sort_table_first($a, $b)
  983. {
  984. if ($a[0] == $b[0])
  985. return 0;
  986. return $a[0] == 'remove_table' ? -1 : 1;
  987. }
  988. usort($db_package_log, 'sort_table_first');
  989. foreach ($db_package_log as $k => $log)
  990. {
  991. if ($log[0] == 'remove_table')
  992. $tables[] = $log[1];
  993. elseif (in_array($log[1], $tables))
  994. unset($db_package_log[$k]);
  995. }
  996. $db_changes = serialize($db_package_log);
  997. }
  998. else
  999. $db_changes = '';
  1000. // What themes did we actually install?
  1001. $themes_installed = array_unique($themes_installed);
  1002. $themes_installed = implode(',', $themes_installed);
  1003. // What failed steps?
  1004. $failed_step_insert = serialize($failed_steps);
  1005. // Credits tag?
  1006. $credits_tag = (empty($credits_tag)) ? '' : serialize($credits_tag);
  1007. $smcFunc['db_insert']('',
  1008. '{db_prefix}log_packages',
  1009. array(
  1010. 'filename' => 'string', 'name' => 'string', 'package_id' => 'string', 'version' => 'string',
  1011. 'id_member_installed' => 'int', 'member_installed' => 'string','time_installed' => 'int',
  1012. 'install_state' => 'int', 'failed_steps' => 'string', 'themes_installed' => 'string',
  1013. 'member_removed' => 'int', 'db_changes' => 'string', 'credits' => 'string',
  1014. ),
  1015. array(
  1016. $packageInfo['filename'], $packageInfo['name'], $packageInfo['id'], $packageInfo['version'],
  1017. $user_info['id'], $user_info['name'], time(),
  1018. $is_upgrade ? 2 : 1, $failed_step_insert, $themes_installed,
  1019. 0, $db_changes, $credits_tag,
  1020. ),
  1021. array('id_install')
  1022. );
  1023. }
  1024. $smcFunc['db_free_result']($request);
  1025. $context['install_finished'] = true;
  1026. }
  1027. // If there's database changes - and they want them removed - let's do it last!
  1028. if (!empty($db_changes) && !empty($_POST['do_db_changes']))
  1029. {
  1030. // We're gonna be needing the package db functions!
  1031. db_extend('packages');
  1032. foreach ($db_changes as $change)
  1033. {
  1034. if ($change[0] == 'remove_table' && isset($change[1]))
  1035. $smcFunc['db_drop_table']($change[1]);
  1036. elseif ($change[0] == 'remove_column' && isset($change[2]))
  1037. $smcFunc['db_remove_column']($change[1], $change[2]);
  1038. elseif ($change[0] == 'remove_index' && isset($change[2]))
  1039. $smcFunc['db_remove_index']($change[1], $change[2]);
  1040. }
  1041. }
  1042. // Clean house... get rid of the evidence ;).
  1043. if (file_exists($boarddir . '/Packages/temp'))
  1044. deltree($boarddir . '/Packages/temp');
  1045. // Log what we just did.
  1046. logAction($context['uninstalling'] ? 'uninstall_package' : (!empty($is_upgrade) ? 'upgrade_package' : 'install_package'), array('package' => $smcFunc['htmlspecialchars']($packageInfo['name']), 'version' => $smcFunc['htmlspecialchars']($packageInfo['version'])), 'admin');
  1047. // Just in case, let's clear the whole cache to avoid anything going up the swanny.
  1048. clean_cache();
  1049. // Restore file permissions?
  1050. create_chmod_control(array(), array(), true);
  1051. }
  1052. /**
  1053. * List the files in a package.
  1054. */
  1055. function PackageList()
  1056. {
  1057. global $txt, $scripturl, $boarddir, $context, $sourcedir;
  1058. require_once($sourcedir . '/Subs-Package.php');
  1059. // No package? Show him or her the door.
  1060. if (!isset($_REQUEST['package']) || $_REQUEST['package'] == '')
  1061. redirectexit('action=admin;area=packages');
  1062. $context['linktree'][] = array(
  1063. 'url' => $scripturl . '?action=admin;area=packages;sa=list;package=' . $_REQUEST['package'],
  1064. 'name' => $txt['list_file']
  1065. );
  1066. $context['page_title'] .= ' - ' . $txt['list_file'];
  1067. $context['sub_template'] = 'list';
  1068. // The filename...
  1069. $context['filename'] = $_REQUEST['package'];
  1070. // Let the unpacker do the work.
  1071. if (is_file($boarddir . '/Packages/' . $context['filename']))
  1072. $context['files'] = read_tgz_file($boarddir . '/Packages/' . $context['filename'], null);
  1073. elseif (is_dir($boarddir . '/Packages/' . $context['filename']))
  1074. $context['files'] = listtree($boarddir . '/Packages/' . $context['filename']);
  1075. }
  1076. /**
  1077. * Display one of the files in a package.
  1078. */
  1079. function ExamineFile()
  1080. {
  1081. global $txt, $scripturl, $boarddir, $context, $sourcedir;
  1082. require_once($sourcedir . '/Subs-Package.php');
  1083. // No package? Show him or her the door.
  1084. if (!isset($_REQUEST['package']) || $_REQUEST['package'] == '')
  1085. redirectexit('action=admin;area=packages');
  1086. // No file? Show him or her the door.
  1087. if (!isset($_REQUEST['file']) || $_REQUEST['file'] == '')
  1088. redirectexit('action=admin;area=packages');
  1089. $_REQUEST['package'] = preg_replace('~[\.]+~', '.', strtr($_REQUEST['package'], array('/' => '_', '\\' => '_')));
  1090. $_REQUEST['file'] = preg_replace('~[\.]+~', '.', $_REQUEST['file']);
  1091. if (isset($_REQUEST['raw']))
  1092. {
  1093. if (is_file($boarddir . '/Packages/' . $_REQUEST['package']))
  1094. echo read_tgz_file($boarddir . '/Packages/' . $_REQUEST['package'], $_REQUEST['file'], true);
  1095. elseif (is_dir($boarddir . '/Packages/' . $_REQUEST['package']))
  1096. echo file_get_contents($boarddir . '/Packages/' . $_REQUEST['package'] . '/' . $_REQUEST['file']);
  1097. obExit(false);
  1098. }
  1099. $context['linktree'][count($context['linktree']) - 1] = array(
  1100. 'url' => $scripturl . '?action=admin;area=packages;sa=list;package=' . $_REQUEST['package'],
  1101. 'name' => $txt['package_examine_file']
  1102. );
  1103. $context['page_title'] .= ' - ' . $txt['package_examine_file'];
  1104. $context['sub_template'] = 'examine';
  1105. // The filename...
  1106. $context['package'] = $_REQUEST['package'];
  1107. $context['filename'] = $_REQUEST['file'];
  1108. // Let the unpacker do the work.... but make sure we handle images properly.
  1109. if (in_array(strtolower(strrchr($_REQUEST['file'], '.')), array('.bmp', '.gif', '.jpeg', '.jpg', '.png')))
  1110. $context['filedata'] = '<img src="' . $scripturl . '?action=admin;area=packages;sa=examine;package=' . $_REQUEST['package'] . ';file=' . $_REQUEST['file'] . ';raw" alt="' . $_REQUEST['file'] . '" />';
  1111. else
  1112. {
  1113. if (is_file($boarddir . '/Packages/' . $_REQUEST['package']))
  1114. $context['filedata'] = htmlspecialchars(read_tgz_file($boarddir . '/Packages/' . $_REQUEST['package'], $_REQUEST['file'], true));
  1115. elseif (is_dir($boarddir . '/Packages/' . $_REQUEST['package']))
  1116. $context['filedata'] = htmlspecialchars(file_get_contents($boarddir . '/Packages/' . $_REQUEST['package'] . '/' . $_REQUEST['file']));
  1117. if (strtolower(strrchr($_REQUEST['file'], '.')) == '.php')
  1118. $context['filedata'] = highlight_php_code($context['filedata']);
  1119. }
  1120. }
  1121. /**
  1122. * List the installed packages.
  1123. */
  1124. function InstalledList()
  1125. {
  1126. global $txt, $scripturl, $context;
  1127. $context['page_title'] .= ' - ' . $txt['installed_packages'];
  1128. $context['sub_template'] = 'view_installed';
  1129. // Load the installed mods and send them to the template.
  1130. $context['installed_mods'] = loadInstalledPackages();
  1131. }
  1132. /**
  1133. * Empty out the installed list.
  1134. */
  1135. function FlushInstall()
  1136. {
  1137. global $boarddir, $sourcedir, $smcFunc;
  1138. // Always check the session.
  1139. checkSession('get');
  1140. include_once($sourcedir . '/Subs-Package.php');
  1141. // Record when we last did this.
  1142. package_put_contents($boarddir . '/Packages/installed.list', time());
  1143. // Set everything as uninstalled.
  1144. $smcFunc['db_query']('', '
  1145. UPDATE {db_prefix}log_packages
  1146. SET install_state = {int:not_installed}',
  1147. array(
  1148. 'not_installed' => 0,
  1149. )
  1150. );
  1151. redirectexit('action=admin;area=packages;sa=installed');
  1152. }
  1153. /**
  1154. * Delete a package.
  1155. */
  1156. function PackageRemove()
  1157. {
  1158. global $scripturl, $boarddir;
  1159. // Check it.
  1160. checkSession('get');
  1161. // Ack, don't allow deletion of arbitrary files here, could become a security hole somehow!
  1162. if (!isset($_GET['package']) || $_GET['package'] == 'index.php' || $_GET['package'] == 'installed.list' || $_GET['package'] == 'backups')
  1163. redirectexit('action=admin;area=packages;sa=browse');
  1164. $_GET['package'] = preg_replace('~[\.]+~', '.', strtr($_GET['package'], array('/' => '_', '\\' => '_')));
  1165. // Can't delete what's not there.
  1166. if (file_exists($boarddir . '/Packages/' . $_GET['package']) && (substr($_GET['package'], -4) == '.zip' || substr($_GET['package'], -4) == '.tgz' || substr($_GET['package'], -7) == '.tar.gz' || is_dir($boarddir . '/Packages/' . $_GET['package'])) && $_GET['package'] != 'backups' && substr($_GET['package'], 0, 1) != '.')
  1167. {
  1168. create_chmod_control(array($boarddir . '/Packages/' . $_GET['package']), array('destination_url' => $scripturl . '?action=admin;area=packages;sa=remove;package=' . $_GET['package'], 'crash_on_error' => true));
  1169. if (is_dir($boarddir . '/Packages/' . $_GET['package']))
  1170. deltree($boarddir . '/Packages/' . $_GET['package']);
  1171. else
  1172. {
  1173. @chmod($boarddir . '/Packages/' . $_GET['package'], 0777);
  1174. unlink($boarddir . '/Packages/' . $_GET['package']);
  1175. }
  1176. }
  1177. redirectexit('action=admin;area=packages;sa=browse');
  1178. }
  1179. /**
  1180. * Browse a list of installed packages.
  1181. */
  1182. function PackageBrowse()
  1183. {
  1184. global $txt, $boarddir, $scripturl, $context, $forum_version, $sourcedir, $settings;
  1185. $context['page_title'] .= ' - ' . $txt['browse_packages'];
  1186. $installed = $context['sub_action'] == 'installed' ? true : false;
  1187. $context['forum_version'] = $forum_version;
  1188. $context['modification_types'] = $installed ? array('modification') : array('modification', 'avatar', 'language', 'unknown');
  1189. require_once($sourcedir . '/Subs-List.php');
  1190. foreach ($context['modification_types'] as $type)
  1191. {
  1192. // Use the standard templates for showing this.
  1193. $listOptions = array(
  1194. 'id' => 'packages_lists_' . $type,
  1195. 'title' => $installed ? $txt['view_and_remove'] : $txt[$type . '_package'],
  1196. 'no_items_label' => $txt['no_packages'],
  1197. 'get_items' => array(
  1198. 'function' => 'list_getPackages',
  1199. 'params' => array('type' => $type, 'installed' => $installed),
  1200. ),
  1201. 'base_href' => $scripturl . '?action=admin;area=packages;sa=' . $context['sub_action'] . ';type=' . $type,
  1202. 'default_sort_col' => 'id' . $type,
  1203. 'columns' => array(
  1204. 'id' . $type => array(
  1205. 'header' => array(
  1206. 'value' => $txt['package_id'],
  1207. 'style' => 'width: 40px;',
  1208. ),
  1209. 'data' => array(
  1210. 'function' => create_function('$package_md5', '
  1211. global $context;
  1212. if (isset($context[\'available_' . $type . '\'][$package_md5]))
  1213. return $context[\'available_' . $type . '\'][$package_md5][\'sort_id\'];
  1214. '),
  1215. ),
  1216. 'sort' => array(
  1217. 'default' => 'sort_id',
  1218. 'reverse' => 'sort_id'
  1219. ),
  1220. ),
  1221. 'mod_name' . $type => array(
  1222. 'header' => array(
  1223. 'value' => $txt['mod_name'],
  1224. 'style' => 'width: 25%;',
  1225. ),
  1226. 'data' => array(
  1227. 'function' => create_function('$package_md5', '
  1228. global $context;
  1229. if (isset($context[\'available_' . $type . '\'][$package_md5]))
  1230. return $context[\'available_' . $type . '\'][$package_md5][\'name\'];
  1231. '),
  1232. ),
  1233. 'sort' => array(
  1234. 'default' => 'name',
  1235. 'reverse' => 'name',
  1236. ),
  1237. ),
  1238. 'version' . $type => array(
  1239. 'header' => array(
  1240. 'value' => $txt['mod_version'],
  1241. 'style' => 'width: 25%;',
  1242. ),
  1243. 'data' => array(
  1244. 'function' => create_function('$package_md5', '
  1245. global $context;
  1246. if (isset($context[\'available_' . $type . '\'][$package_md5]))
  1247. return $context[\'available_' . $type . '\'][$package_md5][\'version\'];
  1248. '),
  1249. ),
  1250. 'sort' => array(
  1251. 'default' => 'version',
  1252. 'reverse' => 'version',
  1253. ),
  1254. ),
  1255. 'operations' . $type => array(
  1256. 'header' => array(
  1257. 'value' => '',
  1258. ),
  1259. 'data' => array(
  1260. 'function' => create_function('$package_md5', '
  1261. global $context, $scripturl, $txt;
  1262. if (!isset($context[\'available_' . $type . '\'][$package_md5]))
  1263. return \'\';
  1264. // Rewrite shortcut
  1265. $package = $context[\'available_' . $type . '\'][$package_md5];
  1266. $return = \'\';
  1267. if ($package[\'can_uninstall\'])
  1268. $return = \'
  1269. <a href="\' . $scripturl . \'?action=admin;area=packages;sa=uninstall;package=\' . $package[\'filename\'] . \';pid=\' . $package[\'installed_id\'] . \'">[ \' . $txt[\'uninstall\'] . \' ]</a>\';
  1270. elseif ($package[\'can_emulate_uninstall\'])
  1271. $return = \'
  1272. <a href="\' . $scripturl . \'?action=admin;area=packages;sa=uninstall;ve=\' . $package[\'can_emulate_uninstall\'] . \';package=\' . $package[\'filename\'] . \';pid=\' . $package[\'installed_id\'] . \'">[ \' . $txt[\'package_emulate_uninstall\'] . \' \' . $package[\'can_emulate_uninstall\'] . \' ]</a>\';
  1273. elseif ($package[\'can_upgrade\'])
  1274. $return = \'
  1275. <a href="\' . $scripturl . \'?action=admin;area=packages;sa=install;package=\' . $package[\'filename\'] . \'">[ \' . $txt[\'package_upgrade\'] . \' ]</a>\';
  1276. elseif ($package[\'can_install\'])
  1277. $return = \'
  1278. <a href="\' . $scripturl . \'?action=admin;area=packages;sa=install;package=\' . $package[\'filename\'] . \'">[ \' . $txt[\'install_mod\'] . \' ]</a>\';
  1279. elseif ($package[\'can_emulate_install\'])
  1280. $return = \'
  1281. <a href="\' . $scripturl . \'?action=admin;area=packages;sa=install;ve=\' . $package[\'can_emulate_install\'] . \';package=\' . $package[\'filename\'] . \'">[ \' . $txt[\'package_emulate_install\'] . \' \' . $package[\'can_emulate_install\'] . \' ]</a>\';
  1282. return $return . \'
  1283. <a href="\' . $scripturl . \'?action=admin;area=packages;sa=list;package=\' . $package[\'filename\'] . \'">[ \' . $txt[\'list_files\'] . \' ]</a>
  1284. <a href="\' . $scripturl . \'?action=admin;area=packages;sa=remove;package=\' . $package[\'filename\'] . \';\' . $context[\'session_var\'] . \'=\' . $context[\'session_id\'] . \'"\' . ($package[\'is_installed\'] && $package[\'is_current\'] ? \' onclick="return confirm(\\\'\' . $txt[\'package_delete_bad\'] . \'\\\');"\' : \'\') . \'>[ \' . $txt[\'package_delete\'] . \' ]</a>\';
  1285. '),
  1286. 'style' => 'text-align: right;',
  1287. ),
  1288. ),
  1289. ),
  1290. 'additional_rows' => array(
  1291. array(
  1292. 'position' => 'bottom_of_list',
  1293. 'value' => ($context['sub_action'] == 'browse' ? '<div class="padding smalltext">' . $txt['package_installed_key'] . '<img src="' . $settings['images_url'] . '/icons/package_installed.png" alt="" class="centericon" style="margin-left: 1ex;" /> ' . $txt['package_installed_current'] . '<img src="' . $settings['images_url'] . '/icons/package_old.png" alt="" class="centericon" style="margin-left: 2ex;" /> ' . $txt['package_installed_old'] . '</div>' :
  1294. '<a class="button_link" href="' . $scripturl . '?action=admin;area=packages;sa=flush;' . $context['session_var'] . '=' . $context['session_id'] . '" onclick="return confirm(\'' . $txt['package_delete_list_warning'] . '\');">' . $txt['delete_list'] . '</a>'),
  1295. ),
  1296. ),
  1297. );
  1298. createList($listOptions);
  1299. }
  1300. $context['sub_template'] = 'browse';
  1301. $context['default_list'] = 'packages_lists';
  1302. // Empty lists for now.
  1303. $context['available_mods'] = array();
  1304. $context['available_avatars'] = array();
  1305. $context['available_languages'] = array();
  1306. $context['available_other'] = array();
  1307. $context['available_all'] = array();
  1308. }
  1309. function list_getPackages($start, $items_per_page, $sort, $params, $installed)
  1310. {
  1311. global $boarddir, $scripturl, $context, $forum_version;
  1312. static $instmods, $packages;
  1313. // Start things up
  1314. if (!isset($packages[$params]))
  1315. $packages[$params] = array();
  1316. // We need the packages directory to be writable for this.
  1317. if (!@is_writable($boarddir . '/Packages'))
  1318. create_chmod_control(array($boarddir . '/Packages'), array('destination_url' => $scripturl . '?action=admin;area=packages', 'crash_on_error' => true));
  1319. $the_version = strtr($forum_version, array('SMF ' => ''));
  1320. // Here we have a little code to help those who class themselves as something of gods, version emulation ;)
  1321. if (isset($_GET['version_emulate']) && strtr($_GET['version_emulate'], array('SMF ' => '')) == $the_version)
  1322. {
  1323. unset($_SESSION['version_emulate']);
  1324. }
  1325. elseif (isset($_GET['version_emulate']))
  1326. {
  1327. if (($_GET['version_emulate'] === 0 || $_GET['version_emulate'] === $forum_version) && isset($_SESSION['version_emulate']))
  1328. unset($_SESSION['version_emulate']);
  1329. elseif ($_GET['version_emulate'] !== 0)
  1330. $_SESSION['version_emulate'] = strtr($_GET['version_emulate'], array('-' => ' ', '+' => ' ', 'SMF ' => ''));
  1331. }
  1332. if (!empty($_SESSION['version_emulate']))
  1333. {
  1334. $context['forum_version'] = 'SMF ' . $_SESSION['version_emulate'];
  1335. $the_version = $_SESSION['version_emulate'];
  1336. }
  1337. if (isset($_SESSION['single_version_emulate']))
  1338. unset($_SESSION['single_version_emulate']);
  1339. if (empty($instmods))
  1340. {
  1341. $instmods = loadInstalledPackages();
  1342. $installed_mods = array();
  1343. // Look through the list of installed mods...
  1344. foreach ($instmods as $installed_mod)
  1345. $installed_mods[$installed_mod['package_id']] = array(
  1346. 'id' => $installed_mod['id'],
  1347. 'version' => $installed_mod['version'],
  1348. );
  1349. // Get a list of all the ids installed, so the latest packages won't include already installed ones.
  1350. $context['installed_mods'] = array_keys($installed_mods);
  1351. }
  1352. if ($installed)
  1353. {
  1354. $sort_id = 1;
  1355. foreach ($instmods as $installed_mod)
  1356. {
  1357. $context['available_modification'][$installed_mod['package_id']] = array(
  1358. 'sort_id' => $sort_id++,
  1359. 'can_uninstall' => true,
  1360. 'name' => $installed_mod['name'],
  1361. 'filename' => $installed_mod['filename'],
  1362. 'installed_id' => $installed_mod['id'],
  1363. 'version' => $installed_mod['version'],
  1364. 'is_installed' => true,
  1365. 'is_current' => true,
  1366. );
  1367. }
  1368. }
  1369. if (empty($packages))
  1370. foreach ($context['modification_types'] as $type)
  1371. $packages[$type] = array();
  1372. if ($dir = @opendir($boarddir . '/Packages'))
  1373. {
  1374. $dirs = array();
  1375. $sort_id = array(
  1376. 'mod' => 1,
  1377. 'modification' => 1,
  1378. 'avatar' => 1,
  1379. 'language' => 1,
  1380. 'unknown' => 1,
  1381. );
  1382. while ($package = readdir($dir))
  1383. {
  1384. if ($package == '.' || $package == '..' || $package == 'temp' || (!(is_dir($boarddir . '/Packages/' . $package) && file_exists($boarddir . '/Packages/' . $package . '/package-info.xml')) && substr(strtolower($package), -7) != '.tar.gz' && substr(strtolower($package), -4) != '.tgz' && substr(strtolower($package), -4) != '.zip'))
  1385. continue;
  1386. $skip = false;
  1387. foreach ($context['modification_types'] as $type)
  1388. if (isset($context['available_' . $type][md5($package)]))
  1389. $skip = true;
  1390. if ($skip)
  1391. continue;
  1392. // Skip directories or files that are named the same.
  1393. if (is_dir($boarddir . '/Packages/' . $package))
  1394. {
  1395. if (in_array($package, $dirs))
  1396. continue;
  1397. $dirs[] = $package;
  1398. }
  1399. elseif (substr(strtolower($package), -7) == '.tar.gz')
  1400. {
  1401. if (in_array(substr($package, 0, -7), $dirs))
  1402. continue;
  1403. $dirs[] = substr($package, 0, -7);
  1404. }
  1405. elseif (substr(strtolower($package), -4) == '.zip' || substr(strtolower($package), -4) == '.tgz')
  1406. {
  1407. if (in_array(substr($package, 0, -4), $dirs))
  1408. continue;
  1409. $dirs[] = substr($package, 0, -4);
  1410. }
  1411. $packageInfo = getPackageInfo($package);
  1412. if (!is_array($packageInfo))
  1413. continue;
  1414. if (!empty($packageInfo))
  1415. {
  1416. $packageInfo['installed_id'] = isset($installed_mods[$packageInfo['id']]) ? $installed_mods[$packageInfo['id']]['id'] : 0;
  1417. $packageInfo['sort_id'] = $sort_id[$packageInfo['type']];
  1418. $packageInfo['is_installed'] = isset($installed_mods[$packageInfo['id']]);
  1419. $packageInfo['is_current'] = $packageInfo['is_installed'] && ($installed_mods[$packageInfo['id']]['version'] == $packageInfo['version']);
  1420. $packageInfo['is_newer'] = $packageInfo['is_installed'] && ($installed_mods[$packageInfo['id']]['version'] > $packageInfo['version']);
  1421. $packageInfo['can_install'] = false;
  1422. $packageInfo['can_uninstall'] = false;
  1423. $packageInfo['can_upgrade'] = false;
  1424. $packageInfo['can_emulate_install'] = false;
  1425. $packageInfo['can_emulate_uninstall'] = false;
  1426. // This package is currently NOT installed. Check if it can be.
  1427. if (!$packageInfo['is_installed'] && $packageInfo['xml']->exists('install'))
  1428. {
  1429. // Check if there's an install for *THIS* version of SMF.
  1430. $installs = $packageInfo['xml']->set('install');
  1431. foreach ($installs as $install)
  1432. {
  1433. if (!$install->exists('@for') || matchPackageVersion($the_version, $install->fetch('@for')))
  1434. {
  1435. // Okay, this one is good to go.
  1436. $packageInfo['can_install'] = true;
  1437. break;
  1438. }
  1439. }
  1440. // no install found for this version, lets see if one exists for another
  1441. if ($packageInfo['can_install'] === false && $install->exists('@for') && empty($_SESSION['version_emulate']))
  1442. {
  1443. $reset = true;
  1444. // Get the highest install version that is available from the package
  1445. foreach ($installs as $install)
  1446. {
  1447. $packageInfo['can_emulate_install'] = matchHighestPackageVersion($install->fetch('@for'), $reset, $the_version);
  1448. $reset = false;
  1449. }
  1450. }
  1451. }
  1452. // An already installed, but old, package. Can we upgrade it?
  1453. elseif ($packageInfo['is_installed'] && !$packageInfo['is_current'] && $packageInfo['xml']->exists('upgrade'))
  1454. {
  1455. $upgrades = $packageInfo['xml']->set('upgrade');
  1456. // First go through, and check against the current version of SMF.
  1457. foreach ($upgrades as $upgrade)
  1458. {
  1459. // Even if it is for this SMF, is it for the installed version of the mod?
  1460. if (!$upgrade->exists('@for') || matchPackageVersion($the_version, $upgrade->fetch('@for')))
  1461. if (!$upgrade->exists('@from') || matchPackageVersion($installed_mods[$packageInfo['id']]['version'], $upgrade->fetch('@from')))
  1462. {
  1463. $packageInfo['can_upgrade'] = true;
  1464. break;
  1465. }
  1466. }
  1467. }
  1468. // Note that it has to be the current version to be uninstallable. Shucks.
  1469. elseif ($packageInfo['is_installed'] && $packageInfo['is_current'] && $packageInfo['xml']->exists('uninstall'))
  1470. {
  1471. $uninstalls = $packageInfo['xml']->set('uninstall');
  1472. // Can we find any uninstallation methods that work for this SMF version?
  1473. foreach ($uninstalls as $uninstall)
  1474. {
  1475. if (!$uninstall->exists('@for') || matchPackageVersion($the_version, $uninstall->fetch('@for')))
  1476. {
  1477. $packageInfo['can_uninstall'] = true;
  1478. break;
  1479. }
  1480. }
  1481. // no uninstall found for this version, lets see if one exists for another
  1482. if ($packageInfo['can_uninstall'] === false && $uninstall->exists('@for') && empty($_SESSION['version_emulate']))
  1483. {
  1484. $reset = true;
  1485. // Get the highest install version that is available from the package
  1486. foreach ($uninstalls as $uninstall)
  1487. {
  1488. $packageInfo['can_emulate_uninstall'] = matchHighestPackageVersion($uninstall->fetch('@for'), $reset, $the_version);
  1489. $reset = false;
  1490. }
  1491. }
  1492. }
  1493. // Modification.
  1494. if ($packageInfo['type'] == 'modification' || $packageInfo['type'] == 'mod')
  1495. {
  1496. $sort_id['modification']++;
  1497. $sort_id['mod']++;
  1498. if ($installed)
  1499. {
  1500. if (!empty($context['available_modification'][$packageInfo['id']]))
  1501. {
  1502. $packages['modification'][strtolower($packageInfo[$sort]) . '_' . $sort_id['mod']] = $packageInfo['id'];
  1503. $context['available_modification'][$packageInfo['id']] = array_merge($context['available_modification'][$packageInfo['id']], $packageInfo);
  1504. }
  1505. }
  1506. else
  1507. {
  1508. $packages['modification'][strtolower($packageInfo[$sort]) . '_' . $sort_id['mod']] = md5($package);
  1509. $context['available_modification'][md5($package)] = $packageInfo;
  1510. }
  1511. }
  1512. // Avatar package.
  1513. elseif ($packageInfo['type'] == 'avatar')
  1514. {
  1515. $sort_id[$packageInfo['type']]++;
  1516. $packages['avatar'][strtolower($packageInfo[$sort])] = md5($package);
  1517. $context['available_avatar'][md5($package)] = $packageInfo;
  1518. }
  1519. // Language package.
  1520. elseif ($packageInfo['type'] == 'language')
  1521. {
  1522. $sort_id[$packageInfo['type']]++;
  1523. $packages['language'][strtolower($packageInfo[$sort])] = md5($package);
  1524. $context['available_language'][md5($package)] = $packageInfo;
  1525. }
  1526. // Other stuff.
  1527. else
  1528. {
  1529. $sort_id['unknown']++;
  1530. $packages['unknown'][strtolower($packageInfo[$sort])] = md5($package);
  1531. $context['available_unknown'][md5($package)] = $packageInfo;
  1532. }
  1533. }
  1534. }
  1535. closedir($dir);
  1536. }
  1537. if (isset($_GET['type']) && $_GET['type'] == $params)
  1538. {
  1539. if (isset($_GET['desc']))
  1540. krsort($packages[$params]);
  1541. else
  1542. ksort($packages[$params]);
  1543. }
  1544. return $packages[$params];
  1545. }
  1546. function PackageOptions()
  1547. {
  1548. global $txt, $scripturl, $context, $sourcedir, $modSettings, $smcFunc;
  1549. if (isset($_POST['save']))
  1550. {
  1551. checkSession('post');
  1552. updateSettings(array(
  1553. 'package_server' => trim($smcFunc['htmlspecialchars']($_POST['pack_server'])),
  1554. 'package_port' => trim($smcFunc['htmlspecialchars']($_POST['pack_port'])),
  1555. 'package_username' => trim($smcFunc['htmlspecialchars']($_POST['pack_user'])),
  1556. 'package_make_backups' => !empty($_POST['package_make_backups']),
  1557. 'package_make_full_backups' => !empty($_POST['package_make_full_backups'])
  1558. ));
  1559. redirectexit('action=admin;area=packages;sa=options');
  1560. }
  1561. if (preg_match('~^/home\d*/([^/]+?)/public_html~', $_SERVER['DOCUMENT_ROOT'], $match))
  1562. $default_username = $match[1];
  1563. else
  1564. $default_username = '';
  1565. $context['page_title'] = $txt['package_settings'];
  1566. $context['sub_template'] = 'install_options';
  1567. $context['package_ftp_server'] = isset($modSettings['package_server']) ? $modSettings['package_server'] : 'localhost';
  1568. $context['package_ftp_port'] = isset($modSettings['package_port']) ? $modSettings['package_port'] : '21';
  1569. $context['package_ftp_username'] = isset($modSettings['package_username']) ? $modSettings['package_username'] : $default_username;
  1570. $context['package_make_backups'] = !empty($modSettings['package_make_backups']);
  1571. $context['package_make_full_backups'] = !empty($modSettings['package_make_full_backups']);
  1572. }
  1573. /**
  1574. * List operations
  1575. */
  1576. function ViewOperations()
  1577. {
  1578. global $context, $txt, $boarddir, $sourcedir, $smcFunc, $modSettings;
  1579. // Can't be in here buddy.
  1580. isAllowedTo('admin_forum');
  1581. // We need to know the operation key for the search and replace, mod file looking at, is it a board mod?
  1582. if (!isset($_REQUEST['operation_key'], $_REQUEST['filename']) && !is_numeric($_REQUEST['operation_key']))
  1583. fatal_lang_error('operation_invalid', 'general');
  1584. // Load the required file.
  1585. require_once($sourcedir . '/Subs-Package.php');
  1586. // Uninstalling the mod?
  1587. $reverse = isset($_REQUEST['reverse']) ? true : false;
  1588. // Get the base name.
  1589. $context['filename'] = preg_replace('~[\.]+~', '.', $_REQUEST['package']);
  1590. // We need to extract this again.
  1591. if (is_file($boarddir . '/Packages/' . $context['filename']))
  1592. {
  1593. $context['extracted_files'] = read_tgz_file($boarddir . '/Packages/' . $context['filename'], $boarddir . '/Packages/temp');
  1594. if ($context['extracted_files'] && !file_exists($boarddir . '/Packages/temp/package-info.xml'))
  1595. foreach ($context['extracted_files'] as $file)
  1596. if (basename($file['filename']) == 'package-info.xml')
  1597. {
  1598. $context['base_path'] = dirname($file['filename']) . '/';
  1599. break;
  1600. }
  1601. if (!isset($context['base_path']))
  1602. $context['base_path'] = '';
  1603. }
  1604. elseif (is_dir($boarddir . '/Packages/' . $context['filename']))
  1605. {
  1606. copytree($boarddir . '/Packages/' . $context['filename'], $boarddir . '/Packages/temp');
  1607. $context['extracted_files'] = listtree($boarddir . '/Packages/temp');
  1608. $context['base_path'] = '';
  1609. }
  1610. // Load up any custom themes we may want to install into...
  1611. $request = $smcFunc['db_query']('', '
  1612. SELECT id_theme, variable, value
  1613. FROM {db_prefix}themes
  1614. WHERE (id_theme = {int:default_theme} OR id_theme IN ({array_int:known_theme_list}))
  1615. AND variable IN ({string:name}, {string:theme_dir})',
  1616. array(
  1617. 'known_theme_list' => explode(',', $modSettings['knownThemes']),
  1618. 'default_theme' => 1,
  1619. 'name' => 'name',
  1620. 'theme_dir' => 'theme_dir',
  1621. )
  1622. );
  1623. $theme_paths = array();
  1624. while ($row = $smcFunc['db_fetch_assoc']($request))
  1625. $theme_paths[$row['id_theme']][$row['variable']] = $row['value'];
  1626. $smcFunc['db_free_result']($request);
  1627. // Boardmod?
  1628. if (isset($_REQUEST['boardmod']))
  1629. $mod_actions = parseBoardMod(@file_get_contents($boarddir . '/Packages/temp/' . $context['base_path'] . $_REQUEST['filename']), true, $reverse, $theme_paths);
  1630. else
  1631. $mod_actions = parseModification(@file_get_contents($boarddir . '/Packages/temp/' . $context['base_path'] . $_REQUEST['filename']), true, $reverse, $theme_paths);
  1632. // Ok lets get the content of the file.
  1633. $context['operations'] = array(
  1634. 'search' => strtr(htmlspecialchars($mod_actions[$_REQUEST['operation_key']]['search_original']), array('[' => '&#91;', ']' => '&#93;')),
  1635. 'replace' => strtr(htmlspecialchars($mod_actions[$_REQUEST['operation_key']]['replace_original']), array('[' => '&#91;', ']' => '&#93;')),
  1636. 'position' => $mod_actions[$_REQUEST['operation_key']]['position'],
  1637. );
  1638. // Let's do some formatting...
  1639. $operation_text = $context['operations']['position'] == 'replace' ? 'operation_replace' : ($context['operations']['position'] == 'before' ? 'operation_after' : 'operation_before');
  1640. $context['operations']['search'] = parse_bbc('[code=' . $txt['operation_find'] . ']' . ($context['operations']['position'] == 'end' ? '?&gt;' : $context['operations']['search']) . '[/code]');
  1641. $context['operations']['replace'] = parse_bbc('[code=' . $txt[$operation_text] . ']' . $context['operations']['replace'] . '[/code]');
  1642. // No layers
  1643. $context['template_layers'] = array();
  1644. $context['sub_template'] = 'view_operations';
  1645. }
  1646. /**
  1647. * Allow the admin to reset permissions on files.
  1648. */
  1649. function PackagePermissions()
  1650. {
  1651. global $context, $txt, $modSettings, $boarddir, $sourcedir, $cachedir, $smcFunc, $package_ftp;
  1652. // Let's try and be good, yes?
  1653. checkSession('get');
  1654. // If we're restoring permissions this is just a pass through really.
  1655. if (isset($_GET['restore']))
  1656. {
  1657. create_chmod_control(array(), array(), true);
  1658. fatal_lang_error('no_access', false);
  1659. }
  1660. // This is a memory eat.
  1661. setMemoryLimit('128M');
  1662. @set_time_limit(600);
  1663. // Load up some FTP stuff.
  1664. create_chmod_control();
  1665. if (empty($package_ftp) && !isset($_POST['skip_ftp']))
  1666. {
  1667. require_once($sourcedir . '/Class-Package.php');
  1668. $ftp = new ftp_connection(null);
  1669. list ($username, $detect_path, $found_path) = $ftp->detect_path($boarddir);
  1670. $context['package_ftp'] = array(
  1671. 'server' => isset($modSettings['package_server']) ? $modSettings['package_server'] : 'localhost',
  1672. 'port' => isset($modSettings['package_port']) ? $modSettings['package_port'] : '21',
  1673. 'username' => empty($username) ? (isset($modSettings['package_username']) ? $modSettings['package_username'] : '') : $username,
  1674. 'path' => $detect_path,
  1675. 'form_elements_only' => true,
  1676. );
  1677. }
  1678. else
  1679. $context['ftp_connected'] = true;
  1680. // Define the template.
  1681. $context['page_title'] = $txt['package_file_perms'];
  1682. $context['sub_template'] = 'file_permissions';
  1683. // Define what files we're interested in, as a tree.
  1684. $context['file_tree'] = array(
  1685. strtr($boarddir, array('\\' => '/')) => array(
  1686. 'type' => 'dir',
  1687. 'contents' => array(
  1688. 'agreement.txt' => array(
  1689. 'type' => 'file',
  1690. 'writable_on' => 'standard',
  1691. ),
  1692. 'Settings.php' => array(
  1693. 'type' => 'file',
  1694. 'writable_on' => 'restrictive',
  1695. ),
  1696. 'Settings_bak.php' => array(
  1697. 'type' => 'file',
  1698. 'writable_on' => 'restrictive',
  1699. ),
  1700. 'attachments' => array(
  1701. 'type' => 'dir',
  1702. 'writable_on' => 'restrictive',
  1703. ),
  1704. 'avatars' => array(
  1705. 'type' => 'dir',
  1706. 'writable_on' => 'standard',
  1707. ),
  1708. 'cache' => array(
  1709. 'type' => 'dir',
  1710. 'writable_on' => 'restrictive',
  1711. ),
  1712. 'custom_avatar_dir' => array(
  1713. 'type' => 'dir',
  1714. 'writable_on' => 'restrictive',
  1715. ),
  1716. 'Smileys' => array(
  1717. 'type' => 'dir_recursive',
  1718. 'writable_on' => 'standard',
  1719. ),
  1720. 'Sources' => array(
  1721. 'type' => 'dir',
  1722. 'list_contents' => true,
  1723. 'writable_on' => 'standard',
  1724. ),
  1725. 'Themes' => array(
  1726. 'type' => 'dir_recursive',
  1727. 'writable_on' => 'standard',
  1728. 'contents' => array(
  1729. 'default' => array(
  1730. 'type' => 'dir_recursive',
  1731. 'list_contents' => true,
  1732. 'contents' => array(
  1733. 'languages' => array(
  1734. 'type' => 'dir',
  1735. 'list_contents' => true,
  1736. ),
  1737. ),
  1738. ),
  1739. ),
  1740. ),
  1741. 'Packages' => array(
  1742. 'type' => 'dir',
  1743. 'writable_on' => 'standard',
  1744. 'contents' => array(
  1745. 'temp' => array(
  1746. 'type' => 'dir',
  1747. ),
  1748. 'backup' => array(
  1749. 'type' => 'dir',
  1750. ),
  1751. 'installed.list' => array(
  1752. 'type' => 'file',
  1753. 'writable_on' => 'standard',
  1754. ),
  1755. ),
  1756. ),
  1757. ),
  1758. ),
  1759. );
  1760. // Directories that can move.
  1761. if (substr($sourcedir, 0, strlen($boarddir)) != $boarddir)
  1762. {
  1763. unset($context['file_tree'][strtr($boarddir, array('\\' => '/'))]['contents']['Sources']);
  1764. $context['file_tree'][strtr($sourcedir, array('\\' => '/'))] = array(
  1765. 'type' => 'dir',
  1766. 'list_contents' => true,
  1767. 'writable_on' => 'standard',
  1768. );
  1769. }
  1770. // Moved the cache?
  1771. if (substr($cachedir, 0, strlen($boarddir)) != $boarddir)
  1772. {
  1773. unset($context['file_tree'][strtr($boarddir, array('\\' => '/'))]['contents']['cache']);
  1774. $context['file_tree'][strtr($cachedir, array('\\' => '/'))] = array(
  1775. 'type' => 'dir',
  1776. 'list_contents' => false,
  1777. 'writable_on' => 'restrictive',
  1778. );
  1779. }
  1780. // Are we using multiple attachment directories?
  1781. if (!empty($modSettings['currentAttachmentUploadDir']))
  1782. {
  1783. unset($context['file_tree'][strtr($boarddir, array('\\' => '/'))]['contents']['attachments']);
  1784. if (!is_array($modSettings['attachmentUploadDir']))
  1785. $modSettings['attachmentUploadDir'] = unserialize($modSettings['attachmentUploadDir']);
  1786. // @todo Should we suggest non-current directories be read only?
  1787. foreach ($modSettings['attachmentUploadDir'] as $dir)
  1788. $context['file_tree'][strtr($dir, array('\\' => '/'))] = array(
  1789. 'type' => 'dir',
  1790. 'writable_on' => 'restrictive',
  1791. );
  1792. }
  1793. elseif (substr($modSettings['attachmentUploadDir'], 0, strlen($boarddir)) != $boarddir)
  1794. {
  1795. unset($context['file_tree'][strtr($boarddir, array('\\' => '/'))]['contents']['attachments']);
  1796. $context['file_tree'][strtr($modSettings['attachmentUploadDir'], array('\\' => '/'))] = array(
  1797. 'type' => 'dir',
  1798. 'writable_on' => 'restrictive',
  1799. );
  1800. }
  1801. if (substr($modSettings['smileys_dir'], 0, strlen($boarddir)) != $boarddir)
  1802. {
  1803. unset($context['file_tree'][strtr($boarddir, array('\\' => '/'))]['contents']['Smileys']);
  1804. $context['file_tree'][strtr($modSettings['smileys_dir'], array('\\' => '/'))] = array(
  1805. 'type' => 'dir_recursive',
  1806. 'writable_on' => 'standard',
  1807. );
  1808. }
  1809. if (substr($modSettings['avatar_directory'], 0, strlen($boarddir)) != $boarddir)
  1810. {
  1811. unset($context['file_tree'][strtr($boarddir, array('\\' => '/'))]['contents']['avatars']);
  1812. $context['file_tree'][strtr($modSettings['avatar_directory'], array('\\' => '/'))] = array(
  1813. 'type' => 'dir',
  1814. 'writable_on' => 'standard',
  1815. );
  1816. }
  1817. if (isset($modSettings['custom_avatar_dir']) && substr($modSettings['custom_avatar_dir'], 0, strlen($boarddir)) != $boarddir)
  1818. {
  1819. unset($context['file_tree'][strtr($boarddir, array('\\' => '/'))]['contents']['custom_avatar_dir']);
  1820. $context['file_tree'][strtr($modSettings['custom_avatar_dir'], array('\\' => '/'))] = array(
  1821. 'type' => 'dir',
  1822. 'writable_on' => 'restrictive',
  1823. );
  1824. }
  1825. // Load up any custom themes.
  1826. $request = $smcFunc['db_query']('', '
  1827. SELECT value
  1828. FROM {db_prefix}themes
  1829. WHERE id_theme > {int:default_theme_id}
  1830. AND id_member = {int:guest_id}
  1831. AND variable = {string:theme_dir}
  1832. ORDER BY value ASC',
  1833. array(
  1834. 'default_theme_id' => 1,
  1835. 'guest_id' => 0,
  1836. 'theme_dir' => 'theme_dir',
  1837. )
  1838. );
  1839. while ($row = $smcFunc['db_fetch_assoc']($request))
  1840. {
  1841. if (substr(strtolower(strtr($row['value'], array('\\' => '/'))), 0, strlen($boarddir) + 7) == strtolower(strtr($boarddir, array('\\' => '/')) . '/Themes'))
  1842. $context['file_tree'][strtr($boarddir, array('\\' => '/'))]['contents']['Themes']['contents'][substr($row['value'], strlen($boarddir) + 8)] = array(
  1843. 'type' => 'dir_recursive',
  1844. 'list_contents' => true,
  1845. 'contents' => array(
  1846. 'languages' => array(
  1847. 'type' => 'dir',
  1848. 'list_contents' => true,
  1849. ),
  1850. ),
  1851. );
  1852. else
  1853. {
  1854. $context['file_tree'][strtr($row['value'], array('\\' => '/'))] = array(
  1855. 'type' => 'dir_recursive',
  1856. 'list_contents' => true,
  1857. 'contents' => array(
  1858. 'languages' => array(
  1859. 'type' => 'dir',
  1860. 'list_contents' => true,
  1861. ),
  1862. ),
  1863. );
  1864. }
  1865. }
  1866. $smcFunc['db_free_result']($request);
  1867. // If we're submitting then let's move on to another function to keep things cleaner..
  1868. if (isset($_POST['action_changes']))
  1869. return PackagePermissionsAction();
  1870. $context['look_for'] = array();
  1871. // Are we looking for a particular tree - normally an expansion?
  1872. if (!empty($_REQUEST['find']))
  1873. $context['look_for'][] = base64_decode($_REQUEST['find']);
  1874. // Only that tree?
  1875. $context['only_find'] = isset($_GET['xml']) && !empty($_REQUEST['onlyfind']) ? $_REQUEST['onlyfind'] : '';
  1876. if ($context['only_find'])
  1877. $context['look_for'][] = $context['only_find'];
  1878. // Have we got a load of back-catalogue trees to expand from a submit etc?
  1879. if (!empty($_GET['back_look']))
  1880. {
  1881. $potententialTrees = unserialize(base64_decode($_GET['back_look']));
  1882. foreach ($potententialTrees as $tree)
  1883. $context['look_for'][] = $tree;
  1884. }
  1885. // ... maybe posted?
  1886. if (!empty($_POST['back_look']))
  1887. $context['only_find'] = array_merge($context['only_find'], $_POST['back_look']);
  1888. $context['back_look_data'] = base64_encode(serialize(array_slice($context['look_for'], 0, 15)));
  1889. // Are we finding more files than first thought?
  1890. $context['file_offset'] = !empty($_REQUEST['fileoffset']) ? (int) $_REQUEST['fileoffset'] : 0;
  1891. // Don't list more than this many files in a directory.
  1892. $context['file_limit'] = 150;
  1893. // How many levels shall we show?
  1894. $context['default_level'] = empty($context['only_find']) ? 2 : 25;
  1895. // This will be used if we end up catching XML data.
  1896. $context['xml_data'] = array(
  1897. 'roots' => array(
  1898. 'identifier' => 'root',
  1899. 'children' => array(
  1900. array(
  1901. 'value' => preg_replace('~[^A-Za-z0-9_\-=:]~', ':-:', $context['only_find']),
  1902. ),
  1903. ),
  1904. ),
  1905. 'folders' => array(
  1906. 'identifier' => 'folder',
  1907. 'children' => array(),
  1908. ),
  1909. );
  1910. foreach ($context['file_tree'] as $path => $data)
  1911. {
  1912. // Run this directory.
  1913. if (file_exists($path) && (empty($context['only_find']) || substr($context['only_find'], 0, strlen($path)) == $path))
  1914. {
  1915. // Get the first level down only.
  1916. fetchPerms__recursive($path, $context['file_tree'][$path], 1);
  1917. $context['file_tree'][$path]['perms'] = array(
  1918. 'chmod' => @is_writable($path),
  1919. 'perms' => @fileperms($path),
  1920. );
  1921. }
  1922. else
  1923. unset($context['file_tree'][$path]);
  1924. }
  1925. // Is this actually xml?
  1926. if (isset($_GET['xml']))
  1927. {
  1928. loadTemplate('Xml');
  1929. $context['sub_template'] = 'generic_xml';
  1930. $context['template_layers'] = array();
  1931. }
  1932. }
  1933. function fetchPerms__recursive($path, &$data, $level)
  1934. {
  1935. global $context;
  1936. $isLikelyPath = false;
  1937. foreach ($context['look_for'] as $possiblePath)
  1938. if (substr($possiblePath, 0, strlen($path)) == $path)
  1939. $isLikelyPath = true;
  1940. // Is this where we stop?
  1941. if (isset($_GET['xml']) && !empty($context['look_for']) && !$isLikelyPath)
  1942. return;
  1943. elseif ($level > $context['default_level'] && !$isLikelyPath)
  1944. return;
  1945. // Are we actually interested in saving this data?
  1946. $save_data = empty($context['only_find']) || $context['only_find'] == $path;
  1947. // @todo Shouldn't happen - but better error message?
  1948. if (!is_dir($path))
  1949. fatal_lang_error('no_access', false);
  1950. // This is where we put stuff we've found for sorting.
  1951. $foundData = array(
  1952. 'files' => array(),
  1953. 'folders' => array(),
  1954. );
  1955. $dh = opendir($path);
  1956. while ($entry = readdir($dh))
  1957. {
  1958. // Some kind of file?
  1959. if (is_file($path . '/' . $entry))
  1960. {
  1961. // Are we listing PHP files in this directory?
  1962. if ($save_data && !empty($data['list_contents']) && substr($entry, -4) == '.php')
  1963. $foundData['files'][$entry] = true;
  1964. // A file we were looking for.
  1965. elseif ($save_data && isset($data['contents'][$entry]))
  1966. $foundData['files'][$entry] = true;
  1967. }
  1968. // It's a directory - we're interested one way or another, probably...
  1969. elseif ($entry != '.' && $entry != '..')
  1970. {
  1971. // Going further?
  1972. if ((!empty($data['type']) && $data['type'] == 'dir_recursive') || (isset($data['contents'][$entry]) && (!empty($data['contents'][$entry]['list_contents']) || (!empty($data['contents'][$entry]['type']) && $data['contents'][$entry]['type'] == 'dir_recursive'))))
  1973. {
  1974. if (!isset($data['contents'][$entry]))
  1975. $foundData['folders'][$entry] = 'dir_recursive';
  1976. else
  1977. $foundData['folders'][$entry] = true;
  1978. // If this wasn't expected inherit the recusiveness...
  1979. if (!isset($data['contents'][$entry]))
  1980. // We need to do this as we will be going all recursive.
  1981. $data['contents'][$entry] = array(
  1982. 'type' => 'dir_recursive',
  1983. );
  1984. // Actually do the recursive stuff...
  1985. fetchPerms__recursive($path . '/' . $entry, $data['contents'][$entry], $level + 1);
  1986. }
  1987. // Maybe it is a folder we are not descending into.
  1988. elseif (isset($data['contents'][$entry]))
  1989. $foundData['folders'][$entry] = true;
  1990. // Otherwise we stop here.
  1991. }
  1992. }
  1993. closedir($dh);
  1994. // Nothing to see here?
  1995. if (!$save_data)
  1996. return;
  1997. // Now actually add the data, starting with the folders.
  1998. ksort($foundData['folders']);
  1999. foreach ($foundData['folders'] as $folder => $type)
  2000. {
  2001. $additional_data = array(
  2002. 'perms' => array(
  2003. 'chmod' => @is_writable($path . '/' . $folder),
  2004. 'perms' => @fileperms($path . '/' . $folder),
  2005. ),
  2006. );
  2007. if ($type !== true)
  2008. $additional_data['type'] = $type;
  2009. // If there's an offset ignore any folders in XML mode.
  2010. if (isset($_GET['xml']) && $context['file_offset'] == 0)
  2011. {
  2012. $context['xml_data']['folders']['children'][] = array(
  2013. 'attributes' => array(
  2014. 'writable' => $additional_data['perms']['chmod'] ? 1 : 0,
  2015. 'permissions' => substr(sprintf('%o', $additional_data['perms']['perms']), -4),
  2016. 'folder' => 1,
  2017. 'path' => $context['only_find'],
  2018. 'level' => $level,
  2019. 'more' => 0,
  2020. 'offset' => $context['file_offset'],
  2021. 'my_ident' => preg_replace('~[^A-Za-z0-9_\-=:]~', ':-:', $context['only_find'] . '/' . $folder),
  2022. 'ident' => preg_replace('~[^A-Za-z0-9_\-=:]~', ':-:', $context['only_find']),
  2023. ),
  2024. 'value' => $folder,
  2025. );
  2026. }
  2027. elseif (!isset($_GET['xml']))
  2028. {
  2029. if (isset($data['contents'][$folder]))
  2030. $data['contents'][$folder] = array_merge($data['contents'][$folder], $additional_data);
  2031. else
  2032. $data['contents'][$folder] = $additional_data;
  2033. }
  2034. }
  2035. // Now we want to do a similar thing with files.
  2036. ksort($foundData['files']);
  2037. $counter = -1;
  2038. foreach ($foundData['files'] as $file => $dummy)
  2039. {
  2040. $counter++;
  2041. // Have we reached our offset?
  2042. if ($context['file_offset'] > $counter)
  2043. continue;
  2044. // Gone too far?
  2045. if ($counter > ($context['file_offset'] + $context['file_limit']))
  2046. continue;
  2047. $additional_data = array(
  2048. 'perms' => array(
  2049. 'chmod' => @is_writable($path . '/' . $file),
  2050. 'perms' => @fileperms($path . '/' . $file),
  2051. ),
  2052. );
  2053. // XML?
  2054. if (isset($_GET['xml']))
  2055. {
  2056. $context['xml_data']['folders']['children'][] = array(
  2057. 'attributes' => array(
  2058. 'writable' => $additional_data['perms']['chmod'] ? 1 : 0,
  2059. 'permissions' => substr(sprintf('%o', $additional_data['perms']['perms']), -4),
  2060. 'folder' => 0,
  2061. 'path' => $context['only_find'],
  2062. 'level' => $level,
  2063. 'more' => $counter == ($context['file_offset'] + $context['file_limit']) ? 1 : 0,
  2064. 'offset' => $context['file_offset'],
  2065. 'my_ident' => preg_replace('~[^A-Za-z0-9_\-=:]~', ':-:', $context['only_find'] . '/' . $file),
  2066. 'ident' => preg_replace('~[^A-Za-z0-9_\-=:]~', ':-:', $context['only_find']),
  2067. ),
  2068. 'value' => $file,
  2069. );
  2070. }
  2071. elseif ($counter != ($context['file_offset'] + $context['file_limit']))
  2072. {
  2073. if (isset($data['contents'][$file]))
  2074. $data['contents'][$file] = array_merge($data['contents'][$file], $additional_data);
  2075. else
  2076. $data['contents'][$file] = $additional_data;
  2077. }
  2078. }
  2079. }
  2080. /**
  2081. * Actually action the permission changes they want.
  2082. */
  2083. function PackagePermissionsAction()
  2084. {
  2085. global $context, $txt, $time_start, $package_ftp;
  2086. umask(0);
  2087. $timeout_limit = 5;
  2088. $context['method'] = $_POST['method'] == 'individual' ? 'individual' : 'predefined';
  2089. $context['sub_template'] = 'action_permissions';
  2090. $context['page_title'] = $txt['package_file_perms_applying'];
  2091. $context['back_look_data'] = isset($_POST['back_look']) ? $_POST['back_look'] : array();
  2092. // Skipping use of FTP?
  2093. if (empty($package_ftp))
  2094. $context['skip_ftp'] = true;
  2095. // We'll start off in a good place, security. Make sure that if we're dealing with individual files that they seem in the right place.
  2096. if ($context['method'] == 'individual')
  2097. {
  2098. // Only these path roots are legal.
  2099. $legal_roots = array_keys($context['file_tree']);
  2100. $context['custom_value'] = (int) $_POST['custom_value'];
  2101. // Continuing?
  2102. if (isset($_POST['toProcess']))
  2103. $_POST['permStatus'] = unserialize(base64_decode($_POST['toProcess']));
  2104. if (isset($_POST['permStatus']))
  2105. {
  2106. $context['to_process'] = array();
  2107. $validate_custom = false;
  2108. foreach ($_POST['permStatus'] as $path => $status)
  2109. {
  2110. // Nothing to see here?
  2111. if ($status == 'no_change')
  2112. continue;
  2113. $legal = false;
  2114. foreach ($legal_roots as $root)
  2115. if (substr($path, 0, strlen($root)) == $root)
  2116. $legal = true;
  2117. if (!$legal)
  2118. continue;
  2119. // Check it exists.
  2120. if (!file_exists($path))
  2121. continue;
  2122. if ($status == 'custom')
  2123. $validate_custom = true;
  2124. // Now add it.
  2125. $context['to_process'][$path] = $status;
  2126. }
  2127. $context['total_items'] = isset($_POST['totalItems']) ? (int) $_POST['totalItems'] : count($context['to_process']);
  2128. // Make sure the chmod status is valid?
  2129. if ($validate_custom)
  2130. {
  2131. if (preg_match('~^[4567][4567][4567]$~', $context['custom_value']) == false)
  2132. fatal_error($txt['chmod_value_invalid']);
  2133. }
  2134. // Nothing to do?
  2135. if (empty($context['to_process']))
  2136. redirectexit('action=admin;area=packages;sa=perms' . (!empty($context['back_look_data']) ? ';back_look=' . base64_encode(serialize($context['back_look_data'])) : '') . ';' . $context['session_var'] . '=' . $context['session_id']);
  2137. }
  2138. // Should never get here,
  2139. else
  2140. fatal_lang_error('no_access', false);
  2141. // Setup the custom value.
  2142. $custom_value = octdec('0' . $context['custom_value']);
  2143. // Start processing items.
  2144. foreach ($context['to_process'] as $path => $status)
  2145. {
  2146. if (in_array($status, array('execute', 'writable', 'read')))
  2147. package_chmod($path, $status);
  2148. elseif ($status == 'custom' && !empty($custom_value))
  2149. {
  2150. // Use FTP if we have it.
  2151. if (!empty($package_ftp) && !empty($_SESSION['pack_ftp']))
  2152. {
  2153. $ftp_file = strtr($path, array($_SESSION['pack_ftp']['root'] => ''));
  2154. $package_ftp->chmod($ftp_file, $custom_value);
  2155. }
  2156. else
  2157. @chmod($path, $custom_value);
  2158. }
  2159. // This fish is fried...
  2160. unset($context['to_process'][$path]);
  2161. // See if we're out of time?
  2162. if (time() - array_sum(explode(' ', $time_start)) > $timeout_limit)
  2163. return false;
  2164. }
  2165. }
  2166. // If predefined this is a little different.
  2167. else
  2168. {
  2169. $context['predefined_type'] = isset($_POST['predefined']) ? $_POST['predefined'] : 'restricted';
  2170. $context['total_items'] = isset($_POST['totalItems']) ? (int) $_POST['totalItems'] : 0;
  2171. $context['directory_list'] = isset($_POST['dirList']) ? unserialize(base64_decode($_POST['dirList'])) : array();
  2172. $context['file_offset'] = isset($_POST['fileOffset']) ? (int) $_POST['fileOffset'] : 0;
  2173. // Haven't counted the items yet?
  2174. if (empty($context['total_items']))
  2175. {
  2176. function count_directories__recursive($dir)
  2177. {
  2178. global $context;
  2179. $count = 0;
  2180. $dh = @opendir($dir);
  2181. while ($entry = readdir($dh))
  2182. {
  2183. if ($entry != '.' && $entry != '..' && is_dir($dir . '/' . $entry))
  2184. {
  2185. $context['directory_list'][$dir . '/' . $entry] = 1;
  2186. $count++;
  2187. $count += count_directories__recursive($dir . '/' . $entry);
  2188. }
  2189. }
  2190. closedir($dh);
  2191. return $count;
  2192. }
  2193. foreach ($context['file_tree'] as $path => $data)
  2194. {
  2195. if (is_dir($path))
  2196. {
  2197. $context['directory_list'][$path] = 1;
  2198. $context['total_items'] += count_directories__recursive($path);
  2199. $context['total_items']++;
  2200. }
  2201. }
  2202. }
  2203. // Have we built up our list of special files?
  2204. if (!isset($_POST['specialFiles']) && $context['predefined_type'] != 'free')
  2205. {
  2206. $context['special_files'] = array();
  2207. function build_special_files__recursive($path, &$data)
  2208. {
  2209. global $context;
  2210. if (!empty($data['writable_on']))
  2211. if ($context['predefined_type'] == 'standard' || $data['writable_on'] == 'restrictive')
  2212. $context['special_files'][$path] = 1;
  2213. if (!empty($data['contents']))
  2214. foreach ($data['contents'] as $name => $contents)
  2215. build_special_files__recursive($path . '/' . $name, $contents);
  2216. }
  2217. foreach ($context['file_tree'] as $path => $data)
  2218. build_special_files__recursive($path, $data);
  2219. }
  2220. // Free doesn't need special files.
  2221. elseif ($context['predefined_type'] == 'free')
  2222. $context['special_files'] = array();
  2223. else
  2224. $context['special_files'] = unserialize(base64_decode($_POST['specialFiles']));
  2225. // Now we definitely know where we are, we need to go through again doing the chmod!
  2226. foreach ($context['directory_list'] as $path => $dummy)
  2227. {
  2228. // Do the contents of the directory first.
  2229. $dh = @opendir($path);
  2230. $file_count = 0;
  2231. $dont_chmod = false;
  2232. while ($entry = readdir($dh))
  2233. {
  2234. $file_count++;
  2235. // Actually process this file?
  2236. if (!$dont_chmod && !is_dir($path . '/' . $entry) && (empty($context['file_offset']) || $context['file_offset'] < $file_count))
  2237. {
  2238. $status = $context['predefined_type'] == 'free' || isset($context['special_files'][$path . '/' . $entry]) ? 'writable' : 'execute';
  2239. package_chmod($path . '/' . $entry, $status);
  2240. }
  2241. // See if we're out of time?
  2242. if (!$dont_chmod && time() - array_sum(explode(' ', $time_start)) > $timeout_limit)
  2243. {
  2244. $dont_chmod = true;
  2245. // Don't do this again.
  2246. $context['file_offset'] = $file_count;
  2247. }
  2248. }
  2249. closedir($dh);
  2250. // If this is set it means we timed out half way through.
  2251. if ($dont_chmod)
  2252. {
  2253. $context['total_files'] = $file_count;
  2254. return false;
  2255. }
  2256. // Do the actual directory.
  2257. $status = $context['predefined_type'] == 'free' || isset($context['special_files'][$path]) ? 'writable' : 'execute';
  2258. package_chmod($path, $status);
  2259. // We've finished the directory so no file offset, and no record.
  2260. $context['file_offset'] = 0;
  2261. unset($context['directory_list'][$path]);
  2262. // See if we're out of time?
  2263. if (time() - array_sum(explode(' ', $time_start)) > $timeout_limit)
  2264. return false;
  2265. }
  2266. }
  2267. // If we're here we are done!
  2268. redirectexit('action=admin;area=packages;sa=perms' . (!empty($context['back_look_data']) ? ';back_look=' . base64_encode(serialize($context['back_look_data'])) : '') . ';' . $context['session_var'] . '=' . $context['session_id']);
  2269. }
  2270. /**
  2271. * Test an FTP connection.
  2272. */
  2273. function PackageFTPTest()
  2274. {
  2275. global $context, $txt, $package_ftp;
  2276. checkSession('get');
  2277. // Try to make the FTP connection.
  2278. create_chmod_control(array(), array('force_find_error' => true));
  2279. // Deal with the template stuff.
  2280. loadTemplate('Xml');
  2281. $context['sub_template'] = 'generic_xml';
  2282. $context['template_layers'] = array();
  2283. // Define the return data, this is simple.
  2284. $context['xml_data'] = array(
  2285. 'results' => array(
  2286. 'identifier' => 'result',
  2287. 'children' => array(
  2288. array(
  2289. 'attributes' => array(
  2290. 'success' => !empty($package_ftp) ? 1 : 0,
  2291. ),
  2292. 'value' => !empty($package_ftp) ? $txt['package_ftp_test_success'] : (isset($context['package_ftp'], $context['package_ftp']['error']) ? $context['package_ftp']['error'] : $txt['package_ftp_test_failed']),
  2293. ),
  2294. ),
  2295. ),
  2296. );
  2297. }
  2298. ?>