rtsp-stream: Always unref return value of gst_object_get_parent()
[platform/upstream/gstreamer.git] / examples / test-auth.c
1 /* GStreamer
2  * Copyright (C) 2008 Wim Taymans <wim.taymans at gmail.com>
3  *
4  * This library is free software; you can redistribute it and/or
5  * modify it under the terms of the GNU Library General Public
6  * License as published by the Free Software Foundation; either
7  * version 2 of the License, or (at your option) any later version.
8  *
9  * This library is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12  * Library General Public License for more details.
13  *
14  * You should have received a copy of the GNU Library General Public
15  * License along with this library; if not, write to the
16  * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
17  * Boston, MA 02110-1301, USA.
18  */
19
20 #include <gst/gst.h>
21
22 #include <gst/rtsp-server/rtsp-server.h>
23
24 static gboolean
25 remove_func (GstRTSPSessionPool * pool, GstRTSPSession * session,
26     GstRTSPServer * server)
27 {
28   return GST_RTSP_FILTER_REMOVE;
29 }
30
31 static gboolean
32 remove_sessions (GstRTSPServer * server)
33 {
34   GstRTSPSessionPool *pool;
35
36   g_print ("removing all sessions\n");
37   pool = gst_rtsp_server_get_session_pool (server);
38   gst_rtsp_session_pool_filter (pool,
39       (GstRTSPSessionPoolFilterFunc) remove_func, server);
40   g_object_unref (pool);
41
42   return FALSE;
43 }
44
45 static gboolean
46 timeout (GstRTSPServer * server)
47 {
48   GstRTSPSessionPool *pool;
49
50   pool = gst_rtsp_server_get_session_pool (server);
51   gst_rtsp_session_pool_cleanup (pool);
52   g_object_unref (pool);
53
54   return TRUE;
55 }
56
57 int
58 main (int argc, char *argv[])
59 {
60   GMainLoop *loop;
61   GstRTSPServer *server;
62   GstRTSPMountPoints *mounts;
63   GstRTSPMediaFactory *factory;
64   GstRTSPAuth *auth;
65   GstRTSPToken *token;
66   gchar *basic;
67
68   gst_init (&argc, &argv);
69
70   loop = g_main_loop_new (NULL, FALSE);
71
72   /* create a server instance */
73   server = gst_rtsp_server_new ();
74
75   /* get the mounts for this server, every server has a default mapper object
76    * that be used to map uri mount points to media factories */
77   mounts = gst_rtsp_server_get_mount_points (server);
78
79
80   /* make a media factory for a test stream. The default media factory can use
81    * gst-launch syntax to create pipelines. 
82    * any launch line works as long as it contains elements named pay%d. Each
83    * element with pay%d names will be a stream */
84   factory = gst_rtsp_media_factory_new ();
85   gst_rtsp_media_factory_set_launch (factory, "( "
86       "videotestsrc ! video/x-raw,width=352,height=288,framerate=15/1 ! "
87       "x264enc ! rtph264pay name=pay0 pt=96 "
88       "audiotestsrc ! audio/x-raw,rate=8000 ! "
89       "alawenc ! rtppcmapay name=pay1 pt=97 " ")");
90   /* attach the test factory to the /test url */
91   gst_rtsp_mount_points_add_factory (mounts, "/test", factory);
92
93   /* allow user and admin to access this resource */
94   gst_rtsp_media_factory_add_role (factory, "user",
95       GST_RTSP_PERM_MEDIA_FACTORY_ACCESS, G_TYPE_BOOLEAN, TRUE,
96       GST_RTSP_PERM_MEDIA_FACTORY_CONSTRUCT, G_TYPE_BOOLEAN, TRUE, NULL);
97   gst_rtsp_media_factory_add_role (factory, "admin",
98       GST_RTSP_PERM_MEDIA_FACTORY_ACCESS, G_TYPE_BOOLEAN, TRUE,
99       GST_RTSP_PERM_MEDIA_FACTORY_CONSTRUCT, G_TYPE_BOOLEAN, TRUE, NULL);
100   /* admin2 can look at the media but not construct so he gets a
101    * 401 Unauthorized */
102   gst_rtsp_media_factory_add_role (factory, "admin2",
103       GST_RTSP_PERM_MEDIA_FACTORY_ACCESS, G_TYPE_BOOLEAN, TRUE,
104       GST_RTSP_PERM_MEDIA_FACTORY_CONSTRUCT, G_TYPE_BOOLEAN, FALSE, NULL);
105
106   /* make another factory */
107   factory = gst_rtsp_media_factory_new ();
108   gst_rtsp_media_factory_set_launch (factory, "( "
109       "videotestsrc ! video/x-raw,width=352,height=288,framerate=30/1 ! "
110       "x264enc ! rtph264pay name=pay0 pt=96 )");
111   /* attach the test factory to the /test url */
112   gst_rtsp_mount_points_add_factory (mounts, "/test2", factory);
113
114   /* allow admin2 to access this resource */
115   /* user and admin have no permissions so they can't even see the
116    * media and get a 404 Not Found */
117   gst_rtsp_media_factory_add_role (factory, "admin2",
118       GST_RTSP_PERM_MEDIA_FACTORY_ACCESS, G_TYPE_BOOLEAN, TRUE,
119       GST_RTSP_PERM_MEDIA_FACTORY_CONSTRUCT, G_TYPE_BOOLEAN, TRUE, NULL);
120
121   /* don't need the ref to the mapper anymore */
122   g_object_unref (mounts);
123
124   /* make a new authentication manager */
125   auth = gst_rtsp_auth_new ();
126
127   /* make default token, it has the same permissions as admin2 */
128   token =
129       gst_rtsp_token_new (GST_RTSP_TOKEN_MEDIA_FACTORY_ROLE, G_TYPE_STRING,
130       "admin2", NULL);
131   gst_rtsp_auth_set_default_token (auth, token);
132   gst_rtsp_token_unref (token);
133
134   /* make user token */
135   token =
136       gst_rtsp_token_new (GST_RTSP_TOKEN_MEDIA_FACTORY_ROLE, G_TYPE_STRING,
137       "user", NULL);
138   basic = gst_rtsp_auth_make_basic ("user", "password");
139   gst_rtsp_auth_add_basic (auth, basic, token);
140   g_free (basic);
141   gst_rtsp_token_unref (token);
142
143   /* make admin token */
144   token =
145       gst_rtsp_token_new (GST_RTSP_TOKEN_MEDIA_FACTORY_ROLE, G_TYPE_STRING,
146       "admin", NULL);
147   basic = gst_rtsp_auth_make_basic ("admin", "power");
148   gst_rtsp_auth_add_basic (auth, basic, token);
149   g_free (basic);
150   gst_rtsp_token_unref (token);
151
152   /* make admin2 token */
153   token =
154       gst_rtsp_token_new (GST_RTSP_TOKEN_MEDIA_FACTORY_ROLE, G_TYPE_STRING,
155       "admin2", NULL);
156   basic = gst_rtsp_auth_make_basic ("admin2", "power2");
157   gst_rtsp_auth_add_basic (auth, basic, token);
158   g_free (basic);
159   gst_rtsp_token_unref (token);
160
161   /* set as the server authentication manager */
162   gst_rtsp_server_set_auth (server, auth);
163   g_object_unref (auth);
164
165   /* attach the server to the default maincontext */
166   if (gst_rtsp_server_attach (server, NULL) == 0)
167     goto failed;
168
169   g_timeout_add_seconds (2, (GSourceFunc) timeout, server);
170   g_timeout_add_seconds (10, (GSourceFunc) remove_sessions, server);
171
172   /* start serving */
173   g_print ("stream with user:password ready at rtsp://127.0.0.1:8554/test\n");
174   g_print ("stream with admin:power ready at rtsp://127.0.0.1:8554/test\n");
175   g_print ("stream with admin2:power2 ready at rtsp://127.0.0.1:8554/test2\n");
176   g_main_loop_run (loop);
177
178   return 0;
179
180   /* ERRORS */
181 failed:
182   {
183     g_print ("failed to attach the server\n");
184     return -1;
185   }
186 }