md2slides 0.0.0 → 0.0.2

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA256:
-  metadata.gz: 12551985c4e0c6e7f6f9ce31b27a275646ec17db9c9d8b05126d8ae08c15e643
-  data.tar.gz: 94448d9c4ffe77da49be0fcade0d448dc280b01a0972fc17208ff5118c1feea3
+  metadata.gz: c82f7759595882a7bce78e9a46dfd95b91dc784038ad91d7295c62c9d73bd414
+  data.tar.gz: 76a42b4e8731d1e9888f6ce8534afa876bbe0ed45cae5507dd8caf414af89141
 SHA512:
-  metadata.gz: 1aed59d8f309f1a29f0aa16561428c11a2d4c03d159e16625c3421f4870f615697264f60a52645580c125ea83fd7ed23ec483e59361b43ef68f27a619deac3e1
-  data.tar.gz: 18de9e2866c8a658f7f8de8bf7f73ae818ce7b4f835f7fa6225e42bf558fc53ab8f13923aa031fed35426716abb05c17937945a52aa867ef4fb66afd6187dcf6
+  metadata.gz: b5a792702ae0716d1b0bd3cadb0de3fcfa0bfc798b05cbdb7bd78e67afed69dc1c9c826c1b837fbcad11c5b61b36148f4347d1144a86bcb0d039396c355b0812
+  data.tar.gz: f742639e88eff95e7a20af0eb79c6a0f0df19a86c97e6429181a8a1eae2d35262d20e85b67eb3c4de21a663116514c5f373d9bc2eaa6c3bbd5e9df8ed010c3bb

data/.gitignore

@@ -0,0 +1,14 @@
+/.bundle/
+/.yardoc
+/_yardoc/
+/coverage/
+#/doc/
+/pkg/
+/spec/reports/
+/tmp/
+
+# rspec failure tracking
+.rspec_status
+
+# vi file.
+*.swp

data/.rspec

@@ -0,0 +1,3 @@
+--format documentation
+--color
+--require spec_helper

data/Gemfile

@@ -0,0 +1,8 @@
+# frozen_string_literal: true
+
+source "https://rubygems.org"
+
+git_source(:github) {|repo_name| "https://github.com/#{repo_name}" }
+
+# Specify your gem's dependencies in md2slides.gemspec
+gemspec

data/LICENSE

@@ -0,0 +1,24 @@
+BSD 2-Clause License
+
+Copyright (c) 2025, Motoyuki OHMORI <ohmori@tottori-u.ac.jp>
+
+Redistribution and use in source and binary forms, with or without
+modification, are permitted provided that the following conditions are met:
+
+1. Redistributions of source code must retain the above copyright notice, this
+   list of conditions and the following disclaimer.
+
+2. Redistributions in binary form must reproduce the above copyright notice,
+   this list of conditions and the following disclaimer in the documentation
+   and/or other materials provided with the distribution.
+
+THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
+AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
+DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE
+FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
+SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
+CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
+OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
+OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.

data/README.md

