function sconn($doc)
{
//artwedit
list($pdoc, $xf) = split_one(':', $doc, 1);
if ($xf && $pdoc != 'http') {
$d = sconn_defs_r($pdoc, $xf);
if ($d != $doc) {
return $d;
}
}
if ($xf) {
$d = sconn_defs_app($pdoc, $xf);
if ($d) {
return $d;
}
}
$xt = strtolower(strrchr($doc, "."));
if ($xt == ".mp3") {
$doc = goodroot($doc);
return audio($doc);
}
if ($xt == ".pdf") {
return pdfdoc($doc, 'img/', $media);
}
//pdf
if (is_image($doc) && strpos($doc, "§") === false && strpos($doc, "<") === false) {
//images
$large = currentwidth() - 20;
$largb = round($large * 0.5);
if (strpos($doc, "http") !== false) {
return image($doc);
}
return place_image($doc, $media, $large, $largb);
}
if (strpos($doc, "§") or strpos($doc, "http") !== false or strpos($doc, "@") !== false) {
//liens
$lk = prepdlink($doc);
if (is_image($lk[0])) {
if (strpos($lk[0], "http") !== false) {
return image($lk[0]);
}
return popim(goodroot($lk[0]), $lk[1]);
} elseif (is_image($lk[1]) == true) {
//link§im
if (is_numeric($lk[0])) {
$lk[0] = urlread($lk[0]);
}
if (strpos($lk[1], "http") !== false) {
return lka($lk[0], $lk[1]);
}
return lkc("", $lk[0], place_image($lk[1], $media, $large, $largb));
} elseif (strpos($lk[0], "http") !== false) {
return lka($lk[0], $lk[1]);
} elseif (strpos($lk[0], "/") !== false) {
return lka(goodroot($lk[0]), $lk[1]);
} elseif (substr($lk[0], 0, 1) == "/") {
return lka($lk[0], $lk[1]);
} elseif (strpos($lk[0], "@") !== false && strpos($lk[0], ".") !== false) {
return lkc("", 'mailto:' . $lk[0], $lk[1]);
} elseif (strpos($doc, "@") !== false && strpos($doc, ".") !== false) {
return lkc("", 'mailto:' . $doc, $doc);
} elseif (is_numeric($lk[0])) {
return jread('', $lk[0], $lk[1]);
}
}
return $doc;
}
function pubart($d)
{
list($v, $p) = split_one("§", $d, 1);
switch ($p) {
case 1:
return art_read_b($v, '', 1, '');
break;
case 2:
return art_read_b($v, '', 2, '');
break;
case 3:
return art_read_b($v, '', 3, '');
break;
case 4:
if (strpos($v, ',')) {
return m_pubart(array_flip(explode(',', $v)), '', '');
} else {
pub_art($v);
}
break;
default:
return jread('', $v, suj_of_id($v));
break;
}
}
