/*Trabajo con datos capturados desde teclado y archivos.
**utilizando descriptores de archivo
**Elaborado por Juan Carlos Ruiz Pacheco.
**Compilado con el djgpp 14-03-2003
**[email]juank@007mundo.com[/email]
*/
#include<stdio.h>
#include<pc.h>
#include <fcntl.h>
#include <sys/stat.h>
int main()
{
int archivo=NULL;
char caracter=NULL;
char cadena[255],nombrearchivo[255], aux[255];
int dato=NULL;
FILE *f=NULL;
ScreenClear();
ScreenSetCursor(0,0);
memset(cadena,' ',sizeof(cadena));
memset(nombrearchivo,' ',sizeof(cadena));
memset(aux,' ',sizeof(cadena));
printf("Introduzca el nombre del archivo:");
gets(nombrearchivo);
if((archivo=open(nombrearchivo,O_RDWR|O_TEXT|O_CREAT))>=0)
{
printf("annnIntroduzca un solo caracter para escribir en el archivo:");
caracter=getchar();
strcpy(aux,"El caracter digitado:");
write(archivo,aux,strlen(aux));
write(archivo,&caracter,sizeof(caracter));getc(stdin);
memset(aux,' ',sizeof(cadena));
printf("nIntroduzca un entero para escribir en el archivo:");
scanf("%d",&dato);
strcpy(aux,"nEl entero digitado:");
write(archivo,aux,strlen(aux));getc(stdin);
write(archivo,&dato,sizeof(dato));
printf("nIntroduzca una cadena escribir en el archivo:");
gets(cadena);
strcpy(aux,"nLa cadena digitada:");
write(archivo,aux,strlen(aux));
write(archivo,cadena,strlen(cadena));
f=fdopen(archivo,"at+");
fflush(f);
fclose(f);
close(archivo);
printf("nArchivo %s cerrado.",nombrearchivo);
printf("nPresione Enter para salir");
getch();
return(int) 1;
}
else
{
perror("nError al abrir el archivo.nPresione enter para terminar.");
getch();
return (int)0;
}
}