1
0

feat: Initial commit

This commit is contained in:
2024-03-22 17:37:24 +01:00
parent 4288bd63a1
commit 6732a7a166
120 changed files with 9620 additions and 0 deletions

View File

@@ -0,0 +1,301 @@
#include <stdio.h>
#include <stdbool.h>
#include <stdlib.h>
#include "Elementi.h"
#define MAX_ELEM 5
#define MAX_DIAG 3
typedef struct params {
bool acrobNecessaria;
bool acrobAvantiNecessaria;
bool acrobIndietroNecessaria;
bool haAcrobInSeq;
bool acrobInSeqNecessaria;
} Requirements;
Elemento *leggiFile(char *filename, int *N)
{
FILE *fin;
if ((fin = fopen(filename, "r")) == NULL)
{
puts("Impossibile aprire il file");
return NULL;
}
fscanf(fin, "%d", N);
Elemento *lista = malloc(*N * sizeof(Elemento));
for (int i = 0; i < *N; i++)
{
lista[i] = leggiElemento(fin);
}
fclose(fin);
return lista;
}
float calcElementValue(Elemento e, Requirements reqs) {
float value = (e.valore / e.diff);
if (e.tipo == AVANTI && reqs.acrobAvantiNecessaria) {
value += 1;
}
if (e.tipo == INDIETRO && reqs.acrobIndietroNecessaria) {
value += 1;
}
if (e.tipo > 0 && reqs.acrobNecessaria) {
value += 1;
}
if (e.tipo > 0 && reqs.acrobInSeqNecessaria) {
value += 1;
}
return value;
}
Requirements context;
int greedyChoice(const void *a, const void *b) {
Elemento x = *(Elemento *)a;
Elemento y = *(Elemento *)b;
float va = calcElementValue(x, context);
float vb = calcElementValue(y, context);
return vb > va;
}
void sortAccettabili(Elemento *accettabili, int N, Requirements *reqs) {
context = *reqs;
qsort(accettabili, N, sizeof(Elemento), greedyChoice);
}
int getAccettabili(Elemento *accettabili, Elemento *elementi, int N, int DD, int DP, Elemento *soluzione, int posizioneAssoluta, int posInDiag, int currKp, int diffDiags[MAX_DIAG], int diffTot) {
int N_accettabili = 0;
for (int i = 0; i < N; i++) {
if (diffDiags[currKp] + elementi[i].diff > DD || diffTot + elementi[i].diff > DP)
continue;
if (posInDiag == 0 && elementi[i].dirIngresso != FRONTE)
continue;
if (posInDiag > 0 && elementi[i].dirIngresso != soluzione[posizioneAssoluta-1].dirUscita)
continue;
if (posInDiag == 0 && elementi[i].reqPreced)
continue;
accettabili[N_accettabili++] = elementi[i];
}
return N_accettabili;
}
void stampaSoluzione(Elemento *sol, int N, int *kp) {
int i, j, bonusKp = -1;
float tot = 0, parz;
// Ricerca possibile diagonale con elemento bonus
for (i = 0; i < MAX_DIAG && bonusKp == -1; i++) {
for (j = 0; j < MAX_ELEM && bonusKp == -1; j++) {
if ((kp[j + MAX_ELEM * i] == -1 || j == MAX_ELEM - 1) && sol[j + MAX_ELEM * i - 1].diff >= 8) {
bonusKp = i;
}
}
}
// Scambio diagonale bonus, se trovata, con l'ultima diagonale
if (bonusKp != -1 && bonusKp != MAX_DIAG - 1) {
for (i = 0; i < N; i++) {
if (kp[i] == bonusKp) kp[i] = MAX_DIAG;
if (kp[i] == MAX_DIAG - 1) kp[i] = bonusKp;
}
for (i = 0; i < N; i++) {
if (kp[i] == MAX_DIAG) kp[i] = MAX_DIAG - 1;
}
bonusKp = MAX_DIAG - 1;
}
for (j = 0; j < MAX_DIAG; j++) {
parz = 0;
for (i = 0; i < N; i++) {
if (kp[i] == j) {
parz += sol[i].valore;
}
}
printf("DIAG #%d > %.3f", j+1, parz);
if (j == bonusKp)
printf(" * 1.5 (BONUS)");
printf("\n");
if (j == bonusKp) {
parz = parz * 1.5;
}
tot += parz;
for (i = 0; i < N; i++) {
if (kp[i] == j) {
printf("%s ", sol[i].nome);
}
}
printf("\n");
}
printf("TOT = %.3f\n", tot);
}
void trovaProgrammaGreedy(Elemento *elementi, int N, int DD, int DP) {
int diffDiags[MAX_DIAG] = {0};
int tmp, minDiffAvanti = DD, minDiffIndietro = DD;
Requirements reqs[MAX_DIAG];
bool found;
bool contieneElemFinale[MAX_DIAG];
for (int i = 0; i < N; i++) {
if (elementi[i].diff < minDiffAvanti && elementi[i].tipo == AVANTI)
minDiffAvanti = elementi[i].diff;
if (elementi[i].diff < minDiffIndietro && elementi[i].tipo == INDIETRO)
minDiffIndietro = elementi[i].diff;
}
for (int i = 0; i < MAX_DIAG; i++) {
contieneElemFinale[i] = false;
reqs[i].acrobInSeqNecessaria = reqs[i].haAcrobInSeq = false;
reqs[i].acrobAvantiNecessaria = reqs[i].acrobIndietroNecessaria = reqs[i].acrobNecessaria = true;
}
int *kp = (int *) malloc(MAX_DIAG * MAX_ELEM * sizeof(int));
for (int i = 0; i < MAX_DIAG * MAX_ELEM; i++)
kp[i] = -1;
Elemento *soluzione = (Elemento *) malloc(MAX_DIAG * MAX_ELEM * sizeof(Elemento));
Elemento *accettabili = (Elemento *) malloc(N * sizeof(Elemento));
int diffTot = 0;
for (int numElem = 0; numElem < MAX_ELEM; numElem++) {
for (int numDiag = 0; numDiag < MAX_DIAG; numDiag++) {
int posizioneAssoluta = numElem + numDiag * MAX_ELEM;
if (!contieneElemFinale[numDiag]) {
int numAcc = getAccettabili(accettabili, elementi, N, DD, DP, soluzione, posizioneAssoluta, numElem, numDiag, diffDiags, diffTot);
if (numAcc > 0) {
// Ordinamento descrescente delle scelte possibili
sortAccettabili(accettabili, numAcc, &reqs[numDiag]);
if (reqs[numDiag].acrobAvantiNecessaria != reqs[numDiag].acrobIndietroNecessaria) {
found = false;
if (reqs[numDiag].acrobAvantiNecessaria) {
for (int i = 0; i < numAcc && !found; i++) {
// Scelgo la prima diagonale che soddisfa la condizione
if (accettabili[i].tipo == AVANTI) {
found = true;
soluzione[posizioneAssoluta] = accettabili[i];
kp[posizioneAssoluta] = numDiag;
}
}
if (!found) {
for (int i = 0; i < numAcc && !found; i++) {
if (accettabili[i].dirIngresso != accettabili[i].dirUscita && diffDiags[numDiag] + accettabili[i].diff + minDiffAvanti <= DD && !accettabili[i].finale) {
soluzione[posizioneAssoluta] = accettabili[i];
kp[posizioneAssoluta] = numDiag;
found = true;
for (tmp = 0; tmp < MAX_DIAG; tmp++)
reqs[tmp].acrobAvantiNecessaria = false;
reqs[numDiag].acrobAvantiNecessaria = true;
}
}
if (!found) {
// Effettuo scelta localmente ottima
soluzione[posizioneAssoluta] = accettabili[0];
kp[posizioneAssoluta] = numDiag;
}
}
}
if (reqs[numDiag].acrobIndietroNecessaria) {
for (int i = 0; i < numAcc && !found; i++) {
if (accettabili[i].tipo == INDIETRO) {
found = true;
// Effettuo scelta localmente ottima
soluzione[posizioneAssoluta] = accettabili[i];
kp[posizioneAssoluta] = numDiag;
}
}
if (!found) {
found = false;
for (int i = 0; i < numAcc && !found; i++) {
if (accettabili[i].dirIngresso != accettabili[i].dirUscita && diffDiags[numDiag] + accettabili[i].diff + minDiffIndietro <= DD && !accettabili[i].finale) {
soluzione[posizioneAssoluta] = accettabili[i];
kp[posizioneAssoluta] = numDiag;
for (tmp = 0; tmp < MAX_DIAG; tmp++)
reqs[tmp].acrobIndietroNecessaria = false;
reqs[numDiag].acrobIndietroNecessaria = true;
found = true;
}
}
if (!found) {
// Effettuo scelta localmente ottima
soluzione[posizioneAssoluta] = accettabili[0];
kp[posizioneAssoluta] = numDiag;
}
}
}
} else {
// Effettuo scelta localmente ottima
soluzione[posizioneAssoluta] = accettabili[0];
kp[posizioneAssoluta] = numDiag;
}
// Aggiornamento difficoltà
diffDiags[numDiag] += soluzione[posizioneAssoluta].diff;
diffTot += soluzione[posizioneAssoluta].diff;
// Aggiornamento parametri funzione obiettivo
if (soluzione[posizioneAssoluta].tipo == AVANTI) {
for (int i = 0; i < MAX_DIAG; i++)
reqs[i].acrobAvantiNecessaria = false;
reqs[numDiag].acrobIndietroNecessaria = false;
}
if (soluzione[posizioneAssoluta].tipo == INDIETRO) {
for (int i = 0; i < MAX_DIAG; i++)
reqs[i].acrobIndietroNecessaria = false;
reqs[numDiag].acrobAvantiNecessaria = false;
}
if (numElem > 0 && soluzione[posizioneAssoluta].tipo > 0 && soluzione[posizioneAssoluta-1].tipo > 0) {
for (int i = 0; i < MAX_DIAG; i++)
reqs[i].haAcrobInSeq = true;
}
if (numElem > 0 && soluzione[posizioneAssoluta-1].tipo > 0 && !reqs[numDiag].haAcrobInSeq) {
reqs[numDiag].acrobInSeqNecessaria = true;
} else
reqs[numDiag].acrobInSeqNecessaria = false;
if (soluzione[posizioneAssoluta].finale) {
// Skip a prossima diagonale se è stato inserito un elemento finale
contieneElemFinale[numDiag] = true;
}
}
}
}
}
stampaSoluzione(soluzione, MAX_DIAG * MAX_ELEM, kp);
free(accettabili);
free(soluzione);
free(kp);
return;
}
int main()
{
int N = 0, DP, DD;;
Elemento *l = leggiFile("elementi.txt", &N);
printf("Inserisci DD e DP: ");
scanf("%d %d", &DD, &DP);
trovaProgrammaGreedy(l, N, DD, DP);
free(l);
return 0;
}