github.com/benoitkugler/goacve@v0.0.0-20201217100549-151ce6e55dc8/server/core/utils/pdf/fiche_sanitaire.go

package pdf

import (
	"fmt"
	"io"
	"io/ioutil"
	"math"
	"os"
	"os/exec"
	"path/filepath"

	rd "github.com/benoitkugler/goACVE/server/core/rawdata"
)

const (
	okR, okG, okB = 20, 140, 30 // couleur pour absence de problème
	cR, cG, cB    = 80, 80, 50  // couleur responsable légal, médecin traitant

	mentionLegale = `Le responsable légal autorise le responsable du séjour à prendre, le cas échéant,
	<b>toutes mesures</b> (traitement médical, hospitalisation, intervention chirurgicale)
	rendues nécessaires par l'état du participant.
	Il autorise également, si nécessaire, le directeur du séjour à faire sortir le participant
	de l’hôpital après une hospitalisation.`
)

func line(pdf CustomPdf, lh float64) {
	pdf.Line(pdf.GetX(), pdf.GetY(), pdf.GetX()+pdf.AreaWidth(), pdf.GetY())
	pdf.Ln(0.5 * lh)
}

// Implémente la génération de la fiche sanitaire à partir
// des données définies par le package rd.
func FicheSanitaire(personne, responsable rd.Personne, out io.Writer) error {
	pdf := InitPdfDetails(false, true)
	oneFicheSanitaire(pdf, personne, responsable)
	return pdf.Output(out)
}

// FicheSanitaires génère une fiche sanitaire par page.
func FicheSanitaires(personnes, responsables []rd.Personne, out io.Writer) error {
	pdf := InitPdfDetails(false, false)
	for i := range personnes {
		personne, responsable := personnes[i], responsables[i]
		oneFicheSanitaire(pdf, personne, responsable)
	}
	return pdf.Output(out)
}

