macos.c

/*
 * macOS package gateway for the ESP Package Manager (EPM).
 *
 * Copyright 2002-2017 by Michael R Sweet
 * Copyright 2002-2010 by Easy Software Products.
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2, or (at your option)
 * any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 */

/*
 * Include necessary headers...
 */

#include "epm.h"


/*
 * Local globals...
 */

static int have_pkgbuild = 0;		/* Do we have the pkgbuild program? */
static const char * const pm_paths[] =	/* Paths to legacy PackageMaker program */
		{
		  "/Developer/Applications/PackageMaker.app",
		  "/Developer/Applications/Utilities/PackageMaker.app",
		  NULL
		};


/*
 * Local functions...
 */

static int	make_subpackage(int format, const char *prodname, const char *directory,
		                dist_t *dist, const char *subpackage,
				const char *setup);
static int	write_rtf(dist_t *dist, const char *title,
			  const char *subpackage, const char *welcome);


/*
 * 'make_osx()' - Make a Red Hat software distribution package.
 */

int					/* O - 0 = success, 1 = fail */
make_osx(int            format,		/* I - Format */
	 const char     *prodname,	/* I - Product short name */
         const char     *directory,	/* I - Directory for distribution files */
         const char     *platname,	/* I - Platform name */
         dist_t         *dist,		/* I - Distribution information */
	 struct utsname *platform,	/* I - Platform information */
	 const char	*setup)		/* I - Setup GUI image */
{
  int		i;			/* Looping var */
  FILE		*fp;			/* Spec file */
  char		filename[1024];		/* Destination filename */
  char		current[1024];		/* Current directory */
  const char	*ext;			/* Filename extension */


  REF(platname);
  REF(platform);

  have_pkgbuild = !access("/usr/bin/pkgbuild", X_OK);

 /*
  * Create the main package and subpackages (if any)...
  */

  if (make_subpackage(format, prodname, directory, dist, NULL, setup))
    return (1);

  if (!have_pkgbuild)
  {
    for (i = 0; i < dist->num_subpackages; i ++)
      if (make_subpackage(format, prodname, directory, dist, dist->subpackages[i], setup))
	return (1);

    if (dist->num_subpackages)
    {
     /*
      * Create a meta package for the whole shebang...
      */

      if (Verbosity)
	puts("Creating macOS metapackage...");

      getcwd(current, sizeof(current));

     /*
      * Copy the resources for the license, readme, and welcome (description)
      * stuff...
      */

      if (Verbosity)
	puts("Copying temporary resource files...");

      snprintf(filename, sizeof(filename), "%s/MetaPackage", directory);
      make_directory(filename, 0777, 0, 0);

      snprintf(filename, sizeof(filename), "%s/MetaResources", directory);
      make_directory(filename, 0777, 0, 0);

      if (dist->license[0])
      {
	if ((ext = strrchr(dist->license, '.')) == NULL || strcmp(ext, ".rtf"))
	  ext = ".txt";

	snprintf(filename, sizeof(filename), "%s/MetaResources/License%s",
		 directory, ext);
	copy_file(filename, dist->license, 0644, 0, 0);
      }

      if (dist->readme[0])
      {
	if ((ext = strrchr(dist->readme, '.')) == NULL || strcmp(ext, ".rtf"))
	  ext = ".txt";

	snprintf(filename, sizeof(filename), "%s/MetaResources/ReadMe%s",
		 directory, ext);
	copy_file(filename, dist->readme, 0644, 0, 0);
      }

      if (setup && (ext = strrchr(setup, '.')) != NULL &&
	  (!strcmp(ext, ".gif") || !strcmp(ext, ".jpg") || !strcmp(ext, ".tif")))
      {
	snprintf(filename, sizeof(filename), "%s/MetaResources/background%s",
		 directory, ext);
	copy_file(filename, setup, 0644, 0, 0);
      }

      snprintf(filename, sizeof(filename), "%s/MetaResources/Welcome.rtf",
	       directory);
      if (write_rtf(dist, dist->product, NULL, filename))
	return (1);

      snprintf(filename, sizeof(filename), "%s/%s-metadesc.plist", directory,
	       prodname);
      if ((fp = fopen(filename, "w")) == NULL)
      {
	fprintf(stderr, "epm: Unable to create description file \"%s\": %s\n", filename, strerror(errno));
	return (1);
      }

      fputs("<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n", fp);
      fputs("<!DOCTYPE plist PUBLIC \"-//Apple Computer//DTD PLIST 1.0//EN\" \"http://www.apple.com/DTDs/PropertyList-1.0.dtd\">\n", fp);
      fputs("<plist version=\"1.0\">\n", fp);
      fputs("<dict>\n", fp);
      fputs("        <key>IFPkgDescriptionDeleteWarning</key>\n", fp);
      fputs("        <string></string>\n", fp);
      fputs("        <key>IFPkgDescriptionDescription</key>\n", fp);
      fputs("        <string>", fp);
      for (i = 0; i < dist->num_descriptions; i ++)
	if (!dist->descriptions[i].subpackage)
	  fprintf(fp, "%s\n", dist->descriptions[i].description);
      fputs("</string>\n", fp);
      fputs("        <key>IFPkgDescriptionTitle</key>\n", fp);
      fprintf(fp, "        <string>%s</string>\n", dist->product);
      fputs("        <key>IFPkgDescriptionVersion</key>\n", fp);
      fprintf(fp, "        <string>%s</string>\n", dist->version);
      fputs("</dict>\n", fp);
      fputs("</plist>\n", fp);

      fclose(fp);

     /*
      * Do the info file for the packager...
      */

      snprintf(filename, sizeof(filename), "%s/%s-metainfo.plist", directory,
	       prodname);
      if ((fp = fopen(filename, "w")) == NULL)
      {
	fprintf(stderr, "epm: Unable to create package information file \"%s\": %s\n", filename, strerror(errno));
	return (1);
      }

      fputs("<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n", fp);
      fputs("<!DOCTYPE plist PUBLIC \"-//Apple Computer//DTD PLIST 1.0//EN\" \"http://www.apple.com/DTDs/PropertyList-1.0.dtd\">\n", fp);
      fputs("<plist version=\"1.0\">\n", fp);
      fputs("<dict>\n", fp);
      fputs("        <key>IFPkgFormatVersion</key>\n", fp);
      fputs("        <real>0.1</real>\n", fp);
      fputs("        <key>IFPkgFlagAuthorizationAction</key>\n", fp);
      fputs("        <string>RootAuthorization</string>\n", fp);
      fputs("        <key>IFPkgFlagBackgroundAlignment</key>\n", fp);
      fputs("        <string>bottomleft</string>\n", fp);
      fputs("        <key>IFPkgFlagBackgroundScaling</key>\n", fp);
      fputs("        <string>none</string>\n", fp);
      fputs("        <key>IFPkgFlagAllowBackRev</key>\n", fp);
      fputs("        <true/>\n", fp);
      fputs("        <key>IFPkgFlagComponentDirectory</key>\n", fp);
      fputs("        <string>Contents/Packages</string>\n", fp);
      fputs("        <key>IFPkgFlagPackageList</key>\n", fp);
      fputs("        <array>\n", fp);
      fputs("                <dict>\n", fp);
      fputs("                        <key>IFPkgFlagPackageLocation</key>\n", fp);
      fprintf(fp, "                        <string>%s.pkg</string>\n", prodname);
      fputs("                        <key>IFPkgFlagPackageSelection</key>\n", fp);
      fputs("                        <string>selected</string>\n", fp);
      fputs("                </dict>\n", fp);
      for (i = 0; i < dist->num_subpackages; i ++)
      {
	fputs("                <dict>\n", fp);
	fputs("                        <key>IFPkgFlagPackageLocation</key>\n", fp);
	fprintf(fp, "                        <string>%s-%s.pkg</string>\n",
		prodname, dist->subpackages[i]);
	fputs("                        <key>IFPkgFlagPackageSelection</key>\n", fp);
	fputs("                        <string>selected</string>\n", fp);
	fputs("                </dict>\n", fp);
      }
      fputs("        </array>\n", fp);
      fputs("        <key>CFBundleIdentifier</key>\n", fp);
      fprintf(fp, "        <string>%s</string>\n", prodname);
      fputs("        <key>CFBundleName</key>\n", fp);
      fprintf(fp, "        <string>%s</string>\n", dist->product);
      fputs("        <key>CFBundleGetInfoString</key>\n", fp);
      fprintf(fp, "        <string>%s %s</string>\n", dist->product, dist->version);
      fputs("        <key>CFBundleShortVersionString</key>\n", fp);
      fprintf(fp, "        <string>%s</string>\n", dist->version);
      fputs("</dict>\n", fp);
      fputs("</plist>\n", fp);

      fclose(fp);

     /*
      * Build the distribution...
      */

      if (Verbosity)
	puts("Building macOS package...");

      if (directory[0] == '/')
	strlcpy(filename, directory, sizeof(filename));
      else
	snprintf(filename, sizeof(filename), "%s/%s", current, directory);

      for (i = 0; pm_paths[i]; i ++)
	if (!access(pm_paths[i], 0))
	  break;

      if (pm_paths[i])
	run_command(NULL, "%s/Contents/MacOS/PackageMaker -build "
			  "-p %s/%s.mpkg "
			  "-f %s/MetaPackage "
			  "-r %s/MetaResources "
			  "-d %s/%s-metadesc.plist "
			  "-i %s/%s-metainfo.plist",
		    pm_paths[i],
		    filename, prodname,
		    filename,
		    filename,
		    filename, prodname,
		    filename, prodname);
      else
      {
	fputs("epm: Unable to find \"PackageMaker\" program!\n", stderr);
	return (1);
      }

      snprintf(filename, sizeof(filename), "%s/%s.mpkg", directory, prodname);
      if (access(filename, 0))
	return (1);

     /*
      * Move subpackages into the .mpkg directory...
      */

      run_command(directory, "/bin/mv Packages %s.mpkg/Contents", prodname);

     /*
      * Remove temporary files...
      */

      if (!KeepFiles)
      {
	if (Verbosity)
	  puts("Removing temporary distribution files...");

	snprintf(filename, sizeof(filename), "%s/MetaPackage", directory);
	unlink_directory(filename);

	snprintf(filename, sizeof(filename), "%s/MetaResources", directory);
	unlink_directory(filename);

	snprintf(filename, sizeof(filename), "%s/%s-metadesc.plist", directory,
		 prodname);
	unlink(filename);

	snprintf(filename, sizeof(filename), "%s/%s-metainfo.plist", directory,
		 prodname);
	unlink(filename);
      }
    }
  }

 /*
  * TODO: Copy uninstall application to disk image...
  */

 /*
  * Create a disk image of the package...
  */

  if (Verbosity)
    puts("Creating disk image...");

  if (dist->release[0])
    snprintf(filename, sizeof(filename), "%s-%s-%s", prodname, dist->version,
             dist->release);
  else
    snprintf(filename, sizeof(filename), "%s-%s", prodname, dist->version);

  if (platname[0])
  {
    strlcat(filename, "-", sizeof(filename));
    strlcat(filename, platname, sizeof(filename));
  }

  if (run_command(NULL, "hdiutil create -ov -srcfolder %s/%s.%s %s/%s.dmg",
                  directory, prodname, dist->num_subpackages && !have_pkgbuild ? "mpkg" : "pkg",
	          directory, filename))
  {
    fputs("epm: Unable to create disk image.\n", stderr);
    return (1);
  }

  return (0);
}


