Recherche avancée

Sur d’autres sites (4564)

• vba & operator string error sending with string of arguments to processStartInfo for ffmpeg

  25 avril 2015, par Robert McCorkle

  I need to pass a string into the ProcessStartInfo for ffmpeg so that I can call the dim.Argument and have it append the strings and variables from code as I parse through the files.

  I have the current filename.mp3 that the code sees in movedFileInfo but it won’t allow me to append it to the string using & operators... help ?

  I know there may be one other way to do this utilizing the ffmpeg command in separate function to simply loop through a directory using "for" but I’ve not found a successful command for running my ffmpeg.exe nor the ffprompt in windows. I also need to append a carriage return when I write to merge.txt but can’t find an example... I’m new to vba.

  These commands work but vba is complaining about my & operator in my string. The operator ’&’ is not defined for types ’String’ and ’System.IO.FileInfo’. So what’s I understand is that the string I’m passing into psi.Arguments doesn’t like the fact that I’m sending it a string and a variable appended using the ’&’ operator... do I simply use a comma or how do I append the variable movedFileInfo to ffmpeg -i ? psi is defined above as ProcessStartInfo... so I’m not sure what types vb recognizes for it... I haven’t found info on ProcessStartInfo to kick off my ffmpeg exe.

  See code below :

  Imports System
  Imports System.IO
  Imports System.Text.RegularExpressions

  Public Class Form1

  Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click
  
  
  
      'videos are from SD card always on I:\Private\AVCHD\BDMV\STREAM\
  
      'store files to RAID drives in folders structured as :
  
      '       F:\BUILD\FLIGHT#\CAM#\_FLT__UTC__CAM_.MTS
  
  
  
      'set base dir as directory F:\
  
      Dim dir As String = "C:\"
  
      Dim video_card_dir As String = "C:\1bak\" '"I:\Private\AVCHD\BDMV\STREAM\"
  
      Directory.SetCurrentDirectory(dir)
  
  
  
      Dim new_flightnum_directory = dir & Me.BUILD.Text & "\" & FLT.Text & "\"
  
      'establish new video dir>  F: \    BUILD      \     FLIGHT # \               CAM #    \
  
      Dim new_video_directory = dir & Me.BUILD.Text & "\" & FLT.Text & "\" & Me.CAM.Text & "\"
  
      'establish new filename to rename the video file
  
      '                               TAIL #              FLT #
  
      Dim new_filename As String = TAIL.Text & "_" & FLT.Text & "_" & UTC.Text & "_" & CAM.Text
  
      Dim ffmpeg As String = "C:\ffmpeg\bin\ffmpeg.exe"
  
      '****FFMPEG required variables
  
      Dim psi As ProcessStartInfo = New ProcessStartInfo("C:\ffmpeg\bin\ffmpeg.exe")
  
      Dim proc As Process = Process.Start(psi)
  
  
  
      psi.UseShellExecute = True
  
      psi.CreateNoWindow = True
  
      '****end FFMPEG required variables
  
  
  
  
  
  
  
      '!!!!!!!!!!!!!!!!!!!!!!!!!!!need to add the processing below to the IF statement aboev so that if the folders exist, the video processing doesn't attempt to run on existing files
  
      ' !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
  
  
  
  
  
  
  
  
  
  
  
      '~~~~~~~~~~~~~~~~~~~~~~~~~~~~START - MOVE THIS DOWN BELOW CREATION OF FILE STRUCTURE WHEN DOEN DEBUGGING************
  
  
  
  
  
      '***START MOVING the files from the card to the new directory****
  
      For Each foundFile As String In My.Computer.FileSystem.GetFiles(video_card_dir, Microsoft.VisualBasic.FileIO.SearchOption.SearchAllSubDirectories, "*.MTS")
  
  
  
          Dim foundFileInfo As New System.IO.FileInfo(foundFile)
  
          My.Computer.FileSystem.MoveFile(foundFile, new_video_directory & foundFileInfo.Name)
  
  
  
  
  
      Next
  
  
  
      For Each foundFile As String In My.Computer.FileSystem.GetFiles(video_card_dir, Microsoft.VisualBasic.FileIO.SearchOption.SearchAllSubDirectories, "*.MTS")
  
  
  
          Dim movedFileInfo As New System.IO.FileInfo(foundFile)
  
          psi.Arguments = "ffmpeg -i " & movedFileInfo & " -vcodec -c libx264 " & movedFileInfo & ".mp4"
  
          psi.ToString()
  
  
  
          'proc = Process.Start(psi)
  
  
  
          '***convert each MTS file in the new directory to MP4****
  
          'Writes filenames to merge.txt as " path\to\merge.txt ,               'file '  F:\path\to\               file1  .MP4         '"  so that ffmpeg can merge, then rename
  
          'My.Computer.FileSystem.WriteAllText(new_video_directory & "merge.txt", "file '" & movedFileInfo & ".mp4'" & vbCrLf, True)
  
          '>>>>need to add carriage return to text file
  
  
  
          'NOW CAPTURE FILENAMES OF MP4 and MERGE INTO 1 MP4 FILE
  
  
  
          '   merge all F:\path\to\merge.txt to merge the files & merge them 
  
          'psi.Arguments = "ffmpeg -f concat -i " & new_video_directory & "merge.txt -c copy " & new_filename & ".mp4"
  
          proc = Process.Start(psi)
  
  
  
      Next
  
  
  
      '***END MERGE FILES***
  
  
  
  
  
      '~~~~~~~~~~~~~~~~~~~~~~~~~~~~* END - MOVE
  
  
  
  
  
      '***START CREATE STORAGE DIRECTORY STRUCTURE ***
  
      'Verify if the build # directory exists?
  
      If My.Computer.FileSystem.DirectoryExists(dir & Me.BUILD.Text) Then
  
          MessageBox.Show("The build directory exists, moving on to create subdirectories")
  
      Else
  
          Try
  
              'create the new directory                F:\    build \ FLIGHT #
  
              My.Computer.FileSystem.CreateDirectory(dir & Me.BUILD.Text)
  
              MessageBox.Show("The build directory" & dir & Me.BUILD.Text & " was created.")
  
          Catch ex As Exception
  
              MessageBox.Show("Doh! The build directory could not be created!  Error: " & ex.Message, "Error creating directory.", _
  
                              MessageBoxButtons.OK, MessageBoxIcon.Error)
  
          End Try
  
  
  
      End If
  
  
  
      'verify if the flight num directory exists - or create it
  
      If My.Computer.FileSystem.DirectoryExists(new_flightnum_directory) Then
  
          MessageBox.Show("The flight # folder already exists!  Check that you have the right Flight #.")
  
      Else
  
          Try
  
              'create the new directory                F:\  BUILD \  FLIGHT #
  
              My.Computer.FileSystem.CreateDirectory(new_flightnum_directory)
  
  
  
              'Now create new subDirectories   
  
              My.Computer.FileSystem.CreateDirectory(new_video_directory)
  
  
  
              MessageBox.Show("The new flight directory & video CAM subdirectories have been created!  The videos will be moved and files converted now which will take some time.")
  
  
  
          Catch ex As Exception
  
              MessageBox.Show("Doh! The flight num or CAM directory could not be created!  Error: " & ex.Message, "Error creating directory.", _
  
                              MessageBoxButtons.OK, MessageBoxIcon.Error)
  
          End Try
  
      End If
  
  
  
  
  
      '***END CREATE STORAGE DIRECTORY STRUCTURE ***   
  
  
  
  
  
  
  
  
  
  
  
      MessageBox.Show("new merged video file has been created in " & dir & Me.BUILD.Text & "\" & Me.CAM.Text)
  
  
  
  End Sub

  End Class

• Revision 6723e34224 : Merge "fix permissions on cpplint.py (0644->0755)" into experimental

  4 mai 2013, par James Zern

  Merge "fix permissions on cpplint.py (0644->0755)" into experimental

• "File doesn't exist" - streamio FFMPEG on screenshot after create method

  3 mai 2013, par dodgerogers747

  I have videos being directly uploaded to S3 using Amazon's CORS configuration. Videos are uploaded via a dedicated S3 form, once they have been uploaded successfully the URL of the video is appended to the @video.file hidden_field via javascript and then the video saves.

  I can't get this after_save method to work which takes a screenshot of the video and saves it to S3 via carrierwave after the video has been saved as a rails object. ( It was previously working using a carrierwave video upload instance )

  It errors out withErrno::ENOENT - No such file or directory - the file 'http://bucket-name.s3.amazonaws.com/uploads/video/file/secure-random-hex/video_name.m4v' does not exist: I have tried running this method as a class method to call it from the console but it always comes back with the same error, even though the video exists.

  My bucket is set to public, read and write. How come it doesn't think the file exists ?

  If anyone needs more code just shout, thanks in advance.

  application trace

  Started POST "/videos" for 127.0.0.1 at 2013-05-03 10:48:07 -0700
  
  Processing by VideosController#create as JS
  
    Parameters: {"utf8"=>"✓", "authenticity_token"=>"MAHxrVcmPDtVIMfDWZBwL0YnzaAaAe1PTGip5M4OVoY=", "video"=>{"user_id"=>"5", "file"=>"http://bucket-name.s3.amazonaws.com/uploads/video/file/secure-random-hex/video.m4v"}}
  
    User Load (0.3ms)  SELECT `users`.* FROM `users` WHERE `users`.`id` = 5 LIMIT 1
  
     (0.1ms)  BEGIN
  
    SQL (20.5ms)  INSERT INTO `videos` (`created_at`, `file`, `question_id`, `screenshot`, `updated_at`, `user_id`) VALUES ('2013-05-03 17:48:07', 'http://teebox-network.s3.amazonaws.com/uploads/video/file/secure-random-hex/video.m4v', NULL, NULL, '2013-05-03 17:48:07', 5)
  
     (44.0ms)  ROLLBACK
  
  Completed 500 Internal Server Error in 71ms
  
  
  
  Errno::ENOENT - No such file or directory - the file 'http://teebox-network.s3.amazonaws.com/uploads/video/file/secure-random-hex/video.m4v' does not exist:
  
    (gem) streamio-ffmpeg-0.9.0/lib/ffmpeg/movie.rb:10:in `initialize'
  
    app/models/video.rb:25:in `new'
  
    app/models/video.rb:25:in `take_screenshot'

  video.rb

    attr_accessible :user_id, :question_id, :file, :screenshot
  
    belongs_to :question
  
    belongs_to :user
  
  
  
    default_scope order('created_at DESC')
  
  
  
    after_create :take_screenshot
  
  
  
    mount_uploader :screenshot, ImageUploader
  
  
  
    validates_presence_of :user_id, :file
  
  
  
    def take_screenshot
  
      FFMPEG.ffmpeg_binary = '/opt/local/bin/ffmpeg'
  
      movie = FFMPEG::Movie.new("#{self.file}")
  
      self.screenshot = movie.screenshot("#{Rails.root}/public/uploads/tmp/screenshots/#{File.basename(self.file)}.jpg", seek_time: 2 )
  
      self.save!
  
    end

  videos/_form.html.erb

  <form action="http://bucket-name.s3.amazonaws.com" data-remote="true" class="direct-upload" enctype="multipart/form-data" method="post">
  
    <input type="hidden" />
  
    <input type="hidden" value="ACCESS_KEY" />
  
    <input type="hidden" value="public-read" />
  
    <input type="hidden" />
  
    <input type="hidden" />
  
    <input type="hidden" value="201" />
  
    <input type="file" />
  
  </form>
  
  
  
  &lt;%= form_for @video, html: { multipart: true, id: "new_video" }, remote: true do |f| %>
  
          &lt;% if @video.errors.any? %>
  
      <div>
  
      <h2>&lt;%= pluralize(@video.errors.count, "error") %> prohibited this post from being saved:</h2>
  
  
  
    <ul>
  
      &lt;% @video.errors.full_messages.each do |msg| %>
  
          <li>&lt;%= msg %></li>
  
          &lt;% end %>
  
      </ul>
  
      </div>
  
  &lt;% end %>
  
  
  
      &lt;%= f.hidden_field :user_id, value: current_user.id %>
  
      &lt;%= f.hidden_field :file %><br />
  
  
  
      &lt;% end %>

  ImageUploader

  class ImageUploader < CarrierWave::Uploader::Base
  
  
  
    include CarrierWave::RMagick
  
  
  
     include Sprockets::Helpers::RailsHelper
  
     include Sprockets::Helpers::IsolatedHelper
  
  
  
    storage :fog
  
  
  
    before :store, :remember_cache_id
  
    after :store, :delete_tmp_dir
  
  
  
      def cache_dir
  
        Rails.root.join('public/uploads/tmp/') 
  
      end
  
  
  
      def remember_cache_id(new_file)
  
        @cache_id_was = cache_id
  
      end
  
  
  
      def delete_tmp_dir(new_file)
  
        if @cache_id_was.present? && @cache_id_was =~ /\A[\d]{8}\-[\d]{4}\-[\d]+\-[\d]{4}\z/
  
          FileUtils.rm_rf(File.join(root, cache_dir, @cache_id_was))
  
        end
  
      end
  
  
  
    process resize_and_pad: [306, 150, '#000']
  
  
  
    def store_dir
  
      "uploads/#{model.class.to_s.underscore}/#{mounted_as}/#{model.id}"
  
    end
  
  
  
    def extension_white_list
  
      %w(jpg)
  
      # %w(ogg ogv 3gp mp4 m4v webm mov)
  
    end