3

编辑 Updated code with solution

我需要将amr转码为mp3，所以我在gstreamer-java中编写了一个gstreamer管道。它看起来像这样：

src ! amrparse ! amrnbdec ! lamemp3enc ! sink

（当然，实际上是用 java API 构建的），我开始转码

Bus.connect(EOS, fn(){Gst.quit();});

setState(PLAYING);
Gst.main();

它工作正常，除了它所花费的时间等于音频长度，这是不可接受的。等效的

gst-launch

以机器速度转码。

那么我需要如何设置管道，以获得机器速度转码？

这是完整的源代码，适合精通 clojure 的人

(ns audio
  (:import [org.gstreamer Gst Pipeline Bin Element ElementFactory State
                          StateChangeReturn Bus$EOS Bus$ERROR Bus$STATE_CHANGED]
    [org.gstreamer.io InputStreamSrc OutputStreamSink]
    [java.io InputStream OutputStream])
 (:use clojure.contrib.logging))

(Gst/init)
(defn transcode [^InputStream in ^OutputStream out]
  (let [id (gensym (quote transcode))
        src (InputStreamSrc. in (str "in stream " id))
        dec0 (ElementFactory/make "amrparse" (str "amr parser " id))
        dec1 (ElementFactory/make "amrnbdec" (str "amr decoder " id))
        enc (doto (ElementFactory/make "lamemp3enc" (str "mp3 encoder " id))
               (.set "mono" true)
               (.set "target" 0)
               (.set "quality" 2))
        out (doto (OutputStreamSink. out (str "out stream " id))
               (.setSync false))
        pipe (doto (Pipeline. (str "transcoder pipe " id))
                (.add src)
                (.add dec0)
                (.add dec1)
                (.add enc)
                (.add out))
        clean (fn []
                (.setState src nil)
                (.setState dec0 nil)
                (.setState dec1 nil)
                (.setState enc nil)
                (.setState out nil)
                (.setState pipe nil))]
    (prn "starting transcode " id)
    (.link src dec0)
    (.link dec0 dec1)
    (.link dec1 enc)
    (.link enc out)

    (doto (.getBus pipe)
      (.connect 
        (reify Bus$EOS
          (endOfStream [this src]
            (prn "Bus finished " src)
            (clean)
            (Gst/quit))))
      (.connect
        (reify Bus$ERROR
          (errorMessage [this src code msg]
          (prn "Bus Error " src code msg)
          (clean)
          (Gst/quit))))
      (.connect 
        (reify Bus$STATE_CHANGED
          (stateChanged [this src old now pending]
          (prn "Bus State change " src old now pending)))))
    (.setState pipe State/PLAYING)
    (Gst/main)))
4

1 回答 1

6

试试.setSync(false)你的输出。在普通的 gstreamer 中，同步流会尝试跟踪时间，而异步流会尽可能快地运行。也许您的输出流正在尝试实时工作。

于 2010-10-13T13:54:12.220 回答