modules/liquidsoap/helpers/silence.sh

+#!/bin/bash
+
+pack_int(){ printf "%08X\n" $1 | sed 's/\([0-9A-F]\{2\}\)\([0-9A-F]\{2\}\)\([0-9A-F]\{2\}\)\([0-9A-F]\{2\}\)/\\\\\\x\4\\\\\\x\3\\\\\\x\2\\\\\\x\1/I' | xargs printf; }
+
+pack_short(){ printf "%04X\n" $1 | sed 's/\([0-9A-F]\{2\}\)\([0-9A-F]\{2\}\)/\\\\\\x\2\\\\\\x\1/I' | xargs printf; }
+
+duration=1800
+if [[ $# -eq 1 ]]; then
+    duration=$1
+fi
+
+channels=2
+bps=16
+sample=44100
+Subchunk1Size=18
+Subchunk2Size=$(echo "$duration*$sample*$channels*$bps/8" | bc)
+ChunkSize=$((20 + $Subchunk1Size + $Subchunk2Size))
+
+echo -n RIFF
+pack_int $ChunkSize
+echo -n "WAVEfmt "
+pack_int $Subchunk1Size
+pack_short 1
+pack_short $channels
+pack_int $sample
+pack_int $((bps/8 * channels * sample))
+pack_short $((bps/8 * channels))
+pack_short $bps
+pack_short 0
+echo -n data
+pack_int $Subchunk2Size
+
+dd if=/dev/zero bs=1 count=$Subchunk2Size 2>/dev/null

modules/liquidsoap/readini.liq

+
+def read_ini(file)
+    ret = get_process_lines("cat "^file )
+    ret = list.map(string.split(separator="="), ret)
+
+    # l' => the filling list
+    def f(l',l)=
+      if list.length(l) >= 2 then
+        line = string.extract(pattern='"(.*)"', list.nth(l,1))
+
+        # print(line)
+        # print((list.hd(l),line['1']))
+        
+        list.append([(list.hd(l),line['1'])],l')
+      else
+        if list.length(l) >= 1 then
+          list.append([(list.hd(l),"")],l')
+        else
+          directory = dirname()
+          ignore(directory)
+          list.add(("install_dir", "/home/gg/PycharmProjects/engine"), l')
+#          l'
+        end
+      end
+    end
+
+    list.fold(f,[],ret)
+end

modules/liquidsoap/serverfunctions.liq

+# shutdown server function
+#server.register(namespace='server',
+#    description="shutdown server",
+#    usage="stop",
+#    "stop",
+#    fun(x,y) -> stop_server )
\ No newline at end of file

modules/liquidsoap/settings.liq

+# LOG FILE SETTINGS
+set("log.file.path", "./<script>.log")
+
+# SERVER SETTINGS
+set("server.telnet", true)
+set("server.telnet.bind_addr", "0.0.0.0")
+set("server.telnet.port", 1234)
+
+set("server.socket", true)
+set("server.socket.path", "./<script>.sock")
+
+# SOUND CARD SETTINGS
+input_device_0 = list.assoc("input_device[0]", ini)
+#input_device_1 = list.assoc("input_device[1]", ini)
+#input_device_2 = list.assoc("input_device[2]", ini)
+output_device_0 = list.assoc("output_device[0]", ini)
+
+ignore(input_device_0)
+ignore(output_device_0)
+
+# ALSA / pulse settings
+use_alsa           = list.assoc("use_alsa", ini) == "y"
+frame_duration     = float_of_string(list.assoc("frame_duration", ini))
+frame_size         = int_of_string(list.assoc("frame_size", ini))
+alsa_buffer        = int_of_string(list.assoc("alsa_buffer", ini))
+alsa_buffer_length = int_of_string(list.assoc("alsa_buffer_length", ini))
+alsa_periods       = int_of_string(list.assoc("alsa_periods", ini))
+
+if use_alsa then
+    if frame_duration > 0.0 then
+        print("setting frame.duration to #{frame_duration}")
+        set("frame.duration", frame_duration)
+    end
+    if frame_size > 0 then
+        print("setting frame.size to #{frame_size}")
+        set("frame.size", frame_size)
+    end
+    if alsa_buffer > 0 then
+        print("setting alsa.buffer to #{alsa_buffer}")
+        set("alsa.alsa_buffer", alsa_buffer)
+    end
+    if alsa_buffer > 0 then
+        print("setting alsa.buffer_length to #{alsa_buffer_length}")
+        set("alsa.buffer_length", alsa_buffer_length)
+    end
+    if alsa_periods > 0 then
+        print("setting alsa.periods to #{alsa_periods}")
+        set("alsa.periods", alsa_periods) # assertion error when setting periods other than 0 => alsa default
+    end
+end
\ No newline at end of file