#vim:ts=4:sw=4:et

import pygst

pygst.require("0.10")

import gst

import gobject

import socket

from threading import Thread

class Media:

    class StreamListener(Thread):

        def __init__ (self, stream_data):

            Thread.__init__(self)

            self.stream = stream_data

            print "Thread Created"

        def run (self):

            #Create socket

            print "Waiting connection"

            self.stream.Socket.listen(1)

            self.stream.Connection, self.stream.Addr = self.stream.Socket.accept ()

            print "Connection requested"

            self.stream.Sink.set_property ("fd", self.stream.Connection.fileno())

            self.stream.Pipe.set_state(gst.STATE_PLAYING)

            print "PLAYING"

    class StreamData:

        stream_count = 0

        def __init__ (self, pipe, abin, vbin, sink):

            self.stream_count += 1

            self.Id = self.stream_count

            self.Pipe = pipe

            self.Abin = abin

            self.Vbin = vbin

            self.Sink = sink

            self.Loop = gobject.MainLoop()

            self.ACaps = ""

            self.VCaps = ""

            self.Ready = False

            self.Socket = None

            self.Connection = None

            self.Addr = None

    def __init__(self, config):

        # set gstreamer basic options

        self.config = config

        self.streams = []

        self.socket = None

        self.connection = None

        self.addr = None

        self.ready = False

    def setup(self, uri, mux, vcodec, vbitrate,

              fps, acodec, abitrate, width, height, port, options):

        ## Pipelines

        pipe = gst.Pipeline ()

        print "Opening Uri:" + uri

        src = gst.element_make_from_uri (gst.URI_SRC, uri, "src")

        if (src is None):

            print "Fail to create src element"

            return None

        decode = gst.element_factory_make ("decodebin", "decode")

        if (decode is None):

            print "Fail to create decodebin"

            return None

        mux = gst.element_factory_make ("avimux", "mux")

        if (mux is None):

            print "Fail to create mux"

            return None

        sink = gst.element_factory_make ("fdsink", "sink")

        if (sink is None):

            print "Fail to create fdsink"

            return None

        #video encode

        #queue ! videoscale ! video/x-raw-yuv,width=240,height=144 ! videorate ! ffenc_h263p bitrate=256000 me-method=2 ! rtph263ppay ! udpsink  host=224.0.0.1 port=5000

        vbin = gst.Bin ()

        vqueue = gst.element_factory_make ("queue", "vqueue")

        vscale = gst.element_factory_make ("videoscale", "vscale")

        colorspace = gst.element_factory_make ("ffmpegcolorspace", "")

        vrate = gst.element_factory_make ("videorate", "vrate")

        vencode = gst.element_factory_make ("ffenc_h263p", "vencode")

        if (None in [vbin, vqueue, vscale, vrate, vencode]):

            print "Fail to create video encode elements."

            return None

        '''

        vscale_pad = vscale.get_pad("sink")

        if (vscale_pad is None):

            print "Fail to get vscale sink pad."

            return None

        vscale_caps = gst.caps_from_string ("video/x-raw-yuv,width=%d,height=(int)%d" % (int(width), int(height)))

        if (vscale_caps is None):

            print "Fail to create video caps"

            return None

        if (not vscale_pad.set_caps (vscale_caps)):

            print "Fail to set video output caps"

            return None

        '''

        vbin.add (vqueue, vscale, colorspace, vrate, vencode)

        if (not vqueue.link (vscale)):

            print "Fail to link video elements"

            return None

        if (not vscale.link (colorspace, \

            gst.caps_from_string ("video/x-raw-yuv,width=%d,height=(int)%d" % (int(width), int(height))))):

            print "Fail to link video elements"

            return None

        if (not gst.element_link_many (colorspace, vrate, vencode)):

            print "Fail to link video elements"

            return None

        vbin.add_pad (gst.GhostPad ("sink", vqueue.get_pad ("sink")))

        vbin.add_pad (gst.GhostPad ("src", vencode.get_pad ("src")))

        #audio encode

        #audio/x-raw-int ! queue ! audioconvert ! faac ! rtpmp4gpay !  udpsink name=upd_audio host=224.0.0.1 port=5002

        abin = gst.Bin ()

        aqueue = gst.element_factory_make ("queue", "vqueue")

        aconvert = gst.element_factory_make ("audioconvert", "aconvert")

        #aencode = gst.element_factory_make ("ffenc_ac3", "aencode")

        aencode = gst.element_factory_make ("lame", "aencode")

        if (None in [abin, aqueue, aconvert, aencode]):

            print "Fail to create video encode elements."

            return None

        abin.add (aqueue, aconvert, aencode)

        if (not gst.element_link_many (aqueue, aconvert, aencode)):

            print "Fail to link video elements"

            return None

        abin.add_pad (gst.GhostPad ("sink", aqueue.get_pad ("sink")))

        abin.add_pad (gst.GhostPad ("src", aencode.get_pad ("src")))

        #Finish Pipeline

        pipe.add (src, decode, abin, vbin, mux, sink)

        gst.element_link_many (src, decode)

        gst.element_link_many (mux, sink)

        #Linking decode with mux

        mux_audio = mux.get_pad ("audio_0")

        mux_video = mux.get_pad ("video_0")

        audio_pad = abin.get_pad ("src")

        video_pad = vbin.get_pad ("src")

        if (audio_pad.link (mux_audio) != gst.PAD_LINK_OK):

            print "Fail to link audio with mux"

            return None

        if (video_pad.link (mux_video) != gst.PAD_LINK_OK):

            print "Fail to link audio with mux"

            return None

        stream_data = self.StreamData (pipe, abin, vbin, sink)

        bus = pipe.get_bus()

        bus.add_signal_watch()

        bus.connect ("message", self.__on_bus_message, stream_data)

        decode.connect("new-decoded-pad", self.__on_decode_new_pad, stream_data)

        decode.connect("unknown-type", self.__on_decode_unknown_type, stream_data)

        pipe.set_state (gst.STATE_PAUSED)

        print "Running Pipe"

        stream_data.Loop.run ()

        print "End run"

        #Create socket

        stream_data.Socket = socket.socket(socket.AF_INET, socket.SOCK_STREAM)

        print "Bind on port %d" % port

        stream_data.Socket.bind(('', int (port)))

        self.streams.append (stream_data)

        return (True, "")

    def play(self):

        stream = self.streams[0]

        current = self.StreamListener(stream)

        current.start ()

        print "Saindo"

        return (True, "")

    def stop(self):

        stream = self.streams[0]

        stream.Pipe.set_state(gst.STATE_NULL)

        stream.Connection.close ()

        return (True, "")

    def __on_bus_message (self, bus, message, stream_data):

        t = message.type

        if (t == gst.MESSAGE_STATE_CHANGED):

            oldstate = -1

            newstate = -1

            pending = -1

            oldstate, newstate, pending = message.parse_state_changed ()

            if ((oldstate == gst.STATE_READY) and \

                (newstate == gst.STATE_PAUSED) and \

                (pending == gst.STATE_VOID_PENDING) and \

                (stream_data.Ready == False)):

                state_changed_status, current_state, pending_state = stream_data.Pipe.get_state ()

                if ((current_state == gst.STATE_PAUSED) and \

                    (pending_state == gst.STATE_VOID_PENDING)):

                    print "Pipe paused"

                    stream_data.Loop.quit ()

                    stream_data.Ready = True

        elif (t == gst.MESSAGE_ERROR):

            err, debug = message.parse_error()

            print "Error: %s" % err, debug

            stream_data.Loop.quit ()

            stream_data.Ready = False

        return True

    def __on_decode_unknown_type (self, decode, pad, caps, stream_data):

        print "Unknown Type"

        return None

    def __on_decode_new_pad (self, decode, pad, arg1, stream_data):

        caps = pad.get_caps().to_string()

        print "New pad " + caps

        if (caps.rfind ("audio") != -1):

            apad = stream_data.Abin.get_pad ("sink")

            if (pad.link (apad) != gst.PAD_LINK_OK):

                print "Error on link audio pad"

                return None

        elif (caps.rfind ("video") != -1):

            vpad = stream_data.Vbin.get_pad ("sink")

            if (pad.link (vpad) != gst.PAD_LINK_OK):

                print "Error on link video pad"

                return None

        else:

            print "Invalid caps"