// add one page and write the FS
func oneFicheSanitaire(pdf CustomPdf, personne, responsable rd.Personne) {
	fs := personne.FicheSanitaire
	pdf.AddPage()
	prenom := rd.FormatPrenom(personne.Prenom)
	pdf.DrawHeader([]string{
		personne.NomPrenom().String(),
		"né(e) le " + personne.DateNaissance.String(),
		personne.Sexe.String().String(),
	}, 36, 28)
	pdf.SetFont("Arial", "B", 16)
	pdf.CellFormat(0, 20, "Fiche sanitaire de liaison", "", "MC", false)
	pdf.Ln(-1)

	pdf.SetFontStyle("")
	pdf.SetFontSize(10)
	lh := pdf.LineHeight()
	h := pdf.HTMLBasicNew()
	mL, _, mR, _ := pdf.GetMargins()

	if fs.Handicap {
		h.Write(lh, pdf.Tr(fmt.Sprintf("%s est en situation de <b>handicap</b>.", prenom)))
	} else {
		pdf.SetTextColor(okR, okG, okB)
		h.Write(lh, pdf.Tr(fmt.Sprintf("%s ne présente pas de situation de handicap.", prenom)))
		pdf.SetTextColor(0, 0, 0)
	}
	pdf.Ln(1.5 * lh)

	if fs.TraitementMedical {
		h.Write(lh, pdf.Tr(fmt.Sprintf("%s suit un <b>traitement médical</b> pendant le séjour.", prenom)))
	} else {
		pdf.SetTextColor(okR, okG, okB)
		h.Write(lh, pdf.Tr(fmt.Sprintf("%s ne suit pas de traitement médical pendant le séjour.", prenom)))
		pdf.SetTextColor(0, 0, 0)
	}
	pdf.Ln(1.5 * lh)

	maladies := fs.Maladies.List()
	if len(maladies) == 0 {
		pdf.SetTextColor(okR, okG, okB)
		h.Write(lh, pdf.Tr(fmt.Sprintf("%s n'a eu aucune maladie.", prenom)))
		pdf.SetTextColor(0, 0, 0)
	} else {
		h.Write(lh, pdf.Tr(fmt.Sprintf("%s a eu les <b>maladies</b> suivantes:", prenom)))
	}
	for index, mal := range maladies {
		if index%2 == 0 {
			pdf.Ln(-1)
		}
		offset := float64(index%2) * pdf.AreaWidth() / 2
		pdf.Circle(mL+leftListSpacing+offset, pdf.GetY()+2, 0.7, "F")
		pdf.SetX(mL + leftListSpacing + 2 + offset)
		h.Write(lh, pdf.Tr("<i>"+mal+"</i>"))
	}
	pdf.Ln(1.5 * lh)

	line(pdf, lh)
	allergies := fs.Allergies.List()
	if len(allergies) == 0 {
		pdf.SetTextColor(okR, okG, okB)
		h.Write(lh, pdf.Tr(fmt.Sprintf("%s ne présente aucune allergie.", prenom)))
		pdf.SetTextColor(0, 0, 0)
	} else {
		h.Write(lh, pdf.Tr(fmt.Sprintf("%s présente les <b>allergies</b> suivantes:", prenom)))
	}
	for index, al := range allergies {
		if index%2 == 0 {
			pdf.Ln(-1)
		}
		offset := float64(index%2) * pdf.AreaWidth() / 2
		pdf.Circle(mL+leftListSpacing+offset, pdf.GetY()+2, 0.7, "F")
		pdf.SetX(mL + leftListSpacing + 2 + offset)
		h.Write(lh, pdf.Tr("<i>"+al+"</i>"))
	}
	pdf.Ln(1.5 * lh)
	if fs.Allergies.ConduiteATenir != "" {
		pdf.Ln(0.3 * lh)
		h.Write(lh, pdf.Tr("<b>Conduite à tenir :</b>"))
		pdf.Ln(-1)
		pdf.SetFontSize(9)
		pdf.SetFontStyle("I")
		pdf.MultiCell(0, pdf.LineHeight(), pdf.Tr(fs.Allergies.ConduiteATenir), "", "", false)
		pdf.Ln(1.5 * lh)
		pdf.SetFontSize(10)
		line(pdf, lh)
	}

	if fs.DifficultesSante != "" {
		h.Write(lh, pdf.Tr("<b>Difficultés de santé :</b>"))
		pdf.Ln(-1)
		pdf.SetFontSize(9)
		pdf.SetFontStyle("I")
		pdf.MultiCell(0, pdf.LineHeight(), pdf.Tr(fs.DifficultesSante), "", "", false)
		pdf.Ln(0.5 * lh)
		pdf.SetFontSize(10)
	}

	if fs.Recommandations != "" {
		h.Write(lh, pdf.Tr("<b>Recommandations :</b>"))
		pdf.Ln(-1)
		pdf.SetFontSize(9)
		pdf.SetFontStyle("I")
		pdf.MultiCell(0, pdf.LineHeight(), pdf.Tr(fs.Recommandations), "", "", false)
		pdf.Ln(0.5 * lh)
		pdf.SetFontSize(10)
	}

	pdf.SetTextColor(cR, cG, cB)
	line(pdf, lh)
	h.Write(lh, pdf.Tr("<b>Coordonnées du responsable légal :</b>"))
	pdf.Ln(-1)
	y := pdf.GetY()
	pdf.SetRightMargin(mL + pdf.AreaWidth()/2 - 5)
	pdf.SetFontSize(9)
	h.Write(lh, pdf.Tr(responsable.NomPrenom().String()))
	pdf.Ln(-1)
	h.Write(lh, pdf.Tr("<b>Sécurité sociale :</b> "+rd.FormatSecuriteSocial(responsable.SecuriteSociale).String()))
	pdf.Ln(-1)
	if fs.Tel != "" {
		h.Write(lh, pdf.Tr("<b>Numéro d'urgence :</b> "+rd.FormatTel(fs.Tel)))
	}

	pdf.SetRightMargin(mR)
	pdf.SetLeftMargin(mL + pdf.AreaWidth()/2 + 5)
	y1 := pdf.GetY()
	pdf.SetY(y)

	pdf.MultiCell(0, lh, pdf.Tr(string(responsable.Adresse)), "", "", false)
	h.Write(lh, pdf.Tr(fmt.Sprintf("%s %s %s", responsable.CodePostal, responsable.Ville, responsable.Pays)))
	pdf.Ln(-1)
	h.Write(lh, fmt.Sprintf("<b>Tels. :</b> %s", responsable.Tels.String()))
	pdf.SetY(math.Max(y1, pdf.GetY()))

	pdf.SetLeftMargin(mL)
	pdf.SetFontSize(10)
	pdf.Ln(1.5 * lh)
	line(pdf, lh)
	h.Write(lh, pdf.Tr(fmt.Sprintf("<b>Médecin traitant:</b>   %s    <b>Tél. :</b> %s", fs.Medecin.Nom, rd.FormatTel(fs.Medecin.Tel))))

	// autorisations

	pdf.SetTextColor(0, 0, 0)
	pdf.Ln(1.5 * lh)
	line(pdf, lh)
	pdf.Ln(-1)
	// TODO: cleanup selon décision
	// h.Write(lh, pdf.Tr("<b>Autorisation et signature</b>"))
	h.Write(lh, pdf.Tr("<b>Autorisation</b>"))
	pdf.Ln(1.5 * lh)
	h.Write(lh, pdf.Tr(mentionLegale))
}

func CheckPdfToolkit() error {
	cmd := exec.Command("pdftk", "--version")
	if err := cmd.Run(); err != nil {
		return fmt.Errorf("L'utilitaire pdftk n'est pas disponible : %v", err)
	}
	return nil
}

func MergePdfs(pages [][]byte, out io.Writer) error {
	dir, err := ioutil.TempDir("", "merge_fiche_sanitaire")
	if err != nil {
		return fmt.Errorf("Création d'un dossier temporaire pour pdftk impossible: %s", err)
	}
	defer os.RemoveAll(dir)

	pagePaths := make([]string, len(pages))
	for i, page := range pages {
		pagePaths[i] = filepath.Join(dir, fmt.Sprintf("page%d.pdf", i))
		if err := ioutil.WriteFile(pagePaths[i], page, os.ModePerm); err != nil {
			return fmt.Errorf("Enregistrement de la page %d impossible: %s", i, err)
		}
	}

	args := append(pagePaths, "cat", "output", "-")
	cmd := exec.Command("pdftk", args...)
	cmd.Stdout = out
	err = cmd.Run()
	if err != nil {
		return fmt.Errorf("Exécution de la commande externe pdftk impossible: %s", err)
	}
	return err
}