Ti*k*Z hat im Gegensatz zu asymptote keine wirkliche 3D Engine. Also muss man die einzelnen Segemente und Ebenen Stück für Stück zeichnen. Zuerst das links-hinten Segment vom Zylinder, dann die Halbebenen, die es verdecken, dann rechts hinten usw.
\documentclass[border=5pt]{standalone}
\usepackage{tikz,tikz-3dplot}
\begin{document}
\tdplotsetmaincoords{70}{110}
\begin{tikzpicture}[tdplot_main_coords]
\tdplotsetrotatedcoords{0}{90}{90}
\begin{scope}[tdplot_rotated_coords]
% Segment links hinten
\fill[blue] (-2,-2,-2) arc(135:90:{2*sqrt(2)}) -- ++(0,0,4)
arc(90:135:{2*sqrt(2)})--cycle;
% Halbebene oben
\draw[fill opacity=0.3,fill=cyan,cyan] (0,-4,-2) -- (0,-4,2) -- (0,2,2) -- (0,2,-2) -- cycle;
% Halbebene links
\draw[fill opacity=0.2,fill=cyan,cyan] (-3,-4,2) -- (0,-4,2) -- (0,2,2) -- (-3,2,2) -- cycle;
% Segment links vorne
\fill[blue] (-2,-2,2) arc(135:90:{2*sqrt(2)}) -- ++(0,0,4)
arc(90:135:{2*sqrt(2)})--cycle;
% Halbebene unten
\draw[fill opacity=0.3,fill=cyan,cyan] (0,-4,2) -- (0,-4,6) -- (0,2,6) -- (0,2,2) -- cycle;
% Segment rechts hinten
\fill[blue] (2,-2,-2) arc(45:90:{2*sqrt(2)}) -- ++(0,0,4)
arc(90:45:{2*sqrt(2)})--cycle;
% das macht den Zylindermantel dick
\fill[blue!50] (2,-2,-2) -- ++(0,0,4) -- ++(0,-0.2,0) -- ++(0,0,-4) -- cycle;
\draw[blue] (2,-2,2) -- ++(0,0,-4) -- ++(0,-0.2,0) -- ++(0,0,8);
% Halbebene rechts
\draw[fill opacity=0.2,fill=cyan,cyan] (0,-4,2) -- (3,-4,2) -- (3,2,2) -- (0,2,2) -- cycle;
% Segment rechts vorne
\fill[blue] (2,-2,2) arc(45:90:{2*sqrt(2)}) -- ++(0,0,4)
arc(90:45:{2*sqrt(2)})--cycle;
% das macht den Zylindermantel dick
\draw[blue,fill=blue!50] (-2,-2,6) -- ++(0,-0.2,0) arc(135:45:{2*sqrt(2)}) --
++(0,0.2,0) arc(45:135:{2*sqrt(2)}) --cycle;
\fill[blue!50] (2,-2,2) -- ++(0,0,4) -- ++(0,-0.2,0) -- ++(0,0,-4) -- cycle;
\draw[blue] (2,-2,2) -- ++(0,0,4) -- ++(0,-0.2,0) -- ++(0,0,-4);
\node[anchor=west] at (3.1,2,2){$\varphi$--$R$--Ebene};
\node[anchor=west] at (0.1,2,-2){$y$--$R$--Ebene};
\end{scope}
\end{tikzpicture}
\end{document}
[![alt text][1]][1]
[1]: https://texwelt.de/wissen/upfiles/Screen_Shot_2018-04-03_at_6.11.03_PM.png
https://texwelt.de/wissen/upfiles/Screen_Shot_2018-04-04_at_7.30.32_AM.png
