January 2015 - Oberon - mailman3.inf.ethz.ch

License Question from Walter Gallegos (greim)
by skulski＠pas.rochester.edu 19 Jan '15

19 Jan '15

> BUT first i think its important to clarify the license question. For me > its still not clear what the license for Wirths and Gutknechts Oberon > is. The same story with Paul Reeds Verilog code. > Wirth said, as far as i understood, its free. But what is free? > Free to copy, free to use in a non commercial project, free to change > it..... > So maybe Wirth, Gutknecht and Reed should give a statement if their code > is free under the MIT license or GPL or any other common model. > I would prefer MIT but GPL would be ok for me too. I posted the same question, with the same result as yours: complete silence. Perhaps a good kind of license would be Creative Commons, like Texas Instruments attached to their Beagle Bone? Who can advise, which license would be the best for promoting Oberon? Lack of any license can be taken as an indication that this is a textbook. Professor Wirth always wanted to teach. The students are always free to use the study materials any way they want. So maybe we are all just Wirth's students and thus free to apply the study materials (that is, the Oberon System) any way we want without furher questions? Who can clarify the issue, if there is any issue? Wojtek

1 0

Is ProjectOberon free for commercial use ?
by Walter Gallegos 17 Jan '15

17 Jan '15

Can someone confirm me if ProjectOberon is free for all kind of use ? I'm starting a new project and could be a good opportunity to try it as alternative on industrial projects.

1 0

re. ALO query
by eas lab 16 Jan '15

16 Jan '15

