diff --git a/ChangeLog.md b/ChangeLog.md --- a/ChangeLog.md +++ b/ChangeLog.md @@ -7,3 +7,7 @@ ## 0.1.1.0 -- 2019-12-19 * First version revised A. Fixed an issue with an empty do-block (mismatched code indentation). + +## 0.1.1.1 -- 2019-12-20 + +* First version revised B. Imroved some documentation and .cabal file. diff --git a/Main.hs b/Main.hs --- a/Main.hs +++ b/Main.hs @@ -6,7 +6,8 @@ -- Maintainer : olexandr543@yahoo.com -- -- A program and a library that can be used as a simple basic interface to some SoX functionality --- or for producing the approximately Ukrainian speech with your own recorded voice. +-- or for producing the close to proper Ukrainian speech (if you pronounce sounds properly) with +-- your own recorded voice. -- module Main where @@ -36,32 +37,64 @@ main = do putStrLn " ***** CAUTION! *****" putStrLn "" - putStrLn "With great power comes great responsibility" + putStrLn "\"The possession of great power necessarily implies great responsibility.\"" putStrLn "" - putStrLn "The program mmsyn7ukr produces the approximately Ukrainian speech with your own recorded voice." - putStr " It approximates your voice with a sequence of recorded separate sounds with your control over " - putStr "the duration of the sounds. They are then precessed by the SoX binaries in the system" - putStrLn " to produce the needed sounds and then you can spell some Ukrainian text with your recorded \"voice\"." - putStr "Be aware that if somebody can get access to the sounds of your voice or to the recorded speech except you " - putStrLn "then this possibility creates security issues and concerns. So, please, do NOT give access to the records to anybody else except you." + putStrLn " (William Lamb)" putStrLn "" - putStrLn "The program is for personal usage of every user ONLY!" + putStr "The program mmsyn7ukr produces the close to proper Ukrainian " + putStr "speech (if you correctly pronounce the sounds) with your own " + putStr "recorded voice. It approximates your voice with a sequence " + putStr "of recorded separate sounds with your control over the " + putStr "duration of the sounds. They are then precessed by the SoX " + putStr "binaries already installed in the system to produce the " + putStr "needed sounds and then you can pronounce some Ukrainian text " + putStr "with your recorded \"voice\". Nevertheless, you can substitute " + putStr "whatever sounds you like (consider being sensible) instead of " + putStrLn "your own voice." putStrLn "" - putStr "As an advice, run the program in the empty writable, readable and seekable diractory only for the current user -- better in the RAM, " - putStr "wait until the program ends and then reboot the computer. If the program ends earlier, you must then remove (better wipe) the directory " - putStr "contents. No other users should have access to the computer " - putStr "after you have begun to run the program and have not deleted (or better wiped) the contents of the directory." - putStr " Please, be aware, that there are possibilities to read sensitive information from the drives after you have " - putStr "deleted the files in a usual way. You can use wiping for better security. Besides, if somebody can get access " - putStr "to the memory of the computer or to the directory contents where you run the program or (may be) to the temporary " - putStr "files created by SoX or to the drive where you run the program (not in the RAM, or may be in it) " - putStr "then your \"voice\" can be stolen and / or used inappropriately. Use all possible precautions and measures to avoid the " - putStrLn "situation." - putStr "Be aware also that the given by the program technology (or documentation for it in any form) of the voice processing can be improved so there is NO guarantees " - putStr "that the given technology or its successors cannot be used in violating your voice identity to produce from some voice records available " - putStr "the \"voice\" for the inappropriate or illegal usage. So, better is to proove your identity not only with the solely voice itself but " - putStrLn "with some additional independent sources and measures. " - putStr "The author of the program accordingly to the LICENSE (MIT) does not response for any possible issues, but by this notification tries to " + putStr "Be aware that if somebody can get access to the sounds of " + putStr "your voice or to the recorded speech (except you) then this " + putStr "possibility itself creates security issues and concerns. So, " + putStr "please, do NOT give access to such records to anybody else " + putStrLn "except you." + putStrLn "" + putStr "In such a case, the program is for personal usage of every " + putStrLn "user ONLY!" + putStrLn "" + putStr "Being given as an advice in such a case, run the program " + putStr "in the empty directory with the current user permissions to write, " + putStr "read and search and provide some proofs and evidence that nobody else " + putStr "can even read the files in the directory. May be, it is better " + putStr "to execute the program being in the directory located in the RAM, " + putStr "then consequently wait until the program ends and then reboot " + putStrLn "the computer. " + putStrLn "" + putStr "If the program ends earlier, you must then remove " + putStr "(better wipe) the directory contents. No other users should " + putStr "have access to the computer after you have begun to run the " + putStr "program and have not deleted (or better wiped) the contents " + putStr "of the directory. Please, be aware, that there are possibilities " + putStr "to read sensitive information from the drives after you have " + putStr "deleted the files in a usual way. You can use wiping for better " + putStr "security. Besides, if somebody can get access to the memory of " + putStr "the computer or to the directory contents where you run the " + putStr "program or (may be) to the temporary files created by SoX or " + putStr "to the drive where you run the program (not in the RAM, or may " + putStr "be in it) then your voice can be stolen and / or used " + putStr "inappropriately. Use all possible precautions and measures to " + putStrLn "avoid the situation. " + putStrLn "" + putStr "Be aware also that the given by the program technology (or " + putStr "documentation for it in any form) of the voice processing can " + putStr "be improved so there is NO guarantees that the given technology " + putStr "or its successors cannot be used in violating your voice identity " + putStr "to produce from some available voice records the voice for the " + putStr "inappropriate usage. Therefore, better is to proove your identity not " + putStr "only with the solely voice itself but with some additional " + putStrLn "independent sources and measures. " + putStrLn "" + putStr "The author of the program accordingly to the LICENSE (MIT) does not " + putStr "response for any possible issues, but by this notification tries to " putStrLn "intent you to be aware of some possible issues." putStrLn "" onException (do @@ -101,7 +134,7 @@ (_, Just hout, _, _) <- createProcess (proc (fromJust . showE $ "soxi") ["-D", file]) { std_out = CreatePipe } x3 <- hGetContents hout let longerK = (read x3::Double)*longerK0 - putStrLn $ "Please, now spell the sound representation of the " ++ soundUkr ++ " sound! " + putStrLn $ "Please, now pronounce the sound representation of the " ++ soundUkr ++ " sound or whatever you would like to be substituted (be sensible, please)! " recA "x.wav" (7*longerK) putStrLn "The file is recorded and now will be automatically processed. You will be notificated with the text message in the terminal about the creation of the needed file. Please, wait a little. " norm "x.wav" @@ -175,5 +208,3 @@ if take 1 pls == "y" || take 1 pls == "Y" then playA $ nameSF ++ (snd . snd . genControl . concat $ args) else return ()) - - diff --git a/README b/README --- a/README +++ b/README @@ -15,26 +15,39 @@ ***** CAUTION! ***** -With great power comes great responsibility +"The possession of great power necessarily implies great responsibility." -The program mmsyn7ukr produces the approximately Ukrainian -speech with your own recorded voice. It approximates your -voice with a sequence of recorded separate sounds with -your control over the duration of the sounds. They are then -precessed by the SoX binaries in the system to produce the -needed sounds and then you can spell some Ukrainian text -with your recorded "voice". Be aware that if somebody can get -access to the sounds of your voice or to the recorded speech -except you then this possibility creates security issues and -concerns. So, please, do NOT give access to the records to -anybody else except you. + (William Lamb) -The program is for personal usage of every user ONLY! +The program mmsyn7ukr produces the close to proper Ukrainian +speech (if you correctly pronounce the sounds) with your own +recorded voice. It approximates your voice with a sequence +of recorded separate sounds with your control over the +duration of the sounds. They are then precessed by the SoX +binaries already installed in the system to produce the +needed sounds and then you can pronounce some Ukrainian text +with your recorded "voice". Nevertheless, you can substitute +whatever sounds you like (consider being sensible) instead of +your own voice. -As an advice, run the program in the empty writable, readable -and seekable diractory only for the current user -- better -in the RAM, wait until the program ends and then reboot the -computer. If the program ends earlier, you must then remove +Be aware that if somebody can get access to the sounds of +your voice or to the recorded speech (except you) then this +possibility itself creates security issues and concerns. So, +please, do NOT give access to such records to anybody else +except you. + +In such a case, the program is for personal usage of every +user ONLY! + +Being given as an advice in such a case, run the program +in the empty directory with the current user permissions to write, +read and search and provide some proofs and evidence that nobody else +can even read the files in the directory. May be, it is better +to execute the program being in the directory located in the RAM, +then consequently wait until the program ends and then reboot +the computer. + +If the program ends earlier, you must then remove (better wipe) the directory contents. No other users should have access to the computer after you have begun to run the program and have not deleted (or better wiped) the contents @@ -53,8 +66,8 @@ documentation for it in any form) of the voice processing can be improved so there is NO guarantees that the given technology or its successors cannot be used in violating your voice identity -to produce from some voice records available the voice for the -inappropriate usage. So, better is to proove your identity not +to produce from some available voice records the voice for the +inappropriate usage. Therefore, better is to proove your identity not only with the solely voice itself but with some additional independent sources and measures. diff --git a/SoXBasics.hs b/SoXBasics.hs --- a/SoXBasics.hs +++ b/SoXBasics.hs @@ -6,7 +6,8 @@ -- Maintainer : olexandr543@yahoo.com -- -- A program and a library that can be used as a simple basic interface to some SoX functionality --- or for producing the approximately Ukrainian speech with your own recorded voice. +-- or for producing the close to proper Ukrainian speech (if you pronounce the sounds properly) with +-- your own recorded voice. -- module SoXBasics where diff --git a/mmsyn7ukr.cabal b/mmsyn7ukr.cabal --- a/mmsyn7ukr.cabal +++ b/mmsyn7ukr.cabal @@ -2,9 +2,9 @@ -- documentation, see http://haskell.org/cabal/users-guide/ name: mmsyn7ukr -version: 0.1.1.0 -synopsis: A simple basic interface to some SoX functionality or the approximately Ukrainian speech synthesizer with your own recorded voice. -description: A program and a library that can be used as a simple basic interface to some SoX functionality or for producing the approximately Ukrainian speech with your own recorded voice. +version: 0.1.1.1 +synopsis: A simple basic interface to some SoX functionality or to produce a close to the proper Ukrainian speech (if you pronounce sounds properly) with your own recorded voice. +description: A program and a library that can be used as a simple basic interface to some SoX functionality or to produce a close to the proper Ukrainian speech (if you pronounce sounds properly) with your own recorded voice. homepage: https://hackage.haskell.org/package/mmsyn7ukr license: MIT license-file: LICENSE