Read () - Cronologia

Vuott il 21:01, 13 giu 2024

2024-06-13T21:01:24Z

Vuott il 22:23, 5 apr 2018

2018-04-05T22:23:20Z

← Versione meno recente		Versione delle 16:23, 5 apr 2018
Riga 34:		Riga 34:


	Un'~~altra modalità~~, ~~per ottenere il medesimo risultato~~, ~~può essere la seguente~~, ~~nella quale~~ in ~~particolare~~ si aprirà il file-device dello standard input mediante la ordinaria istruzione ''Open'' nativa di Gambas.		Quest'altro codice prevede l'uso di un'area di memoria allocata, puntata da una variabile di tipo ''Puntatore'', ove memorizzare i dati (caratteri) scritti nella console/terminale:
			Library "libc:6"

			<FONT Color=gray>' ''ssize_t read (int __fd, void *__buf, size_t __nbytes)''
			' ''Read NBYTES into BUF from FD.''</font>
			Private Extern <FONT color=#B22222>read_C</font>(__fd As Integer, __buf As Pointer, __nbytes As Long) As Long Exec "read"


			'''Public''' Sub Main()

			Dim p As Pointer
			Dim st As Stream
			Dim i As Integer

			p = Alloc(SizeOf(gb.Byte), 32)

			<FONT Color=gray>' ''Ripuliamo l'area di memoria allocata, scrivendoci valori uguali a zero (&h00).''
			' ''Ciò al fine di consentire alla successiva funzione di dereferenziazione di arrestarsi al primo valore zero incontrato:''</font>
			st = Memory p For Write
			For i = 0 To 32
			Write #st, 0 As Byte
			Next
			st.Close

			<FONT Color=gray>' ''Nel primo argomento passiamo l'identificativo del "file-descriptor", ottenuto in altro modo:''</font>
			<FONT color=#B22222>read_C</font>(File.In.Handle, p, 32)

			Write String@(p)

			Free(p)

			'''End'''


			In questo codice, invece, si aprirà il file-device dello standard input mediante la ordinaria istruzione ''Open'' nativa di Gambas.
	Library "libc:6"		Library "libc:6"

Vuott il 22:06, 5 apr 2018

2018-04-05T22:06:16Z

← Versione meno recente		Versione delle 16:06, 5 apr 2018
Riga 23:		Riga 23:
	Dim bb As New Byte[16]		Dim bb As New Byte[16]

	<FONT color=#B22222>read_C</font>(STDIN, bb.Data, 16)		<FONT color=#B22222>read_C</font>(STDIN, bb.Data, bb.Count)

	Print String@(bb.Data)		Print String@(bb.Data)

Vuott il 22:03, 5 apr 2018

2018-04-05T22:03:08Z

← Versione meno recente		Versione delle 16:03, 5 apr 2018
Riga 63:		Riga 63:

	'''End'''		'''End'''
	Questo codice mostra come debba essere combinata l'istruzione "''Open''" nativa di Gambas con la funzione esterna "''read''" di C.		Questo codice mostra come debba essere combinata l'istruzione "''Open''" nativa di Gambas con la funzione esterna "''read( )''" di C.

	Da notare che se la dimensione del testo immesso è inferiore al valore espresso nel 3° parametro della funzione esterna "''read_C''", verrà aggiunto anche il carattere &h0A (nuova riga a capo).		Da notare che se la dimensione del testo immesso è inferiore al valore espresso nel 3° parametro della funzione esterna "''read_C''", verrà aggiunto anche il carattere &h0A (nuova riga a capo).
Riga 110:		Riga 110:

	'''End'''		'''End'''
	Anche in quest'ultimo codice viene mostrato un caso in cui viene combinata l'istruzione "''Open''" nativa di Gambas con la funzione esterna "''read''" di C.		Anche in quest'ultimo codice viene mostrato un caso in cui viene combinata l'istruzione "''Open''" nativa di Gambas con la funzione esterna "''read( )''" di C.

Vuott il 21:56, 5 apr 2018

2018-04-05T21:56:56Z

