2020-07-27 12:30:41 +00:00
|
|
|
<?php
|
|
|
|
/**
|
|
|
|
* Name: Converter App
|
|
|
|
* Description: Unit converter application
|
|
|
|
* Version: 1.0
|
|
|
|
* Author: Mike Macgirvin <http://macgirvin.com/profile/mike>
|
|
|
|
*/
|
2022-06-23 05:16:22 +00:00
|
|
|
|
|
|
|
use Friendica\App;
|
2020-07-27 12:30:41 +00:00
|
|
|
use Friendica\Core\Hook;
|
|
|
|
|
|
|
|
function convert_install() {
|
|
|
|
Hook::register('app_menu', 'addon/convert/convert.php', 'convert_app_menu');
|
|
|
|
}
|
|
|
|
|
2022-06-23 05:16:22 +00:00
|
|
|
function convert_app_menu(App $a, array &$b)
|
|
|
|
{
|
2020-07-27 12:30:41 +00:00
|
|
|
$b['app_menu'][] = '<div class="app-title"><a href="convert">Units Conversion</a></div>';
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
function convert_module() {}
|
|
|
|
|
2022-06-24 21:27:58 +00:00
|
|
|
function convert_content(App $a) {
|
|
|
|
// @TODO UnitConverter uses a deprecated constructor with the class' name
|
|
|
|
// @TODO Let's one day rewrite this to a modern composer package
|
|
|
|
include 'UnitConvertor.php';
|
2020-07-27 12:30:41 +00:00
|
|
|
|
2022-06-24 21:27:58 +00:00
|
|
|
class TP_Converter extends UnitConvertor
|
2020-07-27 12:30:41 +00:00
|
|
|
{
|
2022-06-24 21:27:58 +00:00
|
|
|
public function __construct(string $lang = 'en')
|
|
|
|
{
|
|
|
|
if ($lang == 'en' ) {
|
|
|
|
$dec_point = '.';
|
|
|
|
$thousand_sep = ',';
|
|
|
|
} else {
|
|
|
|
$dec_point = '.';
|
|
|
|
$thousand_sep = "'";
|
|
|
|
}
|
2020-07-27 12:30:41 +00:00
|
|
|
|
2022-06-24 21:27:58 +00:00
|
|
|
parent::UnitConvertor($dec_point, $thousand_sep );
|
2020-07-27 12:30:41 +00:00
|
|
|
}
|
|
|
|
|
2022-06-24 21:27:58 +00:00
|
|
|
private function findBaseUnit($from, $to)
|
|
|
|
{
|
|
|
|
while (list($skey, $sval) = each($this->bases)) {
|
2022-06-24 21:34:04 +00:00
|
|
|
if ($skey == $from || $to == $skey || in_array($to, $sval) || in_array($from, $sval)) {
|
|
|
|
return $skey;
|
|
|
|
}
|
2022-06-24 21:27:58 +00:00
|
|
|
}
|
2020-07-27 12:30:41 +00:00
|
|
|
|
2022-06-24 21:27:58 +00:00
|
|
|
return false;
|
|
|
|
}
|
2020-07-27 12:30:41 +00:00
|
|
|
|
2022-06-24 21:34:04 +00:00
|
|
|
public function getTable(int $value, $from_unit, $to_unit, $precision): string
|
2022-06-24 21:27:58 +00:00
|
|
|
{
|
|
|
|
$string = '';
|
2020-07-27 12:30:41 +00:00
|
|
|
|
2022-06-24 21:27:58 +00:00
|
|
|
if ($base_unit = $this->findBaseUnit($from_unit, $to_unit)) {
|
|
|
|
// A baseunit was found now lets convert from -> $base_unit
|
2022-06-23 03:52:43 +00:00
|
|
|
$cell ['value'] = $this->convert($value, $from_unit, $base_unit, $precision) . ' ' . $base_unit;
|
2022-06-24 21:27:58 +00:00
|
|
|
$cell ['class'] = ($base_unit == $from_unit || $base_unit == $to_unit) ? 'framedred' : '';
|
2020-07-27 12:30:41 +00:00
|
|
|
$cells[] = $cell;
|
|
|
|
|
2022-06-24 21:27:58 +00:00
|
|
|
// We now have the base unit and value now lets produce the table;
|
|
|
|
while (list($key, $val) = each($this->bases[$base_unit])) {
|
|
|
|
$cell ['value'] = $this->convert($value, $from_unit, $val, $precision) . ' ' . $val;
|
|
|
|
$cell ['class'] = ($val == $from_unit || $val == $to_unit) ? 'framedred' : '';
|
|
|
|
$cells[] = $cell;
|
|
|
|
}
|
|
|
|
|
|
|
|
$cc = count($cells);
|
|
|
|
$string = "<table class=\"framed grayish\" border=\"1\" cellpadding=\"5\" width=\"80%\" align=\"center\"><tr>";
|
|
|
|
$string .= "<td rowspan=\"$cc\" align=\"center\">$value $from_unit</td>";
|
|
|
|
$i = 0;
|
|
|
|
foreach ($cells as $cell) {
|
|
|
|
if ($i == 0) {
|
|
|
|
$string .= "<td class=\"" . $cell['class'] . "\">" . $cell['value'] . "</td>";
|
|
|
|
$i++;
|
|
|
|
} else {
|
|
|
|
$string .= "</tr><tr><td class=\"" . $cell['class'] . "\">" . $cell['value'] . "</td>";
|
|
|
|
}
|
2020-07-27 12:30:41 +00:00
|
|
|
}
|
2022-06-24 21:27:58 +00:00
|
|
|
$string .= "</tr></table>";
|
2020-07-27 12:30:41 +00:00
|
|
|
}
|
2022-06-24 21:27:58 +00:00
|
|
|
|
2020-07-27 12:30:41 +00:00
|
|
|
return $string;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2022-06-24 21:27:58 +00:00
|
|
|
$conv = new TP_Converter('en');
|
|
|
|
|
|
|
|
$conversions = [
|
|
|
|
'Temperature' => ['base' => 'Celsius',
|
|
|
|
'conv' => [
|
|
|
|
'Fahrenheit' => ['ratio' => 1.8, 'offset' => 32],
|
|
|
|
'Kelvin' => ['ratio' => 1, 'offset' => 273],
|
|
|
|
'Reaumur' => 0.8
|
|
|
|
]
|
|
|
|
],
|
|
|
|
'Weight' => ['base' => 'kg',
|
|
|
|
'conv' => [
|
|
|
|
'g' => 1000,
|
|
|
|
'mg' => 1000000,
|
|
|
|
't' => 0.001,
|
|
|
|
'grain' => 15432,
|
|
|
|
'oz' => 35.274,
|
|
|
|
'lb' => 2.2046,
|
|
|
|
'cwt(UK)' => 0.019684,
|
|
|
|
'cwt(US)' => 0.022046,
|
|
|
|
'ton (US)' => 0.0011023,
|
|
|
|
'ton (UK)' => 0.0009842
|
|
|
|
]
|
|
|
|
],
|
|
|
|
'Distance' => ['base' => 'km',
|
|
|
|
'conv' => [
|
|
|
|
'm' => 1000,
|
|
|
|
'dm' => 10000,
|
|
|
|
'cm' => 100000,
|
|
|
|
'mm' => 1000000,
|
|
|
|
'mile' => 0.62137,
|
|
|
|
'naut.mile' => 0.53996,
|
|
|
|
'inch(es)' => 39370,
|
|
|
|
'ft' => 3280.8,
|
|
|
|
'yd' => 1093.6,
|
|
|
|
'furlong' => 4.970969537898672,
|
|
|
|
'fathom' => 546.8066491688539
|
|
|
|
]
|
|
|
|
],
|
|
|
|
'Area' => ['base' => 'km 2',
|
|
|
|
'conv' => [
|
|
|
|
'ha' => 100,
|
|
|
|
'acre' => 247.105,
|
|
|
|
'm 2' => pow(1000,2),
|
|
|
|
'dm 2' => pow(10000,2),
|
|
|
|
'cm 2' => pow(100000,2),
|
|
|
|
'mm 2' => pow(1000000,2),
|
|
|
|
'mile 2' => pow(0.62137,2),
|
|
|
|
'naut.miles 2' => pow(0.53996,2),
|
|
|
|
'in 2' => pow(39370,2),
|
|
|
|
'ft 2' => pow(3280.8,2),
|
|
|
|
'yd 2' => pow(1093.6,2),
|
|
|
|
]
|
|
|
|
],
|
|
|
|
'Volume' => ['base' => 'm 3',
|
|
|
|
'conv' => [
|
|
|
|
'in 3' => 61023.6,
|
|
|
|
'ft 3' => 35.315,
|
|
|
|
'cm 3' => pow(10,6),
|
|
|
|
'dm 3' => 1000,
|
|
|
|
'litre' => 1000,
|
|
|
|
'hl' => 10,
|
|
|
|
'yd 3' => 1.30795,
|
|
|
|
'gal(US)' => 264.172,
|
|
|
|
'gal(UK)' => 219.969,
|
|
|
|
'pint' => 2113.376,
|
|
|
|
'quart' => 1056.688,
|
|
|
|
'cup' => 4266.753,
|
|
|
|
'fl oz' => 33814.02,
|
|
|
|
'tablespoon' => 67628.04,
|
|
|
|
'teaspoon' => 202884.1,
|
|
|
|
'pt (UK)' => 1000/0.56826,
|
|
|
|
'barrel petroleum' => 1000/158.99,
|
|
|
|
'Register Tons' => 2.832,
|
|
|
|
'Ocean Tons' => 1.1327
|
|
|
|
]
|
|
|
|
],
|
|
|
|
'Speed' => ['base' => 'kmph',
|
|
|
|
'conv' => [
|
|
|
|
'mps' => 0.0001726031,
|
|
|
|
'milesph' => 0.62137,
|
|
|
|
'knots' => 0.53996,
|
|
|
|
'mach STP' => 0.0008380431,
|
|
|
|
'c (warp)' => 9.265669e-10
|
|
|
|
]
|
2020-07-27 12:30:41 +00:00
|
|
|
]
|
2022-06-24 21:27:58 +00:00
|
|
|
];
|
2020-07-27 12:30:41 +00:00
|
|
|
|
2022-06-24 21:34:04 +00:00
|
|
|
while (list($key, $val) = each($conversions)) {
|
2022-06-24 21:27:58 +00:00
|
|
|
$conv->addConversion($val['base'], $val['conv']);
|
|
|
|
$list[$key][] = $val['base'];
|
2022-06-24 21:34:04 +00:00
|
|
|
while (list($ukey, $uval) = each($val['conv'])) {
|
2022-06-24 21:27:58 +00:00
|
|
|
$list[$key][] = $ukey;
|
|
|
|
}
|
2020-07-27 12:30:41 +00:00
|
|
|
}
|
|
|
|
|
2022-06-24 21:27:58 +00:00
|
|
|
$o .= '<h3>Unit Conversions</h3>';
|
2020-07-27 12:30:41 +00:00
|
|
|
|
|
|
|
if (isset($_POST['from_unit']) && isset($_POST['value'])) {
|
2022-06-24 21:34:04 +00:00
|
|
|
$o .= ($conv->getTable(intval($_POST['value']), $_POST['from_unit'], $_POST['to_unit'], 5)) . '</p>';
|
2020-07-27 12:30:41 +00:00
|
|
|
} else {
|
2022-06-23 03:52:43 +00:00
|
|
|
$o .= '<p>Select:</p>';
|
2020-07-27 12:30:41 +00:00
|
|
|
}
|
|
|
|
|
2022-06-22 23:47:32 +00:00
|
|
|
if (isset($_POST['value'])) {
|
2020-07-27 12:30:41 +00:00
|
|
|
$value = $_POST['value'];
|
2022-06-22 23:47:32 +00:00
|
|
|
} else {
|
2020-07-27 12:30:41 +00:00
|
|
|
$value = '';
|
2022-06-22 23:47:32 +00:00
|
|
|
}
|
2020-07-27 12:30:41 +00:00
|
|
|
|
|
|
|
$o .= '<form action="convert" method="post" name="conversion">';
|
2022-06-22 23:47:32 +00:00
|
|
|
$o .= '<input name="value" type="text" id="value" value="' . $value . '" size="10" maxlength="10" />';
|
|
|
|
$o .= '<select name="from_unit" size="12">';
|
2020-07-27 12:30:41 +00:00
|
|
|
|
|
|
|
reset($list);
|
2022-06-24 21:34:04 +00:00
|
|
|
while(list($key, $val) = each($list)) {
|
2020-07-27 12:30:41 +00:00
|
|
|
$o .= "\n\t<optgroup label=\"$key\">";
|
2022-06-24 21:34:04 +00:00
|
|
|
while(list($ukey, $uval) = each($val)) {
|
2020-07-27 12:30:41 +00:00
|
|
|
$selected = (($uval == $_POST['from_unit']) ? ' selected="selected" ' : '');
|
|
|
|
$o .= "\n\t\t<option value=\"$uval\" $selected >$uval</option>";
|
|
|
|
}
|
|
|
|
$o .= "\n\t</optgroup>";
|
|
|
|
}
|
|
|
|
|
|
|
|
$o .= '</select>';
|
2022-06-22 23:47:32 +00:00
|
|
|
$o .= '<input type="submit" name="Submit" value="Submit" /></form>';
|
2020-07-27 12:30:41 +00:00
|
|
|
|
|
|
|
return $o;
|
|
|
|
}
|