/*
 * 'make_subpackage()' - Make a macOS subpackage.
 */

static int
make_subpackage(int        format,	/* I - Format */
	        const char *prodname,	/* I - Product short name */
                const char *directory,	/* I - Directory for distribution files */
		dist_t     *dist,	/* I - Distribution  information */
                const char *subpackage,	/* I - Subpackage */
		const char *setup)	/* I - Setup GUI image */
{
  int		i;			/* Looping var */
  FILE		*fp;			/* Spec file */
  char		prodfull[1024],		/* Full product name */
		title[1024],		/* Software title */
		filename[1024],		/* Destination filename */
		pkgdir[1024],		/* Package directory */
		pkgname[1024];		/* Package name */
  file_t	*file;			/* Current distribution file */
  command_t	*c;			/* Current command */
  struct passwd	*pwd;			/* Pointer to user record */
  struct group	*grp;			/* Pointer to group record */
  char		current[1024];		/* Current directory */
  const char	*option;		/* Init script option */
  const char	*ext;			/* Filename extension */


  if (subpackage && !have_pkgbuild)
  {
    snprintf(prodfull, sizeof(prodfull), "%s-%s", prodname, subpackage);

    for (i = 0; i < dist->num_descriptions; i ++)
      if (dist->descriptions[i].subpackage == subpackage)
	break;

    if (i < dist->num_descriptions)
      snprintf(title, sizeof(title), "%s - %s", dist->product,
               dist->descriptions[i].description);
    else
      strlcpy(title, dist->product, sizeof(title));
  }
  else
  {
    strlcpy(prodfull, prodname, sizeof(prodfull));
    strlcpy(title, dist->product, sizeof(title));
  }

  if (Verbosity)
    printf("Creating %s macOS package...\n", prodfull);

  getcwd(current, sizeof(current));

 /*
  * Copy the resources for the license, readme, and welcome (description)
  * stuff...
  */

  if (Verbosity)
    puts("Copying temporary resource files...");

  snprintf(filename, sizeof(filename), "%s/%s/Resources", directory, prodfull);
  make_directory(filename, 0777, 0, 0);

  if (!have_pkgbuild)
  {
    if (dist->license[0])
    {
      if ((ext = strrchr(dist->license, '.')) == NULL || strcmp(ext, ".rtf"))
	ext = ".txt";

      snprintf(filename, sizeof(filename), "%s/%s/Resources/License%s",
	       directory, prodfull, ext);
      copy_file(filename, dist->license, 0644, 0, 0);
    }

    if (dist->readme[0])
    {
      if ((ext = strrchr(dist->readme, '.')) == NULL || strcmp(ext, ".rtf"))
	ext = ".txt";

      snprintf(filename, sizeof(filename), "%s/%s/Resources/ReadMe%s",
	       directory, prodfull, ext);
      copy_file(filename, dist->readme, 0644, 0, 0);
    }

    if (setup && (ext = strrchr(setup, '.')) != NULL &&
	(!strcmp(ext, ".gif") || !strcmp(ext, ".jpg") || !strcmp(ext, ".tif")))
    {
      snprintf(filename, sizeof(filename), "%s/%s/Resources/background%s",
	       directory, prodfull, ext);
      copy_file(filename, setup, 0644, 0, 0);
    }

    snprintf(filename, sizeof(filename), "%s/%s/Resources/Welcome.rtf",
	     directory, prodfull);
    if (write_rtf(dist, title, subpackage, filename))
     return (1);

   /*
    * Do the plist files for the packager...
    */

    snprintf(filename, sizeof(filename), "%s/%s-desc.plist", directory, prodfull);
    if ((fp = fopen(filename, "w")) == NULL)
    {
      fprintf(stderr, "epm: Unable to create description file \"%s\": %s\n", filename, strerror(errno));
      return (1);
    }

    fputs("<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n", fp);
    fputs("<!DOCTYPE plist PUBLIC \"-//Apple Computer//DTD PLIST 1.0//EN\" \"http://www.apple.com/DTDs/PropertyList-1.0.dtd\">\n", fp);
    fputs("<plist version=\"1.0\">\n", fp);
    fputs("<dict>\n", fp);
    fputs("        <key>IFPkgDescriptionDeleteWarning</key>\n", fp);
    fputs("        <string></string>\n", fp);
    fputs("        <key>IFPkgDescriptionDescription</key>\n", fp);
    fputs("        <string>", fp);
    for (i = 0; i < dist->num_descriptions; i ++)
      if (dist->descriptions[i].subpackage == subpackage)
	fprintf(fp, "%s\n", dist->descriptions[i].description);
    fputs("</string>\n", fp);
    fputs("        <key>IFPkgDescriptionTitle</key>\n", fp);
    fprintf(fp, "        <string>%s</string>\n", title);
    fputs("        <key>IFPkgDescriptionVersion</key>\n", fp);
    fprintf(fp, "        <string>%s</string>\n", dist->version);
    fputs("</dict>\n", fp);
    fputs("</plist>\n", fp);

    fclose(fp);

    snprintf(filename, sizeof(filename), "%s/%s-info.plist", directory, prodfull);
    if ((fp = fopen(filename, "w")) == NULL)
    {
      fprintf(stderr, "epm: Unable to create package information file \"%s\": %s\n", filename, strerror(errno));
      return (1);
    }

    fputs("<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n", fp);
    fputs("<!DOCTYPE plist PUBLIC \"-//Apple Computer//DTD PLIST 1.0//EN\" \"http://www.apple.com/DTDs/PropertyList-1.0.dtd\">\n", fp);
    fputs("<plist version=\"1.0\">\n", fp);
    fputs("<dict>\n", fp);
    fputs("        <key>IFPkgFormatVersion</key>\n", fp);
    fputs("        <real>0.1</real>\n", fp);
    fputs("        <key>IFPkgFlagAuthorizationAction</key>\n", fp);
    fputs("        <string>RootAuthorization</string>\n", fp);
    if (dist->num_subpackages && !subpackage)
    {
      fputs("        <key>IFPkgFlagIsRequired</key>\n", fp);
      fputs("        <true/>\n", fp);
    }
    fputs("        <key>IFPkgFlagAllowBackRev</key>\n", fp);
    fputs("        <true/>\n", fp);
    fputs("        <key>IFPkgFlagBackgroundAlignment</key>\n", fp);
    fputs("        <string>bottomleft</string>\n", fp);
    fputs("        <key>IFPkgFlagBackgroundScaling</key>\n", fp);
    fputs("        <string>none</string>\n", fp);
    fputs("        <key>CFBundleIdentifier</key>\n", fp);
    fprintf(fp, "        <string>%s.%s</string>\n", prodname,
	    subpackage ? subpackage : "base");
    fputs("        <key>CFBundleName</key>\n", fp);
    fprintf(fp, "        <string>%s</string>\n", title);
    fputs("        <key>CFBundleGetInfoString</key>\n", fp);
    fprintf(fp, "        <string>%s %s</string>\n", title, dist->version);
    fputs("        <key>CFBundleShortVersionString</key>\n", fp);
    fprintf(fp, "        <string>%s</string>\n", dist->version);
    fputs("</dict>\n", fp);
    fputs("</plist>\n", fp);

    fclose(fp);
  }

 /*
  * Do pre/post install commands...
  */

  for (i = dist->num_commands, c = dist->commands; i > 0; i --, c ++)
    if (c->type == COMMAND_PRE_INSTALL && c->subpackage == subpackage)
      break;

  if (i)
  {
    if (have_pkgbuild)
      snprintf(filename, sizeof(filename), "%s/%s/Resources/preinstall", directory, prodfull);
    else
      snprintf(filename, sizeof(filename), "%s/%s/Resources/preflight", directory, prodfull);

    if ((fp = fopen(filename, "w")) == NULL)
    {
      fprintf(stderr, "epm: Unable to create preinstall script \"%s\": %s\n", filename, strerror(errno));
      return (1);
    }

    fputs("#!/bin/sh\n", fp);

    for (; i > 0; i --, c ++)
      if (c->type == COMMAND_PRE_INSTALL && c->subpackage == subpackage)
	fprintf(fp, "%s\n", c->command);

    fclose(fp);
    chmod(filename, 0755);
  }

  for (i = dist->num_commands, c = dist->commands; i > 0; i --, c ++)
    if (c->type == COMMAND_POST_INSTALL && (c->subpackage == subpackage || have_pkgbuild))
      break;

  if (!i)
  {
    for (i = dist->num_files, file = dist->files; i > 0; i --, file ++)
      if (tolower(file->type) == 'i' && (file->subpackage == subpackage || have_pkgbuild))
        break;
  }

  if (i)
  {
    if (have_pkgbuild)
      snprintf(filename, sizeof(filename), "%s/%s/Resources/postinstall", directory, prodfull);
    else
      snprintf(filename, sizeof(filename), "%s/%s/Resources/postflight", directory, prodfull);

    if ((fp = fopen(filename, "w")) == NULL)
    {
      fprintf(stderr, "epm: Unable to create postinstall script \"%s\": %s\n", filename, strerror(errno));
      return (1);
    }

    fputs("#!/bin/sh\n", fp);

    for (i = dist->num_commands, c = dist->commands; i > 0; i --, c ++)
      if (c->type == COMMAND_POST_INSTALL && (c->subpackage == subpackage || have_pkgbuild))
	fprintf(fp, "%s\n", c->command);

    for (i = dist->num_files, file = dist->files; i > 0; i --, file ++)
      if (tolower(file->type) == 'i' && (file->subpackage == subpackage || have_pkgbuild))
        qprintf(fp, "/Library/StartupItems/%s/%s start\n",
	        file->dst, file->dst);

    fclose(fp);
    chmod(filename, 0755);
  }

 /*
  * Copy the files over...
  */

  if (Verbosity)
    puts("Copying temporary distribution files...");

  for (i = dist->num_files, file = dist->files; i > 0; i --, file ++)
  {
   /*
    * Only add files in this subpackage...
    */

    if (file->subpackage != subpackage && !have_pkgbuild)
      continue;

   /*
    * Find the username and groupname IDs...
    */

    pwd = getpwnam(file->user);
    grp = getgrnam(file->group);

    endpwent();
    endgrent();

   /*
    * Copy the file or make the directory or make the symlink as needed...
    */

    switch (tolower(file->type))
    {
      case 'c' :
      case 'f' :
          if (!strncmp(file->dst, "/etc/", 5) || !strncmp(file->dst, "/var/", 5))
            snprintf(filename, sizeof(filename), "%s/%s/Package/private%s",
	             directory, prodfull, file->dst);
          else
            snprintf(filename, sizeof(filename), "%s/%s/Package%s",
	             directory, prodfull, file->dst);

	  if (Verbosity > 1)
	    printf("%s -> %s...\n", file->src, filename);

	  if (copy_file(filename, file->src, file->mode, pwd ? pwd->pw_uid : 0,
			grp ? grp->gr_gid : 0))
	    return (1);
          break;
      case 'i' :
          snprintf(filename, sizeof(filename),
	           "%s/%s/Package/Library/StartupItems/%s/%s",
	           directory, prodfull, file->dst, file->dst);

	  if (Verbosity > 1)
	    printf("%s -> %s...\n", file->src, filename);

	  if (copy_file(filename, file->src, file->mode, pwd ? pwd->pw_uid : 0,
			grp ? grp->gr_gid : 0))
	    return (1);

          snprintf(filename, sizeof(filename),
	           "%s/%s/Package/Library/StartupItems/%s/StartupParameters.plist",
	           directory, prodfull, file->dst);
	  if ((fp = fopen(filename, "w")) == NULL)
	  {
	    fprintf(stderr, "epm: Unable to create init data file \"%s\": %s\n", filename, strerror(errno));
	    return (1);
	  }

          fputs("{\n", fp);
          fprintf(fp, "  Description = \"%s\";\n", dist->product);
	  qprintf(fp, "  Provides = (%s);\n",
	          get_option(file, "provides", file->dst));
          if ((option = get_option(file, "requires", NULL)) != NULL)
	    qprintf(fp, "  Requires = (%s);\n", option);
          if ((option = get_option(file, "uses", NULL)) != NULL)
	    qprintf(fp, "  Uses = (%s);\n", option);
          if ((option = get_option(file, "order", NULL)) != NULL)
	    qprintf(fp, "  OrderPreference = \"%s\";\n", option);
	  fputs("}\n", fp);

	  fclose(fp);

          snprintf(filename, sizeof(filename),
	           "%s/%s/Package/Library/StartupItems/%s/Resources/English.lproj",
	           directory, prodfull, file->dst);
          make_directory(filename, 0777, 0, 0);

          snprintf(filename, sizeof(filename),
	           "%s/%s/Package/Library/StartupItems/%s/Resources/English.lproj/Localizable.strings",
	           directory, prodfull, file->dst);
	  if ((fp = fopen(filename, "w")) == NULL)
	  {
	    fprintf(stderr, "epm: Unable to create init strings file \"%s\": %s\n", filename, strerror(errno));
	    return (1);
	  }

	  fputs("<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n", fp);
	  fputs("<!DOCTYPE plist SYSTEM \"file://localhost/System/Library/DTDs/PropertyList.dtd\">\n", fp);
	  fputs("<plist version=\"0.9\">\n", fp);
	  fputs("<dict>\n", fp);
	  fprintf(fp, "        <key>Starting %s</key>\n", dist->product);
	  fprintf(fp, "        <string>Starting %s</string>\n", dist->product);
	  fputs("</dict>\n", fp);
	  fputs("</plist>\n", fp);

	  fclose(fp);
          break;
      case 'd' :
          if (!strncmp(file->dst, "/etc/", 5) || !strncmp(file->dst, "/var/", 5) ||
	      !strcmp(file->dst, "/etc") || !strcmp(file->dst, "/var"))
            snprintf(filename, sizeof(filename), "%s/%s/Package/private%s",
	             directory, prodfull, file->dst);
          else
            snprintf(filename, sizeof(filename), "%s/%s/Package%s",
	             directory, prodfull, file->dst);

	  if (Verbosity > 1)
	    printf("Directory %s...\n", filename);

          make_directory(filename, file->mode, pwd ? pwd->pw_uid : 0,
			 grp ? grp->gr_gid : 0);
          break;
      case 'l' :
          if (!strncmp(file->dst, "/etc/", 5) || !strncmp(file->dst, "/var/", 5))
            snprintf(filename, sizeof(filename), "%s/%s/Package/private%s",
	             directory, prodfull, file->dst);
          else
            snprintf(filename, sizeof(filename), "%s/%s/Package%s",
	             directory, prodfull, file->dst);

	  if (Verbosity > 1)
	    printf("%s -> %s...\n", file->src, filename);

          make_link(filename, file->src);
          break;
    }
  }

 /*
  * Build the distribution...
  */

  if (Verbosity)
    puts("Building macOS package...");

  if (directory[0] == '/')
    strlcpy(filename, directory, sizeof(filename));
  else
    snprintf(filename, sizeof(filename), "%s/%s", current, directory);

  if (dist->num_subpackages && !have_pkgbuild)
  {
   /*
    * Place the individual packages in the "Packages" subdirectory;
    * a metapackage will handle the whole shebang...
    */

    snprintf(pkgdir, sizeof(pkgdir), "%s/Packages", filename);
    make_directory(pkgdir, 0777, 0, 0);

    snprintf(pkgname, sizeof(pkgname), "%s/Packages/%s.pkg", filename,
             prodfull);
  }
  else
  {
   /*
    * The package stands alone - just put it in the output directory...
    */

    snprintf(pkgname, sizeof(pkgname), "%s/%s.pkg", filename, prodfull);
  }

  if (have_pkgbuild)
  {
    if (format == PACKAGE_MACOS_SIGNED)
    {
      const char *identity = getenv("EPM_SIGNING_IDENTITY");
      if (!identity)
      {
        fputs("epm: Using default signing identity; set EPM_SIGNING_IDENTITY environment variable to override.\n", stderr);
	identity = "-";
      }

      run_command(NULL, "/usr/bin/pkgbuild "
			"--identifier %s "
			"--version %s "
			"--ownership preserve "
			"--scripts %s/%s/Resources "
			"--root %s/%s/Package "
			"--sign '%s' "
			"%s",
		  prodfull,
		  dist->version,
		  directory, prodfull,
		  directory, prodfull,
		  identity,
		  pkgname);
    }
    else
    {
      run_command(NULL, "/usr/bin/pkgbuild "
			"--identifier %s "
			"--version %s "
			"--ownership preserve "
			"--scripts %s/%s/Resources "
			"--root %s/%s/Package "
			"%s",
		  prodfull,
		  dist->version,
		  directory, prodfull,
		  directory, prodfull,
		  pkgname);
    }
  }
  else
  {
    for (i = 0; pm_paths[i]; i ++)
      if (!access(pm_paths[i], 0))
	break;

    if (pm_paths[i])
      run_command(NULL, "%s/Contents/MacOS/PackageMaker -build "
			"-p %s "
			"-f %s/%s/Package "
			"-r %s/%s/Resources "
			"-d %s/%s-desc.plist "
			"-i %s/%s-info.plist",
		  pm_paths[i],
		  pkgname,
		  filename, prodfull,
		  filename, prodfull,
		  filename, prodfull,
		  filename, prodfull);
    else
    {
      fputs("epm: Unable to find \"PackageMaker\" program!\n", stderr);
      return (1);
    }
  }

 /*
  * Verify that the package was created...
  */

  if (access(pkgname, 0))
    return (1);

 /*
  * Remove temporary files...
  */

  if (!KeepFiles)
  {
    if (Verbosity)
      puts("Removing temporary distribution files...");

    snprintf(filename, sizeof(filename), "%s/%s", directory, prodfull);
    unlink_directory(filename);

    if (!have_pkgbuild)
    {
      snprintf(filename, sizeof(filename), "%s/%s-desc.plist", directory, prodfull);
      unlink(filename);

      snprintf(filename, sizeof(filename), "%s/%s-info.plist", directory, prodfull);
      unlink(filename);
    }
  }

  return (0);
}