@@ -0,0 +1,90 @@
+# md2slides
+*md2slides* generates a Google presentation from a markdown file.
+A video file of a presentation will be also generated, and it may contains narration if supplied.
+Narration can be given as notes in slides, and the audio will be generated using Google text-to-speech API and ffmpeg.
+
+## Quick start
+1. Generate your Google API credentials and copy it to credentails.json:
+```
+% cat >> config/credentials.json
+{
+  "type": "service_account",
+  "project_id": "project-id",
+  "private_key_id": "private-key-ID',
+  "private_key": "-----BEGIN PRIVATE KEY-----\nhogehoge\n-----END PRIVATE KEY-----\n",
+  "client_email": "hogehoge@hogehoge.iam.gserviceaccount.com",
+  "client_id": "00000000000000000000",
+  "auth_uri": "https://accounts.google.com/o/oauth2/auth",
+  "token_uri": "https://oauth2.googleapis.com/token",
+  "auth_provider_x509_cert_url": "https://www.googleapis.com/oauth2/v1/certs",
+  "client_x509_cert_url": "https://www.googleapis.com/robot/v1/metadata/x509/CLIENT.iam.gserviceaccount.com"
+}
+^D (this means CTRL + D)
+```
+2. install ffmpeg if necessary (if producing video file).
+
+3. install necessary gems.
+```
+% bundle install --path vendor/bundle
+```
+
+4. create an empty Google slide.
+
+5. write a markdown file.
+```
+cat >> doc/sample.md
+---
+title: hogehoge
+url: <Google presentation URL>
+---
+# title of the first title page
+## sub title or author's name(s)
+<!--
+narration text...
+-->
+---
+# title of the page
+- hogehoge
+...
+<!--
+narration text...
+-->
+^D (this means CTRL + D)
+```
+
+6. execute.
+```
+bundle exec bin/md2slides doc/sample.md
+```
+
+7. the Google presentation is updated, and the video is stored in `data/`.
+
+## Installation
+
+Add this line to your application's Gemfile:
+
+```ruby
+gem 'md2slides'
+```
+
+And then execute:
+
+    $ bundle
+
+Or install it yourself as:
+
+    $ gem install md2slides
+
+## Usage
+
+TODO: Write usage instructions here
+
+## Development
+
+After checking out the repo, run `bin/setup` to install dependencies. Then, run `rake spec` to run the tests. You can also run `bin/console` for an interactive prompt that will allow you to experiment.
+
+To install this gem onto your local machine, run `bundle exec rake install`. To release a new version, update the version number in `version.rb`, and then run `bundle exec rake release`, which will create a git tag for the version, push git commits and tags, and push the `.gem` file to [rubygems.org](https://rubygems.org).
+
+## Contributing
+
+Bug reports and pull requests are welcome on GitHub at https://github.com/ohmori7/md2slides.

data/Rakefile

@@ -0,0 +1,6 @@
+require "bundler/gem_tasks"
+require "rspec/core/rake_task"
+
+RSpec::Core::RakeTask.new(:spec)
+
+task :default => :spec

data/TODO.md

@@ -0,0 +1,25 @@
+# TODO
+- abstraction of presentation elements
+- PDF output
+- character emphasis
+- indentation
+- itemization
+- enumeration
+- theme
+- page number
+- multi column
+- image
+- table
+- other floating object
+- generate a markdown file from an existing presentation file
+- incremental updates
+- other a presentation format such as Microsoft PowerPoint
+- move to google new API:
+	*******************************************************************************
+	The google-gax gem is officially end-of-life and will not be updated further.
+	
+	If your app uses the google-gax gem, it likely is using obsolete versions of
+	some Google Cloud client library (google-cloud-*) gem that depends on it. We
+	recommend updating any such libraries that depend on google-gax. Modern Google
+	Cloud client libraries will depend on the gapic-common gem instead.
+	*******************************************************************************

data/bin/console

@@ -0,0 +1,14 @@
+#!/usr/bin/env ruby
+
+require "bundler/setup"
+require "md2slides"
+
+# You can add fixtures and/or initialization code here to make experimenting
+# with your gem easier. You can also use a different console, if you like.
+
+# (If you use this, don't forget to add pry to your Gemfile!)
+# require "pry"
+# Pry.start
+
+require "irb"
+IRB.start(__FILE__)

data/bin/md2slides

@@ -5,23 +5,22 @@
 
 $:.unshift File.join(File.dirname(File.dirname(File.realpath(__FILE__))), 'lib')
 
-require 'presentation'
-require 'md'
+require 'md2slides'
 
 def usage(errmsg = nil)
 	puts "ERROR: #{errmsg}" if errmsg
 	puts <<~EOF
 Usage:
-	#{$progname} [-f] <file> [<id>]
+	#{$progname} [-f] <file> [<URL or id>]
 	#{$progname} -h
 
 Description:
 	generate a Google Presentation file.
 
 Argument:
-	-h:	output this message.
-	<file>:	a file written in markdown
-	<id>:	a ID of a presentation
+	-h:		output this message.
+	<file>:		a file written in markdown
+	<URL or id>:	a URL or a ID of a presentation
 
 BUGS:
 	only .md is allowed for an input file for now.
@@ -47,15 +46,15 @@ else
 end
 
 md = MD.new(path)
-id = md.attributes[:id]
-if id.nil?
-	id = ARGV.shift
-	usage("No ID specified in the presentation and the argument") if ARGV.size != 0
+url = md.attributes[:url]
+if url.nil?
+	url = ARGV.shift
+	usage("No URL and ID specified in the presentation and the argument") if ARGV.size != 0
 else
-	usage("ID duplicatedly specified!!") if ARGV.size != 0
+	usage("URL or ID duplicatedly specified!!") if ARGV.size != 0
 end
 
-presentation = Presentation.new(id)
+presentation = Presentation.new(url)
 presentation.list
 presentation.update(md)
 #presentation.stick_out_check

data/bin/setup

@@ -0,0 +1,8 @@
+#!/usr/bin/env bash
+set -euo pipefail
+IFS=$'\n\t'
+set -vx
+
+bundle install
+
+# Do any other automated setup that you need to do here

data/bin/text2mp3

@@ -0,0 +1,39 @@
+#!/usr/bin/env ruby
+# coding: utf-8
+
+# Copyright (c) 2025 Motoyuki OHMORI All rights reserved.
+
+$:.unshift File.join(File.dirname(File.realpath(__FILE__)), '..', 'lib')
+
+require 'presentation'
+
+def usage(errmsg = nil)
+	puts "ERROR: #{errmsg}" if errmsg
+	puts <<~EOF
+Usage:
+	#{$progname} [-f] <file>
+	#{$progname} -h
+
+Description:
+	create a voice from a text using Google Text-To-Speech API.
+
+Argument:
+	-h:	output this message.
+
+BUGS:
+	only .txt is allowed for an input file for now.
+
+	EOF
+	exit 1
+end
+
+v = ARGV.shift
+case v
+when '-h'
+	usage
+when nil
+	usage
+end
+ifile = v
+filename = Presentation::text_to_speech(File.read(ifile), ifile)
+puts "save to #{filename}"

data/config/.gitignore

@@ -0,0 +1,3 @@
+*
+!config.rb
+!.gitignore

data/config/config.rb

@@ -0,0 +1,2 @@
+BASEDIR = File.dirname(File.dirname(File.realpath(__FILE__)))
+ENV['GOOGLE_APPLICATION_CREDENTIALS'] = "#{BASEDIR}/config/credentials.json"

data/lib/md2slides/audio.rb

@@ -0,0 +1,52 @@
+class Presentation
+	# XXX: Google Text to Speech produces at this rate...
+	AUDIO_RATE = 24000
+
+	def generate_audio0(i, slide, dir)
+		print "slide \##{i + 1}: generating audio... "
+		notes = get_slide_note(slide)
+		path = __data_slide_path(i, '.m4a', dir)
+		if notes
+			opath = __data_slide_path(i, '.mp3', dir)
+			opath = Presentation::text_to_speech(notes, opath)
+			#
+			# convert to .m4a, which contains duration in meta data.
+			# this prevents unreasonable audio duration when combining
+			# audio and video.
+			#
+			heading_silence = 2
+			trailing_silence = 1
+			cmd = <<~CMD
+				ffmpeg -hide_banner -y				\
+				    -f lavfi -t #{heading_silence}		\
+				    -i anullsrc=r=#{AUDIO_RATE}:cl=mono		\
+				    -i #{opath}					\
+				    -f lavfi -t #{trailing_silence}		\
+				    -i anullsrc=r=#{AUDIO_RATE}:cl=mono		\
+				    -filter_complex "[0:a][1:a][2:a]concat=n=3:v=0:a=1[out]"	\
+				    -map "[out]"				\
+				    -c:a aac -b:a 64k #{path}
+			CMD
+			msg, errmsg, status = Open3.capture3(cmd)
+			File.delete(opath) rescue
+			if ! status.success?
+				raise("ERROR: cannot convert audio: #{errmsg}")
+			end
+			puts 'done'
+		else
+			begin
+				File.delete(path)
+			rescue Errno::ENOENT => e
+				# okay
+			end
+			puts "skip (no notes)"
+		end
+	end
+
+	def generate_audio(dir = nil)
+		dir = __data_path(dir)
+		@presentation.slides.each_with_index do |slide, i|
+			generate_audio0(i, slide, dir)
+		end
+	end
+end

data/lib/md2slides/md.rb

@@ -0,0 +1,148 @@
+class MD
+	class Page
+		include Enumerable
+
+		class Element
+			attr_reader :type, :value
+			def initialize(type, value)
+				@type, @value = type, value
+			end
+
+			def to_s
+				"#{@type.to_s}: #{@value}"
+			end
+		end
+
+		def initialize
+			@elements = []
+			@comments = []
+		end
+
+		def add(type, value)
+			return if value.nil? || value.empty?
+			@elements.push(Element.new(type, value))
+		end
+
+		def add_comment(c)
+			return if c.nil? || c.empty?
+			@comments.push(c)
+		end
+
+		def comments
+			return nil if @comments.empty?
+			@comments.join("\n")
+		end
+
+		def has_comments?
+			! @comments.empty?
+		end
+
+		def has_title?
+			@elements[0]&.type == :h1
+		end
+
+		def title
+			has_title? && @elements[0].value
+		end
+
+		def title_only?
+			has_title? && @elements.size == 1
+		end
+
+		def title_subtitle_only?
+			has_title? && @elements.size == 2 &&
+			    @elements[1]&.type == :h2
+		end
+
+		def subtitle
+			title_subtitle_only? && @elements[1]&.value
+		end
+
+		def each(&block)
+			@elements.drop(has_title? ? 1 : 0).each(&block)
+		end
+	end
+
+	attr_reader :attributes
+
+	def initialize(path)
+		@pages = []
+		@attributes = {}
+		load(path)
+	end
+
+	def __filename_sanitize(s)
+		s.gsub(/[\/\\:\*\?"<>\|]/, '')
+	end
+
+	def each(&block)
+		@pages.each(&block)
+	end
+
+	def each_with_index(&block)
+		@pages.each_with_index(&block)
+	end
+
+	def parse_header(text)
+		text.each_line do |l|
+			l.strip!
+			next if l.empty?
+			if l =~ /^([^:]+): *([^ ].*)$/
+				k, v = $1.strip, $2.strip
+				@attributes[k.to_sym] = v
+			else
+				raise("ERROR: invalid line in a header: #{l}")
+			end
+		end
+	end
+
+	def parse_page(text)
+		@pages << page = Page.new
+		is_in_comment = false
+		text.each_line do |l|
+			l.strip!
+			next if l.empty?
+			if is_in_comment
+				if l =~ /(.*) ?-->(.*)$/
+					c, left = $1, $2
+					page.add_comment(c)
+					page.add(:p, left)
+					is_in_comment = false
+				else
+					page.add_comment(l)
+				end
+			else
+				case l
+				when /^(#+) *(.*)$/
+					sharps, title = $1, $2
+					h = "h#{sharps.size}"
+					page.add(h.to_sym, title)
+				when /^[-*] *(.*)$/
+					page.add(:li, $1)
+				when /^<!-- *(.*)$/
+					l = $1
+					if l =~ /(.*) ?-->(.*)$/
+						c, left = $1, $2
+						page.add_comment(c)
+						page.add(:p, left)
+					else
+						is_in_comment = true
+						page.add_comment(l)
+					end
+				else
+					page.add(:p, l)
+				end
+			end
+		end
+	end
+
+	def load(path)
+		File.read(path).split('---').each do |text|
+			if @attributes.empty?
+				parse_header(text)
+				next
+			end
+			parse_page(text)
+		end
+	end
+end

data/lib/md2slides/presentation.rb

@@ -0,0 +1,428 @@
+require "googleauth"
+#require "google/apis/people_v1"
+require "google/apis/slides_v1"
+require "google/apis/drive_v3"
+
+class Presentation
+	APPLICATION_NAME = 'md2slides'
+
+	GOOGLE_OAUTH_SCOPE = [
+		"https://www.googleapis.com/auth/drive",
+#		"https://www.googleapis.com/auth/userinfo.email",
+#		"https://www.googleapis.com/auth/userinfo.profile",
+		"https://www.googleapis.com/auth/presentations",
+	]
+
+	attr_reader :id
+
+	def self.filename_sanitize(s)
+		s.gsub(/[\/\\:\*\?"<>\|]/, '')
+	end
+
+	def initialize(url = nil)
+		if url =~ %r{https://docs.google.com/presentation/d/([^\/ ]+).*$}
+			@id = $1
+		elsif url
+			raise("ERROR: invalid URL: #{url}")
+		end
+
+		@authorizer = Google::Auth::ServiceAccountCredentials.make_creds(
+			json_key_io: File.open(ENV['GOOGLE_APPLICATION_CREDENTIALS']),
+			scope: GOOGLE_OAUTH_SCOPE)
+		@authorizer.fetch_access_token!
+
+		@slides_service = Google::Apis::SlidesV1::SlidesService.new
+		@slides_service.client_options.application_name = APPLICATION_NAME
+		@slides_service.authorization = @authorizer
+
+		@drive_service = Google::Apis::DriveV3::DriveService.new
+		@drive_service.client_options.application_name = APPLICATION_NAME
+		@drive_service.authorization = @authorizer
+
+		if @id
+			@presentation = @slides_service.get_presentation(@id)
+		end
+
+		@requests = []
+
+		# XXX: this script always runs by an API user...
+		#people_service = Google::Apis::PeopleV1::PeopleServiceService.new
+		#people_service.authorization = @authorizer
+		#profile = people_service.get_person("people/me", person_fields: "names,emailAddresses")
+		#name = profile.names.first.display_name
+		#email = profile.email_addresses.first.value
+		#puts "#{name}: #{email}"
+	end
+
+	def exists?
+		@id && @presentation
+	end
+
+	def existence_check
+		if ! exists?
+			raise("presentation (ID: #{@id})does not exists!!!")
+		end
+	end
+
+	def url
+		@id && "https://docs.google.com/presentation/d/#{@id}/edit"
+	end
+
+	def extent
+		existence_check
+		width = @presentation.page_size.width.magnitude
+		height = @presentation.page_size.height.magnitude
+		unit = @presentation.page_size.width.unit
+		return width, height, unit
+	end
+
+	def width
+		extent[0]
+	end
+
+	def height
+		extent[1]
+	end
+
+	def stick_out_check
+		msgs = []
+		@presentation.slides.each_with_index do |slide, i|
+			slide.page_elements.each do |element|
+				next unless element.shape
+				next unless element.transform
+				x1 = element.transform.translate_x || 0
+				x2 = x1 + element.size.width.magnitude rescue 0
+				y1 = element.transform.translate_y || 0
+				y2 = y1 + element.size.width.magnitude rescue 0
+				puts "width: #{width}, height: #{height}"
+				if x2 > width || y2 > height || x1 < 0 || y1 < 0
+					msgs.push("slide #{i + 1}: sticking out: (#{x1},#{y1})-(#{x2},#{y2})")
+				end
+			end
+		end
+		raise(msgs.join("\n")) unless msgs.empty?
+	end
+
+	def create(name)
+		if exists?
+			raise("already presentation exists!!")
+		end
+		presentation0 = Google::Apis::SlidesV1::Presentation.new(title: name)
+		@presentation = @slides_service.create_presentation(presentation0)
+		@id = @presentation.presentation_id
+		puts "Create presentation #{name}: #{url}"
+	end
+
+	def delete
+		existence_check
+		begin
+			@drive_service.delete_file(@id)
+			@presentation = nil
+			puts "deleted ID: #{@id}"
+		rescue Google::Apis::ClientError => e
+			puts "ERROR: failed deleting #{@id}: #{e.full_message}"
+		end
+	end
+
+	def share(user)
+		existence_check
+		permission = Google::Apis::DriveV3::Permission.new(
+		    type: 'user',
+		    role: 'writer', # 'reader', 'commenter', 'writer'
+		    email_address: user
+		    )
+		@drive_service.create_permission(@id, permission, fields: "id")
+	end
+
+	def __request
+		return if @requests.empty?
+		batch_update_request = Google::Apis::SlidesV1::BatchUpdatePresentationRequest.new(requests: @requests)
+		begin
+			@slides_service.batch_update_presentation(@id, batch_update_request)
+			@requests = []
+		rescue => e
+			p e.body
+			raise e
+		end
+		@presentation = @slides_service.get_presentation(@id)
+	end
+
+	def delete_object(object_id)
+		@requests.push({
+			delete_object: {
+				object_id_prop: object_id,
+			}
+		})
+	end
+
+	def create_slide(layout = 'TITLE_AND_BODY', insertion_index = nil)
+		insertion_index ||= @presentation.slides&.size.to_i	# at the tail
+		#
+		# layout can be:
+		# https://developers.google.com/apps-script/reference/slides/predefined-layout
+		#
+		@requests.push({
+			create_slide: {
+				#
+				# XXX: object ID should be specified for performance...
+				#
+#				object_id_prop: object_id_prop,
+				insertion_index: insertion_index,
+				slide_layout_reference: {
+					predefined_layout: layout,
+				}
+			}
+		})
+		__request
+		@presentation.slides[insertion_index]
+	end
+
+	def delete_text(element)
+		return if ! element.shape.instance_variable_defined?(:@placeholder)
+		return if ! element.shape.instance_variable_defined?(:@text)
+		@requests.push({
+			delete_text: {
+				object_id_prop: element.object_id_prop,
+				text_range: {
+					type: 'ALL'
+				}
+			}
+		})
+	end
+
+	def update_text(element, text)
+		delete_text(element)
+		return if text.nil? || text.empty?
+		@requests.push({
+			insert_text: {
+				object_id_prop: element.object_id_prop,
+				insertion_index: 0,
+				text: text
+			}
+		})
+	end
+
+	def set_bullet(element, bullet)
+		return if bullet.nil?
+		@requests.push({
+			create_paragraph_bullets: {
+				object_id_prop: element.object_id_prop,
+				text_range: {
+					type: 'ALL',
+				},
+				bullet_preset: bullet,
+			}
+		})
+	end
+
+	def find_element(slide, type)
+		slide&.page_elements&.find do |e|
+			case e.shape&.placeholder&.type
+			when type
+				true
+#			else
+#				p e.shape&.placeholder&.type
+#				false
+			end
+		end
+	end
+
+	def __get_element_text(element)
+		element&.shape&.text&.text_elements&.collect { |e| e.text_run&.content&.strip }&.compact&.join("\n")
+	end
+
+	def get_slide_text(slide, re = 'BODY')
+		__get_element_text(find_element(slide, re))
+	end
+
+	def get_title
+		slide = @presentation&.slides.first
+		title = get_slide_text(slide, /(^TITLE|[^a-zA-Z]TITLE)$/)
+		subtitle = get_slide_text(slide, 'SUBTITLE')
+		return title, subtitle
+	end
+
+	def set_slide_text(slide, text, re = 'BODY', bullet = 'BULLET_DISC_CIRCLE_SQUARE')
+		element = find_element(slide, re)
+		if element.nil?
+			raise("ERROR: no text element found!!!")
+		end
+		update_text(element, text)
+		set_bullet(element, bullet)
+	end
+
+	def set_slide_title(slide, title, re = /(^TITLE|[^a-zA-Z]TITLE)$/)
+		set_slide_text(slide, title, re, nil)
+	end
+
+	def set_slide_subtitle(slide, title)
+		set_slide_title(slide, title, 'SUBTITLE')
+	end
+
+	def set_title(title, subtitle = nil)
+		existence_check
+		if @presentation&.slides&.size.to_i == 0
+			create_slide('TITLE')
+		end
+		slide = @presentation.slides.first
+		set_slide_title(slide, title)
+		set_slide_subtitle(slide, subtitle)
+		__request
+	end
+
+	def get_slide_note(slide)
+		notes = slide.slide_properties.notes_page
+		__get_element_text(find_element(notes, 'BODY'))
+	end
+
+	def set_slide_note(slide, text)
+		notes = slide.slide_properties.notes_page
+		element = find_element(notes, 'BODY')
+		if element.nil?
+			raise("ERROR: no text box element found in notes!!!")
+		end
+		update_text(element, text)
+	end
+
+	def clear
+		existence_check
+		n = @presentation.slides&.size.to_i
+		while n > 0
+			n -= 1
+			delete_object(@presentation.slides[n].object_id_prop)
+		end
+		__request
+	end
+
+	def list
+		existence_check
+		puts "title: #{@presentation.title}"
+		puts "pages: #{@presentation.slides.size}"
+		@presentation.slides.each_with_index do |slide, i|
+			puts "- Slide \##{i + 1} contains #{slide.page_elements.count} elements."
+		end
+	end
+
+	def list_all
+		query = "mimeType = 'application/vnd.google-apps.presentation' and trashed = false"
+		response = @drive_service.list_files(q: query, fields: 'files(id, name)', page_size: 100)
+		response.files.each do |file|
+			puts "#{file.name}: #{file.id}"
+		end
+	end
+
+	def update(md)
+		#
+		# XXX: currently, clear all slides...
+		#
+		if exists?
+			clear
+		end
+		md.each do |page|
+			if page.title_subtitle_only?
+				layout = 'TITLE'
+			elsif page.title_only?
+				layout = 'SECTION_HEADER'
+			else
+				layout = 'TITLE_AND_BODY'
+			end
+			slide = create_slide(layout)
+			if page.has_title?
+				set_slide_title(slide, page.title)
+			end
+			if page.title_subtitle_only?
+				set_slide_subtitle(slide, page.subtitle)
+			else
+				texts = page.map do |e|
+					case e.type.to_s
+					when /^h([0-9]+)$/
+						n = $1.to_i - 1
+					else
+						n = 1
+					end
+					"\t" * n + e.value
+				end.join("\n")
+				if texts.size > 0
+					set_slide_text(slide, texts)
+					# set_slide_text(slide, texts,
+					#    'BODY', 'NUMBERED_DIGIT_ALPHA_ROMAN')
+				end
+			end
+			if page.has_comments?
+				set_slide_note(slide, page.comments)
+			end
+		end
+		__request
+	end
+
+	def __data_path(basedir)
+		if basedir.nil?
+			basedir = File.join(BASEDIR, 'data')
+		end
+		title, subtitle = get_title
+		title = self.class.filename_sanitize(title)
+		subtitle = self.class.filename_sanitize(subtitle)
+		File.join(basedir, "#{title}-#{subtitle}-#{@id}")
+	end
+
+	def __data_slide_path(i, ext, basedir = nil)
+		path = "slide-#{i + 1}#{ext}"
+		if basedir
+			path = File.join(basedir, path)
+		end
+		path
+	end
+
+	# XXX: these do not work when the presentation is not shared globally.
+	def export_url(i)
+		#@id && "https://docs.google.com/presentation/d/#{@id}/export/png?id=#{@id}&pageid=#{slide.object_id_prop}&width=1920&height=1080"
+		@id && "https://docs.google.com/presentation/d/#{@id}/export/png?id=#{@id}&pageid=p#{i}&width=1920&height=1080"
+	end
+
+	# XXX: these do not work when the presentation is not shared globally.
+	def download_slide0(i, slide, dir)
+		url = export_url(i)
+		URI.open(url) do |remote_file|
+			path = __data_slide_path(i, '.png', dir)
+			File.open(path, 'wb') do |file|
+				file.write(remote_file.read)
+			end
+		end
+	end
+
+	def download_slide(i, slide, dir)
+		print "slide #{i}: downloading..."
+		#
+		# a size of a width can be: SMALL (200), MEDIUM (800), LARGE (1600)
+		# https://developers.google.com/workspace/slides/api/reference/rest/v1/presentations.pages/getThumbnail
+		#
+		thumbnail = @slides_service.get_presentation_page_thumbnail(
+		    @id, slide.object_id_prop, thumbnail_properties_thumbnail_size: 'LARGE')
+		URI.open(thumbnail.content_url) do |remote_file|
+			path = __data_slide_path(i, '.png', dir)
+			File.open(path, 'wb') do |file|
+				file.write(remote_file.read)
+			end
+		end
+		puts 'done'
+	end
+
+	def download(dir = nil)
+		existence_check
+		dir = __data_path(dir)
+		parent = File.dirname(dir)
+		files = Dir.glob("#{File.join(parent, "*#{@id}*")}")
+		if files.empty?
+			FileUtils.mkdir_p(dir)
+		elsif files[0] != dir
+			File.rename(files[0], dir)
+		end
+		lockfile = File.join(dir, '.lock')
+		File.open(lockfile, File::RDWR|File::CREAT, 0644) do |f|
+			f.flock(File::LOCK_EX | File::LOCK_NB)
+			@presentation.slides.each_with_index do |slide, i|
+				download_slide(i, slide, dir)
+			end
+		end
+	end
+end

data/lib/md2slides/text_to_speech.rb

@@ -0,0 +1,41 @@
+#
+# this requires:
+# gem install google-cloud-text_to_speech
+#
+require 'google/cloud/text_to_speech'
+
+class Presentation
+	def self.text_to_speech(text, filename)
+		extname = File.extname(filename)
+		if extname
+			if filename =~ /^(.*)#{extname}$/
+				filename = $1
+			else
+				raise("invalid extname #{extname} in \"#{filename}\"")
+			end
+		end
+		filename += '.mp3'
+
+		response = Google::Cloud::TextToSpeech.new.synthesize_speech(
+		    # XXX: I don't know how to create an object of Google::Cloud::TextToSpeech::SynthesisInput...
+		    { text: text },
+		    #
+		    # Standard is the cheapest.
+		    #	ja-JP-Standard-A, B female
+		    #	ja-JP-Standard-C, D male
+		    # Wavenet is more expensive than standard.
+		    #	https://cloud.google.com/text-to-speech/docs/voices?hl=ja
+		    #	https://cloud.google.com/text-to-speech/pricing?hl=ja
+		    #
+		    #{ language_code: 'ja-JP', name: 'ja-JP-Wavenet-B' },
+		    { language_code: 'ja-JP', name: 'ja-JP-Standard-D' },
+		    { audio_encoding: :MP3 },
+		    )
+
+		File.open(filename, 'wb') do |file|
+			file.write(response.audio_content)
+		end
+
+		return filename
+	end
+end

data/lib/md2slides/version.rb

@@ -0,0 +1,3 @@
+module Md2slides
+	VERSION = "0.0.2"
+end

data/lib/md2slides/video.rb

@@ -0,0 +1,58 @@
+require 'open3'
+
+class Presentation
+	def generate_slide_video(i, dir)
+		img = __data_slide_path(i, '.png', dir)
+		audio = __data_slide_path(i, '.m4a', dir)
+		video = __data_slide_path(i, '.mp4', dir)
+
+		if File.exists?(audio)
+			audioin = "-i \"#{audio}\""
+			timeopt = '-shortest'
+		else
+			audioin = "-f lavfi -i aevalsrc=0"
+			timeopt = "-vframes 60"
+		end
+		cmd = <<~CMD
+			ffmpeg -hide_banner -y				\
+			    -framerate 15 -loop 1 -i "#{img}"		\
+			    #{audioin} -map 0:v:0 -map 1:a:0		\
+			    -c:v libx264 -tune stillimage		\
+			    -c:a aac -ar #{AUDIO_RATE} -ac 1		\
+			    -pix_fmt yuv420p #{timeopt} "#{video}"
+		CMD
+		msg, errmsg, status = Open3.capture3(cmd)
+		if ! status.success?
+			raise("ERROR: cannot produce video: #{errmsg}")
+		end
+	end
+
+	def generate_video(dir = nil)
+		dir = __data_path(dir)
+		@presentation.slides.each_with_index do |slide, i|
+			print "slide \##{i + 1}: generating video..."
+			generate_slide_video(i, dir)
+			puts "done"
+		end
+
+		print "concatenate video files..."
+		videolist = File.join(dir, 'video-list.txt')
+		File.open(videolist, 'w') do |f|
+			@presentation.slides.each_with_index do |slide, i|
+				f.puts("file #{__data_slide_path(i, '.mp4')}")
+			end
+		end
+		video = File.join(dir, 'video.mp4')
+		cmd = <<~CMD
+			cd "#{dir}" &&					\
+			    ffmpeg -hide_banner -y -f concat -safe 0	\
+			    -i "#{videolist}" -c copy "#{video}"
+		CMD
+		msg, errmsg, status = Open3.capture3(cmd)
+		if ! status.success?
+			raise("ERROR: cannot produce video: #{errmsg}")
+		else
+			puts 'done'
+		end
+	end
+end

data/lib/md2slides.rb

@@ -0,0 +1,13 @@
+$:.unshift File.dirname(File.dirname(File.realpath(__FILE__)))
+
+module Md2slides
+	class Error < StandardError; end
+
+	require 'config/config'
+	require 'md2slides/md'
+	require 'md2slides/presentation'
+	require 'md2slides/text_to_speech'
+	require 'md2slides/audio'
+	require 'md2slides/video'
+	require "md2slides/version"
+end

data/md2slides.gemspec

@@ -0,0 +1,47 @@
+
+lib = File.expand_path("../lib", __FILE__)
+$LOAD_PATH.unshift(lib) unless $LOAD_PATH.include?(lib)
+require "md2slides/version"
+
+Gem::Specification.new do |spec|
+  spec.name          = "md2slides"
+  spec.version       = Md2slides::VERSION
+  spec.authors       = ["Motoyuki OHMORI"]
+  spec.email         = ["ohmori@tottori-u.ac.jp"]
+
+  spec.summary       = %q{Markdown to presentation slides in ruby.}
+  spec.description   = %q{Generate Google slides and its video file from a markdown file.}
+  spec.homepage      = "https://github.com/ohmori7/md2slides"
+
+  # Prevent pushing this gem to RubyGems.org. To allow pushes either set the 'allowed_push_host'
+  # to allow pushing to a single host or delete this section to allow pushing to any host.
+  if spec.respond_to?(:metadata)
+#   spec.metadata["allowed_push_host"] = spec.homepage
+
+    spec.metadata["homepage_uri"] = spec.homepage
+    spec.metadata["source_code_uri"] = spec.homepage
+    spec.metadata["changelog_uri"] = spec.homepage
+  else
+    raise "RubyGems 2.0 or newer is required to protect against " \
+      "public gem pushes."
+  end
+
+  # Specify which files should be added to the gem when it is released.
+  # The `git ls-files -z` loads the files in the RubyGem that have been added into git.
+  spec.files         = Dir.chdir(File.expand_path('..', __FILE__)) do
+    `git ls-files -z`.split("\x0").reject { |f| f.match(%r{^(test|spec|features)/}) }
+  end
+  spec.bindir        = "exe"
+  spec.executables   = spec.files.grep(%r{^exe/}) { |f| File.basename(f) }
+  spec.require_paths = ["lib"]
+
+  spec.add_development_dependency "googleauth"
+# spec.add_development_dependency "google-apis-people_v1"
+  spec.add_development_dependency "google-apis-slides_v1"
+  spec.add_development_dependency "google-apis-drive_v3"
+  spec.add_development_dependency "google-cloud-text_to_speech", "~>0.7.0"
+  spec.add_development_dependency "bundler", "~> 1.17"
+  spec.add_development_dependency "rake", "~> 10.0"
+  spec.add_development_dependency "rspec", "~> 3.0"
+  spec.license	= "MIT"
+end

data/vendor/bundle/.gitignore

@@ -0,0 +1,2 @@
+*
+!.gitignore

metadata

@@ -1,27 +1,149 @@
 --- !ruby/object:Gem::Specification
 name: md2slides
 version: !ruby/object:Gem::Version
-  version: 0.0.0
+  version: 0.0.2
 platform: ruby
 authors:
 - Motoyuki OHMORI
 autorequire: 
-bindir: bin
+bindir: exe
 cert_chain: []
 date: 2025-04-29 00:00:00.000000000 Z
-dependencies: []
-description: Markdown to presentation slides in ruby
-email: ohmori@tottori-u.ac.jp
-executables:
-- md2slides
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: googleauth
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: google-apis-slides_v1
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: google-apis-drive_v3
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: google-cloud-text_to_speech
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: 0.7.0
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: 0.7.0
+- !ruby/object:Gem::Dependency
+  name: bundler
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '1.17'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '1.17'
+- !ruby/object:Gem::Dependency
+  name: rake
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '10.0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '10.0'
+- !ruby/object:Gem::Dependency
+  name: rspec
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '3.0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '3.0'
+description: Generate Google slides and its video file from a markdown file.
+email:
+- ohmori@tottori-u.ac.jp
+executables: []
 extensions: []
 extra_rdoc_files: []
 files:
+- ".gitignore"
+- ".rspec"
+- Gemfile
+- LICENSE
+- README.md
+- Rakefile
+- TODO.md
+- bin/console
 - bin/md2slides
+- bin/setup
+- bin/text2mp3
+- config/.gitignore
+- config/config.rb
+- lib/md2slides.rb
+- lib/md2slides/audio.rb
+- lib/md2slides/md.rb
+- lib/md2slides/presentation.rb
+- lib/md2slides/text_to_speech.rb
+- lib/md2slides/version.rb
+- lib/md2slides/video.rb
+- md2slides.gemspec
+- vendor/bundle/.gitignore
 homepage: https://github.com/ohmori7/md2slides
 licenses:
 - MIT
-metadata: {}
+metadata:
+  homepage_uri: https://github.com/ohmori7/md2slides
+  source_code_uri: https://github.com/ohmori7/md2slides
+  changelog_uri: https://github.com/ohmori7/md2slides
 post_install_message: 
 rdoc_options: []
 require_paths:
@@ -40,5 +162,5 @@ requirements: []
 rubygems_version: 3.0.3.1
 signing_key: 
 specification_version: 4
-summary: Markdown to presentation slides in ruby
+summary: Markdown to presentation slides in ruby.
 test_files: []