| Startup on LINUX Question [message #66681] |
Thu, 04 June 2009 16:31  |
David Fanning
Messages: 11724
Registered: August 2001
|
Senior Member |
|
|
Folks,
I have an IDL startup file on my LINUX machine. The first
line in the file is this:
DEVICE, RETAIN=2, TRUE_COLOR=1, SET_CHARACTER_SIZE=[9,12]
When I start up IDL 7.0.1 in the IDL Workbench this file
is executed (there is a print statement at the end of the file
to let me know it executed). And, indeed, graphics windows are
retained, etc. *But* when I issue a plot command, I still have tiny
fonts. At some random time during the day (I have no idea when),
something in IDL "wakes up" and all of my graphics from then on
contain the larger font I specified in my startup file. This
can take an hour, sometimes I don't notice the larger fonts
until after lunch.
If I have small fonts and I .reset my IDL session,
I re-run my startup file, and I still have small fonts.
If I have larger fonts and I .reset my IDL session,
I continue to have larger fonts.
Does anyone have the faintest idea what might be going
on here?
Cheers,
David
--
David Fanning, Ph.D.
Coyote's Guide to IDL Programming (www.dfanning.com)
Sepore ma de ni thui. ("Perhaps thou speakest truth.")
|
|
|
|
| Re: Startup on LINUX Question [message #66798 is a reply to message #66681] |
Mon, 08 June 2009 01:13  |
R.Bauer
Messages: 1424
Registered: November 1998
|
Senior Member |
|
|
David Fanning schrieb:
> Folks,
>
> I have an IDL startup file on my LINUX machine. The first
> line in the file is this:
>
> DEVICE, RETAIN=2, TRUE_COLOR=1, SET_CHARACTER_SIZE=[9,12]
>
> When I start up IDL 7.0.1 in the IDL Workbench this file
> is executed (there is a print statement at the end of the file
> to let me know it executed). And, indeed, graphics windows are
> retained, etc. *But* when I issue a plot command, I still have tiny
> fonts. At some random time during the day (I have no idea when),
> something in IDL "wakes up" and all of my graphics from then on
> contain the larger font I specified in my startup file. This
> can take an hour, sometimes I don't notice the larger fonts
> until after lunch.
>
> If I have small fonts and I .reset my IDL session,
> I re-run my startup file, and I still have small fonts.
> If I have larger fonts and I .reset my IDL session,
> I continue to have larger fonts.
>
> Does anyone have the faintest idea what might be going
> on here?
>
> Cheers,
>
> David
Hi David
http://www.fz-juelich.de/icg/icg-1/idl_icglib/idl_source/idl .all
we never have had that problem.
I am not sure what rerun means. But it sounds a bit you don't have an
important env var.
export IDL_STARTUP=/pwd/your_startup.pro
We do use the same startup for all of our platforms.
pick up the pieces.
cheers
Reimar
if float(!version.release) ge 6.0 then path_cache,/clear,enable=0
var=getenv('IDL_PRECOMPILED')
if strpos(var,'1') gt -1 then DEFSYSV, '!icg', $
CREATE_STRUCT(NAME='!ICG', 'USER', '', 'HOST', '', 'IDL_SOURCE', '',
'IDLDE', '', 'SEP', '' $
, 'A', ['/idl_work/aaa', '/idl_lib/aaa'
,'/idl_precompiled','/idl_links','/idl_work', '/idl_lib',
'/idl_experiment', '/idl_model','/easy/program/idl', '/idl
_obsolete'] )
if strpos(var,'1') eq -1 then DEFSYSV, '!icg', $
CREATE_STRUCT(NAME='!ICG', 'USER', '', 'HOST', '', 'IDL_SOURCE', '',
'IDLDE', '', 'SEP', '' $
, 'A', ['/idl_work/aaa', '/idl_lib/aaa'
,'/idl_links','/idl_work', '/idl_lib', '/idl_experiment',
'/idl_model','/easy/program/idl', '/idl_obsolete'] )
delvar,var
; seperator definition
IF !version.os_family EQ 'unix' THEN !icg.sep =':'
IF !version.os_family EQ 'Windows' THEN !icg.sep =';'
; host and user
IF !version.os_family EQ 'unix' THEN BEGIN & SPAWN,'whoami', b &
!icg.user = b & ENDIF
IF !version.os_family EQ 'unix' THEN BEGIN & SPAWN,'hostname', b &
!icg.host = b & ENDIF
IF !version.os_family EQ 'Windows' THEN !icg.user = GETENV('username')
IF !version.os_family EQ 'Windows' THEN !icg.host = GETENV('computername')
!icg.user=STRLOWCASE(!icg.user)
!icg.host=STRLOWCASE(!icg.host)
IDL_SMTP_SRV=GETENV('IDL_SMTP_SRV')
; idl source
!icg.idl_source=GETENV('IDL_SOURCE')
IF !icg.idl_source EQ '' THEN PRINT,'DEFINE IDL_SOURCE ENVIRONMENT
VARIABLE, STANDARD PARAMETERS WILL BE USED'
IF !version.os_family EQ 'unix' AND !icg.idl_source EQ '' THEN
!icg.idl_source ='/usr/local/icg/icg/idl_source'
IF !version.os_family EQ 'Windows' AND !icg.idl_source EQ '' THEN
!icg.idl_source='S:\links\idl_source'
;IF !version.os_family EQ 'unix' AND STRMID(!icg.host,0,3) EQ 'icg'
THEN !icg.idl_source ='/usr/local/icg/icg/idl_source'
;
;IF !version.os_family EQ 'unix' AND STRMID(!icg.host,0,3) EQ 'aix'
THEN !icg.idl_source ='/usr/local/nfs/ich227.icg/icg/idl_source'
;IF !version.os_family EQ 'unix' AND STRMID(!icg.host,0,3) EQ 'zam'
THEN !icg.idl_source ='/usr/local/nfs/idl_source'
;IF !version.os_family EQ 'Windows' THEN
!icg.idl_source=GETENV('IDL_SOURCE')
;IF !icg.idl_source EQ '' THEN !icg.idl_source='S:\links\idl_source'
; idlde
IF !version.os_family EQ 'Windows' THEN !icg.idlde=GETENV('IDLDE')
IF !icg.idlde EQ '' THEN !icg.idlde=!dir
; grafics
IF !version.os_family EQ 'Windows' then DEVICE, DECOMPOSED=0
;2001-05-10 herausgenommen
;if strlowcase(!version.os) eq 'linux' then device,decomposed=0
;if strlowcase(!version.os) eq 'linux' then
window,0,xsize=20,ysize=20,color=256
;if strlowcase(!version.os) eq 'linux' then wdelete,0
if strlowcase(!version.os) eq 'linux' then device, get_visual_depth=depth
if strlowcase(!version.os) eq 'linux' then device, true_color=depth
if strlowcase(!version.os) eq 'linux' then window, /free, /pixmap,
colors=-10
if strlowcase(!version.os) eq 'linux' then wdelete, !d.window
;if strlowcase(!version.os) eq 'linux' then device,bypass_translation=0
; bug in idl5.5 keine gute Loesung
if strlowcase(!version.os) eq 'linux' then device, decomposed=0, retain=2
delvar,depth
;2001-05-10 Aenderung abgeschlossen
!p.background=255
!p.color=0
iF !version.os_family EQ 'unix' then device, pseudo_color = 8
IF !version.os_family EQ 'unix' THEN device, retain = 2
; expand path
!icg.a = !icg.idl_source + !icg.a
IF !version.os_family EQ 'unix' AND STRMID(!icg.host,0,3) EQ 'ich' THEN
b='+/usr/local/idl/idl/lib'
IF !version.os_family EQ 'unix' AND STRMID(!icg.host,0,3) EQ 'icg' THEN
b='+/usr/local/idl/idl/lib'
IF !version.os_family EQ 'unix' AND STRMID(!icg.host,0,3) EQ 'aix' THEN
b='+/usr/local/idl/idl/lib'
IF !version.os_family EQ 'unix' AND STRMID(!icg.host,0,3) EQ 'zam' THEN
b='+/usr/local/idl/idl/lib'
IF !version.os_family EQ 'Windows' THEN b=!icg.idlde+'/lib'
; add the icg1 lib for all ICG-1 users
IF !version.os_family EQ 'unix' AND strpos(!icg.user,'icg1') gt -1 then $
b = b + !icg.sep+ '+/usr/local/icg/icg1/idl'
IF !version.os_family EQ 'Windows' AND strpos(!icg.user,'icg1') gt -1 then $
b = b + !icg.sep+ '+S:/links/icg1/idl'
; loop thru all path items
FOR i=0, N_ELEMENTS(!icg.a)-1 DO b=b+!icg.sep+'+'+!icg.a[i]
; expand the path
b = EXPAND_PATH(b)
; Add to existing path
!path = !path+!icg.sep+b
; get rid of used variables
DELVAR, b, i
;default widget font
;IF !VERSION.OS_FAMILY eq 'unix' then
widget_control,default_font='-adobe-helvetica-medium-r-norma l--12-*-*-*-*-60-*-*'
if strlowcase(!version.os) eq 'linux' then
widget_control,default_font='-adobe-helvetica-medium-r-norma l--12-*-*-*-*-60-*-*'
IF !VERSION.OS_FAMILY eq 'Windows' then
widget_control,default_font='HELVETICA*VARIABLE*14'
; print an informational message
PRINT, 'Your !PATH settings have be modified by idl.all (Wed Oct 6
14:12:45 2004)'
PRINT, '-----'
PRINT, 'Welcome '+!icg.user+'@'+!icg.host+' to IDL Version: ' +
!version.release+' !'
PRINT, 'Current time: '+SYSTIME()
|
|
|
|
| Re: Startup on LINUX Question [message #66818 is a reply to message #66681] |
Fri, 05 June 2009 11:41 |
Paul Van Delst[1]
Messages: 1157
Registered: April 2002
|
Senior Member |
|
|
David Fanning wrote:
> Folks,
>
> I have an IDL startup file on my LINUX machine. The first
> line in the file is this:
>
> DEVICE, RETAIN=2, TRUE_COLOR=1, SET_CHARACTER_SIZE=[9,12]
>
> When I start up IDL 7.0.1 in the IDL Workbench this file
> is executed (there is a print statement at the end of the file
> to let me know it executed). And, indeed, graphics windows are
> retained, etc. *But* when I issue a plot command, I still have tiny
> fonts. At some random time during the day (I have no idea when),
> something in IDL "wakes up" and all of my graphics from then on
> contain the larger font I specified in my startup file. This
> can take an hour, sometimes I don't notice the larger fonts
> until after lunch.
>
> If I have small fonts and I .reset my IDL session,
> I re-run my startup file, and I still have small fonts.
> If I have larger fonts and I .reset my IDL session,
> I continue to have larger fonts.
>
> Does anyone have the faintest idea what might be going
> on here?
No because, well, you know, it's IDL :o) Still weird tho'.
I use IDL on linux exclusively (well, sometime on the IBM systems too, but that's
v6.something) and have never seen this behaviour. My startup file looks like:
DEVICE, TRUE_COLOR=24
DEVICE, RETAIN=2, DECOMP=0
WINDOW, /FREE, /PIXMAP, COLORS = -5
PLOT, [ 0 ]
WDELETE, !D.WINDOW
DEVICE, SET_CHARACTER_SIZE = [ 6, 9 ]
PRINT, 'Number of colors is ', !D.N_COLORS
PRINT, 'Color table size is ', !D.TABLE_SIZE
COLORS
COMPILE_OPT DEFINT32, STRICTARR
The only difference I can see is that I issue the DEVICE commands on separate lines. Or
maybe the
DEVICE, SET_CHARACTER_SIZE = [ 6, 9 ]
should always be issued after the
WINDOW, /FREE, /PIXMAP, COLORS = -5
PLOT, [ 0 ]
WDELETE, !D.WINDOW
??
My IDL version:
IDL> help, !version,/structure
** Structure !VERSION, 8 tags, length=76, data length=76:
ARCH STRING 'x86'
OS STRING 'linux'
OS_FAMILY STRING 'unix'
OS_NAME STRING 'linux'
RELEASE STRING '7.0'
BUILD_DATE STRING 'Oct 25 2007'
MEMORY_BITS INT 32
FILE_OFFSET_BITS
INT 64
cheers,
paulv
|
|
|
|
comp.lang.idl-pvwave archive
Members
Search
Help
Login
Home