/*
 * 'write_rtf()' - Write an RTF welcome file.
 */

static int				/* O - 0 on success, 1 on failure */
write_rtf(dist_t     *dist,		/* I - Distribution  information */
          const char *title,		/* I - Title of package */
          const char *subpackage,	/* I - Subpackage */
	  const char *welcome)		/* I - Welcome file */
{
  int		i;			/* Looping var */
  FILE		*fp;			/* Welcome file */
  int		newpar;			/* New paragraph needed */
  const char	*desc;			/* Description text */


  if ((fp = fopen(welcome, "w")) == NULL)
  {
    fprintf(stderr, "epm: Unable to create welcome file \"%s\": %s\n", welcome, strerror(errno));
    return (1);
  }

  fputs("{\\rtf\n", fp);
  fprintf(fp, "\\par %s version %s\n", title, dist->version);
  fprintf(fp, "\\par Copyright %s\n", dist->copyright);

  for (i = 0, newpar = 1; i < dist->num_descriptions; i ++)
    if (dist->descriptions[i].subpackage == subpackage)
    {
      for (desc = dist->descriptions[i].description; *desc; desc ++)
      {
        if (newpar)
	{
	  fputs("\\par ", fp);
	  newpar = 0;
	}

        if (*desc == '\\')
	  fputs("\\\\", fp);
	else
	{
	  putc(*desc, fp);

	  if (*desc == '\n' && desc[1] == '\n')
	  {
	    newpar = 1;
	    desc ++;
	  }
        }
      }
    }
    else
      newpar = 1;

  fputs("}\n", fp);

  fclose(fp);

  return (0);
}