Subversion Repositories Kolibri OS

Rev

Blame | Last modification | View Log | RSS feed

  1. /*
  2.  * Copyright (c) 2000, 2001, 2002 Fabrice Bellard
  3.  *
  4.  * This file is part of FFmpeg.
  5.  *
  6.  * FFmpeg is free software; you can redistribute it and/or
  7.  * modify it under the terms of the GNU Lesser General Public
  8.  * License as published by the Free Software Foundation; either
  9.  * version 2.1 of the License, or (at your option) any later version.
  10.  *
  11.  * FFmpeg is distributed in the hope that it will be useful,
  12.  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14.  * Lesser General Public License for more details.
  15.  *
  16.  * You should have received a copy of the GNU Lesser General Public
  17.  * License along with FFmpeg; if not, write to the Free Software
  18.  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
  19.  */
  20.  
  21. /**
  22.  * @file
  23.  * multiple format streaming server based on the FFmpeg libraries
  24.  */
  25.  
  26. #include "config.h"
  27. #if !HAVE_CLOSESOCKET
  28. #define closesocket close
  29. #endif
  30. #include <string.h>
  31. #include <stdlib.h>
  32. #include <stdio.h>
  33. #include "libavformat/avformat.h"
  34. /* FIXME: those are internal headers, ffserver _really_ shouldn't use them */
  35. #include "libavformat/ffm.h"
  36. #include "libavformat/network.h"
  37. #include "libavformat/os_support.h"
  38. #include "libavformat/rtpdec.h"
  39. #include "libavformat/rtpproto.h"
  40. #include "libavformat/rtsp.h"
  41. #include "libavformat/rtspcodes.h"
  42. #include "libavformat/avio_internal.h"
  43. #include "libavformat/internal.h"
  44. #include "libavformat/url.h"
  45.  
  46. #include "libavutil/avassert.h"
  47. #include "libavutil/avstring.h"
  48. #include "libavutil/lfg.h"
  49. #include "libavutil/dict.h"
  50. #include "libavutil/intreadwrite.h"
  51. #include "libavutil/mathematics.h"
  52. #include "libavutil/random_seed.h"
  53. #include "libavutil/parseutils.h"
  54. #include "libavutil/opt.h"
  55. #include "libavutil/time.h"
  56.  
  57. #include <stdarg.h>
  58. #if HAVE_UNISTD_H
  59. #include <unistd.h>
  60. #endif
  61. #include <fcntl.h>
  62. #include <sys/ioctl.h>
  63. #if HAVE_POLL_H
  64. #include <poll.h>
  65. #endif
  66. #include <errno.h>
  67. #include <time.h>
  68. #include <sys/wait.h>
  69. #include <signal.h>
  70.  
  71. #include "cmdutils.h"
  72. #include "ffserver_config.h"
  73.  
  74. const char program_name[] = "ffserver";
  75. const int program_birth_year = 2000;
  76.  
  77. static const OptionDef options[];
  78.  
  79. enum HTTPState {
  80.     HTTPSTATE_WAIT_REQUEST,
  81.     HTTPSTATE_SEND_HEADER,
  82.     HTTPSTATE_SEND_DATA_HEADER,
  83.     HTTPSTATE_SEND_DATA,          /* sending TCP or UDP data */
  84.     HTTPSTATE_SEND_DATA_TRAILER,
  85.     HTTPSTATE_RECEIVE_DATA,
  86.     HTTPSTATE_WAIT_FEED,          /* wait for data from the feed */
  87.     HTTPSTATE_READY,
  88.  
  89.     RTSPSTATE_WAIT_REQUEST,
  90.     RTSPSTATE_SEND_REPLY,
  91.     RTSPSTATE_SEND_PACKET,
  92. };
  93.  
  94. static const char * const http_state[] = {
  95.     "HTTP_WAIT_REQUEST",
  96.     "HTTP_SEND_HEADER",
  97.  
  98.     "SEND_DATA_HEADER",
  99.     "SEND_DATA",
  100.     "SEND_DATA_TRAILER",
  101.     "RECEIVE_DATA",
  102.     "WAIT_FEED",
  103.     "READY",
  104.  
  105.     "RTSP_WAIT_REQUEST",
  106.     "RTSP_SEND_REPLY",
  107.     "RTSP_SEND_PACKET",
  108. };
  109.  
  110. #define IOBUFFER_INIT_SIZE 8192
  111.  
  112. /* timeouts are in ms */
  113. #define HTTP_REQUEST_TIMEOUT (15 * 1000)
  114. #define RTSP_REQUEST_TIMEOUT (3600 * 24 * 1000)
  115.  
  116. #define SYNC_TIMEOUT (10 * 1000)
  117.  
  118. typedef struct RTSPActionServerSetup {
  119.     uint32_t ipaddr;
  120.     char transport_option[512];
  121. } RTSPActionServerSetup;
  122.  
  123. typedef struct {
  124.     int64_t count1, count2;
  125.     int64_t time1, time2;
  126. } DataRateData;
  127.  
  128. /* context associated with one connection */
  129. typedef struct HTTPContext {
  130.     enum HTTPState state;
  131.     int fd; /* socket file descriptor */
  132.     struct sockaddr_in from_addr; /* origin */
  133.     struct pollfd *poll_entry; /* used when polling */
  134.     int64_t timeout;
  135.     uint8_t *buffer_ptr, *buffer_end;
  136.     int http_error;
  137.     int post;
  138.     int chunked_encoding;
  139.     int chunk_size;               /* 0 if it needs to be read */
  140.     struct HTTPContext *next;
  141.     int got_key_frame; /* stream 0 => 1, stream 1 => 2, stream 2=> 4 */
  142.     int64_t data_count;
  143.     /* feed input */
  144.     int feed_fd;
  145.     /* input format handling */
  146.     AVFormatContext *fmt_in;
  147.     int64_t start_time;            /* In milliseconds - this wraps fairly often */
  148.     int64_t first_pts;            /* initial pts value */
  149.     int64_t cur_pts;             /* current pts value from the stream in us */
  150.     int64_t cur_frame_duration;  /* duration of the current frame in us */
  151.     int cur_frame_bytes;       /* output frame size, needed to compute
  152.                                   the time at which we send each
  153.                                   packet */
  154.     int pts_stream_index;        /* stream we choose as clock reference */
  155.     int64_t cur_clock;           /* current clock reference value in us */
  156.     /* output format handling */
  157.     struct FFServerStream *stream;
  158.     /* -1 is invalid stream */
  159.     int feed_streams[FFSERVER_MAX_STREAMS]; /* index of streams in the feed */
  160.     int switch_feed_streams[FFSERVER_MAX_STREAMS]; /* index of streams in the feed */
  161.     int switch_pending;
  162.     AVFormatContext fmt_ctx; /* instance of FFServerStream for one user */
  163.     int last_packet_sent; /* true if last data packet was sent */
  164.     int suppress_log;
  165.     DataRateData datarate;
  166.     int wmp_client_id;
  167.     char protocol[16];
  168.     char method[16];
  169.     char url[128];
  170.     int buffer_size;
  171.     uint8_t *buffer;
  172.     int is_packetized; /* if true, the stream is packetized */
  173.     int packet_stream_index; /* current stream for output in state machine */
  174.  
  175.     /* RTSP state specific */
  176.     uint8_t *pb_buffer; /* XXX: use that in all the code */
  177.     AVIOContext *pb;
  178.     int seq; /* RTSP sequence number */
  179.  
  180.     /* RTP state specific */
  181.     enum RTSPLowerTransport rtp_protocol;
  182.     char session_id[32]; /* session id */
  183.     AVFormatContext *rtp_ctx[FFSERVER_MAX_STREAMS];
  184.  
  185.     /* RTP/UDP specific */
  186.     URLContext *rtp_handles[FFSERVER_MAX_STREAMS];
  187.  
  188.     /* RTP/TCP specific */
  189.     struct HTTPContext *rtsp_c;
  190.     uint8_t *packet_buffer, *packet_buffer_ptr, *packet_buffer_end;
  191. } HTTPContext;
  192.  
  193. typedef struct FeedData {
  194.     long long data_count;
  195.     float avg_frame_size;   /* frame size averaged over last frames with exponential mean */
  196. } FeedData;
  197.  
  198. static HTTPContext *first_http_ctx;
  199.  
  200. static FFServerConfig config = {
  201.     .nb_max_http_connections = 2000,
  202.     .nb_max_connections = 5,
  203.     .max_bandwidth = 1000,
  204.     .use_defaults = 1,
  205. };
  206.  
  207. static void new_connection(int server_fd, int is_rtsp);
  208. static void close_connection(HTTPContext *c);
  209.  
  210. /* HTTP handling */
  211. static int handle_connection(HTTPContext *c);
  212. static inline void print_stream_params(AVIOContext *pb, FFServerStream *stream);
  213. static void compute_status(HTTPContext *c);
  214. static int open_input_stream(HTTPContext *c, const char *info);
  215. static int http_parse_request(HTTPContext *c);
  216. static int http_send_data(HTTPContext *c);
  217. static int http_start_receive_data(HTTPContext *c);
  218. static int http_receive_data(HTTPContext *c);
  219.  
  220. /* RTSP handling */
  221. static int rtsp_parse_request(HTTPContext *c);
  222. static void rtsp_cmd_describe(HTTPContext *c, const char *url);
  223. static void rtsp_cmd_options(HTTPContext *c, const char *url);
  224. static void rtsp_cmd_setup(HTTPContext *c, const char *url,
  225.                            RTSPMessageHeader *h);
  226. static void rtsp_cmd_play(HTTPContext *c, const char *url,
  227.                           RTSPMessageHeader *h);
  228. static void rtsp_cmd_interrupt(HTTPContext *c, const char *url,
  229.                                RTSPMessageHeader *h, int pause_only);
  230.  
  231. /* SDP handling */
  232. static int prepare_sdp_description(FFServerStream *stream, uint8_t **pbuffer,
  233.                                    struct in_addr my_ip);
  234.  
  235. /* RTP handling */
  236. static HTTPContext *rtp_new_connection(struct sockaddr_in *from_addr,
  237.                                        FFServerStream *stream,
  238.                                        const char *session_id,
  239.                                        enum RTSPLowerTransport rtp_protocol);
  240. static int rtp_new_av_stream(HTTPContext *c,
  241.                              int stream_index, struct sockaddr_in *dest_addr,
  242.                              HTTPContext *rtsp_c);
  243.  
  244. static const char *my_program_name;
  245.  
  246. static int no_launch;
  247. static int need_to_start_children;
  248.  
  249. /* maximum number of simultaneous HTTP connections */
  250. static unsigned int nb_connections;
  251.  
  252. static uint64_t current_bandwidth;
  253.  
  254. /* Making this global saves on passing it around everywhere */
  255. static int64_t cur_time;
  256.  
  257. static AVLFG random_state;
  258.  
  259. static FILE *logfile = NULL;
  260.  
  261. static void htmlstrip(char *s) {
  262.     while (s && *s) {
  263.         s += strspn(s, "0123456789abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ,. ");
  264.         if (*s)
  265.             *s++ = '?';
  266.     }
  267. }
  268.  
  269. static int64_t ffm_read_write_index(int fd)
  270. {
  271.     uint8_t buf[8];
  272.  
  273.     if (lseek(fd, 8, SEEK_SET) < 0)
  274.         return AVERROR(EIO);
  275.     if (read(fd, buf, 8) != 8)
  276.         return AVERROR(EIO);
  277.     return AV_RB64(buf);
  278. }
  279.  
  280. static int ffm_write_write_index(int fd, int64_t pos)
  281. {
  282.     uint8_t buf[8];
  283.     int i;
  284.  
  285.     for(i=0;i<8;i++)
  286.         buf[i] = (pos >> (56 - i * 8)) & 0xff;
  287.     if (lseek(fd, 8, SEEK_SET) < 0)
  288.         return AVERROR(EIO);
  289.     if (write(fd, buf, 8) != 8)
  290.         return AVERROR(EIO);
  291.     return 8;
  292. }
  293.  
  294. static void ffm_set_write_index(AVFormatContext *s, int64_t pos,
  295.                                 int64_t file_size)
  296. {
  297.     FFMContext *ffm = s->priv_data;
  298.     ffm->write_index = pos;
  299.     ffm->file_size = file_size;
  300. }
  301.  
  302. static char *ctime1(char *buf2, int buf_size)
  303. {
  304.     time_t ti;
  305.     char *p;
  306.  
  307.     ti = time(NULL);
  308.     p = ctime(&ti);
  309.     av_strlcpy(buf2, p, buf_size);
  310.     p = buf2 + strlen(p) - 1;
  311.     if (*p == '\n')
  312.         *p = '\0';
  313.     return buf2;
  314. }
  315.  
  316. static void http_vlog(const char *fmt, va_list vargs)
  317. {
  318.     static int print_prefix = 1;
  319.     char buf[32];
  320.  
  321.     if (!logfile)
  322.         return;
  323.  
  324.     if (print_prefix) {
  325.         ctime1(buf, sizeof(buf));
  326.         fprintf(logfile, "%s ", buf);
  327.     }
  328.     print_prefix = strstr(fmt, "\n") != NULL;
  329.     vfprintf(logfile, fmt, vargs);
  330.     fflush(logfile);
  331. }
  332.  
  333. #ifdef __GNUC__
  334. __attribute__ ((format (printf, 1, 2)))
  335. #endif
  336. static void http_log(const char *fmt, ...)
  337. {
  338.     va_list vargs;
  339.     va_start(vargs, fmt);
  340.     http_vlog(fmt, vargs);
  341.     va_end(vargs);
  342. }
  343.  
  344. static void http_av_log(void *ptr, int level, const char *fmt, va_list vargs)
  345. {
  346.     static int print_prefix = 1;
  347.     AVClass *avc = ptr ? *(AVClass**)ptr : NULL;
  348.     if (level > av_log_get_level())
  349.         return;
  350.     if (print_prefix && avc)
  351.         http_log("[%s @ %p]", avc->item_name(ptr), ptr);
  352.     print_prefix = strstr(fmt, "\n") != NULL;
  353.     http_vlog(fmt, vargs);
  354. }
  355.  
  356. static void log_connection(HTTPContext *c)
  357. {
  358.     if (c->suppress_log)
  359.         return;
  360.  
  361.     http_log("%s - - [%s] \"%s %s\" %d %"PRId64"\n",
  362.              inet_ntoa(c->from_addr.sin_addr), c->method, c->url,
  363.              c->protocol, (c->http_error ? c->http_error : 200), c->data_count);
  364. }
  365.  
  366. static void update_datarate(DataRateData *drd, int64_t count)
  367. {
  368.     if (!drd->time1 && !drd->count1) {
  369.         drd->time1 = drd->time2 = cur_time;
  370.         drd->count1 = drd->count2 = count;
  371.     } else if (cur_time - drd->time2 > 5000) {
  372.         drd->time1 = drd->time2;
  373.         drd->count1 = drd->count2;
  374.         drd->time2 = cur_time;
  375.         drd->count2 = count;
  376.     }
  377. }
  378.  
  379. /* In bytes per second */
  380. static int compute_datarate(DataRateData *drd, int64_t count)
  381. {
  382.     if (cur_time == drd->time1)
  383.         return 0;
  384.  
  385.     return ((count - drd->count1) * 1000) / (cur_time - drd->time1);
  386. }
  387.  
  388.  
  389. static void start_children(FFServerStream *feed)
  390. {
  391.     char pathname[1024];
  392.     char *slash;
  393.     int i;
  394.  
  395.     if (no_launch)
  396.         return;
  397.  
  398.    /* replace "ffserver" with "ffmpeg" in the path of current
  399.     * program. Ignore user provided path */
  400.     av_strlcpy(pathname, my_program_name, sizeof(pathname));
  401.  
  402.     slash = strrchr(pathname, '/');
  403.     if (!slash)
  404.         slash = pathname;
  405.     else
  406.         slash++;
  407.     strcpy(slash, "ffmpeg");
  408.  
  409.     for (; feed; feed = feed->next) {
  410.  
  411.         if (!feed->child_argv || feed->pid)
  412.             continue;
  413.  
  414.         feed->pid_start = time(0);
  415.  
  416.         feed->pid = fork();
  417.         if (feed->pid < 0) {
  418.             http_log("Unable to create children\n");
  419.             exit(1);
  420.         }
  421.  
  422.         if (feed->pid)
  423.             continue;
  424.  
  425.         /* In child */
  426.  
  427.         http_log("Launch command line: ");
  428.         http_log("%s ", pathname);
  429.  
  430.         for (i = 1; feed->child_argv[i] && feed->child_argv[i][0]; i++)
  431.             http_log("%s ", feed->child_argv[i]);
  432.         http_log("\n");
  433.  
  434.         for (i = 3; i < 256; i++)
  435.             close(i);
  436.  
  437.         if (!config.debug) {
  438.             if (!freopen("/dev/null", "r", stdin))
  439.                 http_log("failed to redirect STDIN to /dev/null\n;");
  440.             if (!freopen("/dev/null", "w", stdout))
  441.                 http_log("failed to redirect STDOUT to /dev/null\n;");
  442.             if (!freopen("/dev/null", "w", stderr))
  443.                 http_log("failed to redirect STDERR to /dev/null\n;");
  444.         }
  445.  
  446.         signal(SIGPIPE, SIG_DFL);
  447.         execvp(pathname, feed->child_argv);
  448.         _exit(1);
  449.     }
  450. }
  451.  
  452. /* open a listening socket */
  453. static int socket_open_listen(struct sockaddr_in *my_addr)
  454. {
  455.     int server_fd, tmp;
  456.  
  457.     server_fd = socket(AF_INET,SOCK_STREAM,0);
  458.     if (server_fd < 0) {
  459.         perror ("socket");
  460.         return -1;
  461.     }
  462.  
  463.     tmp = 1;
  464.     if (setsockopt(server_fd, SOL_SOCKET, SO_REUSEADDR, &tmp, sizeof(tmp)))
  465.         av_log(NULL, AV_LOG_WARNING, "setsockopt SO_REUSEADDR failed\n");
  466.  
  467.     my_addr->sin_family = AF_INET;
  468.     if (bind (server_fd, (struct sockaddr *) my_addr, sizeof (*my_addr)) < 0) {
  469.         char bindmsg[32];
  470.         snprintf(bindmsg, sizeof(bindmsg), "bind(port %d)",
  471.                  ntohs(my_addr->sin_port));
  472.         perror (bindmsg);
  473.         closesocket(server_fd);
  474.         return -1;
  475.     }
  476.  
  477.     if (listen (server_fd, 5) < 0) {
  478.         perror ("listen");
  479.         closesocket(server_fd);
  480.         return -1;
  481.     }
  482.  
  483.     if (ff_socket_nonblock(server_fd, 1) < 0)
  484.         av_log(NULL, AV_LOG_WARNING, "ff_socket_nonblock failed\n");
  485.  
  486.     return server_fd;
  487. }
  488.  
  489. /* start all multicast streams */
  490. static void start_multicast(void)
  491. {
  492.     FFServerStream *stream;
  493.     char session_id[32];
  494.     HTTPContext *rtp_c;
  495.     struct sockaddr_in dest_addr = {0};
  496.     int default_port, stream_index;
  497.     unsigned int random0, random1;
  498.  
  499.     default_port = 6000;
  500.     for(stream = config.first_stream; stream; stream = stream->next) {
  501.  
  502.         if (!stream->is_multicast)
  503.             continue;
  504.  
  505.         random0 = av_lfg_get(&random_state);
  506.         random1 = av_lfg_get(&random_state);
  507.  
  508.         /* open the RTP connection */
  509.         snprintf(session_id, sizeof(session_id), "%08x%08x", random0, random1);
  510.  
  511.         /* choose a port if none given */
  512.         if (stream->multicast_port == 0) {
  513.             stream->multicast_port = default_port;
  514.             default_port += 100;
  515.         }
  516.  
  517.         dest_addr.sin_family = AF_INET;
  518.         dest_addr.sin_addr = stream->multicast_ip;
  519.         dest_addr.sin_port = htons(stream->multicast_port);
  520.  
  521.         rtp_c = rtp_new_connection(&dest_addr, stream, session_id,
  522.                                    RTSP_LOWER_TRANSPORT_UDP_MULTICAST);
  523.         if (!rtp_c)
  524.             continue;
  525.  
  526.         if (open_input_stream(rtp_c, "") < 0) {
  527.             http_log("Could not open input stream for stream '%s'\n",
  528.                      stream->filename);
  529.             continue;
  530.         }
  531.  
  532.         /* open each RTP stream */
  533.         for(stream_index = 0; stream_index < stream->nb_streams;
  534.             stream_index++) {
  535.             dest_addr.sin_port = htons(stream->multicast_port +
  536.                                        2 * stream_index);
  537.             if (rtp_new_av_stream(rtp_c, stream_index, &dest_addr, NULL) >= 0)
  538.                 continue;
  539.  
  540.             http_log("Could not open output stream '%s/streamid=%d'\n",
  541.                      stream->filename, stream_index);
  542.             exit(1);
  543.         }
  544.  
  545.         rtp_c->state = HTTPSTATE_SEND_DATA;
  546.     }
  547. }
  548.  
  549. /* main loop of the HTTP server */
  550. static int http_server(void)
  551. {
  552.     int server_fd = 0, rtsp_server_fd = 0;
  553.     int ret, delay;
  554.     struct pollfd *poll_table, *poll_entry;
  555.     HTTPContext *c, *c_next;
  556.  
  557.     poll_table = av_mallocz_array(config.nb_max_http_connections + 2,
  558.                                   sizeof(*poll_table));
  559.     if(!poll_table) {
  560.         http_log("Impossible to allocate a poll table handling %d "
  561.                  "connections.\n", config.nb_max_http_connections);
  562.         return -1;
  563.     }
  564.  
  565.     if (config.http_addr.sin_port) {
  566.         server_fd = socket_open_listen(&config.http_addr);
  567.         if (server_fd < 0) {
  568.             av_free(poll_table);
  569.             return -1;
  570.         }
  571.     }
  572.  
  573.     if (config.rtsp_addr.sin_port) {
  574.         rtsp_server_fd = socket_open_listen(&config.rtsp_addr);
  575.         if (rtsp_server_fd < 0) {
  576.             av_free(poll_table);
  577.             closesocket(server_fd);
  578.             return -1;
  579.         }
  580.     }
  581.  
  582.     if (!rtsp_server_fd && !server_fd) {
  583.         http_log("HTTP and RTSP disabled.\n");
  584.         av_free(poll_table);
  585.         return -1;
  586.     }
  587.  
  588.     http_log("FFserver started.\n");
  589.  
  590.     start_children(config.first_feed);
  591.  
  592.     start_multicast();
  593.  
  594.     for(;;) {
  595.         poll_entry = poll_table;
  596.         if (server_fd) {
  597.             poll_entry->fd = server_fd;
  598.             poll_entry->events = POLLIN;
  599.             poll_entry++;
  600.         }
  601.         if (rtsp_server_fd) {
  602.             poll_entry->fd = rtsp_server_fd;
  603.             poll_entry->events = POLLIN;
  604.             poll_entry++;
  605.         }
  606.  
  607.         /* wait for events on each HTTP handle */
  608.         c = first_http_ctx;
  609.         delay = 1000;
  610.         while (c) {
  611.             int fd;
  612.             fd = c->fd;
  613.             switch(c->state) {
  614.             case HTTPSTATE_SEND_HEADER:
  615.             case RTSPSTATE_SEND_REPLY:
  616.             case RTSPSTATE_SEND_PACKET:
  617.                 c->poll_entry = poll_entry;
  618.                 poll_entry->fd = fd;
  619.                 poll_entry->events = POLLOUT;
  620.                 poll_entry++;
  621.                 break;
  622.             case HTTPSTATE_SEND_DATA_HEADER:
  623.             case HTTPSTATE_SEND_DATA:
  624.             case HTTPSTATE_SEND_DATA_TRAILER:
  625.                 if (!c->is_packetized) {
  626.                     /* for TCP, we output as much as we can
  627.                      * (may need to put a limit) */
  628.                     c->poll_entry = poll_entry;
  629.                     poll_entry->fd = fd;
  630.                     poll_entry->events = POLLOUT;
  631.                     poll_entry++;
  632.                 } else {
  633.                     /* when ffserver is doing the timing, we work by
  634.                      * looking at which packet needs to be sent every
  635.                      * 10 ms (one tick wait XXX: 10 ms assumed) */
  636.                     if (delay > 10)
  637.                         delay = 10;
  638.                 }
  639.                 break;
  640.             case HTTPSTATE_WAIT_REQUEST:
  641.             case HTTPSTATE_RECEIVE_DATA:
  642.             case HTTPSTATE_WAIT_FEED:
  643.             case RTSPSTATE_WAIT_REQUEST:
  644.                 /* need to catch errors */
  645.                 c->poll_entry = poll_entry;
  646.                 poll_entry->fd = fd;
  647.                 poll_entry->events = POLLIN;/* Maybe this will work */
  648.                 poll_entry++;
  649.                 break;
  650.             default:
  651.                 c->poll_entry = NULL;
  652.                 break;
  653.             }
  654.             c = c->next;
  655.         }
  656.  
  657.         /* wait for an event on one connection. We poll at least every
  658.          * second to handle timeouts */
  659.         do {
  660.             ret = poll(poll_table, poll_entry - poll_table, delay);
  661.             if (ret < 0 && ff_neterrno() != AVERROR(EAGAIN) &&
  662.                 ff_neterrno() != AVERROR(EINTR)) {
  663.                 av_free(poll_table);
  664.                 return -1;
  665.             }
  666.         } while (ret < 0);
  667.  
  668.         cur_time = av_gettime() / 1000;
  669.  
  670.         if (need_to_start_children) {
  671.             need_to_start_children = 0;
  672.             start_children(config.first_feed);
  673.         }
  674.  
  675.         /* now handle the events */
  676.         for(c = first_http_ctx; c; c = c_next) {
  677.             c_next = c->next;
  678.             if (handle_connection(c) < 0) {
  679.                 log_connection(c);
  680.                 /* close and free the connection */
  681.                 close_connection(c);
  682.             }
  683.         }
  684.  
  685.         poll_entry = poll_table;
  686.         if (server_fd) {
  687.             /* new HTTP connection request ? */
  688.             if (poll_entry->revents & POLLIN)
  689.                 new_connection(server_fd, 0);
  690.             poll_entry++;
  691.         }
  692.         if (rtsp_server_fd) {
  693.             /* new RTSP connection request ? */
  694.             if (poll_entry->revents & POLLIN)
  695.                 new_connection(rtsp_server_fd, 1);
  696.         }
  697.     }
  698. }
  699.  
  700. /* start waiting for a new HTTP/RTSP request */
  701. static void start_wait_request(HTTPContext *c, int is_rtsp)
  702. {
  703.     c->buffer_ptr = c->buffer;
  704.     c->buffer_end = c->buffer + c->buffer_size - 1; /* leave room for '\0' */
  705.  
  706.     c->state = is_rtsp ? RTSPSTATE_WAIT_REQUEST : HTTPSTATE_WAIT_REQUEST;
  707.     c->timeout = cur_time +
  708.                  (is_rtsp ? RTSP_REQUEST_TIMEOUT : HTTP_REQUEST_TIMEOUT);
  709. }
  710.  
  711. static void http_send_too_busy_reply(int fd)
  712. {
  713.     char buffer[400];
  714.     int len = snprintf(buffer, sizeof(buffer),
  715.                        "HTTP/1.0 503 Server too busy\r\n"
  716.                        "Content-type: text/html\r\n"
  717.                        "\r\n"
  718.                        "<html><head><title>Too busy</title></head><body>\r\n"
  719.                        "<p>The server is too busy to serve your request at this time.</p>\r\n"
  720.                        "<p>The number of current connections is %u, and this exceeds the limit of %u.</p>\r\n"
  721.                        "</body></html>\r\n",
  722.                        nb_connections, config.nb_max_connections);
  723.     av_assert0(len < sizeof(buffer));
  724.     if (send(fd, buffer, len, 0) < len)
  725.         av_log(NULL, AV_LOG_WARNING,
  726.                "Could not send too-busy reply, send() failed\n");
  727. }
  728.  
  729.  
  730. static void new_connection(int server_fd, int is_rtsp)
  731. {
  732.     struct sockaddr_in from_addr;
  733.     socklen_t len;
  734.     int fd;
  735.     HTTPContext *c = NULL;
  736.  
  737.     len = sizeof(from_addr);
  738.     fd = accept(server_fd, (struct sockaddr *)&from_addr,
  739.                 &len);
  740.     if (fd < 0) {
  741.         http_log("error during accept %s\n", strerror(errno));
  742.         return;
  743.     }
  744.     if (ff_socket_nonblock(fd, 1) < 0)
  745.         av_log(NULL, AV_LOG_WARNING, "ff_socket_nonblock failed\n");
  746.  
  747.     if (nb_connections >= config.nb_max_connections) {
  748.         http_send_too_busy_reply(fd);
  749.         goto fail;
  750.     }
  751.  
  752.     /* add a new connection */
  753.     c = av_mallocz(sizeof(HTTPContext));
  754.     if (!c)
  755.         goto fail;
  756.  
  757.     c->fd = fd;
  758.     c->poll_entry = NULL;
  759.     c->from_addr = from_addr;
  760.     c->buffer_size = IOBUFFER_INIT_SIZE;
  761.     c->buffer = av_malloc(c->buffer_size);
  762.     if (!c->buffer)
  763.         goto fail;
  764.  
  765.     c->next = first_http_ctx;
  766.     first_http_ctx = c;
  767.     nb_connections++;
  768.  
  769.     start_wait_request(c, is_rtsp);
  770.  
  771.     return;
  772.  
  773.  fail:
  774.     if (c) {
  775.         av_freep(&c->buffer);
  776.         av_free(c);
  777.     }
  778.     closesocket(fd);
  779. }
  780.  
  781. static void close_connection(HTTPContext *c)
  782. {
  783.     HTTPContext **cp, *c1;
  784.     int i, nb_streams;
  785.     AVFormatContext *ctx;
  786.     AVStream *st;
  787.  
  788.     /* remove connection from list */
  789.     cp = &first_http_ctx;
  790.     while (*cp) {
  791.         c1 = *cp;
  792.         if (c1 == c)
  793.             *cp = c->next;
  794.         else
  795.             cp = &c1->next;
  796.     }
  797.  
  798.     /* remove references, if any (XXX: do it faster) */
  799.     for(c1 = first_http_ctx; c1; c1 = c1->next) {
  800.         if (c1->rtsp_c == c)
  801.             c1->rtsp_c = NULL;
  802.     }
  803.  
  804.     /* remove connection associated resources */
  805.     if (c->fd >= 0)
  806.         closesocket(c->fd);
  807.     if (c->fmt_in) {
  808.         /* close each frame parser */
  809.         for(i=0;i<c->fmt_in->nb_streams;i++) {
  810.             st = c->fmt_in->streams[i];
  811.             if (st->codec->codec)
  812.                 avcodec_close(st->codec);
  813.         }
  814.         avformat_close_input(&c->fmt_in);
  815.     }
  816.  
  817.     /* free RTP output streams if any */
  818.     nb_streams = 0;
  819.     if (c->stream)
  820.         nb_streams = c->stream->nb_streams;
  821.  
  822.     for(i=0;i<nb_streams;i++) {
  823.         ctx = c->rtp_ctx[i];
  824.         if (ctx) {
  825.             av_write_trailer(ctx);
  826.             av_dict_free(&ctx->metadata);
  827.             av_freep(&ctx->streams[0]);
  828.             av_freep(&ctx);
  829.         }
  830.         ffurl_close(c->rtp_handles[i]);
  831.     }
  832.  
  833.     ctx = &c->fmt_ctx;
  834.  
  835.     if (!c->last_packet_sent && c->state == HTTPSTATE_SEND_DATA_TRAILER) {
  836.         /* prepare header */
  837.         if (ctx->oformat && avio_open_dyn_buf(&ctx->pb) >= 0) {
  838.             av_write_trailer(ctx);
  839.             av_freep(&c->pb_buffer);
  840.             avio_close_dyn_buf(ctx->pb, &c->pb_buffer);
  841.         }
  842.     }
  843.  
  844.     for(i=0; i<ctx->nb_streams; i++)
  845.         av_freep(&ctx->streams[i]);
  846.     av_freep(&ctx->streams);
  847.     av_freep(&ctx->priv_data);
  848.  
  849.     if (c->stream && !c->post && c->stream->stream_type == STREAM_TYPE_LIVE)
  850.         current_bandwidth -= c->stream->bandwidth;
  851.  
  852.     /* signal that there is no feed if we are the feeder socket */
  853.     if (c->state == HTTPSTATE_RECEIVE_DATA && c->stream) {
  854.         c->stream->feed_opened = 0;
  855.         close(c->feed_fd);
  856.     }
  857.  
  858.     av_freep(&c->pb_buffer);
  859.     av_freep(&c->packet_buffer);
  860.     av_freep(&c->buffer);
  861.     av_free(c);
  862.     nb_connections--;
  863. }
  864.  
  865. static int handle_connection(HTTPContext *c)
  866. {
  867.     int len, ret;
  868.     uint8_t *ptr;
  869.  
  870.     switch(c->state) {
  871.     case HTTPSTATE_WAIT_REQUEST:
  872.     case RTSPSTATE_WAIT_REQUEST:
  873.         /* timeout ? */
  874.         if ((c->timeout - cur_time) < 0)
  875.             return -1;
  876.         if (c->poll_entry->revents & (POLLERR | POLLHUP))
  877.             return -1;
  878.  
  879.         /* no need to read if no events */
  880.         if (!(c->poll_entry->revents & POLLIN))
  881.             return 0;
  882.         /* read the data */
  883.     read_loop:
  884.         if (!(len = recv(c->fd, c->buffer_ptr, 1, 0)))
  885.             return -1;
  886.  
  887.         if (len < 0) {
  888.             if (ff_neterrno() != AVERROR(EAGAIN) &&
  889.                 ff_neterrno() != AVERROR(EINTR))
  890.                 return -1;
  891.             break;
  892.         }
  893.         /* search for end of request. */
  894.         c->buffer_ptr += len;
  895.         ptr = c->buffer_ptr;
  896.         if ((ptr >= c->buffer + 2 && !memcmp(ptr-2, "\n\n", 2)) ||
  897.             (ptr >= c->buffer + 4 && !memcmp(ptr-4, "\r\n\r\n", 4))) {
  898.             /* request found : parse it and reply */
  899.             if (c->state == HTTPSTATE_WAIT_REQUEST)
  900.                 ret = http_parse_request(c);
  901.             else
  902.                 ret = rtsp_parse_request(c);
  903.  
  904.             if (ret < 0)
  905.                 return -1;
  906.         } else if (ptr >= c->buffer_end) {
  907.             /* request too long: cannot do anything */
  908.             return -1;
  909.         } else goto read_loop;
  910.  
  911.         break;
  912.  
  913.     case HTTPSTATE_SEND_HEADER:
  914.         if (c->poll_entry->revents & (POLLERR | POLLHUP))
  915.             return -1;
  916.  
  917.         /* no need to write if no events */
  918.         if (!(c->poll_entry->revents & POLLOUT))
  919.             return 0;
  920.         len = send(c->fd, c->buffer_ptr, c->buffer_end - c->buffer_ptr, 0);
  921.         if (len < 0) {
  922.             if (ff_neterrno() != AVERROR(EAGAIN) &&
  923.                 ff_neterrno() != AVERROR(EINTR)) {
  924.                 goto close_connection;
  925.             }
  926.             break;
  927.         }
  928.         c->buffer_ptr += len;
  929.         if (c->stream)
  930.             c->stream->bytes_served += len;
  931.         c->data_count += len;
  932.         if (c->buffer_ptr >= c->buffer_end) {
  933.             av_freep(&c->pb_buffer);
  934.             /* if error, exit */
  935.             if (c->http_error)
  936.                 return -1;
  937.             /* all the buffer was sent : synchronize to the incoming
  938.              * stream */
  939.             c->state = HTTPSTATE_SEND_DATA_HEADER;
  940.             c->buffer_ptr = c->buffer_end = c->buffer;
  941.         }
  942.         break;
  943.  
  944.     case HTTPSTATE_SEND_DATA:
  945.     case HTTPSTATE_SEND_DATA_HEADER:
  946.     case HTTPSTATE_SEND_DATA_TRAILER:
  947.         /* for packetized output, we consider we can always write (the
  948.          * input streams set the speed). It may be better to verify
  949.          * that we do not rely too much on the kernel queues */
  950.         if (!c->is_packetized) {
  951.             if (c->poll_entry->revents & (POLLERR | POLLHUP))
  952.                 return -1;
  953.  
  954.             /* no need to read if no events */
  955.             if (!(c->poll_entry->revents & POLLOUT))
  956.                 return 0;
  957.         }
  958.         if (http_send_data(c) < 0)
  959.             return -1;
  960.         /* close connection if trailer sent */
  961.         if (c->state == HTTPSTATE_SEND_DATA_TRAILER)
  962.             return -1;
  963.         /* Check if it is a single jpeg frame 123 */
  964.         if (c->stream->single_frame && c->data_count > c->cur_frame_bytes && c->cur_frame_bytes > 0) {
  965.             close_connection(c);
  966.         }
  967.         break;
  968.     case HTTPSTATE_RECEIVE_DATA:
  969.         /* no need to read if no events */
  970.         if (c->poll_entry->revents & (POLLERR | POLLHUP))
  971.             return -1;
  972.         if (!(c->poll_entry->revents & POLLIN))
  973.             return 0;
  974.         if (http_receive_data(c) < 0)
  975.             return -1;
  976.         break;
  977.     case HTTPSTATE_WAIT_FEED:
  978.         /* no need to read if no events */
  979.         if (c->poll_entry->revents & (POLLIN | POLLERR | POLLHUP))
  980.             return -1;
  981.  
  982.         /* nothing to do, we'll be waken up by incoming feed packets */
  983.         break;
  984.  
  985.     case RTSPSTATE_SEND_REPLY:
  986.         if (c->poll_entry->revents & (POLLERR | POLLHUP))
  987.             goto close_connection;
  988.         /* no need to write if no events */
  989.         if (!(c->poll_entry->revents & POLLOUT))
  990.             return 0;
  991.         len = send(c->fd, c->buffer_ptr, c->buffer_end - c->buffer_ptr, 0);
  992.         if (len < 0) {
  993.             if (ff_neterrno() != AVERROR(EAGAIN) &&
  994.                 ff_neterrno() != AVERROR(EINTR)) {
  995.                 goto close_connection;
  996.             }
  997.             break;
  998.         }
  999.         c->buffer_ptr += len;
  1000.         c->data_count += len;
  1001.         if (c->buffer_ptr >= c->buffer_end) {
  1002.             /* all the buffer was sent : wait for a new request */
  1003.             av_freep(&c->pb_buffer);
  1004.             start_wait_request(c, 1);
  1005.         }
  1006.         break;
  1007.     case RTSPSTATE_SEND_PACKET:
  1008.         if (c->poll_entry->revents & (POLLERR | POLLHUP)) {
  1009.             av_freep(&c->packet_buffer);
  1010.             return -1;
  1011.         }
  1012.         /* no need to write if no events */
  1013.         if (!(c->poll_entry->revents & POLLOUT))
  1014.             return 0;
  1015.         len = send(c->fd, c->packet_buffer_ptr,
  1016.                     c->packet_buffer_end - c->packet_buffer_ptr, 0);
  1017.         if (len < 0) {
  1018.             if (ff_neterrno() != AVERROR(EAGAIN) &&
  1019.                 ff_neterrno() != AVERROR(EINTR)) {
  1020.                 /* error : close connection */
  1021.                 av_freep(&c->packet_buffer);
  1022.                 return -1;
  1023.             }
  1024.             break;
  1025.         }
  1026.         c->packet_buffer_ptr += len;
  1027.         if (c->packet_buffer_ptr >= c->packet_buffer_end) {
  1028.             /* all the buffer was sent : wait for a new request */
  1029.             av_freep(&c->packet_buffer);
  1030.             c->state = RTSPSTATE_WAIT_REQUEST;
  1031.         }
  1032.         break;
  1033.     case HTTPSTATE_READY:
  1034.         /* nothing to do */
  1035.         break;
  1036.     default:
  1037.         return -1;
  1038.     }
  1039.     return 0;
  1040.  
  1041. close_connection:
  1042.     av_freep(&c->pb_buffer);
  1043.     return -1;
  1044. }
  1045.  
  1046. static int extract_rates(char *rates, int ratelen, const char *request)
  1047. {
  1048.     const char *p;
  1049.  
  1050.     for (p = request; *p && *p != '\r' && *p != '\n'; ) {
  1051.         if (av_strncasecmp(p, "Pragma:", 7) == 0) {
  1052.             const char *q = p + 7;
  1053.  
  1054.             while (*q && *q != '\n' && av_isspace(*q))
  1055.                 q++;
  1056.  
  1057.             if (av_strncasecmp(q, "stream-switch-entry=", 20) == 0) {
  1058.                 int stream_no;
  1059.                 int rate_no;
  1060.  
  1061.                 q += 20;
  1062.  
  1063.                 memset(rates, 0xff, ratelen);
  1064.  
  1065.                 while (1) {
  1066.                     while (*q && *q != '\n' && *q != ':')
  1067.                         q++;
  1068.  
  1069.                     if (sscanf(q, ":%d:%d", &stream_no, &rate_no) != 2)
  1070.                         break;
  1071.  
  1072.                     stream_no--;
  1073.                     if (stream_no < ratelen && stream_no >= 0)
  1074.                         rates[stream_no] = rate_no;
  1075.  
  1076.                     while (*q && *q != '\n' && !av_isspace(*q))
  1077.                         q++;
  1078.                 }
  1079.  
  1080.                 return 1;
  1081.             }
  1082.         }
  1083.         p = strchr(p, '\n');
  1084.         if (!p)
  1085.             break;
  1086.  
  1087.         p++;
  1088.     }
  1089.  
  1090.     return 0;
  1091. }
  1092.  
  1093. static int find_stream_in_feed(FFServerStream *feed, AVCodecContext *codec,
  1094.                                int bit_rate)
  1095. {
  1096.     int i;
  1097.     int best_bitrate = 100000000;
  1098.     int best = -1;
  1099.  
  1100.     for (i = 0; i < feed->nb_streams; i++) {
  1101.         AVCodecContext *feed_codec = feed->streams[i]->codec;
  1102.  
  1103.         if (feed_codec->codec_id != codec->codec_id ||
  1104.             feed_codec->sample_rate != codec->sample_rate ||
  1105.             feed_codec->width != codec->width ||
  1106.             feed_codec->height != codec->height)
  1107.             continue;
  1108.  
  1109.         /* Potential stream */
  1110.  
  1111.         /* We want the fastest stream less than bit_rate, or the slowest
  1112.          * faster than bit_rate
  1113.          */
  1114.  
  1115.         if (feed_codec->bit_rate <= bit_rate) {
  1116.             if (best_bitrate > bit_rate ||
  1117.                 feed_codec->bit_rate > best_bitrate) {
  1118.                 best_bitrate = feed_codec->bit_rate;
  1119.                 best = i;
  1120.             }
  1121.             continue;
  1122.         }
  1123.         if (feed_codec->bit_rate < best_bitrate) {
  1124.             best_bitrate = feed_codec->bit_rate;
  1125.             best = i;
  1126.         }
  1127.     }
  1128.     return best;
  1129. }
  1130.  
  1131. static int modify_current_stream(HTTPContext *c, char *rates)
  1132. {
  1133.     int i;
  1134.     FFServerStream *req = c->stream;
  1135.     int action_required = 0;
  1136.  
  1137.     /* Not much we can do for a feed */
  1138.     if (!req->feed)
  1139.         return 0;
  1140.  
  1141.     for (i = 0; i < req->nb_streams; i++) {
  1142.         AVCodecContext *codec = req->streams[i]->codec;
  1143.  
  1144.         switch(rates[i]) {
  1145.             case 0:
  1146.                 c->switch_feed_streams[i] = req->feed_streams[i];
  1147.                 break;
  1148.             case 1:
  1149.                 c->switch_feed_streams[i] = find_stream_in_feed(req->feed, codec, codec->bit_rate / 2);
  1150.                 break;
  1151.             case 2:
  1152.                 /* Wants off or slow */
  1153.                 c->switch_feed_streams[i] = find_stream_in_feed(req->feed, codec, codec->bit_rate / 4);
  1154. #ifdef WANTS_OFF
  1155.                 /* This doesn't work well when it turns off the only stream! */
  1156.                 c->switch_feed_streams[i] = -2;
  1157.                 c->feed_streams[i] = -2;
  1158. #endif
  1159.                 break;
  1160.         }
  1161.  
  1162.         if (c->switch_feed_streams[i] >= 0 &&
  1163.             c->switch_feed_streams[i] != c->feed_streams[i]) {
  1164.             action_required = 1;
  1165.         }
  1166.     }
  1167.  
  1168.     return action_required;
  1169. }
  1170.  
  1171. static void get_word(char *buf, int buf_size, const char **pp)
  1172. {
  1173.     const char *p;
  1174.     char *q;
  1175.  
  1176.     p = *pp;
  1177.     p += strspn(p, SPACE_CHARS);
  1178.     q = buf;
  1179.     while (!av_isspace(*p) && *p != '\0') {
  1180.         if ((q - buf) < buf_size - 1)
  1181.             *q++ = *p;
  1182.         p++;
  1183.     }
  1184.     if (buf_size > 0)
  1185.         *q = '\0';
  1186.     *pp = p;
  1187. }
  1188.  
  1189. static FFServerIPAddressACL* parse_dynamic_acl(FFServerStream *stream,
  1190.                                                HTTPContext *c)
  1191. {
  1192.     FILE* f;
  1193.     char line[1024];
  1194.     char  cmd[1024];
  1195.     FFServerIPAddressACL *acl = NULL;
  1196.     int line_num = 0;
  1197.     const char *p;
  1198.  
  1199.     f = fopen(stream->dynamic_acl, "r");
  1200.     if (!f) {
  1201.         perror(stream->dynamic_acl);
  1202.         return NULL;
  1203.     }
  1204.  
  1205.     acl = av_mallocz(sizeof(FFServerIPAddressACL));
  1206.     if (!acl) {
  1207.         fclose(f);
  1208.         return NULL;
  1209.     }
  1210.  
  1211.     /* Build ACL */
  1212.     while (fgets(line, sizeof(line), f)) {
  1213.         line_num++;
  1214.         p = line;
  1215.         while (av_isspace(*p))
  1216.             p++;
  1217.         if (*p == '\0' || *p == '#')
  1218.             continue;
  1219.         ffserver_get_arg(cmd, sizeof(cmd), &p);
  1220.  
  1221.         if (!av_strcasecmp(cmd, "ACL"))
  1222.             ffserver_parse_acl_row(NULL, NULL, acl, p, stream->dynamic_acl,
  1223.                                    line_num);
  1224.     }
  1225.     fclose(f);
  1226.     return acl;
  1227. }
  1228.  
  1229.  
  1230. static void free_acl_list(FFServerIPAddressACL *in_acl)
  1231. {
  1232.     FFServerIPAddressACL *pacl, *pacl2;
  1233.  
  1234.     pacl = in_acl;
  1235.     while(pacl) {
  1236.         pacl2 = pacl;
  1237.         pacl = pacl->next;
  1238.         av_freep(pacl2);
  1239.     }
  1240. }
  1241.  
  1242. static int validate_acl_list(FFServerIPAddressACL *in_acl, HTTPContext *c)
  1243. {
  1244.     enum FFServerIPAddressAction last_action = IP_DENY;
  1245.     FFServerIPAddressACL *acl;
  1246.     struct in_addr *src = &c->from_addr.sin_addr;
  1247.     unsigned long src_addr = src->s_addr;
  1248.  
  1249.     for (acl = in_acl; acl; acl = acl->next) {
  1250.         if (src_addr >= acl->first.s_addr && src_addr <= acl->last.s_addr)
  1251.             return (acl->action == IP_ALLOW) ? 1 : 0;
  1252.         last_action = acl->action;
  1253.     }
  1254.  
  1255.     /* Nothing matched, so return not the last action */
  1256.     return (last_action == IP_DENY) ? 1 : 0;
  1257. }
  1258.  
  1259. static int validate_acl(FFServerStream *stream, HTTPContext *c)
  1260. {
  1261.     int ret = 0;
  1262.     FFServerIPAddressACL *acl;
  1263.  
  1264.     /* if stream->acl is null validate_acl_list will return 1 */
  1265.     ret = validate_acl_list(stream->acl, c);
  1266.  
  1267.     if (stream->dynamic_acl[0]) {
  1268.         acl = parse_dynamic_acl(stream, c);
  1269.         ret = validate_acl_list(acl, c);
  1270.         free_acl_list(acl);
  1271.     }
  1272.  
  1273.     return ret;
  1274. }
  1275.  
  1276. /**
  1277.  * compute the real filename of a file by matching it without its
  1278.  * extensions to all the stream's filenames
  1279.  */
  1280. static void compute_real_filename(char *filename, int max_size)
  1281. {
  1282.     char file1[1024];
  1283.     char file2[1024];
  1284.     char *p;
  1285.     FFServerStream *stream;
  1286.  
  1287.     /* compute filename by matching without the file extensions */
  1288.     av_strlcpy(file1, filename, sizeof(file1));
  1289.     p = strrchr(file1, '.');
  1290.     if (p)
  1291.         *p = '\0';
  1292.     for(stream = config.first_stream; stream; stream = stream->next) {
  1293.         av_strlcpy(file2, stream->filename, sizeof(file2));
  1294.         p = strrchr(file2, '.');
  1295.         if (p)
  1296.             *p = '\0';
  1297.         if (!strcmp(file1, file2)) {
  1298.             av_strlcpy(filename, stream->filename, max_size);
  1299.             break;
  1300.         }
  1301.     }
  1302. }
  1303.  
  1304. enum RedirType {
  1305.     REDIR_NONE,
  1306.     REDIR_ASX,
  1307.     REDIR_RAM,
  1308.     REDIR_ASF,
  1309.     REDIR_RTSP,
  1310.     REDIR_SDP,
  1311. };
  1312.  
  1313. /* parse HTTP request and prepare header */
  1314. static int http_parse_request(HTTPContext *c)
  1315. {
  1316.     const char *p;
  1317.     char *p1;
  1318.     enum RedirType redir_type;
  1319.     char cmd[32];
  1320.     char info[1024], filename[1024];
  1321.     char url[1024], *q;
  1322.     char protocol[32];
  1323.     char msg[1024];
  1324.     const char *mime_type;
  1325.     FFServerStream *stream;
  1326.     int i;
  1327.     char ratebuf[32];
  1328.     const char *useragent = 0;
  1329.  
  1330.     p = c->buffer;
  1331.     get_word(cmd, sizeof(cmd), &p);
  1332.     av_strlcpy(c->method, cmd, sizeof(c->method));
  1333.  
  1334.     if (!strcmp(cmd, "GET"))
  1335.         c->post = 0;
  1336.     else if (!strcmp(cmd, "POST"))
  1337.         c->post = 1;
  1338.     else
  1339.         return -1;
  1340.  
  1341.     get_word(url, sizeof(url), &p);
  1342.     av_strlcpy(c->url, url, sizeof(c->url));
  1343.  
  1344.     get_word(protocol, sizeof(protocol), (const char **)&p);
  1345.     if (strcmp(protocol, "HTTP/1.0") && strcmp(protocol, "HTTP/1.1"))
  1346.         return -1;
  1347.  
  1348.     av_strlcpy(c->protocol, protocol, sizeof(c->protocol));
  1349.  
  1350.     if (config.debug)
  1351.         http_log("%s - - New connection: %s %s\n",
  1352.                  inet_ntoa(c->from_addr.sin_addr), cmd, url);
  1353.  
  1354.     /* find the filename and the optional info string in the request */
  1355.     p1 = strchr(url, '?');
  1356.     if (p1) {
  1357.         av_strlcpy(info, p1, sizeof(info));
  1358.         *p1 = '\0';
  1359.     } else
  1360.         info[0] = '\0';
  1361.  
  1362.     av_strlcpy(filename, url + ((*url == '/') ? 1 : 0), sizeof(filename)-1);
  1363.  
  1364.     for (p = c->buffer; *p && *p != '\r' && *p != '\n'; ) {
  1365.         if (av_strncasecmp(p, "User-Agent:", 11) == 0) {
  1366.             useragent = p + 11;
  1367.             if (*useragent && *useragent != '\n' && av_isspace(*useragent))
  1368.                 useragent++;
  1369.             break;
  1370.         }
  1371.         p = strchr(p, '\n');
  1372.         if (!p)
  1373.             break;
  1374.  
  1375.         p++;
  1376.     }
  1377.  
  1378.     redir_type = REDIR_NONE;
  1379.     if (av_match_ext(filename, "asx")) {
  1380.         redir_type = REDIR_ASX;
  1381.         filename[strlen(filename)-1] = 'f';
  1382.     } else if (av_match_ext(filename, "asf") &&
  1383.         (!useragent || av_strncasecmp(useragent, "NSPlayer", 8))) {
  1384.         /* if this isn't WMP or lookalike, return the redirector file */
  1385.         redir_type = REDIR_ASF;
  1386.     } else if (av_match_ext(filename, "rpm,ram")) {
  1387.         redir_type = REDIR_RAM;
  1388.         strcpy(filename + strlen(filename)-2, "m");
  1389.     } else if (av_match_ext(filename, "rtsp")) {
  1390.         redir_type = REDIR_RTSP;
  1391.         compute_real_filename(filename, sizeof(filename) - 1);
  1392.     } else if (av_match_ext(filename, "sdp")) {
  1393.         redir_type = REDIR_SDP;
  1394.         compute_real_filename(filename, sizeof(filename) - 1);
  1395.     }
  1396.  
  1397.     /* "redirect" request to index.html */
  1398.     if (!strlen(filename))
  1399.         av_strlcpy(filename, "index.html", sizeof(filename) - 1);
  1400.  
  1401.     stream = config.first_stream;
  1402.     while (stream) {
  1403.         if (!strcmp(stream->filename, filename) && validate_acl(stream, c))
  1404.             break;
  1405.         stream = stream->next;
  1406.     }
  1407.     if (!stream) {
  1408.         snprintf(msg, sizeof(msg), "File '%s' not found", url);
  1409.         http_log("File '%s' not found\n", url);
  1410.         goto send_error;
  1411.     }
  1412.  
  1413.     c->stream = stream;
  1414.     memcpy(c->feed_streams, stream->feed_streams, sizeof(c->feed_streams));
  1415.     memset(c->switch_feed_streams, -1, sizeof(c->switch_feed_streams));
  1416.  
  1417.     if (stream->stream_type == STREAM_TYPE_REDIRECT) {
  1418.         c->http_error = 301;
  1419.         q = c->buffer;
  1420.         snprintf(q, c->buffer_size,
  1421.                       "HTTP/1.0 301 Moved\r\n"
  1422.                       "Location: %s\r\n"
  1423.                       "Content-type: text/html\r\n"
  1424.                       "\r\n"
  1425.                       "<html><head><title>Moved</title></head><body>\r\n"
  1426.                       "You should be <a href=\"%s\">redirected</a>.\r\n"
  1427.                       "</body></html>\r\n",
  1428.                  stream->feed_filename, stream->feed_filename);
  1429.         q += strlen(q);
  1430.         /* prepare output buffer */
  1431.         c->buffer_ptr = c->buffer;
  1432.         c->buffer_end = q;
  1433.         c->state = HTTPSTATE_SEND_HEADER;
  1434.         return 0;
  1435.     }
  1436.  
  1437.     /* If this is WMP, get the rate information */
  1438.     if (extract_rates(ratebuf, sizeof(ratebuf), c->buffer)) {
  1439.         if (modify_current_stream(c, ratebuf)) {
  1440.             for (i = 0; i < FF_ARRAY_ELEMS(c->feed_streams); i++) {
  1441.                 if (c->switch_feed_streams[i] >= 0)
  1442.                     c->switch_feed_streams[i] = -1;
  1443.             }
  1444.         }
  1445.     }
  1446.  
  1447.     if (c->post == 0 && stream->stream_type == STREAM_TYPE_LIVE)
  1448.         current_bandwidth += stream->bandwidth;
  1449.  
  1450.     /* If already streaming this feed, do not let start another feeder. */
  1451.     if (stream->feed_opened) {
  1452.         snprintf(msg, sizeof(msg), "This feed is already being received.");
  1453.         http_log("Feed '%s' already being received\n", stream->feed_filename);
  1454.         goto send_error;
  1455.     }
  1456.  
  1457.     if (c->post == 0 && config.max_bandwidth < current_bandwidth) {
  1458.         c->http_error = 503;
  1459.         q = c->buffer;
  1460.         snprintf(q, c->buffer_size,
  1461.                       "HTTP/1.0 503 Server too busy\r\n"
  1462.                       "Content-type: text/html\r\n"
  1463.                       "\r\n"
  1464.                       "<html><head><title>Too busy</title></head><body>\r\n"
  1465.                       "<p>The server is too busy to serve your request at this time.</p>\r\n"
  1466.                       "<p>The bandwidth being served (including your stream) is %"PRIu64"kbit/sec, "
  1467.                       "and this exceeds the limit of %"PRIu64"kbit/sec.</p>\r\n"
  1468.                       "</body></html>\r\n",
  1469.                  current_bandwidth, config.max_bandwidth);
  1470.         q += strlen(q);
  1471.         /* prepare output buffer */
  1472.         c->buffer_ptr = c->buffer;
  1473.         c->buffer_end = q;
  1474.         c->state = HTTPSTATE_SEND_HEADER;
  1475.         return 0;
  1476.     }
  1477.  
  1478.     if (redir_type != REDIR_NONE) {
  1479.         const char *hostinfo = 0;
  1480.  
  1481.         for (p = c->buffer; *p && *p != '\r' && *p != '\n'; ) {
  1482.             if (av_strncasecmp(p, "Host:", 5) == 0) {
  1483.                 hostinfo = p + 5;
  1484.                 break;
  1485.             }
  1486.             p = strchr(p, '\n');
  1487.             if (!p)
  1488.                 break;
  1489.  
  1490.             p++;
  1491.         }
  1492.  
  1493.         if (hostinfo) {
  1494.             char *eoh;
  1495.             char hostbuf[260];
  1496.  
  1497.             while (av_isspace(*hostinfo))
  1498.                 hostinfo++;
  1499.  
  1500.             eoh = strchr(hostinfo, '\n');
  1501.             if (eoh) {
  1502.                 if (eoh[-1] == '\r')
  1503.                     eoh--;
  1504.  
  1505.                 if (eoh - hostinfo < sizeof(hostbuf) - 1) {
  1506.                     memcpy(hostbuf, hostinfo, eoh - hostinfo);
  1507.                     hostbuf[eoh - hostinfo] = 0;
  1508.  
  1509.                     c->http_error = 200;
  1510.                     q = c->buffer;
  1511.                     switch(redir_type) {
  1512.                     case REDIR_ASX:
  1513.                         snprintf(q, c->buffer_size,
  1514.                                       "HTTP/1.0 200 ASX Follows\r\n"
  1515.                                       "Content-type: video/x-ms-asf\r\n"
  1516.                                       "\r\n"
  1517.                                       "<ASX Version=\"3\">\r\n"
  1518.                                       //"<!-- Autogenerated by ffserver -->\r\n"
  1519.                                       "<ENTRY><REF HREF=\"http://%s/%s%s\"/></ENTRY>\r\n"
  1520.                                       "</ASX>\r\n", hostbuf, filename, info);
  1521.                         q += strlen(q);
  1522.                         break;
  1523.                     case REDIR_RAM:
  1524.                         snprintf(q, c->buffer_size,
  1525.                                       "HTTP/1.0 200 RAM Follows\r\n"
  1526.                                       "Content-type: audio/x-pn-realaudio\r\n"
  1527.                                       "\r\n"
  1528.                                       "# Autogenerated by ffserver\r\n"
  1529.                                       "http://%s/%s%s\r\n", hostbuf, filename, info);
  1530.                         q += strlen(q);
  1531.                         break;
  1532.                     case REDIR_ASF:
  1533.                         snprintf(q, c->buffer_size,
  1534.                                       "HTTP/1.0 200 ASF Redirect follows\r\n"
  1535.                                       "Content-type: video/x-ms-asf\r\n"
  1536.                                       "\r\n"
  1537.                                       "[Reference]\r\n"
  1538.                                       "Ref1=http://%s/%s%s\r\n", hostbuf, filename, info);
  1539.                         q += strlen(q);
  1540.                         break;
  1541.                     case REDIR_RTSP:
  1542.                         {
  1543.                             char hostname[256], *p;
  1544.                             /* extract only hostname */
  1545.                             av_strlcpy(hostname, hostbuf, sizeof(hostname));
  1546.                             p = strrchr(hostname, ':');
  1547.                             if (p)
  1548.                                 *p = '\0';
  1549.                             snprintf(q, c->buffer_size,
  1550.                                           "HTTP/1.0 200 RTSP Redirect follows\r\n"
  1551.                                           /* XXX: incorrect MIME type ? */
  1552.                                           "Content-type: application/x-rtsp\r\n"
  1553.                                           "\r\n"
  1554.                                           "rtsp://%s:%d/%s\r\n", hostname, ntohs(config.rtsp_addr.sin_port), filename);
  1555.                             q += strlen(q);
  1556.                         }
  1557.                         break;
  1558.                     case REDIR_SDP:
  1559.                         {
  1560.                             uint8_t *sdp_data;
  1561.                             int sdp_data_size;
  1562.                             socklen_t len;
  1563.                             struct sockaddr_in my_addr;
  1564.  
  1565.                             snprintf(q, c->buffer_size,
  1566.                                           "HTTP/1.0 200 OK\r\n"
  1567.                                           "Content-type: application/sdp\r\n"
  1568.                                           "\r\n");
  1569.                             q += strlen(q);
  1570.  
  1571.                             len = sizeof(my_addr);
  1572.  
  1573.                             /* XXX: Should probably fail? */
  1574.                             if (getsockname(c->fd, (struct sockaddr *)&my_addr, &len))
  1575.                                 http_log("getsockname() failed\n");
  1576.  
  1577.                             /* XXX: should use a dynamic buffer */
  1578.                             sdp_data_size = prepare_sdp_description(stream,
  1579.                                                                     &sdp_data,
  1580.                                                                     my_addr.sin_addr);
  1581.                             if (sdp_data_size > 0) {
  1582.                                 memcpy(q, sdp_data, sdp_data_size);
  1583.                                 q += sdp_data_size;
  1584.                                 *q = '\0';
  1585.                                 av_free(sdp_data);
  1586.                             }
  1587.                         }
  1588.                         break;
  1589.                     default:
  1590.                         abort();
  1591.                         break;
  1592.                     }
  1593.  
  1594.                     /* prepare output buffer */
  1595.                     c->buffer_ptr = c->buffer;
  1596.                     c->buffer_end = q;
  1597.                     c->state = HTTPSTATE_SEND_HEADER;
  1598.                     return 0;
  1599.                 }
  1600.             }
  1601.         }
  1602.  
  1603.         snprintf(msg, sizeof(msg), "ASX/RAM file not handled");
  1604.         goto send_error;
  1605.     }
  1606.  
  1607.     stream->conns_served++;
  1608.  
  1609.     /* XXX: add there authenticate and IP match */
  1610.  
  1611.     if (c->post) {
  1612.         /* if post, it means a feed is being sent */
  1613.         if (!stream->is_feed) {
  1614.             /* However it might be a status report from WMP! Let us log the
  1615.              * data as it might come handy one day. */
  1616.             const char *logline = 0;
  1617.             int client_id = 0;
  1618.  
  1619.             for (p = c->buffer; *p && *p != '\r' && *p != '\n'; ) {
  1620.                 if (av_strncasecmp(p, "Pragma: log-line=", 17) == 0) {
  1621.                     logline = p;
  1622.                     break;
  1623.                 }
  1624.                 if (av_strncasecmp(p, "Pragma: client-id=", 18) == 0)
  1625.                     client_id = strtol(p + 18, 0, 10);
  1626.                 p = strchr(p, '\n');
  1627.                 if (!p)
  1628.                     break;
  1629.  
  1630.                 p++;
  1631.             }
  1632.  
  1633.             if (logline) {
  1634.                 char *eol = strchr(logline, '\n');
  1635.  
  1636.                 logline += 17;
  1637.  
  1638.                 if (eol) {
  1639.                     if (eol[-1] == '\r')
  1640.                         eol--;
  1641.                     http_log("%.*s\n", (int) (eol - logline), logline);
  1642.                     c->suppress_log = 1;
  1643.                 }
  1644.             }
  1645.  
  1646. #ifdef DEBUG
  1647.             http_log("\nGot request:\n%s\n", c->buffer);
  1648. #endif
  1649.  
  1650.             if (client_id && extract_rates(ratebuf, sizeof(ratebuf), c->buffer)) {
  1651.                 HTTPContext *wmpc;
  1652.  
  1653.                 /* Now we have to find the client_id */
  1654.                 for (wmpc = first_http_ctx; wmpc; wmpc = wmpc->next) {
  1655.                     if (wmpc->wmp_client_id == client_id)
  1656.                         break;
  1657.                 }
  1658.  
  1659.                 if (wmpc && modify_current_stream(wmpc, ratebuf))
  1660.                     wmpc->switch_pending = 1;
  1661.             }
  1662.  
  1663.             snprintf(msg, sizeof(msg), "POST command not handled");
  1664.             c->stream = 0;
  1665.             goto send_error;
  1666.         }
  1667.         if (http_start_receive_data(c) < 0) {
  1668.             snprintf(msg, sizeof(msg), "could not open feed");
  1669.             goto send_error;
  1670.         }
  1671.         c->http_error = 0;
  1672.         c->state = HTTPSTATE_RECEIVE_DATA;
  1673.         return 0;
  1674.     }
  1675.  
  1676. #ifdef DEBUG
  1677.     if (strcmp(stream->filename + strlen(stream->filename) - 4, ".asf") == 0)
  1678.         http_log("\nGot request:\n%s\n", c->buffer);
  1679. #endif
  1680.  
  1681.     if (c->stream->stream_type == STREAM_TYPE_STATUS)
  1682.         goto send_status;
  1683.  
  1684.     /* open input stream */
  1685.     if (open_input_stream(c, info) < 0) {
  1686.         snprintf(msg, sizeof(msg), "Input stream corresponding to '%s' not found", url);
  1687.         goto send_error;
  1688.     }
  1689.  
  1690.     /* prepare HTTP header */
  1691.     c->buffer[0] = 0;
  1692.     av_strlcatf(c->buffer, c->buffer_size, "HTTP/1.0 200 OK\r\n");
  1693.     mime_type = c->stream->fmt->mime_type;
  1694.     if (!mime_type)
  1695.         mime_type = "application/x-octet-stream";
  1696.     av_strlcatf(c->buffer, c->buffer_size, "Pragma: no-cache\r\n");
  1697.  
  1698.     /* for asf, we need extra headers */
  1699.     if (!strcmp(c->stream->fmt->name,"asf_stream")) {
  1700.         /* Need to allocate a client id */
  1701.  
  1702.         c->wmp_client_id = av_lfg_get(&random_state);
  1703.  
  1704.         av_strlcatf(c->buffer, c->buffer_size, "Server: Cougar 4.1.0.3923\r\nCache-Control: no-cache\r\nPragma: client-id=%d\r\nPragma: features=\"broadcast\"\r\n", c->wmp_client_id);
  1705.     }
  1706.     av_strlcatf(c->buffer, c->buffer_size, "Content-Type: %s\r\n", mime_type);
  1707.     av_strlcatf(c->buffer, c->buffer_size, "\r\n");
  1708.     q = c->buffer + strlen(c->buffer);
  1709.  
  1710.     /* prepare output buffer */
  1711.     c->http_error = 0;
  1712.     c->buffer_ptr = c->buffer;
  1713.     c->buffer_end = q;
  1714.     c->state = HTTPSTATE_SEND_HEADER;
  1715.     return 0;
  1716.  send_error:
  1717.     c->http_error = 404;
  1718.     q = c->buffer;
  1719.     htmlstrip(msg);
  1720.     snprintf(q, c->buffer_size,
  1721.                   "HTTP/1.0 404 Not Found\r\n"
  1722.                   "Content-type: text/html\r\n"
  1723.                   "\r\n"
  1724.                   "<html>\n"
  1725.                   "<head><title>404 Not Found</title></head>\n"
  1726.                   "<body>%s</body>\n"
  1727.                   "</html>\n", msg);
  1728.     q += strlen(q);
  1729.     /* prepare output buffer */
  1730.     c->buffer_ptr = c->buffer;
  1731.     c->buffer_end = q;
  1732.     c->state = HTTPSTATE_SEND_HEADER;
  1733.     return 0;
  1734.  send_status:
  1735.     compute_status(c);
  1736.     /* horrible: we use this value to avoid
  1737.      * going to the send data state */
  1738.     c->http_error = 200;
  1739.     c->state = HTTPSTATE_SEND_HEADER;
  1740.     return 0;
  1741. }
  1742.  
  1743. static void fmt_bytecount(AVIOContext *pb, int64_t count)
  1744. {
  1745.     static const char suffix[] = " kMGTP";
  1746.     const char *s;
  1747.  
  1748.     for (s = suffix; count >= 100000 && s[1]; count /= 1000, s++);
  1749.  
  1750.     avio_printf(pb, "%"PRId64"%c", count, *s);
  1751. }
  1752.  
  1753. static inline void print_stream_params(AVIOContext *pb, FFServerStream *stream)
  1754. {
  1755.     int i, stream_no;
  1756.     const char *type = "unknown";
  1757.     char parameters[64];
  1758.     AVStream *st;
  1759.     AVCodec *codec;
  1760.  
  1761.     stream_no = stream->nb_streams;
  1762.  
  1763.     avio_printf(pb, "<table cellspacing=0 cellpadding=4><tr><th>Stream<th>"
  1764.                     "type<th>kbits/s<th align=left>codec<th align=left>"
  1765.                     "Parameters\n");
  1766.  
  1767.     for (i = 0; i < stream_no; i++) {
  1768.         st = stream->streams[i];
  1769.         codec = avcodec_find_encoder(st->codec->codec_id);
  1770.  
  1771.         parameters[0] = 0;
  1772.  
  1773.         switch(st->codec->codec_type) {
  1774.         case AVMEDIA_TYPE_AUDIO:
  1775.             type = "audio";
  1776.             snprintf(parameters, sizeof(parameters), "%d channel(s), %d Hz",
  1777.                      st->codec->channels, st->codec->sample_rate);
  1778.             break;
  1779.         case AVMEDIA_TYPE_VIDEO:
  1780.             type = "video";
  1781.             snprintf(parameters, sizeof(parameters),
  1782.                      "%dx%d, q=%d-%d, fps=%d", st->codec->width,
  1783.                      st->codec->height, st->codec->qmin, st->codec->qmax,
  1784.                      st->codec->time_base.den / st->codec->time_base.num);
  1785.             break;
  1786.         default:
  1787.             abort();
  1788.         }
  1789.  
  1790.         avio_printf(pb, "<tr><td align=right>%d<td>%s<td align=right>%d"
  1791.                         "<td>%s<td>%s\n",
  1792.                     i, type, st->codec->bit_rate/1000,
  1793.                     codec ? codec->name : "", parameters);
  1794.      }
  1795.  
  1796.      avio_printf(pb, "</table>\n");
  1797. }
  1798.  
  1799. static void compute_status(HTTPContext *c)
  1800. {
  1801.     HTTPContext *c1;
  1802.     FFServerStream *stream;
  1803.     char *p;
  1804.     time_t ti;
  1805.     int i, len;
  1806.     AVIOContext *pb;
  1807.  
  1808.     if (avio_open_dyn_buf(&pb) < 0) {
  1809.         /* XXX: return an error ? */
  1810.         c->buffer_ptr = c->buffer;
  1811.         c->buffer_end = c->buffer;
  1812.         return;
  1813.     }
  1814.  
  1815.     avio_printf(pb, "HTTP/1.0 200 OK\r\n");
  1816.     avio_printf(pb, "Content-type: text/html\r\n");
  1817.     avio_printf(pb, "Pragma: no-cache\r\n");
  1818.     avio_printf(pb, "\r\n");
  1819.  
  1820.     avio_printf(pb, "<html><head><title>%s Status</title>\n", program_name);
  1821.     if (c->stream->feed_filename[0])
  1822.         avio_printf(pb, "<link rel=\"shortcut icon\" href=\"%s\">\n",
  1823.                     c->stream->feed_filename);
  1824.     avio_printf(pb, "</head>\n<body>");
  1825.     avio_printf(pb, "<h1>%s Status</h1>\n", program_name);
  1826.     /* format status */
  1827.     avio_printf(pb, "<h2>Available Streams</h2>\n");
  1828.     avio_printf(pb, "<table cellspacing=0 cellpadding=4>\n");
  1829.     avio_printf(pb, "<tr><th valign=top>Path<th align=left>Served<br>Conns<th><br>bytes<th valign=top>Format<th>Bit rate<br>kbits/s<th align=left>Video<br>kbits/s<th><br>Codec<th align=left>Audio<br>kbits/s<th><br>Codec<th align=left valign=top>Feed\n");
  1830.     stream = config.first_stream;
  1831.     while (stream) {
  1832.         char sfilename[1024];
  1833.         char *eosf;
  1834.  
  1835.         if (stream->feed == stream) {
  1836.             stream = stream->next;
  1837.             continue;
  1838.         }
  1839.  
  1840.         av_strlcpy(sfilename, stream->filename, sizeof(sfilename) - 10);
  1841.         eosf = sfilename + strlen(sfilename);
  1842.         if (eosf - sfilename >= 4) {
  1843.             if (strcmp(eosf - 4, ".asf") == 0)
  1844.                 strcpy(eosf - 4, ".asx");
  1845.             else if (strcmp(eosf - 3, ".rm") == 0)
  1846.                 strcpy(eosf - 3, ".ram");
  1847.             else if (stream->fmt && !strcmp(stream->fmt->name, "rtp")) {
  1848.                 /* generate a sample RTSP director if
  1849.                  * unicast. Generate an SDP redirector if
  1850.                  * multicast */
  1851.                 eosf = strrchr(sfilename, '.');
  1852.                 if (!eosf)
  1853.                     eosf = sfilename + strlen(sfilename);
  1854.                 if (stream->is_multicast)
  1855.                     strcpy(eosf, ".sdp");
  1856.                 else
  1857.                     strcpy(eosf, ".rtsp");
  1858.             }
  1859.         }
  1860.  
  1861.         avio_printf(pb, "<tr><td><a href=\"/%s\">%s</a> ",
  1862.                     sfilename, stream->filename);
  1863.         avio_printf(pb, "<td align=right> %d <td align=right> ",
  1864.                     stream->conns_served);
  1865.         fmt_bytecount(pb, stream->bytes_served);
  1866.  
  1867.         switch(stream->stream_type) {
  1868.         case STREAM_TYPE_LIVE: {
  1869.             int audio_bit_rate = 0;
  1870.             int video_bit_rate = 0;
  1871.             const char *audio_codec_name = "";
  1872.             const char *video_codec_name = "";
  1873.             const char *audio_codec_name_extra = "";
  1874.             const char *video_codec_name_extra = "";
  1875.  
  1876.             for(i=0;i<stream->nb_streams;i++) {
  1877.                 AVStream *st = stream->streams[i];
  1878.                 AVCodec *codec = avcodec_find_encoder(st->codec->codec_id);
  1879.  
  1880.                 switch(st->codec->codec_type) {
  1881.                 case AVMEDIA_TYPE_AUDIO:
  1882.                     audio_bit_rate += st->codec->bit_rate;
  1883.                     if (codec) {
  1884.                         if (*audio_codec_name)
  1885.                             audio_codec_name_extra = "...";
  1886.                         audio_codec_name = codec->name;
  1887.                     }
  1888.                     break;
  1889.                 case AVMEDIA_TYPE_VIDEO:
  1890.                     video_bit_rate += st->codec->bit_rate;
  1891.                     if (codec) {
  1892.                         if (*video_codec_name)
  1893.                             video_codec_name_extra = "...";
  1894.                         video_codec_name = codec->name;
  1895.                     }
  1896.                     break;
  1897.                 case AVMEDIA_TYPE_DATA:
  1898.                     video_bit_rate += st->codec->bit_rate;
  1899.                     break;
  1900.                 default:
  1901.                     abort();
  1902.                 }
  1903.             }
  1904.  
  1905.             avio_printf(pb, "<td align=center> %s <td align=right> %d "
  1906.                             "<td align=right> %d <td> %s %s <td align=right> "
  1907.                             "%d <td> %s %s",
  1908.                         stream->fmt->name, stream->bandwidth,
  1909.                         video_bit_rate / 1000, video_codec_name,
  1910.                         video_codec_name_extra, audio_bit_rate / 1000,
  1911.                         audio_codec_name, audio_codec_name_extra);
  1912.  
  1913.             if (stream->feed)
  1914.                 avio_printf(pb, "<td>%s", stream->feed->filename);
  1915.             else
  1916.                 avio_printf(pb, "<td>%s", stream->feed_filename);
  1917.             avio_printf(pb, "\n");
  1918.         }
  1919.             break;
  1920.         default:
  1921.             avio_printf(pb, "<td align=center> - <td align=right> - "
  1922.                             "<td align=right> - <td><td align=right> - <td>\n");
  1923.             break;
  1924.         }
  1925.         stream = stream->next;
  1926.     }
  1927.     avio_printf(pb, "</table>\n");
  1928.  
  1929.     stream = config.first_stream;
  1930.     while (stream) {
  1931.  
  1932.         if (stream->feed != stream) {
  1933.             stream = stream->next;
  1934.             continue;
  1935.         }
  1936.  
  1937.         avio_printf(pb, "<h2>Feed %s</h2>", stream->filename);
  1938.         if (stream->pid) {
  1939.             avio_printf(pb, "Running as pid %"PRId64".\n", (int64_t) stream->pid);
  1940.  
  1941. #if defined(linux)
  1942.             {
  1943.                 FILE *pid_stat;
  1944.                 char ps_cmd[64];
  1945.  
  1946.                 /* This is somewhat linux specific I guess */
  1947.                 snprintf(ps_cmd, sizeof(ps_cmd),
  1948.                          "ps -o \"%%cpu,cputime\" --no-headers %"PRId64"",
  1949.                          (int64_t) stream->pid);
  1950.  
  1951.                  pid_stat = popen(ps_cmd, "r");
  1952.                  if (pid_stat) {
  1953.                      char cpuperc[10];
  1954.                      char cpuused[64];
  1955.  
  1956.                      if (fscanf(pid_stat, "%9s %63s", cpuperc, cpuused) == 2) {
  1957.                          avio_printf(pb, "Currently using %s%% of the cpu. "
  1958.                                          "Total time used %s.\n",
  1959.                                      cpuperc, cpuused);
  1960.                      }
  1961.                      fclose(pid_stat);
  1962.                  }
  1963.             }
  1964. #endif
  1965.  
  1966.             avio_printf(pb, "<p>");
  1967.         }
  1968.  
  1969.         print_stream_params(pb, stream);
  1970.         stream = stream->next;
  1971.     }
  1972.  
  1973.     /* connection status */
  1974.     avio_printf(pb, "<h2>Connection Status</h2>\n");
  1975.  
  1976.     avio_printf(pb, "Number of connections: %d / %d<br>\n",
  1977.                 nb_connections, config.nb_max_connections);
  1978.  
  1979.     avio_printf(pb, "Bandwidth in use: %"PRIu64"k / %"PRIu64"k<br>\n",
  1980.                 current_bandwidth, config.max_bandwidth);
  1981.  
  1982.     avio_printf(pb, "<table>\n");
  1983.     avio_printf(pb, "<tr><th>#<th>File<th>IP<th>Proto<th>State<th>Target "
  1984.                     "bits/sec<th>Actual bits/sec<th>Bytes transferred\n");
  1985.     c1 = first_http_ctx;
  1986.     i = 0;
  1987.     while (c1) {
  1988.         int bitrate;
  1989.         int j;
  1990.  
  1991.         bitrate = 0;
  1992.         if (c1->stream) {
  1993.             for (j = 0; j < c1->stream->nb_streams; j++) {
  1994.                 if (!c1->stream->feed)
  1995.                     bitrate += c1->stream->streams[j]->codec->bit_rate;
  1996.                 else if (c1->feed_streams[j] >= 0)
  1997.                     bitrate += c1->stream->feed->streams[c1->feed_streams[j]]->codec->bit_rate;
  1998.             }
  1999.         }
  2000.  
  2001.         i++;
  2002.         p = inet_ntoa(c1->from_addr.sin_addr);
  2003.         avio_printf(pb, "<tr><td><b>%d</b><td>%s%s<td>%s<td>%s<td>%s"
  2004.                         "<td align=right>",
  2005.                     i, c1->stream ? c1->stream->filename : "",
  2006.                     c1->state == HTTPSTATE_RECEIVE_DATA ? "(input)" : "", p,
  2007.                     c1->protocol, http_state[c1->state]);
  2008.         fmt_bytecount(pb, bitrate);
  2009.         avio_printf(pb, "<td align=right>");
  2010.         fmt_bytecount(pb, compute_datarate(&c1->datarate, c1->data_count) * 8);
  2011.         avio_printf(pb, "<td align=right>");
  2012.         fmt_bytecount(pb, c1->data_count);
  2013.         avio_printf(pb, "\n");
  2014.         c1 = c1->next;
  2015.     }
  2016.     avio_printf(pb, "</table>\n");
  2017.  
  2018.     /* date */
  2019.     ti = time(NULL);
  2020.     p = ctime(&ti);
  2021.     avio_printf(pb, "<hr size=1 noshade>Generated at %s", p);
  2022.     avio_printf(pb, "</body>\n</html>\n");
  2023.  
  2024.     len = avio_close_dyn_buf(pb, &c->pb_buffer);
  2025.     c->buffer_ptr = c->pb_buffer;
  2026.     c->buffer_end = c->pb_buffer + len;
  2027. }
  2028.  
  2029. static int open_input_stream(HTTPContext *c, const char *info)
  2030. {
  2031.     char buf[128];
  2032.     char input_filename[1024];
  2033.     AVFormatContext *s = NULL;
  2034.     int buf_size, i, ret;
  2035.     int64_t stream_pos;
  2036.  
  2037.     /* find file name */
  2038.     if (c->stream->feed) {
  2039.         strcpy(input_filename, c->stream->feed->feed_filename);
  2040.         buf_size = FFM_PACKET_SIZE;
  2041.         /* compute position (absolute time) */
  2042.         if (av_find_info_tag(buf, sizeof(buf), "date", info)) {
  2043.             if ((ret = av_parse_time(&stream_pos, buf, 0)) < 0) {
  2044.                 http_log("Invalid date specification '%s' for stream\n", buf);
  2045.                 return ret;
  2046.             }
  2047.         } else if (av_find_info_tag(buf, sizeof(buf), "buffer", info)) {
  2048.             int prebuffer = strtol(buf, 0, 10);
  2049.             stream_pos = av_gettime() - prebuffer * (int64_t)1000000;
  2050.         } else
  2051.             stream_pos = av_gettime() - c->stream->prebuffer * (int64_t)1000;
  2052.     } else {
  2053.         strcpy(input_filename, c->stream->feed_filename);
  2054.         buf_size = 0;
  2055.         /* compute position (relative time) */
  2056.         if (av_find_info_tag(buf, sizeof(buf), "date", info)) {
  2057.             if ((ret = av_parse_time(&stream_pos, buf, 1)) < 0) {
  2058.                 http_log("Invalid date specification '%s' for stream\n", buf);
  2059.                 return ret;
  2060.             }
  2061.         } else
  2062.             stream_pos = 0;
  2063.     }
  2064.     if (!input_filename[0]) {
  2065.         http_log("No filename was specified for stream\n");
  2066.         return AVERROR(EINVAL);
  2067.     }
  2068.  
  2069.     /* open stream */
  2070.     ret = avformat_open_input(&s, input_filename, c->stream->ifmt,
  2071.                               &c->stream->in_opts);
  2072.     if (ret < 0) {
  2073.         http_log("Could not open input '%s': %s\n",
  2074.                  input_filename, av_err2str(ret));
  2075.         return ret;
  2076.     }
  2077.  
  2078.     /* set buffer size */
  2079.     if (buf_size > 0) {
  2080.         ret = ffio_set_buf_size(s->pb, buf_size);
  2081.         if (ret < 0) {
  2082.             http_log("Failed to set buffer size\n");
  2083.             return ret;
  2084.         }
  2085.     }
  2086.  
  2087.     s->flags |= AVFMT_FLAG_GENPTS;
  2088.     c->fmt_in = s;
  2089.     if (strcmp(s->iformat->name, "ffm") &&
  2090.         (ret = avformat_find_stream_info(c->fmt_in, NULL)) < 0) {
  2091.         http_log("Could not find stream info for input '%s'\n", input_filename);
  2092.         avformat_close_input(&s);
  2093.         return ret;
  2094.     }
  2095.  
  2096.     /* choose stream as clock source (we favor the video stream if
  2097.      * present) for packet sending */
  2098.     c->pts_stream_index = 0;
  2099.     for(i=0;i<c->stream->nb_streams;i++) {
  2100.         if (c->pts_stream_index == 0 &&
  2101.             c->stream->streams[i]->codec->codec_type == AVMEDIA_TYPE_VIDEO) {
  2102.             c->pts_stream_index = i;
  2103.         }
  2104.     }
  2105.  
  2106.     if (c->fmt_in->iformat->read_seek)
  2107.         av_seek_frame(c->fmt_in, -1, stream_pos, 0);
  2108.     /* set the start time (needed for maxtime and RTP packet timing) */
  2109.     c->start_time = cur_time;
  2110.     c->first_pts = AV_NOPTS_VALUE;
  2111.     return 0;
  2112. }
  2113.  
  2114. /* return the server clock (in us) */
  2115. static int64_t get_server_clock(HTTPContext *c)
  2116. {
  2117.     /* compute current pts value from system time */
  2118.     return (cur_time - c->start_time) * 1000;
  2119. }
  2120.  
  2121. /* return the estimated time (in us) at which the current packet must be sent */
  2122. static int64_t get_packet_send_clock(HTTPContext *c)
  2123. {
  2124.     int bytes_left, bytes_sent, frame_bytes;
  2125.  
  2126.     frame_bytes = c->cur_frame_bytes;
  2127.     if (frame_bytes <= 0)
  2128.         return c->cur_pts;
  2129.  
  2130.     bytes_left = c->buffer_end - c->buffer_ptr;
  2131.     bytes_sent = frame_bytes - bytes_left;
  2132.     return c->cur_pts + (c->cur_frame_duration * bytes_sent) / frame_bytes;
  2133. }
  2134.  
  2135.  
  2136. static int http_prepare_data(HTTPContext *c)
  2137. {
  2138.     int i, len, ret;
  2139.     AVFormatContext *ctx;
  2140.  
  2141.     av_freep(&c->pb_buffer);
  2142.     switch(c->state) {
  2143.     case HTTPSTATE_SEND_DATA_HEADER:
  2144.         ctx = avformat_alloc_context();
  2145.         if (!ctx)
  2146.             return AVERROR(ENOMEM);
  2147.         c->fmt_ctx = *ctx;
  2148.         av_freep(&ctx);
  2149.         av_dict_copy(&(c->fmt_ctx.metadata), c->stream->metadata, 0);
  2150.         c->fmt_ctx.streams = av_mallocz_array(c->stream->nb_streams,
  2151.                                               sizeof(AVStream *));
  2152.         if (!c->fmt_ctx.streams)
  2153.             return AVERROR(ENOMEM);
  2154.  
  2155.         for(i=0;i<c->stream->nb_streams;i++) {
  2156.             AVStream *src;
  2157.             c->fmt_ctx.streams[i] = av_mallocz(sizeof(AVStream));
  2158.  
  2159.             /* if file or feed, then just take streams from FFServerStream
  2160.              * struct */
  2161.             if (!c->stream->feed ||
  2162.                 c->stream->feed == c->stream)
  2163.                 src = c->stream->streams[i];
  2164.             else
  2165.                 src = c->stream->feed->streams[c->stream->feed_streams[i]];
  2166.  
  2167.             *(c->fmt_ctx.streams[i]) = *src;
  2168.             c->fmt_ctx.streams[i]->priv_data = 0;
  2169.             /* XXX: should be done in AVStream, not in codec */
  2170.             c->fmt_ctx.streams[i]->codec->frame_number = 0;
  2171.         }
  2172.         /* set output format parameters */
  2173.         c->fmt_ctx.oformat = c->stream->fmt;
  2174.         c->fmt_ctx.nb_streams = c->stream->nb_streams;
  2175.  
  2176.         c->got_key_frame = 0;
  2177.  
  2178.         /* prepare header and save header data in a stream */
  2179.         if (avio_open_dyn_buf(&c->fmt_ctx.pb) < 0) {
  2180.             /* XXX: potential leak */
  2181.             return -1;
  2182.         }
  2183.         c->fmt_ctx.pb->seekable = 0;
  2184.  
  2185.         /*
  2186.          * HACK to avoid MPEG-PS muxer to spit many underflow errors
  2187.          * Default value from FFmpeg
  2188.          * Try to set it using configuration option
  2189.          */
  2190.         c->fmt_ctx.max_delay = (int)(0.7*AV_TIME_BASE);
  2191.  
  2192.         if ((ret = avformat_write_header(&c->fmt_ctx, NULL)) < 0) {
  2193.             http_log("Error writing output header for stream '%s': %s\n",
  2194.                      c->stream->filename, av_err2str(ret));
  2195.             return ret;
  2196.         }
  2197.         av_dict_free(&c->fmt_ctx.metadata);
  2198.  
  2199.         len = avio_close_dyn_buf(c->fmt_ctx.pb, &c->pb_buffer);
  2200.         c->buffer_ptr = c->pb_buffer;
  2201.         c->buffer_end = c->pb_buffer + len;
  2202.  
  2203.         c->state = HTTPSTATE_SEND_DATA;
  2204.         c->last_packet_sent = 0;
  2205.         break;
  2206.     case HTTPSTATE_SEND_DATA:
  2207.         /* find a new packet */
  2208.         /* read a packet from the input stream */
  2209.         if (c->stream->feed)
  2210.             ffm_set_write_index(c->fmt_in,
  2211.                                 c->stream->feed->feed_write_index,
  2212.                                 c->stream->feed->feed_size);
  2213.  
  2214.         if (c->stream->max_time &&
  2215.             c->stream->max_time + c->start_time - cur_time < 0)
  2216.             /* We have timed out */
  2217.             c->state = HTTPSTATE_SEND_DATA_TRAILER;
  2218.         else {
  2219.             AVPacket pkt;
  2220.         redo:
  2221.             ret = av_read_frame(c->fmt_in, &pkt);
  2222.             if (ret < 0) {
  2223.                 if (c->stream->feed) {
  2224.                     /* if coming from feed, it means we reached the end of the
  2225.                      * ffm file, so must wait for more data */
  2226.                     c->state = HTTPSTATE_WAIT_FEED;
  2227.                     return 1; /* state changed */
  2228.                 }
  2229.                 if (ret == AVERROR(EAGAIN)) {
  2230.                     /* input not ready, come back later */
  2231.                     return 0;
  2232.                 }
  2233.                 if (c->stream->loop) {
  2234.                     avformat_close_input(&c->fmt_in);
  2235.                     if (open_input_stream(c, "") < 0)
  2236.                         goto no_loop;
  2237.                     goto redo;
  2238.                 } else {
  2239.                     no_loop:
  2240.                         /* must send trailer now because EOF or error */
  2241.                         c->state = HTTPSTATE_SEND_DATA_TRAILER;
  2242.                 }
  2243.             } else {
  2244.                 int source_index = pkt.stream_index;
  2245.                 /* update first pts if needed */
  2246.                 if (c->first_pts == AV_NOPTS_VALUE) {
  2247.                     c->first_pts = av_rescale_q(pkt.dts, c->fmt_in->streams[pkt.stream_index]->time_base, AV_TIME_BASE_Q);
  2248.                     c->start_time = cur_time;
  2249.                 }
  2250.                 /* send it to the appropriate stream */
  2251.                 if (c->stream->feed) {
  2252.                     /* if coming from a feed, select the right stream */
  2253.                     if (c->switch_pending) {
  2254.                         c->switch_pending = 0;
  2255.                         for(i=0;i<c->stream->nb_streams;i++) {
  2256.                             if (c->switch_feed_streams[i] == pkt.stream_index)
  2257.                                 if (pkt.flags & AV_PKT_FLAG_KEY)
  2258.                                     c->switch_feed_streams[i] = -1;
  2259.                             if (c->switch_feed_streams[i] >= 0)
  2260.                                 c->switch_pending = 1;
  2261.                         }
  2262.                     }
  2263.                     for(i=0;i<c->stream->nb_streams;i++) {
  2264.                         if (c->stream->feed_streams[i] == pkt.stream_index) {
  2265.                             AVStream *st = c->fmt_in->streams[source_index];
  2266.                             pkt.stream_index = i;
  2267.                             if (pkt.flags & AV_PKT_FLAG_KEY &&
  2268.                                 (st->codec->codec_type == AVMEDIA_TYPE_VIDEO ||
  2269.                                  c->stream->nb_streams == 1))
  2270.                                 c->got_key_frame = 1;
  2271.                             if (!c->stream->send_on_key || c->got_key_frame)
  2272.                                 goto send_it;
  2273.                         }
  2274.                     }
  2275.                 } else {
  2276.                     AVCodecContext *codec;
  2277.                     AVStream *ist, *ost;
  2278.                 send_it:
  2279.                     ist = c->fmt_in->streams[source_index];
  2280.                     /* specific handling for RTP: we use several
  2281.                      * output streams (one for each RTP connection).
  2282.                      * XXX: need more abstract handling */
  2283.                     if (c->is_packetized) {
  2284.                         /* compute send time and duration */
  2285.                         c->cur_pts = av_rescale_q(pkt.dts, ist->time_base, AV_TIME_BASE_Q);
  2286.                         c->cur_pts -= c->first_pts;
  2287.                         c->cur_frame_duration = av_rescale_q(pkt.duration, ist->time_base, AV_TIME_BASE_Q);
  2288.                         /* find RTP context */
  2289.                         c->packet_stream_index = pkt.stream_index;
  2290.                         ctx = c->rtp_ctx[c->packet_stream_index];
  2291.                         if(!ctx) {
  2292.                             av_free_packet(&pkt);
  2293.                             break;
  2294.                         }
  2295.                         codec = ctx->streams[0]->codec;
  2296.                         /* only one stream per RTP connection */
  2297.                         pkt.stream_index = 0;
  2298.                     } else {
  2299.                         ctx = &c->fmt_ctx;
  2300.                         /* Fudge here */
  2301.                         codec = ctx->streams[pkt.stream_index]->codec;
  2302.                     }
  2303.  
  2304.                     if (c->is_packetized) {
  2305.                         int max_packet_size;
  2306.                         if (c->rtp_protocol == RTSP_LOWER_TRANSPORT_TCP)
  2307.                             max_packet_size = RTSP_TCP_MAX_PACKET_SIZE;
  2308.                         else
  2309.                             max_packet_size = c->rtp_handles[c->packet_stream_index]->max_packet_size;
  2310.                         ret = ffio_open_dyn_packet_buf(&ctx->pb,
  2311.                                                        max_packet_size);
  2312.                     } else
  2313.                         ret = avio_open_dyn_buf(&ctx->pb);
  2314.  
  2315.                     if (ret < 0) {
  2316.                         /* XXX: potential leak */
  2317.                         return -1;
  2318.                     }
  2319.                     ost = ctx->streams[pkt.stream_index];
  2320.  
  2321.                     ctx->pb->seekable = 0;
  2322.                     if (pkt.dts != AV_NOPTS_VALUE)
  2323.                         pkt.dts = av_rescale_q(pkt.dts, ist->time_base,
  2324.                                                ost->time_base);
  2325.                     if (pkt.pts != AV_NOPTS_VALUE)
  2326.                         pkt.pts = av_rescale_q(pkt.pts, ist->time_base,
  2327.                                                ost->time_base);
  2328.                     pkt.duration = av_rescale_q(pkt.duration, ist->time_base,
  2329.                                                 ost->time_base);
  2330.                     if ((ret = av_write_frame(ctx, &pkt)) < 0) {
  2331.                         http_log("Error writing frame to output for stream '%s': %s\n",
  2332.                                  c->stream->filename, av_err2str(ret));
  2333.                         c->state = HTTPSTATE_SEND_DATA_TRAILER;
  2334.                     }
  2335.  
  2336.                     av_freep(&c->pb_buffer);
  2337.                     len = avio_close_dyn_buf(ctx->pb, &c->pb_buffer);
  2338.                     c->cur_frame_bytes = len;
  2339.                     c->buffer_ptr = c->pb_buffer;
  2340.                     c->buffer_end = c->pb_buffer + len;
  2341.  
  2342.                     codec->frame_number++;
  2343.                     if (len == 0) {
  2344.                         av_free_packet(&pkt);
  2345.                         goto redo;
  2346.                     }
  2347.                 }
  2348.                 av_free_packet(&pkt);
  2349.             }
  2350.         }
  2351.         break;
  2352.     default:
  2353.     case HTTPSTATE_SEND_DATA_TRAILER:
  2354.         /* last packet test ? */
  2355.         if (c->last_packet_sent || c->is_packetized)
  2356.             return -1;
  2357.         ctx = &c->fmt_ctx;
  2358.         /* prepare header */
  2359.         if (avio_open_dyn_buf(&ctx->pb) < 0) {
  2360.             /* XXX: potential leak */
  2361.             return -1;
  2362.         }
  2363.         c->fmt_ctx.pb->seekable = 0;
  2364.         av_write_trailer(ctx);
  2365.         len = avio_close_dyn_buf(ctx->pb, &c->pb_buffer);
  2366.         c->buffer_ptr = c->pb_buffer;
  2367.         c->buffer_end = c->pb_buffer + len;
  2368.  
  2369.         c->last_packet_sent = 1;
  2370.         break;
  2371.     }
  2372.     return 0;
  2373. }
  2374.  
  2375. /* should convert the format at the same time */
  2376. /* send data starting at c->buffer_ptr to the output connection
  2377.  * (either UDP or TCP)
  2378.  */
  2379. static int http_send_data(HTTPContext *c)
  2380. {
  2381.     int len, ret;
  2382.  
  2383.     for(;;) {
  2384.         if (c->buffer_ptr >= c->buffer_end) {
  2385.             ret = http_prepare_data(c);
  2386.             if (ret < 0)
  2387.                 return -1;
  2388.             else if (ret)
  2389.                 /* state change requested */
  2390.                 break;
  2391.         } else {
  2392.             if (c->is_packetized) {
  2393.                 /* RTP data output */
  2394.                 len = c->buffer_end - c->buffer_ptr;
  2395.                 if (len < 4) {
  2396.                     /* fail safe - should never happen */
  2397.                 fail1:
  2398.                     c->buffer_ptr = c->buffer_end;
  2399.                     return 0;
  2400.                 }
  2401.                 len = (c->buffer_ptr[0] << 24) |
  2402.                     (c->buffer_ptr[1] << 16) |
  2403.                     (c->buffer_ptr[2] << 8) |
  2404.                     (c->buffer_ptr[3]);
  2405.                 if (len > (c->buffer_end - c->buffer_ptr))
  2406.                     goto fail1;
  2407.                 if ((get_packet_send_clock(c) - get_server_clock(c)) > 0) {
  2408.                     /* nothing to send yet: we can wait */
  2409.                     return 0;
  2410.                 }
  2411.  
  2412.                 c->data_count += len;
  2413.                 update_datarate(&c->datarate, c->data_count);
  2414.                 if (c->stream)
  2415.                     c->stream->bytes_served += len;
  2416.  
  2417.                 if (c->rtp_protocol == RTSP_LOWER_TRANSPORT_TCP) {
  2418.                     /* RTP packets are sent inside the RTSP TCP connection */
  2419.                     AVIOContext *pb;
  2420.                     int interleaved_index, size;
  2421.                     uint8_t header[4];
  2422.                     HTTPContext *rtsp_c;
  2423.  
  2424.                     rtsp_c = c->rtsp_c;
  2425.                     /* if no RTSP connection left, error */
  2426.                     if (!rtsp_c)
  2427.                         return -1;
  2428.                     /* if already sending something, then wait. */
  2429.                     if (rtsp_c->state != RTSPSTATE_WAIT_REQUEST)
  2430.                         break;
  2431.                     if (avio_open_dyn_buf(&pb) < 0)
  2432.                         goto fail1;
  2433.                     interleaved_index = c->packet_stream_index * 2;
  2434.                     /* RTCP packets are sent at odd indexes */
  2435.                     if (c->buffer_ptr[1] == 200)
  2436.                         interleaved_index++;
  2437.                     /* write RTSP TCP header */
  2438.                     header[0] = '$';
  2439.                     header[1] = interleaved_index;
  2440.                     header[2] = len >> 8;
  2441.                     header[3] = len;
  2442.                     avio_write(pb, header, 4);
  2443.                     /* write RTP packet data */
  2444.                     c->buffer_ptr += 4;
  2445.                     avio_write(pb, c->buffer_ptr, len);
  2446.                     size = avio_close_dyn_buf(pb, &c->packet_buffer);
  2447.                     /* prepare asynchronous TCP sending */
  2448.                     rtsp_c->packet_buffer_ptr = c->packet_buffer;
  2449.                     rtsp_c->packet_buffer_end = c->packet_buffer + size;
  2450.                     c->buffer_ptr += len;
  2451.  
  2452.                     /* send everything we can NOW */
  2453.                     len = send(rtsp_c->fd, rtsp_c->packet_buffer_ptr,
  2454.                                rtsp_c->packet_buffer_end - rtsp_c->packet_buffer_ptr, 0);
  2455.                     if (len > 0)
  2456.                         rtsp_c->packet_buffer_ptr += len;
  2457.                     if (rtsp_c->packet_buffer_ptr < rtsp_c->packet_buffer_end) {
  2458.                         /* if we could not send all the data, we will
  2459.                          * send it later, so a new state is needed to
  2460.                          * "lock" the RTSP TCP connection */
  2461.                         rtsp_c->state = RTSPSTATE_SEND_PACKET;
  2462.                         break;
  2463.                     } else
  2464.                         /* all data has been sent */
  2465.                         av_freep(&c->packet_buffer);
  2466.                 } else {
  2467.                     /* send RTP packet directly in UDP */
  2468.                     c->buffer_ptr += 4;
  2469.                     ffurl_write(c->rtp_handles[c->packet_stream_index],
  2470.                                 c->buffer_ptr, len);
  2471.                     c->buffer_ptr += len;
  2472.                     /* here we continue as we can send several packets
  2473.                      * per 10 ms slot */
  2474.                 }
  2475.             } else {
  2476.                 /* TCP data output */
  2477.                 len = send(c->fd, c->buffer_ptr,
  2478.                            c->buffer_end - c->buffer_ptr, 0);
  2479.                 if (len < 0) {
  2480.                     if (ff_neterrno() != AVERROR(EAGAIN) &&
  2481.                         ff_neterrno() != AVERROR(EINTR))
  2482.                         /* error : close connection */
  2483.                         return -1;
  2484.                     else
  2485.                         return 0;
  2486.                 }
  2487.                 c->buffer_ptr += len;
  2488.  
  2489.                 c->data_count += len;
  2490.                 update_datarate(&c->datarate, c->data_count);
  2491.                 if (c->stream)
  2492.                     c->stream->bytes_served += len;
  2493.                 break;
  2494.             }
  2495.         }
  2496.     } /* for(;;) */
  2497.     return 0;
  2498. }
  2499.  
  2500. static int http_start_receive_data(HTTPContext *c)
  2501. {
  2502.     int fd;
  2503.     int ret;
  2504.  
  2505.     if (c->stream->feed_opened) {
  2506.         http_log("Stream feed '%s' was not opened\n",
  2507.                  c->stream->feed_filename);
  2508.         return AVERROR(EINVAL);
  2509.     }
  2510.  
  2511.     /* Don't permit writing to this one */
  2512.     if (c->stream->readonly) {
  2513.         http_log("Cannot write to read-only file '%s'\n",
  2514.                  c->stream->feed_filename);
  2515.         return AVERROR(EINVAL);
  2516.     }
  2517.  
  2518.     /* open feed */
  2519.     fd = open(c->stream->feed_filename, O_RDWR);
  2520.     if (fd < 0) {
  2521.         ret = AVERROR(errno);
  2522.         http_log("Could not open feed file '%s': %s\n",
  2523.                  c->stream->feed_filename, strerror(errno));
  2524.         return ret;
  2525.     }
  2526.     c->feed_fd = fd;
  2527.  
  2528.     if (c->stream->truncate) {
  2529.         /* truncate feed file */
  2530.         ffm_write_write_index(c->feed_fd, FFM_PACKET_SIZE);
  2531.         http_log("Truncating feed file '%s'\n", c->stream->feed_filename);
  2532.         if (ftruncate(c->feed_fd, FFM_PACKET_SIZE) < 0) {
  2533.             ret = AVERROR(errno);
  2534.             http_log("Error truncating feed file '%s': %s\n",
  2535.                      c->stream->feed_filename, strerror(errno));
  2536.             return ret;
  2537.         }
  2538.     } else {
  2539.         ret = ffm_read_write_index(fd);
  2540.         if (ret < 0) {
  2541.             http_log("Error reading write index from feed file '%s': %s\n",
  2542.                      c->stream->feed_filename, strerror(errno));
  2543.             return ret;
  2544.         }
  2545.         c->stream->feed_write_index = ret;
  2546.     }
  2547.  
  2548.     c->stream->feed_write_index = FFMAX(ffm_read_write_index(fd),
  2549.                                         FFM_PACKET_SIZE);
  2550.     c->stream->feed_size = lseek(fd, 0, SEEK_END);
  2551.     lseek(fd, 0, SEEK_SET);
  2552.  
  2553.     /* init buffer input */
  2554.     c->buffer_ptr = c->buffer;
  2555.     c->buffer_end = c->buffer + FFM_PACKET_SIZE;
  2556.     c->stream->feed_opened = 1;
  2557.     c->chunked_encoding = !!av_stristr(c->buffer, "Transfer-Encoding: chunked");
  2558.     return 0;
  2559. }
  2560.  
  2561. static int http_receive_data(HTTPContext *c)
  2562. {
  2563.     HTTPContext *c1;
  2564.     int len, loop_run = 0;
  2565.  
  2566.     while (c->chunked_encoding && !c->chunk_size &&
  2567.            c->buffer_end > c->buffer_ptr) {
  2568.         /* read chunk header, if present */
  2569.         len = recv(c->fd, c->buffer_ptr, 1, 0);
  2570.  
  2571.         if (len < 0) {
  2572.             if (ff_neterrno() != AVERROR(EAGAIN) &&
  2573.                 ff_neterrno() != AVERROR(EINTR))
  2574.                 /* error : close connection */
  2575.                 goto fail;
  2576.             return 0;
  2577.         } else if (len == 0) {
  2578.             /* end of connection : close it */
  2579.             goto fail;
  2580.         } else if (c->buffer_ptr - c->buffer >= 2 &&
  2581.                    !memcmp(c->buffer_ptr - 1, "\r\n", 2)) {
  2582.             c->chunk_size = strtol(c->buffer, 0, 16);
  2583.             if (c->chunk_size == 0) // end of stream
  2584.                 goto fail;
  2585.             c->buffer_ptr = c->buffer;
  2586.             break;
  2587.         } else if (++loop_run > 10)
  2588.             /* no chunk header, abort */
  2589.             goto fail;
  2590.         else
  2591.             c->buffer_ptr++;
  2592.     }
  2593.  
  2594.     if (c->buffer_end > c->buffer_ptr) {
  2595.         len = recv(c->fd, c->buffer_ptr,
  2596.                    FFMIN(c->chunk_size, c->buffer_end - c->buffer_ptr), 0);
  2597.         if (len < 0) {
  2598.             if (ff_neterrno() != AVERROR(EAGAIN) &&
  2599.                 ff_neterrno() != AVERROR(EINTR))
  2600.                 /* error : close connection */
  2601.                 goto fail;
  2602.         } else if (len == 0)
  2603.             /* end of connection : close it */
  2604.             goto fail;
  2605.         else {
  2606.             c->chunk_size -= len;
  2607.             c->buffer_ptr += len;
  2608.             c->data_count += len;
  2609.             update_datarate(&c->datarate, c->data_count);
  2610.         }
  2611.     }
  2612.  
  2613.     if (c->buffer_ptr - c->buffer >= 2 && c->data_count > FFM_PACKET_SIZE) {
  2614.         if (c->buffer[0] != 'f' ||
  2615.             c->buffer[1] != 'm') {
  2616.             http_log("Feed stream has become desynchronized -- disconnecting\n");
  2617.             goto fail;
  2618.         }
  2619.     }
  2620.  
  2621.     if (c->buffer_ptr >= c->buffer_end) {
  2622.         FFServerStream *feed = c->stream;
  2623.         /* a packet has been received : write it in the store, except
  2624.          * if header */
  2625.         if (c->data_count > FFM_PACKET_SIZE) {
  2626.             /* XXX: use llseek or url_seek
  2627.              * XXX: Should probably fail? */
  2628.             if (lseek(c->feed_fd, feed->feed_write_index, SEEK_SET) == -1)
  2629.                 http_log("Seek to %"PRId64" failed\n", feed->feed_write_index);
  2630.  
  2631.             if (write(c->feed_fd, c->buffer, FFM_PACKET_SIZE) < 0) {
  2632.                 http_log("Error writing to feed file: %s\n", strerror(errno));
  2633.                 goto fail;
  2634.             }
  2635.  
  2636.             feed->feed_write_index += FFM_PACKET_SIZE;
  2637.             /* update file size */
  2638.             if (feed->feed_write_index > c->stream->feed_size)
  2639.                 feed->feed_size = feed->feed_write_index;
  2640.  
  2641.             /* handle wrap around if max file size reached */
  2642.             if (c->stream->feed_max_size &&
  2643.                 feed->feed_write_index >= c->stream->feed_max_size)
  2644.                 feed->feed_write_index = FFM_PACKET_SIZE;
  2645.  
  2646.             /* write index */
  2647.             if (ffm_write_write_index(c->feed_fd, feed->feed_write_index) < 0) {
  2648.                 http_log("Error writing index to feed file: %s\n",
  2649.                          strerror(errno));
  2650.                 goto fail;
  2651.             }
  2652.  
  2653.             /* wake up any waiting connections */
  2654.             for(c1 = first_http_ctx; c1; c1 = c1->next) {
  2655.                 if (c1->state == HTTPSTATE_WAIT_FEED &&
  2656.                     c1->stream->feed == c->stream->feed)
  2657.                     c1->state = HTTPSTATE_SEND_DATA;
  2658.             }
  2659.         } else {
  2660.             /* We have a header in our hands that contains useful data */
  2661.             AVFormatContext *s = avformat_alloc_context();
  2662.             AVIOContext *pb;
  2663.             AVInputFormat *fmt_in;
  2664.             int i;
  2665.  
  2666.             if (!s)
  2667.                 goto fail;
  2668.  
  2669.             /* use feed output format name to find corresponding input format */
  2670.             fmt_in = av_find_input_format(feed->fmt->name);
  2671.             if (!fmt_in)
  2672.                 goto fail;
  2673.  
  2674.             pb = avio_alloc_context(c->buffer, c->buffer_end - c->buffer,
  2675.                                     0, NULL, NULL, NULL, NULL);
  2676.             if (!pb)
  2677.                 goto fail;
  2678.  
  2679.             pb->seekable = 0;
  2680.  
  2681.             s->pb = pb;
  2682.             if (avformat_open_input(&s, c->stream->feed_filename, fmt_in, NULL) < 0) {
  2683.                 av_freep(&pb);
  2684.                 goto fail;
  2685.             }
  2686.  
  2687.             /* Now we have the actual streams */
  2688.             if (s->nb_streams != feed->nb_streams) {
  2689.                 avformat_close_input(&s);
  2690.                 av_freep(&pb);
  2691.                 http_log("Feed '%s' stream number does not match registered feed\n",
  2692.                          c->stream->feed_filename);
  2693.                 goto fail;
  2694.             }
  2695.  
  2696.             for (i = 0; i < s->nb_streams; i++) {
  2697.                 AVStream *fst = feed->streams[i];
  2698.                 AVStream *st = s->streams[i];
  2699.                 avcodec_copy_context(fst->codec, st->codec);
  2700.             }
  2701.  
  2702.             avformat_close_input(&s);
  2703.             av_freep(&pb);
  2704.         }
  2705.         c->buffer_ptr = c->buffer;
  2706.     }
  2707.  
  2708.     return 0;
  2709.  fail:
  2710.     c->stream->feed_opened = 0;
  2711.     close(c->feed_fd);
  2712.     /* wake up any waiting connections to stop waiting for feed */
  2713.     for(c1 = first_http_ctx; c1; c1 = c1->next) {
  2714.         if (c1->state == HTTPSTATE_WAIT_FEED &&
  2715.             c1->stream->feed == c->stream->feed)
  2716.             c1->state = HTTPSTATE_SEND_DATA_TRAILER;
  2717.     }
  2718.     return -1;
  2719. }
  2720.  
  2721. /********************************************************************/
  2722. /* RTSP handling */
  2723.  
  2724. static void rtsp_reply_header(HTTPContext *c, enum RTSPStatusCode error_number)
  2725. {
  2726.     const char *str;
  2727.     time_t ti;
  2728.     struct tm *tm;
  2729.     char buf2[32];
  2730.  
  2731.     str = RTSP_STATUS_CODE2STRING(error_number);
  2732.     if (!str)
  2733.         str = "Unknown Error";
  2734.  
  2735.     avio_printf(c->pb, "RTSP/1.0 %d %s\r\n", error_number, str);
  2736.     avio_printf(c->pb, "CSeq: %d\r\n", c->seq);
  2737.  
  2738.     /* output GMT time */
  2739.     ti = time(NULL);
  2740.     tm = gmtime(&ti);
  2741.     strftime(buf2, sizeof(buf2), "%a, %d %b %Y %H:%M:%S", tm);
  2742.     avio_printf(c->pb, "Date: %s GMT\r\n", buf2);
  2743. }
  2744.  
  2745. static void rtsp_reply_error(HTTPContext *c, enum RTSPStatusCode error_number)
  2746. {
  2747.     rtsp_reply_header(c, error_number);
  2748.     avio_printf(c->pb, "\r\n");
  2749. }
  2750.  
  2751. static int rtsp_parse_request(HTTPContext *c)
  2752. {
  2753.     const char *p, *p1, *p2;
  2754.     char cmd[32];
  2755.     char url[1024];
  2756.     char protocol[32];
  2757.     char line[1024];
  2758.     int len;
  2759.     RTSPMessageHeader header1 = { 0 }, *header = &header1;
  2760.  
  2761.     c->buffer_ptr[0] = '\0';
  2762.     p = c->buffer;
  2763.  
  2764.     get_word(cmd, sizeof(cmd), &p);
  2765.     get_word(url, sizeof(url), &p);
  2766.     get_word(protocol, sizeof(protocol), &p);
  2767.  
  2768.     av_strlcpy(c->method, cmd, sizeof(c->method));
  2769.     av_strlcpy(c->url, url, sizeof(c->url));
  2770.     av_strlcpy(c->protocol, protocol, sizeof(c->protocol));
  2771.  
  2772.     if (avio_open_dyn_buf(&c->pb) < 0) {
  2773.         /* XXX: cannot do more */
  2774.         c->pb = NULL; /* safety */
  2775.         return -1;
  2776.     }
  2777.  
  2778.     /* check version name */
  2779.     if (strcmp(protocol, "RTSP/1.0")) {
  2780.         rtsp_reply_error(c, RTSP_STATUS_VERSION);
  2781.         goto the_end;
  2782.     }
  2783.  
  2784.     /* parse each header line */
  2785.     /* skip to next line */
  2786.     while (*p != '\n' && *p != '\0')
  2787.         p++;
  2788.     if (*p == '\n')
  2789.         p++;
  2790.     while (*p != '\0') {
  2791.         p1 = memchr(p, '\n', (char *)c->buffer_ptr - p);
  2792.         if (!p1)
  2793.             break;
  2794.         p2 = p1;
  2795.         if (p2 > p && p2[-1] == '\r')
  2796.             p2--;
  2797.         /* skip empty line */
  2798.         if (p2 == p)
  2799.             break;
  2800.         len = p2 - p;
  2801.         if (len > sizeof(line) - 1)
  2802.             len = sizeof(line) - 1;
  2803.         memcpy(line, p, len);
  2804.         line[len] = '\0';
  2805.         ff_rtsp_parse_line(header, line, NULL, NULL);
  2806.         p = p1 + 1;
  2807.     }
  2808.  
  2809.     /* handle sequence number */
  2810.     c->seq = header->seq;
  2811.  
  2812.     if (!strcmp(cmd, "DESCRIBE"))
  2813.         rtsp_cmd_describe(c, url);
  2814.     else if (!strcmp(cmd, "OPTIONS"))
  2815.         rtsp_cmd_options(c, url);
  2816.     else if (!strcmp(cmd, "SETUP"))
  2817.         rtsp_cmd_setup(c, url, header);
  2818.     else if (!strcmp(cmd, "PLAY"))
  2819.         rtsp_cmd_play(c, url, header);
  2820.     else if (!strcmp(cmd, "PAUSE"))
  2821.         rtsp_cmd_interrupt(c, url, header, 1);
  2822.     else if (!strcmp(cmd, "TEARDOWN"))
  2823.         rtsp_cmd_interrupt(c, url, header, 0);
  2824.     else
  2825.         rtsp_reply_error(c, RTSP_STATUS_METHOD);
  2826.  
  2827.  the_end:
  2828.     len = avio_close_dyn_buf(c->pb, &c->pb_buffer);
  2829.     c->pb = NULL; /* safety */
  2830.     if (len < 0)
  2831.         /* XXX: cannot do more */
  2832.         return -1;
  2833.  
  2834.     c->buffer_ptr = c->pb_buffer;
  2835.     c->buffer_end = c->pb_buffer + len;
  2836.     c->state = RTSPSTATE_SEND_REPLY;
  2837.     return 0;
  2838. }
  2839.  
  2840. static int prepare_sdp_description(FFServerStream *stream, uint8_t **pbuffer,
  2841.                                    struct in_addr my_ip)
  2842. {
  2843.     AVFormatContext *avc;
  2844.     AVStream *avs = NULL;
  2845.     AVOutputFormat *rtp_format = av_guess_format("rtp", NULL, NULL);
  2846.     AVDictionaryEntry *entry = av_dict_get(stream->metadata, "title", NULL, 0);
  2847.     int i;
  2848.  
  2849.     *pbuffer = NULL;
  2850.  
  2851.     avc =  avformat_alloc_context();
  2852.     if (!avc || !rtp_format)
  2853.         return -1;
  2854.  
  2855.     avc->oformat = rtp_format;
  2856.     av_dict_set(&avc->metadata, "title",
  2857.                 entry ? entry->value : "No Title", 0);
  2858.     avc->nb_streams = stream->nb_streams;
  2859.     if (stream->is_multicast) {
  2860.         snprintf(avc->filename, 1024, "rtp://%s:%d?multicast=1?ttl=%d",
  2861.                  inet_ntoa(stream->multicast_ip),
  2862.                  stream->multicast_port, stream->multicast_ttl);
  2863.     } else
  2864.         snprintf(avc->filename, 1024, "rtp://0.0.0.0");
  2865.  
  2866.     avc->streams = av_malloc_array(avc->nb_streams, sizeof(*avc->streams));
  2867.     if (!avc->streams)
  2868.         goto sdp_done;
  2869.  
  2870.     avs = av_malloc_array(avc->nb_streams, sizeof(*avs));
  2871.     if (!avs)
  2872.         goto sdp_done;
  2873.  
  2874.     for(i = 0; i < stream->nb_streams; i++) {
  2875.         avc->streams[i] = &avs[i];
  2876.         avc->streams[i]->codec = stream->streams[i]->codec;
  2877.     }
  2878.     *pbuffer = av_mallocz(2048);
  2879.     if (!*pbuffer)
  2880.         goto sdp_done;
  2881.     av_sdp_create(&avc, 1, *pbuffer, 2048);
  2882.  
  2883.  sdp_done:
  2884.     av_freep(&avc->streams);
  2885.     av_dict_free(&avc->metadata);
  2886.     av_free(avc);
  2887.     av_free(avs);
  2888.  
  2889.     return *pbuffer ? strlen(*pbuffer) : AVERROR(ENOMEM);
  2890. }
  2891.  
  2892. static void rtsp_cmd_options(HTTPContext *c, const char *url)
  2893. {
  2894.     /* rtsp_reply_header(c, RTSP_STATUS_OK); */
  2895.     avio_printf(c->pb, "RTSP/1.0 %d %s\r\n", RTSP_STATUS_OK, "OK");
  2896.     avio_printf(c->pb, "CSeq: %d\r\n", c->seq);
  2897.     avio_printf(c->pb, "Public: %s\r\n",
  2898.                 "OPTIONS, DESCRIBE, SETUP, TEARDOWN, PLAY, PAUSE");
  2899.     avio_printf(c->pb, "\r\n");
  2900. }
  2901.  
  2902. static void rtsp_cmd_describe(HTTPContext *c, const char *url)
  2903. {
  2904.     FFServerStream *stream;
  2905.     char path1[1024];
  2906.     const char *path;
  2907.     uint8_t *content;
  2908.     int content_length;
  2909.     socklen_t len;
  2910.     struct sockaddr_in my_addr;
  2911.  
  2912.     /* find which URL is asked */
  2913.     av_url_split(NULL, 0, NULL, 0, NULL, 0, NULL, path1, sizeof(path1), url);
  2914.     path = path1;
  2915.     if (*path == '/')
  2916.         path++;
  2917.  
  2918.     for(stream = config.first_stream; stream; stream = stream->next) {
  2919.         if (!stream->is_feed &&
  2920.             stream->fmt && !strcmp(stream->fmt->name, "rtp") &&
  2921.             !strcmp(path, stream->filename)) {
  2922.             goto found;
  2923.         }
  2924.     }
  2925.     /* no stream found */
  2926.     rtsp_reply_error(c, RTSP_STATUS_NOT_FOUND);
  2927.     return;
  2928.  
  2929.  found:
  2930.     /* prepare the media description in SDP format */
  2931.  
  2932.     /* get the host IP */
  2933.     len = sizeof(my_addr);
  2934.     getsockname(c->fd, (struct sockaddr *)&my_addr, &len);
  2935.     content_length = prepare_sdp_description(stream, &content,
  2936.                                              my_addr.sin_addr);
  2937.     if (content_length < 0) {
  2938.         rtsp_reply_error(c, RTSP_STATUS_INTERNAL);
  2939.         return;
  2940.     }
  2941.     rtsp_reply_header(c, RTSP_STATUS_OK);
  2942.     avio_printf(c->pb, "Content-Base: %s/\r\n", url);
  2943.     avio_printf(c->pb, "Content-Type: application/sdp\r\n");
  2944.     avio_printf(c->pb, "Content-Length: %d\r\n", content_length);
  2945.     avio_printf(c->pb, "\r\n");
  2946.     avio_write(c->pb, content, content_length);
  2947.     av_free(content);
  2948. }
  2949.  
  2950. static HTTPContext *find_rtp_session(const char *session_id)
  2951. {
  2952.     HTTPContext *c;
  2953.  
  2954.     if (session_id[0] == '\0')
  2955.         return NULL;
  2956.  
  2957.     for(c = first_http_ctx; c; c = c->next) {
  2958.         if (!strcmp(c->session_id, session_id))
  2959.             return c;
  2960.     }
  2961.     return NULL;
  2962. }
  2963.  
  2964. static RTSPTransportField *find_transport(RTSPMessageHeader *h, enum RTSPLowerTransport lower_transport)
  2965. {
  2966.     RTSPTransportField *th;
  2967.     int i;
  2968.  
  2969.     for(i=0;i<h->nb_transports;i++) {
  2970.         th = &h->transports[i];
  2971.         if (th->lower_transport == lower_transport)
  2972.             return th;
  2973.     }
  2974.     return NULL;
  2975. }
  2976.  
  2977. static void rtsp_cmd_setup(HTTPContext *c, const char *url,
  2978.                            RTSPMessageHeader *h)
  2979. {
  2980.     FFServerStream *stream;
  2981.     int stream_index, rtp_port, rtcp_port;
  2982.     char buf[1024];
  2983.     char path1[1024];
  2984.     const char *path;
  2985.     HTTPContext *rtp_c;
  2986.     RTSPTransportField *th;
  2987.     struct sockaddr_in dest_addr;
  2988.     RTSPActionServerSetup setup;
  2989.  
  2990.     /* find which URL is asked */
  2991.     av_url_split(NULL, 0, NULL, 0, NULL, 0, NULL, path1, sizeof(path1), url);
  2992.     path = path1;
  2993.     if (*path == '/')
  2994.         path++;
  2995.  
  2996.     /* now check each stream */
  2997.     for(stream = config.first_stream; stream; stream = stream->next) {
  2998.         if (stream->is_feed || !stream->fmt ||
  2999.             strcmp(stream->fmt->name, "rtp")) {
  3000.             continue;
  3001.         }
  3002.         /* accept aggregate filenames only if single stream */
  3003.         if (!strcmp(path, stream->filename)) {
  3004.             if (stream->nb_streams != 1) {
  3005.                 rtsp_reply_error(c, RTSP_STATUS_AGGREGATE);
  3006.                 return;
  3007.             }
  3008.             stream_index = 0;
  3009.             goto found;
  3010.         }
  3011.  
  3012.         for(stream_index = 0; stream_index < stream->nb_streams;
  3013.             stream_index++) {
  3014.             snprintf(buf, sizeof(buf), "%s/streamid=%d",
  3015.                      stream->filename, stream_index);
  3016.             if (!strcmp(path, buf))
  3017.                 goto found;
  3018.         }
  3019.     }
  3020.     /* no stream found */
  3021.     rtsp_reply_error(c, RTSP_STATUS_SERVICE); /* XXX: right error ? */
  3022.     return;
  3023.  found:
  3024.  
  3025.     /* generate session id if needed */
  3026.     if (h->session_id[0] == '\0') {
  3027.         unsigned random0 = av_lfg_get(&random_state);
  3028.         unsigned random1 = av_lfg_get(&random_state);
  3029.         snprintf(h->session_id, sizeof(h->session_id), "%08x%08x",
  3030.                  random0, random1);
  3031.     }
  3032.  
  3033.     /* find RTP session, and create it if none found */
  3034.     rtp_c = find_rtp_session(h->session_id);
  3035.     if (!rtp_c) {
  3036.         /* always prefer UDP */
  3037.         th = find_transport(h, RTSP_LOWER_TRANSPORT_UDP);
  3038.         if (!th) {
  3039.             th = find_transport(h, RTSP_LOWER_TRANSPORT_TCP);
  3040.             if (!th) {
  3041.                 rtsp_reply_error(c, RTSP_STATUS_TRANSPORT);
  3042.                 return;
  3043.             }
  3044.         }
  3045.  
  3046.         rtp_c = rtp_new_connection(&c->from_addr, stream, h->session_id,
  3047.                                    th->lower_transport);
  3048.         if (!rtp_c) {
  3049.             rtsp_reply_error(c, RTSP_STATUS_BANDWIDTH);
  3050.             return;
  3051.         }
  3052.  
  3053.         /* open input stream */
  3054.         if (open_input_stream(rtp_c, "") < 0) {
  3055.             rtsp_reply_error(c, RTSP_STATUS_INTERNAL);
  3056.             return;
  3057.         }
  3058.     }
  3059.  
  3060.     /* test if stream is OK (test needed because several SETUP needs
  3061.      * to be done for a given file) */
  3062.     if (rtp_c->stream != stream) {
  3063.         rtsp_reply_error(c, RTSP_STATUS_SERVICE);
  3064.         return;
  3065.     }
  3066.  
  3067.     /* test if stream is already set up */
  3068.     if (rtp_c->rtp_ctx[stream_index]) {
  3069.         rtsp_reply_error(c, RTSP_STATUS_STATE);
  3070.         return;
  3071.     }
  3072.  
  3073.     /* check transport */
  3074.     th = find_transport(h, rtp_c->rtp_protocol);
  3075.     if (!th || (th->lower_transport == RTSP_LOWER_TRANSPORT_UDP &&
  3076.                 th->client_port_min <= 0)) {
  3077.         rtsp_reply_error(c, RTSP_STATUS_TRANSPORT);
  3078.         return;
  3079.     }
  3080.  
  3081.     /* setup default options */
  3082.     setup.transport_option[0] = '\0';
  3083.     dest_addr = rtp_c->from_addr;
  3084.     dest_addr.sin_port = htons(th->client_port_min);
  3085.  
  3086.     /* setup stream */
  3087.     if (rtp_new_av_stream(rtp_c, stream_index, &dest_addr, c) < 0) {
  3088.         rtsp_reply_error(c, RTSP_STATUS_TRANSPORT);
  3089.         return;
  3090.     }
  3091.  
  3092.     /* now everything is OK, so we can send the connection parameters */
  3093.     rtsp_reply_header(c, RTSP_STATUS_OK);
  3094.     /* session ID */
  3095.     avio_printf(c->pb, "Session: %s\r\n", rtp_c->session_id);
  3096.  
  3097.     switch(rtp_c->rtp_protocol) {
  3098.     case RTSP_LOWER_TRANSPORT_UDP:
  3099.         rtp_port = ff_rtp_get_local_rtp_port(rtp_c->rtp_handles[stream_index]);
  3100.         rtcp_port = ff_rtp_get_local_rtcp_port(rtp_c->rtp_handles[stream_index]);
  3101.         avio_printf(c->pb, "Transport: RTP/AVP/UDP;unicast;"
  3102.                     "client_port=%d-%d;server_port=%d-%d",
  3103.                     th->client_port_min, th->client_port_max,
  3104.                     rtp_port, rtcp_port);
  3105.         break;
  3106.     case RTSP_LOWER_TRANSPORT_TCP:
  3107.         avio_printf(c->pb, "Transport: RTP/AVP/TCP;interleaved=%d-%d",
  3108.                     stream_index * 2, stream_index * 2 + 1);
  3109.         break;
  3110.     default:
  3111.         break;
  3112.     }
  3113.     if (setup.transport_option[0] != '\0')
  3114.         avio_printf(c->pb, ";%s", setup.transport_option);
  3115.     avio_printf(c->pb, "\r\n");
  3116.  
  3117.  
  3118.     avio_printf(c->pb, "\r\n");
  3119. }
  3120.  
  3121.  
  3122. /**
  3123.  * find an RTP connection by using the session ID. Check consistency
  3124.  * with filename
  3125.  */
  3126. static HTTPContext *find_rtp_session_with_url(const char *url,
  3127.                                               const char *session_id)
  3128. {
  3129.     HTTPContext *rtp_c;
  3130.     char path1[1024];
  3131.     const char *path;
  3132.     char buf[1024];
  3133.     int s, len;
  3134.  
  3135.     rtp_c = find_rtp_session(session_id);
  3136.     if (!rtp_c)
  3137.         return NULL;
  3138.  
  3139.     /* find which URL is asked */
  3140.     av_url_split(NULL, 0, NULL, 0, NULL, 0, NULL, path1, sizeof(path1), url);
  3141.     path = path1;
  3142.     if (*path == '/')
  3143.         path++;
  3144.     if(!strcmp(path, rtp_c->stream->filename)) return rtp_c;
  3145.     for(s=0; s<rtp_c->stream->nb_streams; ++s) {
  3146.       snprintf(buf, sizeof(buf), "%s/streamid=%d",
  3147.         rtp_c->stream->filename, s);
  3148.       if(!strncmp(path, buf, sizeof(buf)))
  3149.         /* XXX: Should we reply with RTSP_STATUS_ONLY_AGGREGATE
  3150.          * if nb_streams>1? */
  3151.         return rtp_c;
  3152.     }
  3153.     len = strlen(path);
  3154.     if (len > 0 && path[len - 1] == '/' &&
  3155.         !strncmp(path, rtp_c->stream->filename, len - 1))
  3156.         return rtp_c;
  3157.     return NULL;
  3158. }
  3159.  
  3160. static void rtsp_cmd_play(HTTPContext *c, const char *url, RTSPMessageHeader *h)
  3161. {
  3162.     HTTPContext *rtp_c;
  3163.  
  3164.     rtp_c = find_rtp_session_with_url(url, h->session_id);
  3165.     if (!rtp_c) {
  3166.         rtsp_reply_error(c, RTSP_STATUS_SESSION);
  3167.         return;
  3168.     }
  3169.  
  3170.     if (rtp_c->state != HTTPSTATE_SEND_DATA &&
  3171.         rtp_c->state != HTTPSTATE_WAIT_FEED &&
  3172.         rtp_c->state != HTTPSTATE_READY) {
  3173.         rtsp_reply_error(c, RTSP_STATUS_STATE);
  3174.         return;
  3175.     }
  3176.  
  3177.     rtp_c->state = HTTPSTATE_SEND_DATA;
  3178.  
  3179.     /* now everything is OK, so we can send the connection parameters */
  3180.     rtsp_reply_header(c, RTSP_STATUS_OK);
  3181.     /* session ID */
  3182.     avio_printf(c->pb, "Session: %s\r\n", rtp_c->session_id);
  3183.     avio_printf(c->pb, "\r\n");
  3184. }
  3185.  
  3186. static void rtsp_cmd_interrupt(HTTPContext *c, const char *url,
  3187.                                RTSPMessageHeader *h, int pause_only)
  3188. {
  3189.     HTTPContext *rtp_c;
  3190.  
  3191.     rtp_c = find_rtp_session_with_url(url, h->session_id);
  3192.     if (!rtp_c) {
  3193.         rtsp_reply_error(c, RTSP_STATUS_SESSION);
  3194.         return;
  3195.     }
  3196.  
  3197.     if (pause_only) {
  3198.         if (rtp_c->state != HTTPSTATE_SEND_DATA &&
  3199.             rtp_c->state != HTTPSTATE_WAIT_FEED) {
  3200.             rtsp_reply_error(c, RTSP_STATUS_STATE);
  3201.             return;
  3202.         }
  3203.         rtp_c->state = HTTPSTATE_READY;
  3204.         rtp_c->first_pts = AV_NOPTS_VALUE;
  3205.     }
  3206.  
  3207.     /* now everything is OK, so we can send the connection parameters */
  3208.     rtsp_reply_header(c, RTSP_STATUS_OK);
  3209.     /* session ID */
  3210.     avio_printf(c->pb, "Session: %s\r\n", rtp_c->session_id);
  3211.     avio_printf(c->pb, "\r\n");
  3212.  
  3213.     if (!pause_only)
  3214.         close_connection(rtp_c);
  3215. }
  3216.  
  3217. /********************************************************************/
  3218. /* RTP handling */
  3219.  
  3220. static HTTPContext *rtp_new_connection(struct sockaddr_in *from_addr,
  3221.                                        FFServerStream *stream,
  3222.                                        const char *session_id,
  3223.                                        enum RTSPLowerTransport rtp_protocol)
  3224. {
  3225.     HTTPContext *c = NULL;
  3226.     const char *proto_str;
  3227.  
  3228.     /* XXX: should output a warning page when coming
  3229.      * close to the connection limit */
  3230.     if (nb_connections >= config.nb_max_connections)
  3231.         goto fail;
  3232.  
  3233.     /* add a new connection */
  3234.     c = av_mallocz(sizeof(HTTPContext));
  3235.     if (!c)
  3236.         goto fail;
  3237.  
  3238.     c->fd = -1;
  3239.     c->poll_entry = NULL;
  3240.     c->from_addr = *from_addr;
  3241.     c->buffer_size = IOBUFFER_INIT_SIZE;
  3242.     c->buffer = av_malloc(c->buffer_size);
  3243.     if (!c->buffer)
  3244.         goto fail;
  3245.     nb_connections++;
  3246.     c->stream = stream;
  3247.     av_strlcpy(c->session_id, session_id, sizeof(c->session_id));
  3248.     c->state = HTTPSTATE_READY;
  3249.     c->is_packetized = 1;
  3250.     c->rtp_protocol = rtp_protocol;
  3251.  
  3252.     /* protocol is shown in statistics */
  3253.     switch(c->rtp_protocol) {
  3254.     case RTSP_LOWER_TRANSPORT_UDP_MULTICAST:
  3255.         proto_str = "MCAST";
  3256.         break;
  3257.     case RTSP_LOWER_TRANSPORT_UDP:
  3258.         proto_str = "UDP";
  3259.         break;
  3260.     case RTSP_LOWER_TRANSPORT_TCP:
  3261.         proto_str = "TCP";
  3262.         break;
  3263.     default:
  3264.         proto_str = "???";
  3265.         break;
  3266.     }
  3267.     av_strlcpy(c->protocol, "RTP/", sizeof(c->protocol));
  3268.     av_strlcat(c->protocol, proto_str, sizeof(c->protocol));
  3269.  
  3270.     current_bandwidth += stream->bandwidth;
  3271.  
  3272.     c->next = first_http_ctx;
  3273.     first_http_ctx = c;
  3274.     return c;
  3275.  
  3276.  fail:
  3277.     if (c) {
  3278.         av_freep(&c->buffer);
  3279.         av_free(c);
  3280.     }
  3281.     return NULL;
  3282. }
  3283.  
  3284. /**
  3285.  * add a new RTP stream in an RTP connection (used in RTSP SETUP
  3286.  * command). If RTP/TCP protocol is used, TCP connection 'rtsp_c' is
  3287.  * used.
  3288.  */
  3289. static int rtp_new_av_stream(HTTPContext *c,
  3290.                              int stream_index, struct sockaddr_in *dest_addr,
  3291.                              HTTPContext *rtsp_c)
  3292. {
  3293.     AVFormatContext *ctx;
  3294.     AVStream *st;
  3295.     char *ipaddr;
  3296.     URLContext *h = NULL;
  3297.     uint8_t *dummy_buf;
  3298.     int max_packet_size;
  3299.  
  3300.     /* now we can open the relevant output stream */
  3301.     ctx = avformat_alloc_context();
  3302.     if (!ctx)
  3303.         return -1;
  3304.     ctx->oformat = av_guess_format("rtp", NULL, NULL);
  3305.  
  3306.     st = av_mallocz(sizeof(AVStream));
  3307.     if (!st)
  3308.         goto fail;
  3309.     ctx->nb_streams = 1;
  3310.     ctx->streams = av_mallocz_array(ctx->nb_streams, sizeof(AVStream *));
  3311.     if (!ctx->streams)
  3312.       goto fail;
  3313.     ctx->streams[0] = st;
  3314.  
  3315.     if (!c->stream->feed ||
  3316.         c->stream->feed == c->stream)
  3317.         memcpy(st, c->stream->streams[stream_index], sizeof(AVStream));
  3318.     else
  3319.         memcpy(st,
  3320.                c->stream->feed->streams[c->stream->feed_streams[stream_index]],
  3321.                sizeof(AVStream));
  3322.     st->priv_data = NULL;
  3323.  
  3324.     /* build destination RTP address */
  3325.     ipaddr = inet_ntoa(dest_addr->sin_addr);
  3326.  
  3327.     switch(c->rtp_protocol) {
  3328.     case RTSP_LOWER_TRANSPORT_UDP:
  3329.     case RTSP_LOWER_TRANSPORT_UDP_MULTICAST:
  3330.         /* RTP/UDP case */
  3331.  
  3332.         /* XXX: also pass as parameter to function ? */
  3333.         if (c->stream->is_multicast) {
  3334.             int ttl;
  3335.             ttl = c->stream->multicast_ttl;
  3336.             if (!ttl)
  3337.                 ttl = 16;
  3338.             snprintf(ctx->filename, sizeof(ctx->filename),
  3339.                      "rtp://%s:%d?multicast=1&ttl=%d",
  3340.                      ipaddr, ntohs(dest_addr->sin_port), ttl);
  3341.         } else {
  3342.             snprintf(ctx->filename, sizeof(ctx->filename),
  3343.                      "rtp://%s:%d", ipaddr, ntohs(dest_addr->sin_port));
  3344.         }
  3345.  
  3346.         if (ffurl_open(&h, ctx->filename, AVIO_FLAG_WRITE, NULL, NULL) < 0)
  3347.             goto fail;
  3348.         c->rtp_handles[stream_index] = h;
  3349.         max_packet_size = h->max_packet_size;
  3350.         break;
  3351.     case RTSP_LOWER_TRANSPORT_TCP:
  3352.         /* RTP/TCP case */
  3353.         c->rtsp_c = rtsp_c;
  3354.         max_packet_size = RTSP_TCP_MAX_PACKET_SIZE;
  3355.         break;
  3356.     default:
  3357.         goto fail;
  3358.     }
  3359.  
  3360.     http_log("%s:%d - - \"PLAY %s/streamid=%d %s\"\n",
  3361.              ipaddr, ntohs(dest_addr->sin_port),
  3362.              c->stream->filename, stream_index, c->protocol);
  3363.  
  3364.     /* normally, no packets should be output here, but the packet size may
  3365.      * be checked */
  3366.     if (ffio_open_dyn_packet_buf(&ctx->pb, max_packet_size) < 0)
  3367.         /* XXX: close stream */
  3368.         goto fail;
  3369.  
  3370.     if (avformat_write_header(ctx, NULL) < 0) {
  3371.     fail:
  3372.         if (h)
  3373.             ffurl_close(h);
  3374.         av_free(st);
  3375.         av_free(ctx);
  3376.         return -1;
  3377.     }
  3378.     avio_close_dyn_buf(ctx->pb, &dummy_buf);
  3379.     av_free(dummy_buf);
  3380.  
  3381.     c->rtp_ctx[stream_index] = ctx;
  3382.     return 0;
  3383. }
  3384.  
  3385. /********************************************************************/
  3386. /* ffserver initialization */
  3387.  
  3388. static AVStream *add_av_stream1(FFServerStream *stream,
  3389.                                 AVCodecContext *codec, int copy)
  3390. {
  3391.     AVStream *fst;
  3392.  
  3393.     if(stream->nb_streams >= FF_ARRAY_ELEMS(stream->streams))
  3394.         return NULL;
  3395.  
  3396.     fst = av_mallocz(sizeof(AVStream));
  3397.     if (!fst)
  3398.         return NULL;
  3399.     if (copy) {
  3400.         fst->codec = avcodec_alloc_context3(codec->codec);
  3401.         if (!fst->codec) {
  3402.             av_free(fst);
  3403.             return NULL;
  3404.         }
  3405.         avcodec_copy_context(fst->codec, codec);
  3406.     } else
  3407.         /* live streams must use the actual feed's codec since it may be
  3408.          * updated later to carry extradata needed by them.
  3409.          */
  3410.         fst->codec = codec;
  3411.  
  3412.     fst->priv_data = av_mallocz(sizeof(FeedData));
  3413.     fst->index = stream->nb_streams;
  3414.     avpriv_set_pts_info(fst, 33, 1, 90000);
  3415.     fst->sample_aspect_ratio = codec->sample_aspect_ratio;
  3416.     stream->streams[stream->nb_streams++] = fst;
  3417.     return fst;
  3418. }
  3419.  
  3420. /* return the stream number in the feed */
  3421. static int add_av_stream(FFServerStream *feed, AVStream *st)
  3422. {
  3423.     AVStream *fst;
  3424.     AVCodecContext *av, *av1;
  3425.     int i;
  3426.  
  3427.     av = st->codec;
  3428.     for(i=0;i<feed->nb_streams;i++) {
  3429.         av1 = feed->streams[i]->codec;
  3430.         if (av1->codec_id == av->codec_id &&
  3431.             av1->codec_type == av->codec_type &&
  3432.             av1->bit_rate == av->bit_rate) {
  3433.  
  3434.             switch(av->codec_type) {
  3435.             case AVMEDIA_TYPE_AUDIO:
  3436.                 if (av1->channels == av->channels &&
  3437.                     av1->sample_rate == av->sample_rate)
  3438.                     return i;
  3439.                 break;
  3440.             case AVMEDIA_TYPE_VIDEO:
  3441.                 if (av1->width == av->width &&
  3442.                     av1->height == av->height &&
  3443.                     av1->time_base.den == av->time_base.den &&
  3444.                     av1->time_base.num == av->time_base.num &&
  3445.                     av1->gop_size == av->gop_size)
  3446.                     return i;
  3447.                 break;
  3448.             default:
  3449.                 abort();
  3450.             }
  3451.         }
  3452.     }
  3453.  
  3454.     fst = add_av_stream1(feed, av, 0);
  3455.     if (!fst)
  3456.         return -1;
  3457.     if (av_stream_get_recommended_encoder_configuration(st))
  3458.         av_stream_set_recommended_encoder_configuration(fst,
  3459.             av_strdup(av_stream_get_recommended_encoder_configuration(st)));
  3460.     return feed->nb_streams - 1;
  3461. }
  3462.  
  3463. static void remove_stream(FFServerStream *stream)
  3464. {
  3465.     FFServerStream **ps;
  3466.     ps = &config.first_stream;
  3467.     while (*ps) {
  3468.         if (*ps == stream)
  3469.             *ps = (*ps)->next;
  3470.         else
  3471.             ps = &(*ps)->next;
  3472.     }
  3473. }
  3474.  
  3475. /* specific MPEG4 handling : we extract the raw parameters */
  3476. static void extract_mpeg4_header(AVFormatContext *infile)
  3477. {
  3478.     int mpeg4_count, i, size;
  3479.     AVPacket pkt;
  3480.     AVStream *st;
  3481.     const uint8_t *p;
  3482.  
  3483.     infile->flags |= AVFMT_FLAG_NOFILLIN | AVFMT_FLAG_NOPARSE;
  3484.  
  3485.     mpeg4_count = 0;
  3486.     for(i=0;i<infile->nb_streams;i++) {
  3487.         st = infile->streams[i];
  3488.         if (st->codec->codec_id == AV_CODEC_ID_MPEG4 &&
  3489.             st->codec->extradata_size == 0) {
  3490.             mpeg4_count++;
  3491.         }
  3492.     }
  3493.     if (!mpeg4_count)
  3494.         return;
  3495.  
  3496.     printf("MPEG4 without extra data: trying to find header in %s\n",
  3497.            infile->filename);
  3498.     while (mpeg4_count > 0) {
  3499.         if (av_read_frame(infile, &pkt) < 0)
  3500.             break;
  3501.         st = infile->streams[pkt.stream_index];
  3502.         if (st->codec->codec_id == AV_CODEC_ID_MPEG4 &&
  3503.             st->codec->extradata_size == 0) {
  3504.             av_freep(&st->codec->extradata);
  3505.             /* fill extradata with the header */
  3506.             /* XXX: we make hard suppositions here ! */
  3507.             p = pkt.data;
  3508.             while (p < pkt.data + pkt.size - 4) {
  3509.                 /* stop when vop header is found */
  3510.                 if (p[0] == 0x00 && p[1] == 0x00 &&
  3511.                     p[2] == 0x01 && p[3] == 0xb6) {
  3512.                     size = p - pkt.data;
  3513.                     st->codec->extradata = av_mallocz(size + AV_INPUT_BUFFER_PADDING_SIZE);
  3514.                     st->codec->extradata_size = size;
  3515.                     memcpy(st->codec->extradata, pkt.data, size);
  3516.                     break;
  3517.                 }
  3518.                 p++;
  3519.             }
  3520.             mpeg4_count--;
  3521.         }
  3522.         av_free_packet(&pkt);
  3523.     }
  3524. }
  3525.  
  3526. /* compute the needed AVStream for each file */
  3527. static void build_file_streams(void)
  3528. {
  3529.     FFServerStream *stream, *stream_next;
  3530.     int i, ret;
  3531.  
  3532.     /* gather all streams */
  3533.     for(stream = config.first_stream; stream; stream = stream_next) {
  3534.         AVFormatContext *infile = NULL;
  3535.         stream_next = stream->next;
  3536.         if (stream->stream_type == STREAM_TYPE_LIVE &&
  3537.             !stream->feed) {
  3538.             /* the stream comes from a file */
  3539.             /* try to open the file */
  3540.             /* open stream */
  3541.             if (stream->fmt && !strcmp(stream->fmt->name, "rtp")) {
  3542.                 /* specific case : if transport stream output to RTP,
  3543.                  * we use a raw transport stream reader */
  3544.                 av_dict_set(&stream->in_opts, "mpeg2ts_compute_pcr", "1", 0);
  3545.             }
  3546.  
  3547.             if (!stream->feed_filename[0]) {
  3548.                 http_log("Unspecified feed file for stream '%s'\n",
  3549.                          stream->filename);
  3550.                 goto fail;
  3551.             }
  3552.  
  3553.             http_log("Opening feed file '%s' for stream '%s'\n",
  3554.                      stream->feed_filename, stream->filename);
  3555.             ret = avformat_open_input(&infile, stream->feed_filename,
  3556.                                       stream->ifmt, &stream->in_opts);
  3557.             if (ret < 0) {
  3558.                 http_log("Could not open '%s': %s\n", stream->feed_filename,
  3559.                          av_err2str(ret));
  3560.                 /* remove stream (no need to spend more time on it) */
  3561.             fail:
  3562.                 remove_stream(stream);
  3563.             } else {
  3564.                 /* find all the AVStreams inside and reference them in
  3565.                  * 'stream' */
  3566.                 if (avformat_find_stream_info(infile, NULL) < 0) {
  3567.                     http_log("Could not find codec parameters from '%s'\n",
  3568.                              stream->feed_filename);
  3569.                     avformat_close_input(&infile);
  3570.                     goto fail;
  3571.                 }
  3572.                 extract_mpeg4_header(infile);
  3573.  
  3574.                 for(i=0;i<infile->nb_streams;i++)
  3575.                     add_av_stream1(stream, infile->streams[i]->codec, 1);
  3576.  
  3577.                 avformat_close_input(&infile);
  3578.             }
  3579.         }
  3580.     }
  3581. }
  3582.  
  3583. /* compute the needed AVStream for each feed */
  3584. static void build_feed_streams(void)
  3585. {
  3586.     FFServerStream *stream, *feed;
  3587.     int i;
  3588.  
  3589.     /* gather all streams */
  3590.     for(stream = config.first_stream; stream; stream = stream->next) {
  3591.         feed = stream->feed;
  3592.         if (!feed)
  3593.             continue;
  3594.  
  3595.         if (stream->is_feed) {
  3596.             for(i=0;i<stream->nb_streams;i++)
  3597.                 stream->feed_streams[i] = i;
  3598.         } else {
  3599.             /* we handle a stream coming from a feed */
  3600.             for(i=0;i<stream->nb_streams;i++)
  3601.                 stream->feed_streams[i] = add_av_stream(feed,
  3602.                                                         stream->streams[i]);
  3603.         }
  3604.     }
  3605.  
  3606.     /* create feed files if needed */
  3607.     for(feed = config.first_feed; feed; feed = feed->next_feed) {
  3608.         int fd;
  3609.  
  3610.         if (avio_check(feed->feed_filename, AVIO_FLAG_READ) > 0) {
  3611.             /* See if it matches */
  3612.             AVFormatContext *s = NULL;
  3613.             int matches = 0;
  3614.  
  3615.             if (avformat_open_input(&s, feed->feed_filename, NULL, NULL) >= 0) {
  3616.                 /* set buffer size */
  3617.                 int ret = ffio_set_buf_size(s->pb, FFM_PACKET_SIZE);
  3618.                 if (ret < 0) {
  3619.                     http_log("Failed to set buffer size\n");
  3620.                     exit(1);
  3621.                 }
  3622.  
  3623.                 /* Now see if it matches */
  3624.                 if (s->nb_streams == feed->nb_streams) {
  3625.                     matches = 1;
  3626.                     for(i=0;i<s->nb_streams;i++) {
  3627.                         AVStream *sf, *ss;
  3628.                         sf = feed->streams[i];
  3629.                         ss = s->streams[i];
  3630.  
  3631.                         if (sf->index != ss->index ||
  3632.                             sf->id != ss->id) {
  3633.                             http_log("Index & Id do not match for stream %d (%s)\n",
  3634.                                    i, feed->feed_filename);
  3635.                             matches = 0;
  3636.                         } else {
  3637.                             AVCodecContext *ccf, *ccs;
  3638.  
  3639.                             ccf = sf->codec;
  3640.                             ccs = ss->codec;
  3641. #define CHECK_CODEC(x)  (ccf->x != ccs->x)
  3642.  
  3643.                             if (CHECK_CODEC(codec_id) || CHECK_CODEC(codec_type)) {
  3644.                                 http_log("Codecs do not match for stream %d\n", i);
  3645.                                 matches = 0;
  3646.                             } else if (CHECK_CODEC(bit_rate) || CHECK_CODEC(flags)) {
  3647.                                 http_log("Codec bitrates do not match for stream %d\n", i);
  3648.                                 matches = 0;
  3649.                             } else if (ccf->codec_type == AVMEDIA_TYPE_VIDEO) {
  3650.                                 if (CHECK_CODEC(time_base.den) ||
  3651.                                     CHECK_CODEC(time_base.num) ||
  3652.                                     CHECK_CODEC(width) ||
  3653.                                     CHECK_CODEC(height)) {
  3654.                                     http_log("Codec width, height and framerate do not match for stream %d\n", i);
  3655.                                     matches = 0;
  3656.                                 }
  3657.                             } else if (ccf->codec_type == AVMEDIA_TYPE_AUDIO) {
  3658.                                 if (CHECK_CODEC(sample_rate) ||
  3659.                                     CHECK_CODEC(channels) ||
  3660.                                     CHECK_CODEC(frame_size)) {
  3661.                                     http_log("Codec sample_rate, channels, frame_size do not match for stream %d\n", i);
  3662.                                     matches = 0;
  3663.                                 }
  3664.                             } else {
  3665.                                 http_log("Unknown codec type\n");
  3666.                                 matches = 0;
  3667.                             }
  3668.                         }
  3669.                         if (!matches)
  3670.                             break;
  3671.                     }
  3672.                 } else
  3673.                     http_log("Deleting feed file '%s' as stream counts differ (%d != %d)\n",
  3674.                         feed->feed_filename, s->nb_streams, feed->nb_streams);
  3675.  
  3676.                 avformat_close_input(&s);
  3677.             } else
  3678.                 http_log("Deleting feed file '%s' as it appears to be corrupt\n",
  3679.                         feed->feed_filename);
  3680.  
  3681.             if (!matches) {
  3682.                 if (feed->readonly) {
  3683.                     http_log("Unable to delete feed file '%s' as it is marked readonly\n",
  3684.                         feed->feed_filename);
  3685.                     exit(1);
  3686.                 }
  3687.                 unlink(feed->feed_filename);
  3688.             }
  3689.         }
  3690.         if (avio_check(feed->feed_filename, AVIO_FLAG_WRITE) <= 0) {
  3691.             AVFormatContext *s = avformat_alloc_context();
  3692.  
  3693.             if (!s) {
  3694.                 http_log("Failed to allocate context\n");
  3695.                 exit(1);
  3696.             }
  3697.  
  3698.             if (feed->readonly) {
  3699.                 http_log("Unable to create feed file '%s' as it is marked readonly\n",
  3700.                     feed->feed_filename);
  3701.                 exit(1);
  3702.             }
  3703.  
  3704.             /* only write the header of the ffm file */
  3705.             if (avio_open(&s->pb, feed->feed_filename, AVIO_FLAG_WRITE) < 0) {
  3706.                 http_log("Could not open output feed file '%s'\n",
  3707.                          feed->feed_filename);
  3708.                 exit(1);
  3709.             }
  3710.             s->oformat = feed->fmt;
  3711.             s->nb_streams = feed->nb_streams;
  3712.             s->streams = feed->streams;
  3713.             if (avformat_write_header(s, NULL) < 0) {
  3714.                 http_log("Container doesn't support the required parameters\n");
  3715.                 exit(1);
  3716.             }
  3717.             /* XXX: need better API */
  3718.             av_freep(&s->priv_data);
  3719.             avio_closep(&s->pb);
  3720.             s->streams = NULL;
  3721.             s->nb_streams = 0;
  3722.             avformat_free_context(s);
  3723.         }
  3724.         /* get feed size and write index */
  3725.         fd = open(feed->feed_filename, O_RDONLY);
  3726.         if (fd < 0) {
  3727.             http_log("Could not open output feed file '%s'\n",
  3728.                     feed->feed_filename);
  3729.             exit(1);
  3730.         }
  3731.  
  3732.         feed->feed_write_index = FFMAX(ffm_read_write_index(fd), FFM_PACKET_SIZE);
  3733.         feed->feed_size = lseek(fd, 0, SEEK_END);
  3734.         /* ensure that we do not wrap before the end of file */
  3735.         if (feed->feed_max_size && feed->feed_max_size < feed->feed_size)
  3736.             feed->feed_max_size = feed->feed_size;
  3737.  
  3738.         close(fd);
  3739.     }
  3740. }
  3741.  
  3742. /* compute the bandwidth used by each stream */
  3743. static void compute_bandwidth(void)
  3744. {
  3745.     unsigned bandwidth;
  3746.     int i;
  3747.     FFServerStream *stream;
  3748.  
  3749.     for(stream = config.first_stream; stream; stream = stream->next) {
  3750.         bandwidth = 0;
  3751.         for(i=0;i<stream->nb_streams;i++) {
  3752.             AVStream *st = stream->streams[i];
  3753.             switch(st->codec->codec_type) {
  3754.             case AVMEDIA_TYPE_AUDIO:
  3755.             case AVMEDIA_TYPE_VIDEO:
  3756.                 bandwidth += st->codec->bit_rate;
  3757.                 break;
  3758.             default:
  3759.                 break;
  3760.             }
  3761.         }
  3762.         stream->bandwidth = (bandwidth + 999) / 1000;
  3763.     }
  3764. }
  3765.  
  3766. static void handle_child_exit(int sig)
  3767. {
  3768.     pid_t pid;
  3769.     int status, uptime;
  3770.  
  3771.     while ((pid = waitpid(-1, &status, WNOHANG)) > 0) {
  3772.         FFServerStream *feed;
  3773.  
  3774.         for (feed = config.first_feed; feed; feed = feed->next) {
  3775.             if (feed->pid != pid)
  3776.                 continue;
  3777.  
  3778.             uptime = time(0) - feed->pid_start;
  3779.             feed->pid = 0;
  3780.             fprintf(stderr,
  3781.                     "%s: Pid %"PRId64" exited with status %d after %d seconds\n",
  3782.                     feed->filename, (int64_t) pid, status, uptime);
  3783.  
  3784.             if (uptime < 30)
  3785.                 /* Turn off any more restarts */
  3786.                 ffserver_free_child_args(&feed->child_argv);
  3787.         }
  3788.     }
  3789.  
  3790.     need_to_start_children = 1;
  3791. }
  3792.  
  3793. static void opt_debug(void)
  3794. {
  3795.     config.debug = 1;
  3796.     snprintf(config.logfilename, sizeof(config.logfilename), "-");
  3797. }
  3798.  
  3799. void show_help_default(const char *opt, const char *arg)
  3800. {
  3801.     printf("usage: ffserver [options]\n"
  3802.            "Hyper fast multi format Audio/Video streaming server\n");
  3803.     printf("\n");
  3804.     show_help_options(options, "Main options:", 0, 0, 0);
  3805. }
  3806.  
  3807. static const OptionDef options[] = {
  3808. #include "cmdutils_common_opts.h"
  3809.     { "n", OPT_BOOL, {(void *)&no_launch }, "enable no-launch mode" },
  3810.     { "d", 0, {(void*)opt_debug}, "enable debug mode" },
  3811.     { "f", HAS_ARG | OPT_STRING, {(void*)&config.filename }, "use configfile instead of /etc/ffserver.conf", "configfile" },
  3812.     { NULL },
  3813. };
  3814.  
  3815. int main(int argc, char **argv)
  3816. {
  3817.     struct sigaction sigact = { { 0 } };
  3818.     int ret = 0;
  3819.  
  3820.     config.filename = av_strdup("/etc/ffserver.conf");
  3821.  
  3822.     parse_loglevel(argc, argv, options);
  3823.     av_register_all();
  3824.     avformat_network_init();
  3825.  
  3826.     show_banner(argc, argv, options);
  3827.  
  3828.     my_program_name = argv[0];
  3829.  
  3830.     parse_options(NULL, argc, argv, options, NULL);
  3831.  
  3832.     unsetenv("http_proxy");             /* Kill the http_proxy */
  3833.  
  3834.     av_lfg_init(&random_state, av_get_random_seed());
  3835.  
  3836.     sigact.sa_handler = handle_child_exit;
  3837.     sigact.sa_flags = SA_NOCLDSTOP | SA_RESTART;
  3838.     sigaction(SIGCHLD, &sigact, 0);
  3839.  
  3840.     if ((ret = ffserver_parse_ffconfig(config.filename, &config)) < 0) {
  3841.         fprintf(stderr, "Error reading configuration file '%s': %s\n",
  3842.                 config.filename, av_err2str(ret));
  3843.         exit(1);
  3844.     }
  3845.     av_freep(&config.filename);
  3846.  
  3847.     /* open log file if needed */
  3848.     if (config.logfilename[0] != '\0') {
  3849.         if (!strcmp(config.logfilename, "-"))
  3850.             logfile = stdout;
  3851.         else
  3852.             logfile = fopen(config.logfilename, "a");
  3853.         av_log_set_callback(http_av_log);
  3854.     }
  3855.  
  3856.     build_file_streams();
  3857.  
  3858.     build_feed_streams();
  3859.  
  3860.     compute_bandwidth();
  3861.  
  3862.     /* signal init */
  3863.     signal(SIGPIPE, SIG_IGN);
  3864.  
  3865.     if (http_server() < 0) {
  3866.         http_log("Could not start server\n");
  3867.         exit(1);
  3868.     }
  3869.  
  3870.     return 0;
  3871. }
  3872.