← Versione meno recente		Versione delle 15:56, 5 apr 2018
Riga 89:		Riga 89:
	p = Alloc(SizeOf(gb.Byte), 1)		p = Alloc(SizeOf(gb.Byte), 1)

	<FONT Color=gray>' ''Inizia il ciclo per leggere dal file un byte di dati alla volta:''~~</font>~~		<FONT Color=gray>' ''Inizia il ciclo per leggere dal file un byte di dati alla volta.''
	~~Repeat~~		' ''Alla funzione "read_c" viene passato:''
	~~<FONT Color=gray>~~' ''Alla funzione "read_c" viene passato:''
	' ''* il numero identificativo del "file-descriptor" del file aperto;''		' ''* il numero identificativo del "file-descriptor" del file aperto;''
	' ''* la variabile di tipo Puntatore aumentata del valore presente in "i" per spostarci lungo l'area di memoria allocata, al fine di scrivere nel byte disponibile il dato letto dal file'';		' ''* la variabile di tipo Puntatore aumentata del valore presente in "i" per spostarci lungo l'area di memoria allocata, al fine di scrivere nel byte disponibile il dato letto dal file'';
	' ''* la quantità (pari a 1) di dati da leggere dal file:''</font>		' ''* la quantità (pari a 1) di dati da leggere dal file:''</font>
	~~l =~~ <Font color=#B22222>read_c</font>(fl.Handle, p + i, SizeOf(gb.Byte))		While <Font color=#B22222>read_c</font>(fl.Handle, p + i, SizeOf(gb.Byte)) > 0
	Inc i		Inc i
	<FONT Color=gray>' ''Realloca l'area di memoria incrementandola di 1 byte:''</font>		<FONT Color=gray>' ''Realloca l'area di memoria incrementandola di 1 byte:''</font>
	p = Realloc(p, SizeOf(gb.Byte), i + 1)		p = Realloc(p, SizeOf(gb.Byte), i + 1)
	<FONT Color=gray>' ''Se si è giunti alla fine del file, esce dal ciclo:''</font>		<FONT Color=gray>' ''Se si è giunti alla fine del file, esce dal ciclo:''</font>
	~~Until l = 0~~		Wend

	<FONT Color=gray>' ''Dereferenzia la variabile di tipo Puntatore, per scrivere in console i dati letti dal file:''</font>		<FONT Color=gray>' ''Dereferenzia la variabile di tipo Puntatore, per scrivere in console i dati letti dal file.''
	Print String@(p)		' ''Usiamo la funzione "Left()", per prendere soltanto i dati effettivamente letti dal file e memorizzati nell'area di memoria allocata:''</font>
			Print Left(String@(p), i)

	<FONT Color=gray>' ''Libera tutta la memoria precedentemente occupata:''</font>		<FONT Color=gray>' ''Libera tutta la memoria precedentemente occupata:''</font>

Vuott il 18:10, 5 apr 2018

2018-04-05T18:10:20Z

← Versione meno recente		Versione delle 12:10, 5 apr 2018
Riga 98:		Riga 98:
	Inc i		Inc i
	<FONT Color=gray>' ''Realloca l'area di memoria incrementandola di 1 byte:''</font>		<FONT Color=gray>' ''Realloca l'area di memoria incrementandola di 1 byte:''</font>
	p = Realloc(p, SizeOf(gb.Byte), i)		p = Realloc(p, SizeOf(gb.Byte), i + 1)
	<FONT Color=gray>' ''Se si è giunti alla fine del file, esce dal ciclo:''</font>		<FONT Color=gray>' ''Se si è giunti alla fine del file, esce dal ciclo:''</font>
	Until l = 0		Until l = 0

Vuott il 17:55, 5 apr 2018

2018-04-05T17:55:16Z

← Versione meno recente		Versione delle 11:55, 5 apr 2018
Riga 73:		Riga 73:
	<FONT Color=gray>' ''ssize_t read (int __fd, void *__buf, size_t __nbytes)''		<FONT Color=gray>' ''ssize_t read (int __fd, void *__buf, size_t __nbytes)''
	' ''Read NBYTES into BUF from FD.''</font>		' ''Read NBYTES into BUF from FD.''</font>
	Private Extern color=#B22222>read_c</font>(__fd As Integer, __buf As Pointer, __nbytes As Long) As Long Exec "read"		Private Extern <Font color=#B22222>read_c</font>(__fd As Integer, __buf As Pointer, __nbytes As Long) As Long Exec "read"


Riga 95:		Riga 95:
	' ''* la variabile di tipo Puntatore aumentata del valore presente in "i" per spostarci lungo l'area di memoria allocata, al fine di scrivere nel byte disponibile il dato letto dal file'';		' ''* la variabile di tipo Puntatore aumentata del valore presente in "i" per spostarci lungo l'area di memoria allocata, al fine di scrivere nel byte disponibile il dato letto dal file'';
	' ''* la quantità (pari a 1) di dati da leggere dal file:''</font>		' ''* la quantità (pari a 1) di dati da leggere dal file:''</font>
	l = color=#B22222>read_c</font>(fl.Handle, p + i, SizeOf(gb.Byte))		l = <Font color=#B22222>read_c</font>(fl.Handle, p + i, SizeOf(gb.Byte))
	Inc i		Inc i
	<FONT Color=gray>' ''Realloca l'area di memoria incrementandola di 1 byte:''</font>		<FONT Color=gray>' ''Realloca l'area di memoria incrementandola di 1 byte:''</font>

