2.1.2.3 ✓ Mathematica. Time used: 0.569 (sec). Leaf size: 78

ode=(2*x*Tan[y[x]])+(x-x^2*Tan[y[x]])*D[y[x],x]==0; 
ic={}; 
DSolve[{ode,ic},y[x],x,IncludeSingularSolutions->True]
 

\begin{gather*} \text {Solve}\left [x=\frac {1}{34} \left ((8-2 i) e^{2 i y(x)} \operatorname {Hypergeometric2F1}\left (1,1+\frac {i}{4},2+\frac {i}{4},e^{2 i y(x)}\right )-34 i \operatorname {Hypergeometric2F1}\left (\frac {i}{4},1,1+\frac {i}{4},e^{2 i y(x)}\right )\right )+c_1 e^{\frac {y(x)}{2}},y(x)\right ] \end{gather*}