git.sesse.net Git - nageru/blob - mixer.cpp

   1 #define WIDTH 1280
   2 #define HEIGHT 720
   3
   4 #undef Success
   5
   6 #include "mixer.h"
   7
   8 #include <assert.h>
   9 #include <effect.h>
  10 #include <effect_chain.h>
  11 #include <effect_util.h>
  12 #include <epoxy/egl.h>
  13 #include <features.h>
  14 #include <image_format.h>
  15 #include <init.h>
  16 #include <overlay_effect.h>
  17 #include <padding_effect.h>
  18 #include <resample_effect.h>
  19 #include <resource_pool.h>
  20 #include <saturation_effect.h>
  21 #include <stdint.h>
  22 #include <stdio.h>
  23 #include <stdlib.h>
  24 #include <sys/time.h>
  25 #include <time.h>
  26 #include <util.h>
  27 #include <white_balance_effect.h>
  28 #include <ycbcr.h>
  29 #include <ycbcr_input.h>
  30 #include <cmath>
  31 #include <condition_variable>
  32 #include <cstddef>
  33 #include <memory>
  34 #include <mutex>
  35 #include <string>
  36 #include <thread>
  37 #include <vector>
  38
  39 #include "bmusb.h"
  40 #include "context.h"
  41 #include "h264encode.h"
  42 #include "pbo_frame_allocator.h"
  43 #include "ref_counted_gl_sync.h"
  44
  45 class QOpenGLContext;
  46
  47 using namespace movit;
  48 using namespace std;
  49 using namespace std::placeholders;
  50
  51 Mixer *global_mixer = nullptr;
  52
  53 namespace {
  54
  55 void convert_fixed24_to_fp32(float *dst, size_t out_channels, const uint8_t *src, size_t in_channels, size_t num_samples)
  56 {
  57         for (size_t i = 0; i < num_samples; ++i) {
  58                 for (size_t j = 0; j < out_channels; ++j) {
  59                         uint32_t s1 = *src++;
  60                         uint32_t s2 = *src++;
  61                         uint32_t s3 = *src++;
  62                         uint32_t s = s1 | (s1 << 8) | (s2 << 16) | (s3 << 24);
  63                         dst[i * out_channels + j] = int(s) * (1.0f / 4294967296.0f);
  64                 }
  65                 src += 3 * (in_channels - out_channels);
  66         }
  67 }
  68
  69 }  // namespace
  70
  71 Mixer::Mixer(const QSurfaceFormat &format)
  72         : mixer_surface(create_surface(format)),
  73           h264_encoder_surface(create_surface(format))
  74 {
  75         CHECK(init_movit(MOVIT_SHADER_DIR, MOVIT_DEBUG_OFF));
  76         check_error();
  77
  78         resource_pool.reset(new ResourcePool);
  79         theme.reset(new Theme("theme.lua", resource_pool.get()));
  80         output_channel[OUTPUT_LIVE].parent = this;
  81         output_channel[OUTPUT_PREVIEW].parent = this;
  82         output_channel[OUTPUT_INPUT0].parent = this;
  83         output_channel[OUTPUT_INPUT1].parent = this;
  84
  85         ImageFormat inout_format;
  86         inout_format.color_space = COLORSPACE_sRGB;
  87         inout_format.gamma_curve = GAMMA_sRGB;
  88
  89         // Display chain; shows the live output produced by the main chain (its RGBA version).
  90         display_chain.reset(new EffectChain(WIDTH, HEIGHT, resource_pool.get()));
  91         check_error();
  92         display_input = new FlatInput(inout_format, FORMAT_RGB, GL_UNSIGNED_BYTE, WIDTH, HEIGHT);  // FIXME: GL_UNSIGNED_BYTE is really wrong.
  93         display_chain->add_input(display_input);
  94         display_chain->add_output(inout_format, OUTPUT_ALPHA_FORMAT_POSTMULTIPLIED);
  95         display_chain->set_dither_bits(0);  // Don't bother.
  96         display_chain->finalize();
  97
  98         h264_encoder.reset(new H264Encoder(h264_encoder_surface, WIDTH, HEIGHT, "test.mp4"));
  99
 100         for (int card_index = 0; card_index < NUM_CARDS; ++card_index) {
 101                 printf("Configuring card %d...\n", card_index);
 102                 CaptureCard *card = &cards[card_index];
 103                 card->usb = new BMUSBCapture(0x1edb, card_index == 0 ? 0xbd3b : 0xbd4f);
 104                 card->usb->set_frame_callback(std::bind(&Mixer::bm_frame, this, card_index, _1, _2, _3, _4, _5, _6, _7));
 105                 card->frame_allocator.reset(new PBOFrameAllocator(1280 * 750 * 2 + 44, 1280, 720));
 106                 card->usb->set_video_frame_allocator(card->frame_allocator.get());
 107                 card->surface = create_surface(format);
 108                 card->usb->set_dequeue_thread_callbacks(
 109                         [card]{
 110                                 eglBindAPI(EGL_OPENGL_API);
 111                                 card->context = create_context();
 112                                 if (!make_current(card->context, card->surface)) {
 113                                         printf("failed to create bmusb context\n");
 114                                         exit(1);
 115                                 }
 116                                 printf("inited!\n");
 117                         },
 118                         [this]{
 119                                 resource_pool->clean_context();
 120                         });
 121                 card->resampler = new Resampler(48000.0, 48000.0, 2);
 122                 card->usb->configure_card();
 123         }
 124
 125         BMUSBCapture::start_bm_thread();
 126
 127         for (int card_index = 0; card_index < NUM_CARDS; ++card_index) {
 128                 cards[card_index].usb->start_bm_capture();
 129         }
 130
 131         //chain->enable_phase_timing(true);
 132
 133         // Set up stuff for NV12 conversion.
 134
 135         // Cb/Cr shader.
 136         string cbcr_vert_shader = read_file("vs-cbcr.130.vert");
 137         string cbcr_frag_shader =
 138                 "#version 130 \n"
 139                 "in vec2 tc0; \n"
 140                 "uniform sampler2D cbcr_tex; \n"
 141                 "void main() { \n"
 142                 "    gl_FragColor = texture2D(cbcr_tex, tc0); \n"
 143                 "} \n";
 144         cbcr_program_num = resource_pool->compile_glsl_program(cbcr_vert_shader, cbcr_frag_shader);
 145 }
 146
 147 Mixer::~Mixer()
 148 {
 149         resource_pool->release_glsl_program(cbcr_program_num);
 150         BMUSBCapture::stop_bm_thread();
 151
 152         for (int card_index = 0; card_index < NUM_CARDS; ++card_index) {
 153                 cards[card_index].new_data_ready = false;  // Unblock thread.
 154                 cards[card_index].new_data_ready_changed.notify_all();
 155                 cards[card_index].usb->stop_dequeue_thread();
 156         }
 157 }
 158
 159 void Mixer::bm_frame(int card_index, uint16_t timecode,
 160                      FrameAllocator::Frame video_frame, size_t video_offset, uint16_t video_format,
 161                      FrameAllocator::Frame audio_frame, size_t audio_offset, uint16_t audio_format)
 162 {
 163         CaptureCard *card = &cards[card_index];
 164
 165         if (video_frame.len - video_offset != 1280 * 750 * 2) {
 166                 printf("dropping frame with wrong length (%ld)\n", video_frame.len - video_offset);
 167                 FILE *fp = fopen("frame.raw", "wb");
 168                 fwrite(video_frame.data, video_frame.len, 1, fp);
 169                 fclose(fp);
 170                 //exit(1);
 171                 card->usb->get_video_frame_allocator()->release_frame(video_frame);
 172                 card->usb->get_audio_frame_allocator()->release_frame(audio_frame);
 173                 return;
 174         }
 175         {
 176                 // Wait until the previous frame was consumed.
 177                 std::unique_lock<std::mutex> lock(bmusb_mutex);
 178                 card->new_data_ready_changed.wait(lock, [card]{ return !card->new_data_ready; });
 179         }
 180         const PBOFrameAllocator::Userdata *userdata = (const PBOFrameAllocator::Userdata *)video_frame.userdata;
 181         GLuint pbo = userdata->pbo;
 182         check_error();
 183         glBindBuffer(GL_PIXEL_UNPACK_BUFFER_ARB, pbo);
 184         check_error();
 185         glFlushMappedBufferRange(GL_PIXEL_UNPACK_BUFFER, 0, video_frame.size);
 186         check_error();
 187         //glMemoryBarrier(GL_CLIENT_MAPPED_BUFFER_BARRIER_BIT);
 188         //check_error();
 189
 190         // Upload the textures.
 191         glBindTexture(GL_TEXTURE_2D, userdata->tex_y);
 192         check_error();
 193         glTexSubImage2D(GL_TEXTURE_2D, 0, 0, 0, 1280, 720, GL_RED, GL_UNSIGNED_BYTE, BUFFER_OFFSET((1280 * 750 * 2 + 44) / 2 + 1280 * 25 + 22));
 194         check_error();
 195         glBindTexture(GL_TEXTURE_2D, userdata->tex_cbcr);
 196         check_error();
 197         glTexSubImage2D(GL_TEXTURE_2D, 0, 0, 0, 1280/2, 720, GL_RG, GL_UNSIGNED_BYTE, BUFFER_OFFSET(1280 * 25 + 22));
 198         check_error();
 199         glBindTexture(GL_TEXTURE_2D, 0);
 200         check_error();
 201         GLsync fence = glFenceSync(GL_SYNC_GPU_COMMANDS_COMPLETE, /*flags=*/0);
 202         check_error();
 203         assert(fence != nullptr);
 204
 205         // Convert the audio to stereo fp32 and store it next to the video.
 206         size_t num_samples = (audio_frame.len - audio_offset) / 8 / 3;
 207         vector<float> audio;
 208         audio.resize(num_samples * 2);
 209         convert_fixed24_to_fp32(&audio[0], 2, audio_frame.data + audio_offset, 8, num_samples);
 210
 211         {
 212                 std::unique_lock<std::mutex> lock(bmusb_mutex);
 213                 card->new_data_ready = true;
 214                 card->new_frame = RefCountedFrame(video_frame);
 215                 card->new_data_ready_fence = fence;
 216                 card->new_frame_audio = move(audio);
 217                 card->new_data_ready_changed.notify_all();
 218         }
 219
 220         // Video frame will be released when last user of card->new_frame goes out of scope.
 221         card->usb->get_audio_frame_allocator()->release_frame(audio_frame);
 222 }
 223
 224 void Mixer::thread_func()
 225 {
 226         eglBindAPI(EGL_OPENGL_API);
 227         QOpenGLContext *context = create_context();
 228         if (!make_current(context, mixer_surface)) {
 229                 printf("oops\n");
 230                 exit(1);
 231         }
 232
 233         struct timespec start, now;
 234         clock_gettime(CLOCK_MONOTONIC, &start);
 235
 236         while (!should_quit) {
 237                 ++frame;
 238
 239                 CaptureCard card_copy[NUM_CARDS];
 240
 241                 {
 242                         std::unique_lock<std::mutex> lock(bmusb_mutex);
 243
 244                         // The first card is the master timer, so wait for it to have a new frame.
 245                         // TODO: Make configurable, and with a timeout.
 246                         cards[0].new_data_ready_changed.wait(lock, [this]{ return cards[0].new_data_ready; });
 247
 248                         for (int card_index = 0; card_index < NUM_CARDS; ++card_index) {
 249                                 CaptureCard *card = &cards[card_index];
 250                                 card_copy[card_index].usb = card->usb;
 251                                 card_copy[card_index].new_data_ready = card->new_data_ready;
 252                                 card_copy[card_index].new_frame = card->new_frame;
 253                                 card_copy[card_index].new_data_ready_fence = card->new_data_ready_fence;
 254                                 card_copy[card_index].new_frame_audio = move(card->new_frame_audio);
 255                                 card->new_data_ready = false;
 256                                 card->new_data_ready_changed.notify_all();
 257                         }
 258                 }
 259
 260                 for (int card_index = 0; card_index < NUM_CARDS; ++card_index) {
 261                         CaptureCard *card = &card_copy[card_index];
 262                         if (!card->new_data_ready)
 263                                 continue;
 264
 265                         assert(card->new_frame != nullptr);
 266                         bmusb_current_rendering_frame[card_index] = card->new_frame;
 267                         check_error();
 268
 269                         // The new texture might still be uploaded,
 270                         // tell the GPU to wait until it's there.
 271                         if (card->new_data_ready_fence)
 272                                 glWaitSync(card->new_data_ready_fence, /*flags=*/0, GL_TIMEOUT_IGNORED);
 273                         check_error();
 274                         glDeleteSync(card->new_data_ready_fence);
 275                         check_error();
 276                         const PBOFrameAllocator::Userdata *userdata = (const PBOFrameAllocator::Userdata *)card->new_frame->userdata;
 277                         theme->set_input_textures(card_index, userdata->tex_y, userdata->tex_cbcr);
 278                 }
 279
 280                 // Get the main chain from the theme, and set its state immediately.
 281                 pair<EffectChain *, function<void()>> theme_main_chain = theme->get_chain(0, frame / 60.0f, WIDTH, HEIGHT);
 282                 EffectChain *chain = theme_main_chain.first;
 283                 theme_main_chain.second();
 284
 285                 GLuint y_tex, cbcr_tex;
 286                 bool got_frame = h264_encoder->begin_frame(&y_tex, &cbcr_tex);
 287                 assert(got_frame);
 288
 289                 // Render main chain.
 290                 GLuint cbcr_full_tex = resource_pool->create_2d_texture(GL_RG8, WIDTH, HEIGHT);
 291                 GLuint rgba_tex = resource_pool->create_2d_texture(GL_RGB565, WIDTH, HEIGHT);  // Saves texture bandwidth, although dithering gets messed up.
 292                 GLuint fbo = resource_pool->create_fbo(y_tex, cbcr_full_tex, rgba_tex);
 293                 chain->render_to_fbo(fbo, WIDTH, HEIGHT);
 294                 resource_pool->release_fbo(fbo);
 295
 296                 subsample_chroma(cbcr_full_tex, cbcr_tex);
 297                 resource_pool->release_2d_texture(cbcr_full_tex);
 298
 299                 // Set the right state for rgba_tex.
 300                 glBindFramebuffer(GL_FRAMEBUFFER, 0);
 301                 glBindTexture(GL_TEXTURE_2D, rgba_tex);
 302                 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_LINEAR);
 303                 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_CLAMP_TO_EDGE);
 304                 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_CLAMP_TO_EDGE);
 305
 306                 RefCountedGLsync fence(GL_SYNC_GPU_COMMANDS_COMPLETE, /*flags=*/0);
 307                 check_error();
 308
 309                 // Resample the audio as needed.
 310                 // TODO: Allow using audio from the other card(s) as well.
 311                 double pts = frame / 60.0;
 312                 cards[0].resampler->add_input_samples(pts, card_copy[0].new_frame_audio.data(), card_copy[0].new_frame_audio.size() / 2);
 313                 vector<float> samples_out;
 314                 samples_out.resize((48000 / 60) * 2);
 315                 cards[0].resampler->get_output_samples(pts, &samples_out[0], 48000 / 60);
 316
 317                 // Make sure the H.264 gets a reference to all the
 318                 // input frames needed, so that they are not released back
 319                 // until the rendering is done.
 320                 vector<RefCountedFrame> input_frames;
 321                 for (int card_index = 0; card_index < NUM_CARDS; ++card_index) {
 322                         input_frames.push_back(bmusb_current_rendering_frame[card_index]);
 323                 }
 324                 h264_encoder->end_frame(fence, move(samples_out), input_frames);
 325
 326                 // The live frame just shows the RGBA texture we just rendered.
 327                 // It owns rgba_tex now.
 328                 DisplayFrame live_frame;
 329                 live_frame.chain = display_chain.get();
 330                 live_frame.setup_chain = [this, rgba_tex]{
 331                         display_input->set_texture_num(rgba_tex);
 332                 };
 333                 live_frame.ready_fence = fence;
 334                 live_frame.input_frames = {};
 335                 live_frame.temp_textures = { rgba_tex };
 336                 output_channel[OUTPUT_LIVE].output_frame(live_frame);
 337
 338                 // Set up preview and any additional channels.
 339                 for (int i = 1; i < theme->get_num_channels() + 2; ++i) {
 340                         DisplayFrame display_frame;
 341                         pair<EffectChain *, function<void()>> chain = theme->get_chain(i, frame / 60.0f, WIDTH, HEIGHT);  // FIXME: dimensions
 342                         display_frame.chain = chain.first;
 343                         display_frame.setup_chain = chain.second;
 344                         display_frame.ready_fence = fence;
 345                         display_frame.input_frames = { bmusb_current_rendering_frame[0], bmusb_current_rendering_frame[1] };  // FIXME: possible to do better?
 346                         display_frame.temp_textures = {};
 347                         output_channel[i].output_frame(display_frame);
 348                 }
 349
 350                 clock_gettime(CLOCK_MONOTONIC, &now);
 351                 double elapsed = now.tv_sec - start.tv_sec +
 352                         1e-9 * (now.tv_nsec - start.tv_nsec);
 353                 if (frame % 100 == 0) {
 354                         printf("%d frames in %.3f seconds = %.1f fps (%.1f ms/frame)\n",
 355                                 frame, elapsed, frame / elapsed,
 356                                 1e3 * elapsed / frame);
 357                 //      chain->print_phase_timing();
 358                 }
 359
 360 #if 0
 361                 // Reset every 100 frames, so that local variations in frame times
 362                 // (especially for the first few frames, when the shaders are
 363                 // compiled etc.) don't make it hard to measure for the entire
 364                 // remaining duration of the program.
 365                 if (frame == 10000) {
 366                         frame = 0;
 367                         start = now;
 368                 }
 369 #endif
 370                 check_error();
 371         }
 372
 373         resource_pool->clean_context();
 374 }
 375
 376 void Mixer::subsample_chroma(GLuint src_tex, GLuint dst_tex)
 377 {
 378         GLuint vao;
 379         glGenVertexArrays(1, &vao);
 380         check_error();
 381
 382         float vertices[] = {
 383                 0.0f, 2.0f,
 384                 0.0f, 0.0f,
 385                 2.0f, 0.0f
 386         };
 387
 388         glBindVertexArray(vao);
 389         check_error();
 390
 391         // Extract Cb/Cr.
 392         GLuint fbo = resource_pool->create_fbo(dst_tex);
 393         glBindFramebuffer(GL_FRAMEBUFFER, fbo);
 394         glViewport(0, 0, WIDTH/2, HEIGHT/2);
 395         check_error();
 396
 397         glUseProgram(cbcr_program_num);
 398         check_error();
 399
 400         glActiveTexture(GL_TEXTURE0);
 401         check_error();
 402         glBindTexture(GL_TEXTURE_2D, src_tex);
 403         check_error();
 404         glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_LINEAR);
 405         check_error();
 406         glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_CLAMP_TO_EDGE);
 407         check_error();
 408         glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_CLAMP_TO_EDGE);
 409         check_error();
 410
 411         float chroma_offset_0[] = { -0.5f / WIDTH, 0.0f };
 412         set_uniform_vec2(cbcr_program_num, "foo", "chroma_offset_0", chroma_offset_0);
 413
 414         GLuint position_vbo = fill_vertex_attribute(cbcr_program_num, "position", 2, GL_FLOAT, sizeof(vertices), vertices);
 415         GLuint texcoord_vbo = fill_vertex_attribute(cbcr_program_num, "texcoord", 2, GL_FLOAT, sizeof(vertices), vertices);  // Same as vertices.
 416
 417         glDrawArrays(GL_TRIANGLES, 0, 3);
 418         check_error();
 419
 420         cleanup_vertex_attribute(cbcr_program_num, "position", position_vbo);
 421         cleanup_vertex_attribute(cbcr_program_num, "texcoord", texcoord_vbo);
 422
 423         glUseProgram(0);
 424         check_error();
 425
 426         resource_pool->release_fbo(fbo);
 427         glDeleteVertexArrays(1, &vao);
 428 }
 429
 430 void Mixer::release_display_frame(DisplayFrame *frame)
 431 {
 432         for (GLuint texnum : frame->temp_textures) {
 433                 resource_pool->release_2d_texture(texnum);
 434         }
 435         frame->temp_textures.clear();
 436         frame->ready_fence.reset();
 437         frame->input_frames.clear();
 438 }
 439
 440 void Mixer::start()
 441 {
 442         mixer_thread = std::thread(&Mixer::thread_func, this);
 443 }
 444
 445 void Mixer::quit()
 446 {
 447         should_quit = true;
 448         mixer_thread.join();
 449 }
 450
 451 void Mixer::transition_clicked(int transition_num)
 452 {
 453         theme->transition_clicked(transition_num, frame / 60.0);
 454 }
 455
 456 void Mixer::channel_clicked(int preview_num)
 457 {
 458         theme->channel_clicked(preview_num);
 459 }
 460
 461 Mixer::OutputChannel::~OutputChannel()
 462 {
 463         if (has_current_frame) {
 464                 parent->release_display_frame(&current_frame);
 465         }
 466         if (has_ready_frame) {
 467                 parent->release_display_frame(&ready_frame);
 468         }
 469 }
 470
 471 void Mixer::OutputChannel::output_frame(DisplayFrame frame)
 472 {
 473         // Store this frame for display. Remove the ready frame if any
 474         // (it was seemingly never used).
 475         {
 476                 std::unique_lock<std::mutex> lock(frame_mutex);
 477                 if (has_ready_frame) {
 478                         parent->release_display_frame(&ready_frame);
 479                 }
 480                 ready_frame = frame;
 481                 has_ready_frame = true;
 482         }
 483
 484         if (has_new_frame_ready_callback) {
 485                 new_frame_ready_callback();
 486         }
 487 }
 488
 489 bool Mixer::OutputChannel::get_display_frame(DisplayFrame *frame)
 490 {
 491         std::unique_lock<std::mutex> lock(frame_mutex);
 492         if (!has_current_frame && !has_ready_frame) {
 493                 return false;
 494         }
 495
 496         if (has_current_frame && has_ready_frame) {
 497                 // We have a new ready frame. Toss the current one.
 498                 parent->release_display_frame(&current_frame);
 499                 has_current_frame = false;
 500         }
 501         if (has_ready_frame) {
 502                 assert(!has_current_frame);
 503                 current_frame = ready_frame;
 504                 ready_frame.ready_fence.reset();  // Drop the refcount.
 505                 ready_frame.input_frames.clear();  // Drop the refcounts.
 506                 has_current_frame = true;
 507                 has_ready_frame = false;
 508         }
 509
 510         *frame = current_frame;
 511         return true;
 512 }
 513
 514 void Mixer::OutputChannel::set_frame_ready_callback(Mixer::new_frame_ready_callback_t callback)
 515 {
 516         new_frame_ready_callback = callback;
 517         has_new_frame_ready_callback = true;
 518 }