Vuott il 17:54, 5 apr 2018

2018-04-05T17:54:33Z

← Versione meno recente		Versione delle 11:54, 5 apr 2018
Riga 73:		Riga 73:
	<FONT Color=gray>' ''ssize_t read (int __fd, void *__buf, size_t __nbytes)''		<FONT Color=gray>' ''ssize_t read (int __fd, void *__buf, size_t __nbytes)''
	' ''Read NBYTES into BUF from FD.''</font>		' ''Read NBYTES into BUF from FD.''</font>
	Private Extern read_c(__fd As Integer, __buf As Pointer, __nbytes As Long) As Long Exec "read"		Private Extern color=#B22222>read_c</font>(__fd As Integer, __buf As Pointer, __nbytes As Long) As Long Exec "read"


Riga 95:		Riga 95:
	' ''* la variabile di tipo Puntatore aumentata del valore presente in "i" per spostarci lungo l'area di memoria allocata, al fine di scrivere nel byte disponibile il dato letto dal file'';		' ''* la variabile di tipo Puntatore aumentata del valore presente in "i" per spostarci lungo l'area di memoria allocata, al fine di scrivere nel byte disponibile il dato letto dal file'';
	' ''* la quantità (pari a 1) di dati da leggere dal file:''</font>		' ''* la quantità (pari a 1) di dati da leggere dal file:''</font>
	l = read_c(fl.Handle, p + i, SizeOf(gb.Byte))		l = color=#B22222>read_c</font>(fl.Handle, p + i, SizeOf(gb.Byte))
	Inc i		Inc i
	<FONT Color=gray>' ''Realloca l'area di memoria incrementandola di 1 byte:''</font>		<FONT Color=gray>' ''Realloca l'area di memoria incrementandola di 1 byte:''</font>

Vuott il 17:53, 5 apr 2018

2018-04-05T17:53:26Z

← Versione meno recente		Versione delle 11:53, 5 apr 2018
Riga 1:		Riga 1:
	La funzione '''''read( )''''', dichiarata nel file header "''/usr/include/unistd.h''"		La funzione '''read()''', dichiarata nel file header "''/usr/include/unistd.h''"
	ssize_t read (int __fd, void *__buf, size_t __nbytes)		ssize_t read (int __fd, void *__buf, size_t __nbytes)
	legge da un file usando il suo file descriptor (1° parametro) un numero di byte definito nel suo 3° parametro, memorizzandoli nel buffer stabilito nel 2° parametro.		legge da un file usando il suo file descriptor (1° parametro) un numero di byte definito nel suo 3° parametro, memorizzandoli nel buffer stabilito nel 2° parametro.
Riga 63:		Riga 63:

	'''End'''		'''End'''
	Questo codice mostra come debba essere combinata l'istruzione "''Open''" nativa di Gambas con la funzione ~~sterna di C~~ "''read''".		Questo codice mostra come debba essere combinata l'istruzione "''Open''" nativa di Gambas con la funzione esterna "''read''" di C.

	Da notare che se la dimensione del testo immesso è inferiore al valore espresso nel 3° parametro della funzione esterna "''read_C''", verrà aggiunto anche il carattere &h0A (nuova riga a capo).		Da notare che se la dimensione del testo immesso è inferiore al valore espresso nel 3° parametro della funzione esterna "''read_C''", verrà aggiunto anche il carattere &h0A (nuova riga a capo).
Riga 110:		Riga 110:

	'''End'''		'''End'''
			Anche in quest'ultimo codice viene mostrato un caso in cui viene combinata l'istruzione "''Open''" nativa di Gambas con la funzione esterna "''read''" di C.

Vuott il 17:50, 5 apr 2018

2018-04-05T17:50:43Z

← Versione meno recente		Versione delle 11:50, 5 apr 2018
Riga 9:		Riga 9:


	Mostriamo un semplice esempio pratico, nel quale il programma leggerà quanto scritto ~~nel~~ Terminale dall'utente:		Mostriamo un semplice esempio pratico, nel quale il programma leggerà quanto scritto nella console/Terminale dall'utente:
	Library "libc:6"		Library "libc:6"