2020-02-27 13:18:25 +02:00
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
< html >
< head >
< title > 3/is4< / title >
< meta http-equiv = "Content-Type" content = "text/html; charset=utf-8" >
< meta http-equiv = "Content-Language" content = "en-gb" >
< link href = "inweb.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< / head >
< body >
<!-- Weave of '4/km' generated by 7 -->
< ul class = "crumbs" > < li > < a href = "../webs.html" > ★ < / a > < / li > < li > < a href = "index.html" > inbuild< / a > < / li > < li > < a href = "index.html#4" > Chapter 4: Managing Genres of Work< / a > < / li > < li > < b > Kit Manager< / b > < / li > < / ul > < p class = "purpose" > A kit is a combination of Inter code with an Inform 7 extension.< / p >
< ul class = "toc" > < li > < a href = "#SP1" > § 1. Genre definition< / a > < / li > < li > < a href = "#SP4" > § 4. Claiming< / a > < / li > < li > < a href = "#SP5" > § 5. Searching< / a > < / li > < li > < a href = "#SP6" > § 6. Copying< / a > < / li > < li > < a href = "#SP7" > § 7. Build graph< / a > < / li > < / ul > < hr class = "tocbar" >
< p class = "inwebparagraph" > < a id = "SP1" > < / a > < b > § 1. Genre definition. < / b > < / p >
< pre class = "display" >
< span class = "reserved" > inbuild_genre< / span > < span class = "plain" > *< / span > < span class = "identifier" > kit_genre< / span > < span class = "plain" > = < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > void< / span > < span class = "plain" > < / span > < span class = "functiontext" > KitManager::start< / span > < span class = "plain" > (< / span > < span class = "reserved" > void< / span > < span class = "plain" > ) {< / span >
2020-03-11 02:21:09 +02:00
< span class = "identifier" > kit_genre< / span > < span class = "plain" > = < / span > < span class = "functiontext" > Genres::new< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "string" > "kit"< / span > < span class = "plain" > , < / span > < span class = "identifier" > TRUE< / span > < span class = "plain" > );< / span >
2020-02-27 13:18:25 +02:00
< span class = "identifier" > METHOD_ADD< / span > < span class = "plain" > (< / span > < span class = "identifier" > kit_genre< / span > < span class = "plain" > , < / span > < span class = "constant" > GENRE_WRITE_WORK_MTID< / span > < span class = "plain" > , < / span > < span class = "functiontext" > KitManager::write_work< / span > < span class = "plain" > );< / span >
< span class = "identifier" > METHOD_ADD< / span > < span class = "plain" > (< / span > < span class = "identifier" > kit_genre< / span > < span class = "plain" > , < / span > < span class = "constant" > GENRE_CLAIM_AS_COPY_MTID< / span > < span class = "plain" > , < / span > < span class = "functiontext" > KitManager::claim_as_copy< / span > < span class = "plain" > );< / span >
< span class = "identifier" > METHOD_ADD< / span > < span class = "plain" > (< / span > < span class = "identifier" > kit_genre< / span > < span class = "plain" > , < / span > < span class = "constant" > GENRE_SCAN_COPY_MTID< / span > < span class = "plain" > , < / span > < span class = "functiontext" > Kits::scan< / span > < span class = "plain" > );< / span >
< span class = "identifier" > METHOD_ADD< / span > < span class = "plain" > (< / span > < span class = "identifier" > kit_genre< / span > < span class = "plain" > , < / span > < span class = "constant" > GENRE_SEARCH_NEST_FOR_MTID< / span > < span class = "plain" > , < / span > < span class = "functiontext" > KitManager::search_nest_for< / span > < span class = "plain" > );< / span >
< span class = "identifier" > METHOD_ADD< / span > < span class = "plain" > (< / span > < span class = "identifier" > kit_genre< / span > < span class = "plain" > , < / span > < span class = "constant" > GENRE_COPY_TO_NEST_MTID< / span > < span class = "plain" > , < / span > < span class = "functiontext" > KitManager::copy_to_nest< / span > < span class = "plain" > );< / span >
< span class = "identifier" > METHOD_ADD< / span > < span class = "plain" > (< / span > < span class = "identifier" > kit_genre< / span > < span class = "plain" > , < / span > < span class = "constant" > GENRE_GO_OPERATIONAL_MTID< / span > < span class = "plain" > , < / span > < span class = "functiontext" > KitManager::go_operational< / span > < span class = "plain" > );< / span >
< span class = "identifier" > METHOD_ADD< / span > < span class = "plain" > (< / span > < span class = "identifier" > kit_genre< / span > < span class = "plain" > , < / span > < span class = "constant" > GENRE_BUILD_COPY_MTID< / span > < span class = "plain" > , < / span > < span class = "functiontext" > KitManager::build< / span > < span class = "plain" > );< / span >
< span class = "plain" > }< / span >
< span class = "reserved" > void< / span > < span class = "plain" > < / span > < span class = "functiontext" > KitManager::write_work< / span > < span class = "plain" > (< / span > < span class = "reserved" > inbuild_genre< / span > < span class = "plain" > *< / span > < span class = "identifier" > gen< / span > < span class = "plain" > , < / span > < span class = "identifier" > OUTPUT_STREAM< / span > < span class = "plain" > , < / span > < span class = "reserved" > inbuild_work< / span > < span class = "plain" > *< / span > < span class = "identifier" > work< / span > < span class = "plain" > ) {< / span >
< span class = "identifier" > WRITE< / span > < span class = "plain" > (< / span > < span class = "string" > "%S"< / span > < span class = "plain" > , < / span > < span class = "identifier" > work< / span > < span class = "plain" > -< / span > < span class = "element" > > title< / span > < span class = "plain" > );< / span >
< span class = "plain" > }< / span >
< / pre >
< p class = "inwebparagraph" > < / p >
< p class = "endnote" > The function KitManager::start is used in 1/im (< a href = "1-im.html#SP3" > § 3< / a > ).< / p >
< p class = "endnote" > The function KitManager::write_work appears nowhere else.< / p >
< p class = "inwebparagraph" > < a id = "SP2" > < / a > < b > § 2. < / b > Kits live in the < code class = "display" > < span class = "extract" > Inter< / span > < / code > subdirectory of a nest:
< / p >
< pre class = "display" >
< span class = "identifier" > pathname< / span > < span class = "plain" > *< / span > < span class = "functiontext" > KitManager::path_within_nest< / span > < span class = "plain" > (< / span > < span class = "reserved" > inbuild_nest< / span > < span class = "plain" > *< / span > < span class = "identifier" > N< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > N< / span > < span class = "plain" > == < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ) < / span > < span class = "identifier" > internal_error< / span > < span class = "plain" > (< / span > < span class = "string" > "no nest"< / span > < span class = "plain" > );< / span >
< span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > Pathnames::subfolder< / span > < span class = "plain" > (< / span > < span class = "identifier" > N< / span > < span class = "plain" > -< / span > < span class = "element" > > location< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "Inter"< / span > < span class = "plain" > );< / span >
< span class = "plain" > }< / span >
< / pre >
< p class = "inwebparagraph" > < / p >
< p class = "endnote" > The function KitManager::path_within_nest is used in < a href = "#SP5" > § 5< / a > , < a href = "#SP6" > § 6< / a > , 5/kts (< a href = "5-kts.html#SP1" > § 1< / a > ).< / p >
< p class = "inwebparagraph" > < a id = "SP3" > < / a > < b > § 3. < / b > Kit copies are annotated with a structure called an < code class = "display" > < span class = "extract" > inform_kit< / span > < / code > ,
which stores data about extensions used by the Inform compiler.
< / p >
< pre class = "display" >
< span class = "reserved" > inform_kit< / span > < span class = "plain" > *< / span > < span class = "functiontext" > KitManager::from_copy< / span > < span class = "plain" > (< / span > < span class = "reserved" > inbuild_copy< / span > < span class = "plain" > *< / span > < span class = "identifier" > C< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > if< / span > < span class = "plain" > ((< / span > < span class = "identifier" > C< / span > < span class = "plain" > ) & & (< / span > < span class = "identifier" > C< / span > < span class = "plain" > -< / span > < span class = "element" > > edition< / span > < span class = "plain" > -< / span > < span class = "element" > > work< / span > < span class = "plain" > -< / span > < span class = "element" > > genre< / span > < span class = "plain" > == < / span > < span class = "identifier" > kit_genre< / span > < span class = "plain" > )) {< / span >
< span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > RETRIEVE_POINTER_inform_kit< / span > < span class = "plain" > (< / span > < span class = "identifier" > C< / span > < span class = "plain" > -< / span > < span class = "element" > > content< / span > < span class = "plain" > );< / span >
< span class = "plain" > }< / span >
< span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ;< / span >
< span class = "plain" > }< / span >
< span class = "identifier" > dictionary< / span > < span class = "plain" > *< / span > < span class = "identifier" > kit_copy_cache< / span > < span class = "plain" > = < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > inbuild_copy< / span > < span class = "plain" > *< / span > < span class = "functiontext" > KitManager::new_copy< / span > < span class = "plain" > (< / span > < span class = "identifier" > text_stream< / span > < span class = "plain" > *< / span > < span class = "identifier" > name< / span > < span class = "plain" > , < / span > < span class = "identifier" > pathname< / span > < span class = "plain" > *< / span > < span class = "identifier" > P< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > kit_copy_cache< / span > < span class = "plain" > == < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ) < / span > < span class = "identifier" > kit_copy_cache< / span > < span class = "plain" > = < / span > < span class = "identifier" > Dictionaries::new< / span > < span class = "plain" > (16, < / span > < span class = "identifier" > FALSE< / span > < span class = "plain" > );< / span >
< span class = "identifier" > TEMPORARY_TEXT< / span > < span class = "plain" > (< / span > < span class = "identifier" > key< / span > < span class = "plain" > );< / span >
< span class = "identifier" > WRITE_TO< / span > < span class = "plain" > (< / span > < span class = "identifier" > key< / span > < span class = "plain" > , < / span > < span class = "string" > "%p"< / span > < span class = "plain" > , < / span > < span class = "identifier" > P< / span > < span class = "plain" > );< / span >
< span class = "reserved" > inbuild_copy< / span > < span class = "plain" > *< / span > < span class = "identifier" > C< / span > < span class = "plain" > = < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > Dictionaries::find< / span > < span class = "plain" > (< / span > < span class = "identifier" > kit_copy_cache< / span > < span class = "plain" > , < / span > < span class = "identifier" > key< / span > < span class = "plain" > ))< / span >
< span class = "identifier" > C< / span > < span class = "plain" > = < / span > < span class = "identifier" > Dictionaries::read_value< / span > < span class = "plain" > (< / span > < span class = "identifier" > kit_copy_cache< / span > < span class = "plain" > , < / span > < span class = "identifier" > key< / span > < span class = "plain" > );< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > C< / span > < span class = "plain" > == < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > inbuild_work< / span > < span class = "plain" > *< / span > < span class = "identifier" > work< / span > < span class = "plain" > = < / span > < span class = "functiontext" > Works::new_raw< / span > < span class = "plain" > (< / span > < span class = "identifier" > kit_genre< / span > < span class = "plain" > , < / span > < span class = "identifier" > Str::duplicate< / span > < span class = "plain" > (< / span > < span class = "identifier" > name< / span > < span class = "plain" > ), < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > );< / span >
< span class = "reserved" > inbuild_edition< / span > < span class = "plain" > *< / span > < span class = "identifier" > edition< / span > < span class = "plain" > = < / span > < span class = "functiontext" > Editions::new< / span > < span class = "plain" > (< / span > < span class = "identifier" > work< / span > < span class = "plain" > , < / span > < span class = "identifier" > VersionNumbers::null< / span > < span class = "plain" > ());< / span >
< span class = "identifier" > C< / span > < span class = "plain" > = < / span > < span class = "functiontext" > Copies::new_in_path< / span > < span class = "plain" > (< / span > < span class = "identifier" > edition< / span > < span class = "plain" > , < / span > < span class = "identifier" > P< / span > < span class = "plain" > , < / span > < span class = "identifier" > NULL_GENERAL_POINTER< / span > < span class = "plain" > );< / span >
< span class = "functiontext" > Copies::scan< / span > < span class = "plain" > (< / span > < span class = "identifier" > C< / span > < span class = "plain" > );< / span >
< span class = "identifier" > Dictionaries::create< / span > < span class = "plain" > (< / span > < span class = "identifier" > kit_copy_cache< / span > < span class = "plain" > , < / span > < span class = "identifier" > key< / span > < span class = "plain" > );< / span >
< span class = "identifier" > Dictionaries::write_value< / span > < span class = "plain" > (< / span > < span class = "identifier" > kit_copy_cache< / span > < span class = "plain" > , < / span > < span class = "identifier" > key< / span > < span class = "plain" > , < / span > < span class = "identifier" > C< / span > < span class = "plain" > );< / span >
< span class = "plain" > }< / span >
< span class = "identifier" > DISCARD_TEXT< / span > < span class = "plain" > (< / span > < span class = "identifier" > key< / span > < span class = "plain" > );< / span >
< span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > C< / span > < span class = "plain" > ;< / span >
< span class = "plain" > }< / span >
< / pre >
< p class = "inwebparagraph" > < / p >
< p class = "endnote" > The function KitManager::from_copy is used in < a href = "#SP7" > § 7< / a > , 5/kts (< a href = "5-kts.html#SP1" > § 1< / a > ).< / p >
2020-03-11 02:21:09 +02:00
< p class = "endnote" > The function KitManager::new_copy is used in < a href = "#SP4" > § 4< / a > .< / p >
2020-02-27 13:18:25 +02:00
< p class = "inwebparagraph" > < a id = "SP4" > < / a > < b > § 4. Claiming. < / b > Here < code class = "display" > < span class = "extract" > arg< / span > < / code > is a textual form of a filename or pathname, such as may have been
supplied at the command line; < code class = "display" > < span class = "extract" > ext< / span > < / code > is a substring of it, and is its extension
(e.g., < code class = "display" > < span class = "extract" > jpg< / span > < / code > if < code class = "display" > < span class = "extract" > arg< / span > < / code > is < code class = "display" > < span class = "extract" > Geraniums.jpg< / span > < / code > ), or is empty if there isn't one;
< code class = "display" > < span class = "extract" > directory_status< / span > < / code > is true if we know for some reason that this is a directory
not a file, false if we know the reverse, and otherwise not applicable.
< / p >
< p class = "inwebparagraph" > A kit needs to be a directory whose name ends in < code class = "display" > < span class = "extract" > Kit< / span > < / code > , and which contains
a valid metadata file.
< / p >
< pre class = "display" >
< span class = "reserved" > void< / span > < span class = "plain" > < / span > < span class = "functiontext" > KitManager::claim_as_copy< / span > < span class = "plain" > (< / span > < span class = "reserved" > inbuild_genre< / span > < span class = "plain" > *< / span > < span class = "identifier" > gen< / span > < span class = "plain" > , < / span > < span class = "reserved" > inbuild_copy< / span > < span class = "plain" > **< / span > < span class = "identifier" > C< / span > < span class = "plain" > ,< / span >
< span class = "identifier" > text_stream< / span > < span class = "plain" > *< / span > < span class = "identifier" > arg< / span > < span class = "plain" > , < / span > < span class = "identifier" > text_stream< / span > < span class = "plain" > *< / span > < span class = "identifier" > ext< / span > < span class = "plain" > , < / span > < span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "identifier" > directory_status< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > directory_status< / span > < span class = "plain" > == < / span > < span class = "identifier" > FALSE< / span > < span class = "plain" > ) < / span > < span class = "reserved" > return< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "identifier" > kitpos< / span > < span class = "plain" > = < / span > < span class = "identifier" > Str::len< / span > < span class = "plain" > (< / span > < span class = "identifier" > arg< / span > < span class = "plain" > ) - 3;< / span >
< span class = "reserved" > if< / span > < span class = "plain" > ((< / span > < span class = "identifier" > kitpos< / span > < span class = "plain" > > = 0) & & (< / span > < span class = "identifier" > Str::get_at< / span > < span class = "plain" > (< / span > < span class = "identifier" > arg< / span > < span class = "plain" > , < / span > < span class = "identifier" > kitpos< / span > < span class = "plain" > ) == < / span > < span class = "character" > 'K'< / span > < span class = "plain" > ) & & < / span >
< span class = "plain" > (< / span > < span class = "identifier" > Str::get_at< / span > < span class = "plain" > (< / span > < span class = "identifier" > arg< / span > < span class = "plain" > , < / span > < span class = "identifier" > kitpos< / span > < span class = "plain" > +1) == < / span > < span class = "character" > 'i'< / span > < span class = "plain" > ) & & < / span >
< span class = "plain" > (< / span > < span class = "identifier" > Str::get_at< / span > < span class = "plain" > (< / span > < span class = "identifier" > arg< / span > < span class = "plain" > , < / span > < span class = "identifier" > kitpos< / span > < span class = "plain" > +2) == < / span > < span class = "character" > 't'< / span > < span class = "plain" > )) {< / span >
< span class = "identifier" > pathname< / span > < span class = "plain" > *< / span > < span class = "identifier" > P< / span > < span class = "plain" > = < / span > < span class = "identifier" > Pathnames::from_text< / span > < span class = "plain" > (< / span > < span class = "identifier" > arg< / span > < span class = "plain" > );< / span >
< span class = "plain" > *< / span > < span class = "identifier" > C< / span > < span class = "plain" > = < / span > < span class = "functiontext" > KitManager::claim_folder_as_copy< / span > < span class = "plain" > (< / span > < span class = "identifier" > P< / span > < span class = "plain" > );< / span >
< span class = "plain" > }< / span >
< span class = "plain" > }< / span >
< span class = "reserved" > inbuild_copy< / span > < span class = "plain" > *< / span > < span class = "functiontext" > KitManager::claim_folder_as_copy< / span > < span class = "plain" > (< / span > < span class = "identifier" > pathname< / span > < span class = "plain" > *< / span > < span class = "identifier" > P< / span > < span class = "plain" > ) {< / span >
< span class = "identifier" > filename< / span > < span class = "plain" > *< / span > < span class = "identifier" > canary< / span > < span class = "plain" > = < / span > < span class = "identifier" > Filenames::in_folder< / span > < span class = "plain" > (< / span > < span class = "identifier" > P< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "kit_metadata.txt"< / span > < span class = "plain" > );< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > TextFiles::exists< / span > < span class = "plain" > (< / span > < span class = "identifier" > canary< / span > < span class = "plain" > )) {< / span >
< span class = "reserved" > inbuild_copy< / span > < span class = "plain" > *< / span > < span class = "identifier" > C< / span > < span class = "plain" > = < / span > < span class = "functiontext" > KitManager::new_copy< / span > < span class = "plain" > (< / span > < span class = "identifier" > Pathnames::directory_name< / span > < span class = "plain" > (< / span > < span class = "identifier" > P< / span > < span class = "plain" > ), < / span > < span class = "identifier" > P< / span > < span class = "plain" > );< / span >
< span class = "functiontext" > KitManager::build_vertex< / span > < span class = "plain" > (< / span > < span class = "identifier" > C< / span > < span class = "plain" > );< / span >
< span class = "functiontext" > Works::add_to_database< / span > < span class = "plain" > (< / span > < span class = "identifier" > C< / span > < span class = "plain" > -< / span > < span class = "element" > > edition< / span > < span class = "plain" > -< / span > < span class = "element" > > work< / span > < span class = "plain" > , < / span > < span class = "constant" > CLAIMED_WDBC< / span > < span class = "plain" > );< / span >
< span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > C< / span > < span class = "plain" > ;< / span >
< span class = "plain" > }< / span >
< span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ;< / span >
< span class = "plain" > }< / span >
< / pre >
< p class = "inwebparagraph" > < / p >
< p class = "endnote" > The function KitManager::claim_as_copy is used in < a href = "#SP1" > § 1< / a > .< / p >
< p class = "endnote" > The function KitManager::claim_folder_as_copy is used in < a href = "#SP5" > § 5< / a > .< / p >
< p class = "inwebparagraph" > < a id = "SP5" > < / a > < b > § 5. Searching. < / b > Here we look through a nest to find all kits matching the supplied
requirements.
< / p >
< pre class = "display" >
< span class = "reserved" > void< / span > < span class = "plain" > < / span > < span class = "functiontext" > KitManager::search_nest_for< / span > < span class = "plain" > (< / span > < span class = "reserved" > inbuild_genre< / span > < span class = "plain" > *< / span > < span class = "identifier" > gen< / span > < span class = "plain" > , < / span > < span class = "reserved" > inbuild_nest< / span > < span class = "plain" > *< / span > < span class = "identifier" > N< / span > < span class = "plain" > ,< / span >
< span class = "reserved" > inbuild_requirement< / span > < span class = "plain" > *< / span > < span class = "identifier" > req< / span > < span class = "plain" > , < / span > < span class = "identifier" > linked_list< / span > < span class = "plain" > *< / span > < span class = "identifier" > search_results< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > if< / span > < span class = "plain" > ((< / span > < span class = "identifier" > req< / span > < span class = "plain" > -< / span > < span class = "element" > > work< / span > < span class = "plain" > -< / span > < span class = "element" > > genre< / span > < span class = "plain" > ) & & (< / span > < span class = "identifier" > req< / span > < span class = "plain" > -< / span > < span class = "element" > > work< / span > < span class = "plain" > -< / span > < span class = "element" > > genre< / span > < span class = "plain" > != < / span > < span class = "identifier" > kit_genre< / span > < span class = "plain" > )) < / span > < span class = "reserved" > return< / span > < span class = "plain" > ;< / span >
< span class = "identifier" > pathname< / span > < span class = "plain" > *< / span > < span class = "identifier" > P< / span > < span class = "plain" > = < / span > < span class = "functiontext" > KitManager::path_within_nest< / span > < span class = "plain" > (< / span > < span class = "identifier" > N< / span > < span class = "plain" > );< / span >
< span class = "identifier" > scan_directory< / span > < span class = "plain" > *< / span > < span class = "identifier" > D< / span > < span class = "plain" > = < / span > < span class = "identifier" > Directories::open< / span > < span class = "plain" > (< / span > < span class = "identifier" > P< / span > < span class = "plain" > );< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > D< / span > < span class = "plain" > ) {< / span >
< span class = "identifier" > TEMPORARY_TEXT< / span > < span class = "plain" > (< / span > < span class = "identifier" > LEAFNAME< / span > < span class = "plain" > );< / span >
< span class = "reserved" > while< / span > < span class = "plain" > (< / span > < span class = "identifier" > Directories::next< / span > < span class = "plain" > (< / span > < span class = "identifier" > D< / span > < span class = "plain" > , < / span > < span class = "identifier" > LEAFNAME< / span > < span class = "plain" > )) {< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > Str::get_last_char< / span > < span class = "plain" > (< / span > < span class = "identifier" > LEAFNAME< / span > < span class = "plain" > ) == < / span > < span class = "identifier" > FOLDER_SEPARATOR< / span > < span class = "plain" > ) {< / span >
< span class = "identifier" > Str::delete_last_character< / span > < span class = "plain" > (< / span > < span class = "identifier" > LEAFNAME< / span > < span class = "plain" > );< / span >
< span class = "identifier" > pathname< / span > < span class = "plain" > *< / span > < span class = "identifier" > Q< / span > < span class = "plain" > = < / span > < span class = "identifier" > Pathnames::subfolder< / span > < span class = "plain" > (< / span > < span class = "identifier" > P< / span > < span class = "plain" > , < / span > < span class = "identifier" > LEAFNAME< / span > < span class = "plain" > );< / span >
< span class = "reserved" > inbuild_copy< / span > < span class = "plain" > *< / span > < span class = "identifier" > C< / span > < span class = "plain" > = < / span > < span class = "functiontext" > KitManager::claim_folder_as_copy< / span > < span class = "plain" > (< / span > < span class = "identifier" > Q< / span > < span class = "plain" > );< / span >
< span class = "reserved" > if< / span > < span class = "plain" > ((< / span > < span class = "identifier" > C< / span > < span class = "plain" > ) & & (< / span > < span class = "functiontext" > Requirements::meets< / span > < span class = "plain" > (< / span > < span class = "identifier" > C< / span > < span class = "plain" > -< / span > < span class = "element" > > edition< / span > < span class = "plain" > , < / span > < span class = "identifier" > req< / span > < span class = "plain" > ))) {< / span >
< span class = "functiontext" > Nests::add_search_result< / span > < span class = "plain" > (< / span > < span class = "identifier" > search_results< / span > < span class = "plain" > , < / span > < span class = "identifier" > N< / span > < span class = "plain" > , < / span > < span class = "identifier" > C< / span > < span class = "plain" > , < / span > < span class = "identifier" > req< / span > < span class = "plain" > );< / span >
< span class = "plain" > }< / span >
< span class = "plain" > }< / span >
< span class = "plain" > }< / span >
< span class = "identifier" > DISCARD_TEXT< / span > < span class = "plain" > (< / span > < span class = "identifier" > LEAFNAME< / span > < span class = "plain" > );< / span >
< span class = "identifier" > Directories::close< / span > < span class = "plain" > (< / span > < span class = "identifier" > D< / span > < span class = "plain" > );< / span >
< span class = "plain" > }< / span >
< span class = "plain" > }< / span >
< / pre >
< p class = "inwebparagraph" > < / p >
< p class = "endnote" > The function KitManager::search_nest_for is used in < a href = "#SP1" > § 1< / a > .< / p >
< p class = "inwebparagraph" > < a id = "SP6" > < / a > < b > § 6. Copying. < / b > Now the task is to copy a kit into place in a nest. Since a kit is a folder,
we need to < code class = "display" > < span class = "extract" > rsync< / span > < / code > it.
< / p >
< pre class = "display" >
2020-03-11 02:21:09 +02:00
< span class = "identifier" > pathname< / span > < span class = "plain" > *< / span > < span class = "functiontext" > KitManager::pathname_in_nest< / span > < span class = "plain" > (< / span > < span class = "reserved" > inbuild_nest< / span > < span class = "plain" > *< / span > < span class = "identifier" > N< / span > < span class = "plain" > , < / span > < span class = "reserved" > inbuild_edition< / span > < span class = "plain" > *< / span > < span class = "identifier" > E< / span > < span class = "plain" > ) {< / span >
< span class = "identifier" > TEMPORARY_TEXT< / span > < span class = "plain" > (< / span > < span class = "identifier" > leaf< / span > < span class = "plain" > );< / span >
< span class = "functiontext" > Editions::write_canonical_leaf< / span > < span class = "plain" > (< / span > < span class = "identifier" > leaf< / span > < span class = "plain" > , < / span > < span class = "identifier" > E< / span > < span class = "plain" > );< / span >
< span class = "identifier" > pathname< / span > < span class = "plain" > *< / span > < span class = "identifier" > P< / span > < span class = "plain" > = < / span > < span class = "identifier" > Pathnames::subfolder< / span > < span class = "plain" > (< / span > < span class = "functiontext" > KitManager::path_within_nest< / span > < span class = "plain" > (< / span > < span class = "identifier" > N< / span > < span class = "plain" > ), < / span > < span class = "identifier" > leaf< / span > < span class = "plain" > );< / span >
< span class = "identifier" > DISCARD_TEXT< / span > < span class = "plain" > (< / span > < span class = "identifier" > leaf< / span > < span class = "plain" > );< / span >
< span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > P< / span > < span class = "plain" > ;< / span >
2020-02-27 13:18:25 +02:00
< span class = "plain" > }< / span >
< span class = "reserved" > void< / span > < span class = "plain" > < / span > < span class = "functiontext" > KitManager::copy_to_nest< / span > < span class = "plain" > (< / span > < span class = "reserved" > inbuild_genre< / span > < span class = "plain" > *< / span > < span class = "identifier" > gen< / span > < span class = "plain" > , < / span > < span class = "reserved" > inbuild_copy< / span > < span class = "plain" > *< / span > < span class = "identifier" > C< / span > < span class = "plain" > , < / span > < span class = "reserved" > inbuild_nest< / span > < span class = "plain" > *< / span > < span class = "identifier" > N< / span > < span class = "plain" > ,< / span >
< span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "identifier" > syncing< / span > < span class = "plain" > , < / span > < span class = "reserved" > build_methodology< / span > < span class = "plain" > *< / span > < span class = "identifier" > meth< / span > < span class = "plain" > ) {< / span >
2020-03-11 02:21:09 +02:00
< span class = "identifier" > pathname< / span > < span class = "plain" > *< / span > < span class = "identifier" > dest_kit< / span > < span class = "plain" > = < / span > < span class = "functiontext" > KitManager::pathname_in_nest< / span > < span class = "plain" > (< / span > < span class = "identifier" > N< / span > < span class = "plain" > , < / span > < span class = "identifier" > C< / span > < span class = "plain" > -< / span > < span class = "element" > > edition< / span > < span class = "plain" > );< / span >
2020-02-27 13:18:25 +02:00
< span class = "identifier" > filename< / span > < span class = "plain" > *< / span > < span class = "identifier" > dest_kit_metadata< / span > < span class = "plain" > = < / span > < span class = "identifier" > Filenames::in_folder< / span > < span class = "plain" > (< / span > < span class = "identifier" > dest_kit< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "kit_metadata.txt"< / span > < span class = "plain" > );< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > TextFiles::exists< / span > < span class = "plain" > (< / span > < span class = "identifier" > dest_kit_metadata< / span > < span class = "plain" > )) {< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > syncing< / span > < span class = "plain" > == < / span > < span class = "identifier" > FALSE< / span > < span class = "plain" > ) { < / span > < span class = "functiontext" > Nests::overwrite_error< / span > < span class = "plain" > (< / span > < span class = "identifier" > N< / span > < span class = "plain" > , < / span > < span class = "identifier" > C< / span > < span class = "plain" > ); < / span > < span class = "reserved" > return< / span > < span class = "plain" > ; }< / span >
< span class = "plain" > } < / span > < span class = "reserved" > else< / span > < span class = "plain" > {< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > meth< / span > < span class = "plain" > -< / span > < span class = "element" > > methodology< / span > < span class = "plain" > == < / span > < span class = "constant" > DRY_RUN_METHODOLOGY< / span > < span class = "plain" > ) {< / span >
< span class = "identifier" > TEMPORARY_TEXT< / span > < span class = "plain" > (< / span > < span class = "identifier" > command< / span > < span class = "plain" > );< / span >
< span class = "identifier" > WRITE_TO< / span > < span class = "plain" > (< / span > < span class = "identifier" > command< / span > < span class = "plain" > , < / span > < span class = "string" > "mkdir -p "< / span > < span class = "plain" > );< / span >
< span class = "identifier" > Shell::quote_path< / span > < span class = "plain" > (< / span > < span class = "identifier" > command< / span > < span class = "plain" > , < / span > < span class = "identifier" > dest_kit< / span > < span class = "plain" > );< / span >
< span class = "identifier" > WRITE_TO< / span > < span class = "plain" > (< / span > < span class = "identifier" > STDOUT< / span > < span class = "plain" > , < / span > < span class = "string" > "%S\< / span > < span class = "plain" > n< / span > < span class = "string" > "< / span > < span class = "plain" > , < / span > < span class = "identifier" > command< / span > < span class = "plain" > );< / span >
< span class = "identifier" > DISCARD_TEXT< / span > < span class = "plain" > (< / span > < span class = "identifier" > command< / span > < span class = "plain" > );< / span >
< span class = "plain" > } < / span > < span class = "reserved" > else< / span > < span class = "plain" > {< / span >
< span class = "identifier" > Pathnames::create_in_file_system< / span > < span class = "plain" > (< / span > < span class = "identifier" > N< / span > < span class = "plain" > -< / span > < span class = "element" > > location< / span > < span class = "plain" > );< / span >
< span class = "identifier" > Pathnames::create_in_file_system< / span > < span class = "plain" > (< / span > < span class = "functiontext" > KitManager::path_within_nest< / span > < span class = "plain" > (< / span > < span class = "identifier" > N< / span > < span class = "plain" > ));< / span >
< span class = "identifier" > Pathnames::create_in_file_system< / span > < span class = "plain" > (< / span > < span class = "identifier" > dest_kit< / span > < span class = "plain" > );< / span >
< span class = "plain" > }< / span >
< span class = "plain" > }< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > meth< / span > < span class = "plain" > -< / span > < span class = "element" > > methodology< / span > < span class = "plain" > == < / span > < span class = "constant" > DRY_RUN_METHODOLOGY< / span > < span class = "plain" > ) {< / span >
< span class = "identifier" > TEMPORARY_TEXT< / span > < span class = "plain" > (< / span > < span class = "identifier" > command< / span > < span class = "plain" > );< / span >
< span class = "identifier" > WRITE_TO< / span > < span class = "plain" > (< / span > < span class = "identifier" > command< / span > < span class = "plain" > , < / span > < span class = "string" > "rsync -a --delete "< / span > < span class = "plain" > );< / span >
< span class = "identifier" > Shell::quote_path< / span > < span class = "plain" > (< / span > < span class = "identifier" > command< / span > < span class = "plain" > , < / span > < span class = "identifier" > C< / span > < span class = "plain" > -< / span > < span class = "element" > > location_if_path< / span > < span class = "plain" > );< / span >
< span class = "identifier" > Shell::quote_path< / span > < span class = "plain" > (< / span > < span class = "identifier" > command< / span > < span class = "plain" > , < / span > < span class = "identifier" > dest_kit< / span > < span class = "plain" > );< / span >
< span class = "identifier" > WRITE_TO< / span > < span class = "plain" > (< / span > < span class = "identifier" > STDOUT< / span > < span class = "plain" > , < / span > < span class = "string" > "%S\< / span > < span class = "plain" > n< / span > < span class = "string" > "< / span > < span class = "plain" > , < / span > < span class = "identifier" > command< / span > < span class = "plain" > );< / span >
< span class = "identifier" > DISCARD_TEXT< / span > < span class = "plain" > (< / span > < span class = "identifier" > command< / span > < span class = "plain" > );< / span >
< span class = "plain" > } < / span > < span class = "reserved" > else< / span > < span class = "plain" > {< / span >
< span class = "identifier" > Pathnames::rsync< / span > < span class = "plain" > (< / span > < span class = "identifier" > C< / span > < span class = "plain" > -< / span > < span class = "element" > > location_if_path< / span > < span class = "plain" > , < / span > < span class = "identifier" > dest_kit< / span > < span class = "plain" > );< / span >
< span class = "plain" > }< / span >
< span class = "plain" > }< / span >
< / pre >
< p class = "inwebparagraph" > < / p >
< p class = "endnote" > The function KitManager::pathname_in_nest appears nowhere else.< / p >
< p class = "endnote" > The function KitManager::copy_to_nest is used in < a href = "#SP1" > § 1< / a > .< / p >
< p class = "inwebparagraph" > < a id = "SP7" > < / a > < b > § 7. Build graph. < / b > < / p >
< pre class = "display" >
< span class = "reserved" > void< / span > < span class = "plain" > < / span > < span class = "functiontext" > KitManager::build< / span > < span class = "plain" > (< / span > < span class = "reserved" > inbuild_genre< / span > < span class = "plain" > *< / span > < span class = "identifier" > gen< / span > < span class = "plain" > , < / span > < span class = "identifier" > text_stream< / span > < span class = "plain" > *< / span > < span class = "identifier" > OUT< / span > < span class = "plain" > , < / span > < span class = "reserved" > inbuild_copy< / span > < span class = "plain" > *< / span > < span class = "identifier" > C< / span > < span class = "plain" > ,< / span >
< span class = "reserved" > build_methodology< / span > < span class = "plain" > *< / span > < span class = "identifier" > BM< / span > < span class = "plain" > , < / span > < span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "identifier" > rebuild< / span > < span class = "plain" > , < / span > < span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "identifier" > describe_only< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > describe_only< / span > < span class = "plain" > ) < / span > < span class = "functiontext" > Graphs::describe< / span > < span class = "plain" > (< / span > < span class = "identifier" > OUT< / span > < span class = "plain" > , < / span > < span class = "identifier" > C< / span > < span class = "plain" > -< / span > < span class = "element" > > vertex< / span > < span class = "plain" > , < / span > < span class = "identifier" > TRUE< / span > < span class = "plain" > );< / span >
< span class = "reserved" > else< / span > < span class = "plain" > < / span > < span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > rebuild< / span > < span class = "plain" > ) < / span > < span class = "functiontext" > Graphs::rebuild< / span > < span class = "plain" > (< / span > < span class = "identifier" > OUT< / span > < span class = "plain" > , < / span > < span class = "identifier" > C< / span > < span class = "plain" > -< / span > < span class = "element" > > vertex< / span > < span class = "plain" > , < / span > < span class = "identifier" > BM< / span > < span class = "plain" > );< / span >
< span class = "reserved" > else< / span > < span class = "plain" > < / span > < span class = "functiontext" > Graphs::build< / span > < span class = "plain" > (< / span > < span class = "identifier" > OUT< / span > < span class = "plain" > , < / span > < span class = "identifier" > C< / span > < span class = "plain" > -< / span > < span class = "element" > > vertex< / span > < span class = "plain" > , < / span > < span class = "identifier" > BM< / span > < span class = "plain" > );< / span >
< span class = "plain" > }< / span >
< span class = "reserved" > void< / span > < span class = "plain" > < / span > < span class = "functiontext" > KitManager::build_vertex< / span > < span class = "plain" > (< / span > < span class = "reserved" > inbuild_copy< / span > < span class = "plain" > *< / span > < span class = "identifier" > C< / span > < span class = "plain" > ) {< / span >
< span class = "functiontext" > Graphs::copy_vertex< / span > < span class = "plain" > (< / span > < span class = "identifier" > C< / span > < span class = "plain" > );< / span >
< span class = "plain" > }< / span >
< span class = "reserved" > void< / span > < span class = "plain" > < / span > < span class = "functiontext" > KitManager::go_operational< / span > < span class = "plain" > (< / span > < span class = "reserved" > inbuild_genre< / span > < span class = "plain" > *< / span > < span class = "identifier" > G< / span > < span class = "plain" > , < / span > < span class = "reserved" > inbuild_copy< / span > < span class = "plain" > *< / span > < span class = "identifier" > C< / span > < span class = "plain" > ) {< / span >
< span class = "functiontext" > Kits::construct_graph< / span > < span class = "plain" > (< / span > < span class = "functiontext" > KitManager::from_copy< / span > < span class = "plain" > (< / span > < span class = "identifier" > C< / span > < span class = "plain" > ));< / span >
< span class = "plain" > }< / span >
< span class = "reserved" > typedef< / span > < span class = "plain" > < / span > < span class = "reserved" > struct< / span > < span class = "plain" > < / span > < span class = "reserved" > kit_contents_section_state< / span > < span class = "plain" > {< / span >
< span class = "reserved" > struct< / span > < span class = "plain" > < / span > < span class = "identifier" > linked_list< / span > < span class = "plain" > *< / span > < span class = "identifier" > sects< / span > < span class = "plain" > ; < / span > < span class = "comment" > of < code class = "display" > < span class = "extract" > text_stream< / span > < / code > < / span >
< span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "identifier" > active< / span > < span class = "plain" > ;< / span >
< span class = "plain" > } < / span > < span class = "reserved" > kit_contents_section_state< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > void< / span > < span class = "plain" > < / span > < span class = "functiontext" > KitManager::read_contents< / span > < span class = "plain" > (< / span > < span class = "identifier" > text_stream< / span > < span class = "plain" > *< / span > < span class = "identifier" > text< / span > < span class = "plain" > , < / span > < span class = "identifier" > text_file_position< / span > < span class = "plain" > *< / span > < span class = "identifier" > tfp< / span > < span class = "plain" > , < / span > < span class = "reserved" > void< / span > < span class = "plain" > *< / span > < span class = "identifier" > state< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > kit_contents_section_state< / span > < span class = "plain" > *< / span > < span class = "identifier" > CSS< / span > < span class = "plain" > = (< / span > < span class = "reserved" > kit_contents_section_state< / span > < span class = "plain" > *) < / span > < span class = "identifier" > state< / span > < span class = "plain" > ;< / span >
< span class = "identifier" > match_results< / span > < span class = "plain" > < / span > < span class = "identifier" > mr< / span > < span class = "plain" > = < / span > < span class = "identifier" > Regexp::create_mr< / span > < span class = "plain" > ();< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > Regexp::match< / span > < span class = "plain" > (& < / span > < span class = "identifier" > mr< / span > < span class = "plain" > , < / span > < span class = "identifier" > text< / span > < span class = "plain" > , < / span > < span class = "identifier" > L< / span > < span class = "string" > "Sections"< / span > < span class = "plain" > ))< / span >
< span class = "identifier" > CSS< / span > < span class = "plain" > -< / span > < span class = "element" > > active< / span > < span class = "plain" > = < / span > < span class = "identifier" > TRUE< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > if< / span > < span class = "plain" > ((< / span > < span class = "identifier" > Regexp::match< / span > < span class = "plain" > (& < / span > < span class = "identifier" > mr< / span > < span class = "plain" > , < / span > < span class = "identifier" > text< / span > < span class = "plain" > , < / span > < span class = "identifier" > L< / span > < span class = "string" > " (%c+)"< / span > < span class = "plain" > )) & & (< / span > < span class = "identifier" > CSS< / span > < span class = "plain" > -< / span > < span class = "element" > > active< / span > < span class = "plain" > )) {< / span >
< span class = "identifier" > WRITE_TO< / span > < span class = "plain" > (< / span > < span class = "identifier" > mr< / span > < span class = "plain" > .< / span > < span class = "identifier" > exp< / span > < span class = "plain" > [0], < / span > < span class = "string" > ".i6t"< / span > < span class = "plain" > );< / span >
< span class = "identifier" > ADD_TO_LINKED_LIST< / span > < span class = "plain" > (< / span > < span class = "identifier" > Str::duplicate< / span > < span class = "plain" > (< / span > < span class = "identifier" > mr< / span > < span class = "plain" > .< / span > < span class = "identifier" > exp< / span > < span class = "plain" > [0]), < / span > < span class = "identifier" > text_stream< / span > < span class = "plain" > , < / span > < span class = "identifier" > CSS< / span > < span class = "plain" > -< / span > < span class = "element" > > sects< / span > < span class = "plain" > );< / span >
< span class = "plain" > }< / span >
< span class = "identifier" > Regexp::dispose_of< / span > < span class = "plain" > (& < / span > < span class = "identifier" > mr< / span > < span class = "plain" > );< / span >
< span class = "plain" > }< / span >
< / pre >
< p class = "inwebparagraph" > < / p >
< p class = "endnote" > The function KitManager::build is used in < a href = "#SP1" > § 1< / a > .< / p >
< p class = "endnote" > The function KitManager::build_vertex is used in < a href = "#SP4" > § 4< / a > , 5/kts (< a href = "5-kts.html#SP1" > § 1< / a > ).< / p >
< p class = "endnote" > The function KitManager::go_operational is used in < a href = "#SP1" > § 1< / a > .< / p >
< p class = "endnote" > The function KitManager::read_contents is used in 5/kts (< a href = "5-kts.html#SP2" > § 2< / a > ).< / p >
< p class = "endnote" > The structure kit_contents_section_state is accessed in 5/kts and here.< / p >
< hr class = "tocbar" >
< ul class = "toc" > < li > < i > (This section begins Chapter 4: Managing Genres of Work.)< / i > < / li > < li > < a href = "4-em.html" > Continue with 'Extension Manager'< / a > < / li > < / ul > < hr class = "tocbar" >
<!-- End of weave -->
< / body >
< / html >