> I saw a recent post of yours on the Oberon list, and I wondered if you > might be able to lend me a hand: I am attempting to run Linux Oberon > for ARM (ALO, Peter Matthias' release of late July of last year) on > the Raspberry Pi B model. I want to get a B too, or two. > Here's what I have done: I merely unzip > the release to a folder, and copy this folder to a USB drive, and then > mount this drive on the Raspberry Pi. The only file I can see that is > executable in this folder is ALO. But when I click on this to start > it up, nothing happens. What have you had to do in order to be able to > run ALO on your system (I presume it's a Raspberry Pi also?)? Has the new rPi's OS got facilities to 'click on executables'? I DO remember that the executable-starter is named alo, although you could rename it. Have you tried the basic way? Change to the relevant directory: cd <the directory> Confirm that alo is there: ls -l alo which will show that it's also got execute permission. Here's 2; the 1st HAS got exection permission: -rwxr-xr-x 1 root root 2863 2014-05-22 10:13 CurlBodies -rw-r--r-- 1 root root 19707 2014-09-08 19:36 Eml While you're at that, do ls -l * | wc -l to count the number of files, to see if it corresponds to my stuff, which I'll check tomorrow. You start it by: ./alo Let's keep the project OPEN collaboration, by posting via the mail-list. == Chris Glur. PS. I just remembered something about <xhost ...> to <enable connection via the X-system. I'll post details later.

1 0

Creating ROM code from Oberon for RISC5
by skulski＠pas.rochester.edu 16 Jan '15

16 Jan '15

Paul: > I have discussed various alternative general bootstrapping > methods on the list before; We will look into the posts. Meanwhile, would it be difficult for you if you dump all the scripts and other tools that you developed on the Project Oberon website? Yor trash can become someone's treasure. This is certainly our case. We would be very obliged if you make your stuff available. This can be immensely helpful. Thank you in advance. Wojtek

1 0

Messages from PET.
by peter＠easthope.ca 15 Jan '15

15 Jan '15

What happens when a non-expert tries to build an installer in A2? When Build.Tool is opened with PET these lines appear in Kernel.log. SyntaxHighlighter: Auto-loading SyntaxHighlighter.XML ... done. ReleaseTree@416 error: HEADER section expected No doubt, absolutely meaningful to most subscribers to this list. A novice will puzzle. Googling "site:ocp.inf.ethz.ch ReleaseTree" gives one link into the forum. Not helpful. Fortunately, Google suggests "Release Tree" and some of the found links suggest that the Tree is the structure in the left panel of the PET viewer. I wonder whether .../wiki/Documentation/ can have a page explaining PET. A glossary would also be really helpful. Further to the message above, "error: HEADER section expected" suggests a serious or fatal error. But no; when the Release.Build is executed, modules are compiled. So what is the error? Can the message from PET be more honest? Regards, ... Peter E. -- 123456789 123456789 123456789 123456789 123456789 123456789 123456789 12 Tel +1 360 639 0202 http://carnot.yi.org/ Bcc: peter at easthope. ca

1 0

Creating ROM code from Oberon for RISC5 (David Hunter)
by skulski＠pas.rochester.edu 15 Jan '15

15 Jan '15

> Send Oberon mailing list submissions to > oberon(a)lists.inf.ethz.ch > > To subscribe or unsubscribe via the World Wide Web, visit > https://urldefense.proofpoint.com/v2/url?u=https-3A__lists.inf.ethz.ch_mail… > or, via email, send a message with subject or body 'help' to > oberon-request(a)lists.inf.ethz.ch > > You can reach the person managing the list at > oberon-owner(a)lists.inf.ethz.ch > Dave: I hope to hear a detailed answer from Paul who created such files. At present, the instructions on the Project Oberon web site are missing the major information. A detailed list of steps would be much appreciated. http://www.paddedcell.com/projectoberon/RISC-Instructions.txt I have found some information on pages 10-12 of ds865_microblaze_mcs.pdf available from the following link: http://www.xilinx.com/support/documentation/sw_manuals/xilinx14_1/ds865_mic… The data flow is diagrammed on page 8. The right side of the diagram shows the SDK, which in this context is equivalent to Oberon System cross compiler. On page 12 they say how to use data2mem from the command line (encircled in the 3rd frame on that page). cd project-path data2mem -p part \ -bm ipcore_dir/component-name_bd.bmm \ -bd /sdk-workspace-path/sdk-program/Debug/sdk-program.elf tag component-name \ -bt project-name.runs/impl_1/toplevel.bit \ -o b project-name.runs/impl_1/download.bit It is pretty complicated and most of the MicroBlaze information is probably not very relevant. It would be really good if paul could provide a detailed step-by-step description how to generate the .bit file. Wojtek > Date: Wed, 14 Jan 2015 15:44:19 -0500 > From: David Hunter <drhunter(a)frontiernet.net> > Subject: [Oberon] Creating ROM code from Oberon for RISC5 > To: oberon(a)lists.inf.ethz.ch > Message-ID: <54B6D523.80008(a)frontiernet.net> > Content-Type: text/plain; charset=utf-8; format=flowed > > Hello all, > > First some background: > I'm porting the RISC5 processor into a Xilinx Spartan 6 FPGA. We'd > like to use the processor as part of our VME instrument module product > line. For development, I'm using the Oberon RISC compiler to create > "ROMable" code (initialized memory) in the FPGA. Our module is an > embedded system that does not have a display, keyboard or mouse and > we're using a different Flash for memory storage. Therefore, I want to > create different boot load code in the FPGA. I have also put the Oberon > System on a Spartan 3 evaluation board but just used the ".mcs" file to > program the FPGA without re-compiling anything. > > When I compile using "MODULE*" I get an object file with the special > start up code that the compiler adds. Project Oberon Chapter 14 > talks about the process of creating the boot loader and the steps, but > I'm having trouble finding some of the modules referenced and would like > more details on how it was done. > > So my questions are: > How is an Oberon RISC object file (.rsc) compiled with "MODULE*" > converted to a Verilog ".mem" file for loading into the FPGA? > Was that method used to create the prom.mem file for the Spartan 3 > evaluation board? > Are there more detailed instructions available on the steps in > developing a bootloader? > > Thanks, > Dave > > > -- > David Hunter > Sr. Electrical Engineer > SkuTek Instrumentation > 150 Lucius Gordon Dr., Ste 103 > W. Henrietta, NY 14586 > (W) 585-444-7074 > dave(a)skutek.com > > > --- > This email has been checked for viruses by Avast antivirus software. > https://urldefense.proofpoint.com/v2/url?u=http-3A__www.avast.com&d=AwICAg&… > > > > > ------------------------------ > > Message: 2 > Date: Thu, 15 Jan 2015 10:41:58 +0100 > From: G?bor Zolt?n Sink? <sinkog0208(a)gmail.com> > Subject: Re: [Oberon] Creating ROM code from Oberon for RISC5 > To: oberon(a)lists.inf.ethz.ch > Message-ID: <54B78B66.1000801(a)gmail.com> > Content-Type: text/plain; charset=windows-1252; format=flowed > > I'm trying to Spartan 3e from superimposing the Oberon. Currently, I > work ?thuzaloz?s?n memory. The question you think is my question to the > previous translation environment to solve your problem, but so far I > have not gotten to the project.(step by step) > > Gabor > > On 2015-01-14 21:44, David Hunter wrote: >> Hello all, >> >> First some background: >> I'm porting the RISC5 processor into a Xilinx Spartan 6 FPGA. We'd >> like to use the processor as part of our VME instrument module product >> line. For development, I'm using the Oberon RISC compiler to create >> "ROMable" code (initialized memory) in the FPGA. Our module is an >> embedded system that does not have a display, keyboard or mouse and >> we're using a different Flash for memory storage. Therefore, I want to >> create different boot load code in the FPGA. I have also put the Oberon >> System on a Spartan 3 evaluation board but just used the ".mcs" file to >> program the FPGA without re-compiling anything. >> >> When I compile using "MODULE*" I get an object file with the special >> start up code that the compiler adds. Project Oberon Chapter 14 >> talks about the process of creating the boot loader and the steps, but >> I'm having trouble finding some of the modules referenced and would like >> more details on how it was done. >> >> So my questions are: >> How is an Oberon RISC object file (.rsc) compiled with "MODULE*" >> converted to a Verilog ".mem" file for loading into the FPGA? >> Was that method used to create the prom.mem file for the Spartan 3 >> evaluation board? >> Are there more detailed instructions available on the steps in >> developing a bootloader? >> >> Thanks, >> Dave > > > > > ------------------------------ > > -- > Oberon(a)lists.inf.ethz.ch mailing list for ETH Oberon and related systems > https://urldefense.proofpoint.com/v2/url?u=https-3A__lists.inf.ethz.ch_mail… > > > End of Oberon Digest, Vol 128, Issue 13 > *************************************** > >

2 1

Creating ROM code from Oberon for RISC5
by David Hunter 15 Jan '15

15 Jan '15

Hello all, First some background: I'm porting the RISC5 processor into a Xilinx Spartan 6 FPGA. We'd like to use the processor as part of our VME instrument module product line. For development, I'm using the Oberon RISC compiler to create "ROMable" code (initialized memory) in the FPGA. Our module is an embedded system that does not have a display, keyboard or mouse and we're using a different Flash for memory storage. Therefore, I want to create different boot load code in the FPGA. I have also put the Oberon System on a Spartan 3 evaluation board but just used the ".mcs" file to program the FPGA without re-compiling anything. When I compile using "MODULE*" I get an object file with the special start up code that the compiler adds. Project Oberon Chapter 14 talks about the process of creating the boot loader and the steps, but I'm having trouble finding some of the modules referenced and would like more details on how it was done. So my questions are: How is an Oberon RISC object file (.rsc) compiled with "MODULE*" converted to a Verilog ".mem" file for loading into the FPGA? Was that method used to create the prom.mem file for the Spartan 3 evaluation board? Are there more detailed instructions available on the steps in developing a bootloader? Thanks, Dave -- David Hunter Sr. Electrical Engineer SkuTek Instrumentation 150 Lucius Gordon Dr., Ste 103 W. Henrietta, NY 14586 (W) 585-444-7074 dave(a)skutek.com --- This email has been checked for viruses by Avast antivirus software. http://www.avast.com

3 2

Re: [Oberon] Oberon Digest, Vol 128, Issue 6
by Bill Buzzell 13 Jan '15

13 Jan '15

>The next goal for myself: I want to reproduce the ProjektOberon was. Currently there is a loan and Spartan3 Spartan3 developer panels and Linux environment (Ubuntu 10.14). You must learn how to "flash" the FGPGA board correctly is all you need to learn if you want to simply load the '.bin' files for Project Oberon. Make sure it is the correct Spartan 3 model board. Only the ones with the SRAM will work. > But the ProjectOberon SW does not "speak" Ethernet nor IP. http://www.ebay.com/itm/271726513651?_trksid=p2059210.m2749.l2649&ssPageNam… These little ESP8266 modules look very promising. They even come in the same form factor as the NRF24l01'a. It look's to be rather strait forward to communicate over SPI with these neat little boards. I have the newest model with all the GPIO's ( 8 total I think?). They use the old 'AT' style modem commands. Once connected, we have full net access. Even can run a server: http://youtu.be/R1zx0xV0pWw The little MCU backing these chips are very powerful in their own right. They are made by Tensilica and are really innovative. They even can have FPGA functionality with it's own Verilog like language called 'TIE'. Sure would be nice to be able to target these chips with Astrobe Oberon. How do you move files onto the SD card? Anyone know? I tried extracting the ISO and adding files and un-extracting it again. None of the files appear visible to Oberon though. Am I using the wrong encoding somehow? On Wed, Jan 7, 2015 at 6:00 AM, <oberon-request(a)lists.inf.ethz.ch> wrote: > Send Oberon mailing list submissions to > oberon(a)lists.inf.ethz.ch > > To subscribe or unsubscribe via the World Wide Web, visit > https://lists.inf.ethz.ch/mailman/listinfo/oberon > or, via email, send a message with subject or body 'help' to > oberon-request(a)lists.inf.ethz.ch > > You can reach the person managing the list at > oberon-owner(a)lists.inf.ethz.ch > > When replying, please edit your Subject line so it is more specific > than "Re: Contents of Oberon digest..." > > > Today's Topics: > > 1. step by step (G?bor Zolt?n Sink?) > 2. Re: step by step (Guenter Feldmann) > 3. Re: step by step (Douglas G. Danforth) > 4. Re: step by step (Sinko Gabor Zoltan) > 5. Re: Oberon Digest, Vol 127, Issue 18 (eas lab) > > > ---------------------------------------------------------------------- > > Message: 1 > Date: Tue, 06 Jan 2015 12:47:07 +0100 > From: G?bor Zolt?n Sink? <sinkog0208(a)gmail.com> > Subject: [Oberon] step by step > To: oberon(a)lists.inf.ethz.ch > Message-ID: <54ABCB3B.7000601(a)gmail.com> > Content-Type: text/plain; charset=windows-1252; format=flowed > > First of all sorry for my English is sparse. (google is my friend: P) > > The next goal for myself: I want to reproduce the ProjektOberon was. > Currently there is a loan and Spartan3 Spartan3 developer panels and > Linux environment (Ubuntu 10.14). > > I have no clear line of action. My first step in trying to access the > Oberon linux version translated in there, but it did not go as 07 codes > contained ... 07 compiler found, but did not get to the green branch :( > > Is there a howto that tells that even under Windows or Linux that can > translate Oberon? I am a programmer, but Oberon just started to learn it. > > I know a large wall and all, but simply interested. > > Can you give some clues which can start based on? > I know it was surely the word list, but I have not found it so far, and > is the son of man is not infinite time and infinite patience. > > Gabor Z Sinko > Hungary > > > > ------------------------------ > > Message: 2 > Date: Tue, 06 Jan 2015 14:02:19 +0100 > From: Guenter Feldmann <fld(a)informatik.uni-bremen.de> > Subject: Re: [Oberon] step by step > To: ETH Oberon and related systems <oberon(a)lists.inf.ethz.ch> > Message-ID: <54ABDCDB.1010706(a)informatik.uni-bremen.de> > Content-Type: text/plain; charset=utf-8; format=flowed > > On 01/ 6/15 12:47 PM, G?bor Zolt?n Sink? wrote: > > The next goal for myself: I want to reproduce the ProjektOberon was. > > Currently there is a loan and Spartan3 Spartan3 developer panels and > > Linux environment (Ubuntu 10.14). > > > > I have no clear line of action. My first step in trying to access the > > Oberon linux version translated in there, but it did not go as 07 codes > > contained ... 07 compiler found, but did not get to the green branch :( > > Hi Gabor, > > you can download an Oberon07 compiler and linker and an RISC5 emulator > with limited IO capabilities which run in LinuxAos from > > www.ocp.inf.ethz.ch/wiki/OCP/Downloads -> UnixAOS -> RISC-Oberon > > The AOS/A2 system for Linux is downloadable from > > www.ocp.inf.ethz.ch/wiki/OCP/Downloads -> UnixAOS > > > -- Guenter > > -- > --------------------------------------------------------------------- > G?nter Feldmann c/o Universit?t Bremen | Tel.: +49 421 218-63880 > Fachbereich 3, Mathematik und Informatik | B?ro und Lieferadresse: > D-28334 Bremen, Bibliotheksstr. 1 | Geb?ude MZH, Raum 2360 > --------------------------------------------------------------------- > > > > > > ------------------------------ > > Message: 3 > Date: Tue, 06 Jan 2015 20:47:59 -0800 > From: "Douglas G. Danforth" <danforth(a)greenwoodfarm.com> > Subject: Re: [Oberon] step by step > To: ETH Oberon and related systems <oberon(a)lists.inf.ethz.ch> > Message-ID: <54ACBA7F.5020004(a)greenwoodfarm.com> > Content-Type: text/plain; charset="windows-1252" > > G?bor, > My first question is, do you really wish to pursue the /hardware/ > based version of Oberon or are you simply interested in Oberon? > If simply interested on Oberon then there are many /software /only > implementations. > -Doug Danforth > > On 1/6/2015 3:47 AM, G?bor Zolt?n Sink? wrote: > > First of all sorry for my English is sparse. (google is my friend: P) > > > > The next goal for myself: I want to reproduce the ProjektOberon was. > > Currently there is a loan and Spartan3 Spartan3 developer panels and > > Linux environment (Ubuntu 10.14). > > > > I have no clear line of action. My first step in trying to access the > > Oberon linux version translated in there, but it did not go as 07 codes > > contained ... 07 compiler found, but did not get to the green branch :( > > > > Is there a howto that tells that even under Windows or Linux that can > > translate Oberon? I am a programmer, but Oberon just started to learn it. > > > > I know a large wall and all, but simply interested. > > > > Can you give some clues which can start based on? > > I know it was surely the word list, but I have not found it so far, and > > is the son of man is not infinite time and infinite patience. > > > > Gabor Z Sinko > > Hungary > > > > -- > > Oberon(a)lists.inf.ethz.ch mailing list for ETH Oberon and related systems > > https://lists.inf.ethz.ch/mailman/listinfo/oberon > > > >

2 1

Re: [Oberon] Project Oberon - Copying files to the SD card
by Chris Burrows 13 Jan '15

13 Jan '15

> > From: Bill Buzzell [mailto:captbill279@gmail.com] > Sent: Sunday, 11 January 2015 6:40 AM > To: oberon(a)lists.inf.ethz.ch > Subject: Re: [Oberon] Oberon Digest, Vol 128, Issue 8 > > What about an Astrobe based solution? How about the MMC.Mod to handle > it? I have been wanting to use an LPC1768 in between the FPGA and the > NRF24l01 and use the LPC1768 as a type of SPI switcher. I want to be > able to toggle from the network card to whatever SPI module I may > want to utilize using the (only) available SPI channel. Perhaps I > should be considering adding the Oberon fs functionality as a utility > function. Seems like a perfect place for these types of tasks. I am > already looking at doing a 'flash utility' just like this. > > I am wondering if this would be an easier approach for me vs. using > BlackBox? I have installed BlackBox but have little experience with > it. I like the 'hardware/peripheral' approach of using Astrobe and > interfacing over serial if possible. > > I am still trying to consider the details. Astrobe will need to be > able to speak to the Oberon SDcard directly (ideal) or simply use two > SDcards, one on the FPGA and another on the MC. > > Any thoughts or concerns with this approach? > I have done some work on an Astrobe version of the Project Oberon filesystem using an LPC1768. However, the main aim of that project was not to use it to transfer files to the RISC system. The design of the filesystem appeals to me more (particularly for multi-GB SDHC cards) than the FAT filesystem that everybody seems to use with microcontrollers. I believe it would be a useful library to include with Astrobe for use with datalogger-type applications. I switched to the BlackBox solution in the short term as I found it easier to get it working. I'm still planning to finish the Astrobe implementation one day but other work has to take priority right now :( Regards, Chris

2 1

Re: [Oberon] Oberon Digest, Vol 128, Issue 8
by Bill Buzzell 10 Jan '15

10 Jan '15

Hi Chris, Great to hear from you. >I used BlackBox Component Pascal v1.6 on Windows 7 as much of the Project Oberon source code (Files.mod and FileDir.mod) can be used with minimal changes, SYSTEM.VAL is compatible with Project Oberon and BlackBox has access to the relevent WinApi system calls: What about an Astrobe based solution? How about the MMC.Mod to handle it? I have been wanting to use an LPC1768 in between the FPGA and the NRF24l01 and use the LPC1768 as a type of SPI switcher. I want to be able to toggle from the network card to whatever SPI module I may want to utilize using the (only) available SPI channel. Perhaps I should be considering adding the Oberon fs functionality as a utility function. Seems like a perfect place for these types of tasks. I am already looking at doing a 'flash utility' just like this. I am wondering if this would be an easier approach for me vs. using BlackBox? I have installed BlackBox but have little experience with it. I like the 'hardware/peripheral' approach of using Astrobe and interfacing over serial if possible. I am still trying to consider the details. Astrobe will need to be able to speak to the Oberon SDcard directly (ideal) or simply use two SDcards, one on the FPGA and another on the MC. Any thoughts or concerns with this approach? Best Regards, Bill On Sat, Jan 10, 2015 at 6:00 AM, <oberon-request(a)lists.inf.ethz.ch> wrote: > Send Oberon mailing list submissions to > oberon(a)lists.inf.ethz.ch > > To subscribe or unsubscribe via the World Wide Web, visit > https://lists.inf.ethz.ch/mailman/listinfo/oberon > or, via email, send a message with subject or body 'help' to > oberon-request(a)lists.inf.ethz.ch > > You can reach the person managing the list at > oberon-owner(a)lists.inf.ethz.ch > > When replying, please edit your Subject line so it is more specific > than "Re: Contents of Oberon digest..." > > > Today's Topics: > > 1. Project Oberon - Copying files to the SD card (Chris Burrows) > 2. Re: Project Oberon - Copying files to the SD card (J?rg Straube) > > > ---------------------------------------------------------------------- > > Message: 1 > Date: Sat, 10 Jan 2015 09:22:36 +1030 > From: "Chris Burrows" <chris(a)cfbsoftware.com> > Subject: [Oberon] Project Oberon - Copying files to the SD card > To: "ETH Oberon and related systems" <oberon(a)lists.inf.ethz.ch> > Message-ID: <000f01d02c5e$f733cee0$e59b6ca0$(a)cfbsoftware.com> > Content-Type: text/plain; charset="utf-8" > > > > > From: Bill Buzzell [mailto:captbill279@gmail.com] > > Sent: Thursday, 8 January 2015 4:51 AM > > To: oberon(a)lists.inf.ethz.ch > > Subject: Re: [Oberon] Oberon Digest, Vol 128, Issue 6 > > > > How do you move files onto the SD card? Anyone know? I tried > > extracting the ISO and adding files and un-extracting it again. None > > of the files appear visible to Oberon though. Am I using the wrong > > encoding somehow? > > > > If you want files on the SD card to be visible from Project Oberon then > you need to create them with the appropriate file headers and directory > entries as explained in great detail in Chapter 7 The File System of the > Project Oberon documentation. > > You should write a program to do this on the system you want to transfer > files from. As the Project Oberon source code is provided most of the hard > work is already done for you. However, before you do this you need to > understand: > > a) how to access the SD Card on your system > b) how to perform low-level block IO to / from a storage device on your > system > c) the Project Oberon modules Files, FileDir and the disk IO procedures > from Kernel. > > I used BlackBox Component Pascal v1.6 on Windows 7 as much of the Project > Oberon source code (Files.mod and FileDir.mod) can be used with minimal > changes, SYSTEM.VAL is compatible with Project Oberon and BlackBox has > access to the relevent WinApi system calls: > > http://www.oberon.ch/blackbox.html > > If you plan to transfer files from a Windows 7 system to / from the SD > Card the following should help get you started: > > > a) how to access the SD Card on your system > > If you cannot access the SD card via SPI on your system you need to find > out how to access it as a raw (i.e. not formatted) device. On Windows the > device name convention is \\.\<drivenumber>. On my system the drivenumber > is "6" because my SD card appears as Drive 6 in: > > Admin Tools > Computer Management > Storage > Disk Management > > The 8GB Project Oberon SDHC Card appears with a 255MB FAT partition, a 64 > MB Primary partition and 7.09GB unallocated > > > b) how to perform low-level block IO to / from a storage device on your > system > > The corresponding BlackBox procedure to access this drive using > WinApi.CreateFileW is: > > PROCEDURE Open*(driveName: FullName); > VAR > physicalName: FullName; > BEGIN > physicalName := "\\.\" + driveName; > drive.handle := > WinApi.CreateFileW( > physicalName, > WinApi.GENERIC_READ + WinApi.GENERIC_WRITE, > WinApi.FILE_SHARE_READ + WinApi.FILE_SHARE_WRITE, > NIL, > WinApi.OPEN_EXISTING, > {}, > 0) > END Open; > > You also need to implement the equivalent of the low-level sector read / > write functions (i.e. Kernel.GetSector and Kernel.PutSector). On Windows > the WinApi calls you can use to do this are > > WinApi.SetFilePointer > WinApi.ReadFile > WinApi.WriteFile > WinApi.GetLastError > WinApi.CloseHandle > > e.g PutSector becomes: > > PROCEDURE PutSector*(sectorNo: INTEGER; sector: ARRAY OF BYTE); > VAR > i, org, count, bytesWritten, res: INTEGER; > BEGIN > ASSERT(sectorNo MOD 29 = 0); > sectorNo := sectorNo DIV 29; > sectorNo := sectorNo * 2 + FSoffset; > org := sectorNo * (SectorSize DIV 2); > i := 0; > i := WinApi.SetFilePointer(drive.handle, org, i, WinApi.FILE_BEGIN); > count := SectorSize; > IF (WinApi.WriteFile(drive.handle, SYSTEM.ADR(sector), count, > bytesWritten, NIL) = 0) > OR (bytesWritten < SectorSize) THEN > res := WinApi.GetLastError(); > HALT(102) > END; > END PutSector; > > NOTE: Windows requires you to run programs that access raw storage devices > in 'Administrator Mode'. > > Regards, > > Chris Burrows > CFB Software > Astrobe: Oberon for ARM Microcontrollers > http://www.astrobe.com > > > > > > > ------------------------------ > > Message: 2 > Date: Sat, 10 Jan 2015 00:29:11 +0100 > From: J?rg Straube <joerg.straube(a)iaeth.ch> > Subject: Re: [Oberon] Project Oberon - Copying files to the SD card > To: "<chris(a)cfbsoftware.com>" <chris(a)cfbsoftware.com>, ETH Oberon and > related systems <oberon(a)lists.inf.ethz.ch> > Message-ID: <D56A1095-A20A-465E-A973-011166A8D69C(a)iaeth.ch> > Content-Type: text/plain; charset=utf-8 > > I have a prototype of this running under ETHOberon on Windows. > Some hints: > - My Oberon code finds the physical drive nbr itself by enumerating all > drives and checking capabilities. > - Being able to have lowlevel access to the SD card, I had to prevent > Windows to access the SD card by unmounting the drive first. > - As Chris wrote ETHOberon must be "run as admin". > br, J?rg > > Am 09.01.2015 um 23:52 schrieb Chris Burrows <chris(a)cfbsoftware.com>: > > >> > >> From: Bill Buzzell [mailto:captbill279@gmail.com] > >> Sent: Thursday, 8 January 2015 4:51 AM > >> To: oberon(a)lists.inf.ethz.ch > >> Subject: Re: [Oberon] Oberon Digest, Vol 128, Issue 6 > >> > >> How do you move files onto the SD card? Anyone know? I tried > >> extracting the ISO and adding files and un-extracting it again. None > >> of the files appear visible to Oberon though. Am I using the wrong > >> encoding somehow? > > > > If you want files on the SD card to be visible from Project Oberon then > you need to create them with the appropriate file headers and directory > entries as explained in great detail in Chapter 7 The File System of the > Project Oberon documentation. > > > > You should write a program to do this on the system you want to transfer > files from. As the Project Oberon source code is provided most of the hard > work is already done for you. However, before you do this you need to > understand: > > > > a) how to access the SD Card on your system > > b) how to perform low-level block IO to / from a storage device on your > system > > c) the Project Oberon modules Files, FileDir and the disk IO procedures > from Kernel. > > > > I used BlackBox Component Pascal v1.6 on Windows 7 as much of the > Project Oberon source code (Files.mod and FileDir.mod) can be used with > minimal changes, SYSTEM.VAL is compatible with Project Oberon and BlackBox > has access to the relevent WinApi system calls: > > > > http://www.oberon.ch/blackbox.html > > > > If you plan to transfer files from a Windows 7 system to / from the SD > Card the following should help get you started: > > > > > > a) how to access the SD Card on your system > > > > If you cannot access the SD card via SPI on your system you need to find > out how to access it as a raw (i.e. not formatted) device. On Windows the > device name convention is \\.\<drivenumber>. On my system the drivenumber > is "6" because my SD card appears as Drive 6 in: > > > > Admin Tools > Computer Management > Storage > Disk Management > > > > The 8GB Project Oberon SDHC Card appears with a 255MB FAT partition, a > 64 MB Primary partition and 7.09GB unallocated > > > > > > b) how to perform low-level block IO to / from a storage device on your > system > > > > The corresponding BlackBox procedure to access this drive using > WinApi.CreateFileW is: > > > > PROCEDURE Open*(driveName: FullName); > > VAR > > physicalName: FullName; > > BEGIN > > physicalName := "\\.\" + driveName; > > drive.handle := > > WinApi.CreateFileW( > > physicalName, > > WinApi.GENERIC_READ + WinApi.GENERIC_WRITE, > > WinApi.FILE_SHARE_READ + WinApi.FILE_SHARE_WRITE, > > NIL, > > WinApi.OPEN_EXISTING, > > {}, > > 0) > > END Open; > > > > You also need to implement the equivalent of the low-level sector read / > write functions (i.e. Kernel.GetSector and Kernel.PutSector). On Windows > the WinApi calls you can use to do this are > > > > WinApi.SetFilePointer > > WinApi.ReadFile > > WinApi.WriteFile > > WinApi.GetLastError > > WinApi.CloseHandle > > > > e.g PutSector becomes: > > > > PROCEDURE PutSector*(sectorNo: INTEGER; sector: ARRAY OF BYTE); > > VAR > > i, org, count, bytesWritten, res: INTEGER; > > BEGIN > > ASSERT(sectorNo MOD 29 = 0); > > sectorNo := sectorNo DIV 29; > > sectorNo := sectorNo * 2 + FSoffset; > > org := sectorNo * (SectorSize DIV 2); > > i := 0; > > i := WinApi.SetFilePointer(drive.handle, org, i, WinApi.FILE_BEGIN); > > count := SectorSize; > > IF (WinApi.WriteFile(drive.handle, SYSTEM.ADR(sector), count, > bytesWritten, NIL) = 0) > > OR (bytesWritten < SectorSize) THEN > > res := WinApi.GetLastError(); > > HALT(102) > > END; > > END PutSector; > > > > NOTE: Windows requires you to run programs that access raw storage > devices in 'Administrator Mode'. > > > > Regards, > > > > Chris Burrows > > CFB Software > > Astrobe: Oberon for ARM Microcontrollers > > http://www.astrobe.com > > > > > > > > > > -- > > Oberon(a)lists.inf.ethz.ch mailing list for ETH Oberon and related systems > > https://lists.inf.ethz.ch/mailman/listinfo/oberon > > > > ------------------------------ > > -- > Oberon(a)lists.inf.ethz.ch mailing list for ETH Oberon and related systems > https://lists.inf.ethz.ch/mailman/listinfo/oberon > > > End of Oberon Digest, Vol 128, Issue 8 > ************************************** >

1 0