Lines Matching refs:psData
84 fp = fopen(psData[scriptps].filename, "a"); in PSCreateFile()
96 if ((ofp = fopen(psData[output].filename, "w")) == NULL) { in PSCreateFile()
97 fprintf(stderr, "Cannot open %s to write.\n", psData[output].filename); in PSCreateFile()
103 if (psData[i].flag) { /* if set, procedure/file is used */ in PSCreateFile()
104 if ((ifp = fopen(psData[i].filename, "r")) == NULL) { in PSCreateFile()
110 psData[i].filename); in PSCreateFile()
126 unlink(psData[scriptps].filename); in PSCreateFile()
130 unlink(psData[GCdictps].filename); in PSCreateFile()
158 fp = fopen(psData[scriptps].filename, "a"); in Gdraws_drawFrame()
174 psData[drawIstrps].flag = yes; in Gdraws_drawFrame()
194 fp = fopen(psData[scriptps].filename, "w"); in Gdraws_setDimension()
258 if ((fp = fopen(psData[scriptps].filename, "a")) == NULL) { in GDrawImageString()
260 psData[scriptps].filename); in GDrawImageString()
264 psData[drawIstrps].flag = yes; /* set procedure flag */ in GDrawImageString()
297 if ((fp = fopen(psData[scriptps].filename, "a")) == NULL) { in GDrawArc()
299 psData[scriptps].filename); in GDrawArc()
303 psData[drawarcps].flag = yes; in GDrawArc()
336 if ((fp = fopen(psData[scriptps].filename, "a")) == NULL) { in GDrawLine()
338 psData[scriptps].filename); in GDrawLine()
342 psData[drawlineps].flag = yes; /* sets procedure flag */ in GDrawLine()
383 if ((fp = fopen(psData[scriptps].filename, "a")) == NULL) { in GDrawLines()
385 psData[scriptps].filename); in GDrawLines()
389 psData[drawlinesps].flag = yes; /* set procedure flag */ in GDrawLines()
430 if ((fp = fopen(psData[scriptps].filename, "a")) == NULL) { in GDrawPoint()
432 psData[scriptps].filename); in GDrawPoint()
436 psData[drawpointps].flag = yes; /* sets procedure flag */ in GDrawPoint()
471 if ((fp = fopen(psData[scriptps].filename, "a")) == NULL) { in GDrawRectangle()
473 psData[scriptps].filename); in GDrawRectangle()
477 psData[drawrectps].flag = yes; in GDrawRectangle()
609 if ((fp = fopen(psData[scriptps].filename, "a")) == NULL) { in GDrawString()
611 psData[scriptps].filename); in GDrawString()
615 psData[drawstrps].flag = yes; /* sets procedure flag */ in GDrawString()
652 if ((fp = fopen(psData[scriptps].filename, "a")) == NULL) { in GFillArc()
654 psData[scriptps].filename); in GFillArc()
658 psData[fillarcps].flag = yes; /* sets procedure flag */ in GFillArc()
684 psData[GCdictps].flag = yes; in PSGlobalInit()
686 fricas_sprintf_to_buf1(psData[GCdictps].filename, "%s", tmp); in PSGlobalInit()
688 psData[setupps].flag = yes; in PSGlobalInit()
689 psData[scriptps].flag = yes;/* new script file name */ in PSGlobalInit()
690 psData[endps].flag = yes; in PSGlobalInit()
696 psData[headerps].flag = yes; in PSGlobalInit()
697 fricas_sprintf_to_buf2(psData[headerps].filename, "%s%s", env_fricas, "/Gdraws/PS/header.ps"); in PSGlobalInit()
698 fricas_sprintf_to_buf2(psData[drawps].filename, "%s%s", env_fricas, "/Gdraws/PS/draw.ps"); in PSGlobalInit()
699 fricas_sprintf_to_buf2(psData[drawarcps].filename, "%s%s", env_fricas, in PSGlobalInit()
701 fricas_sprintf_to_buf2(psData[drawfilledps].filename, "%s%s", env_fricas, in PSGlobalInit()
703 fricas_sprintf_to_buf2(psData[drawcolorps].filename, "%s%s", env_fricas, in PSGlobalInit()
705 fricas_sprintf_to_buf2(psData[fillpolyps].filename, "%s%s", env_fricas, in PSGlobalInit()
707 fricas_sprintf_to_buf2(psData[colorpolyps].filename, "%s%s", env_fricas, in PSGlobalInit()
709 fricas_sprintf_to_buf2(psData[fillwolps].filename, "%s%s", env_fricas, in PSGlobalInit()
711 fricas_sprintf_to_buf2(psData[colorwolps].filename, "%s%s", env_fricas, in PSGlobalInit()
713 fricas_sprintf_to_buf2(psData[drawpointps].filename, "%s%s", env_fricas, in PSGlobalInit()
715 fricas_sprintf_to_buf2(psData[drawlineps].filename, "%s%s", env_fricas, in PSGlobalInit()
717 fricas_sprintf_to_buf2(psData[drawlinesps].filename, "%s%s", env_fricas, in PSGlobalInit()
719 fricas_sprintf_to_buf2(psData[drawrectps].filename, "%s%s", env_fricas, in PSGlobalInit()
721 fricas_sprintf_to_buf2(psData[drawstrps].filename, "%s%s", env_fricas, in PSGlobalInit()
723 fricas_sprintf_to_buf2(psData[drawIstrps].filename, "%s%s", env_fricas, in PSGlobalInit()
725 fricas_sprintf_to_buf2(psData[fillarcps].filename, "%s%s", env_fricas, in PSGlobalInit()
727 fricas_sprintf_to_buf2(psData[setupps].filename, "%s%s", env_fricas, "/Gdraws/PS/setup.ps"); in PSGlobalInit()
728 fricas_sprintf_to_buf2(psData[endps].filename, "%s%s", env_fricas, "/Gdraws/PS/end.ps"); in PSGlobalInit()
731 psData[headerps].flag = yes; in PSGlobalInit()
732 fricas_sprintf_to_buf2(psData[headerps].filename, "%s%s", env_fricas, in PSGlobalInit()
734 fricas_sprintf_to_buf2(psData[drawps].filename, "%s%s", env_fricas, in PSGlobalInit()
736 fricas_sprintf_to_buf2(psData[drawarcps].filename, "%s%s", env_fricas, in PSGlobalInit()
738 fricas_sprintf_to_buf2(psData[drawfilledps].filename, "%s%s", env_fricas, in PSGlobalInit()
740 fricas_sprintf_to_buf2(psData[drawcolorps].filename, "%s%s", env_fricas, in PSGlobalInit()
742 fricas_sprintf_to_buf2(psData[fillpolyps].filename, "%s%s", env_fricas, in PSGlobalInit()
744 fricas_sprintf_to_buf2(psData[colorpolyps].filename, "%s%s", env_fricas, in PSGlobalInit()
746 fricas_sprintf_to_buf2(psData[fillwolps].filename, "%s%s", env_fricas, in PSGlobalInit()
748 fricas_sprintf_to_buf2(psData[colorwolps].filename, "%s%s", env_fricas, in PSGlobalInit()
750 fricas_sprintf_to_buf2(psData[drawpointps].filename, "%s%s", env_fricas, in PSGlobalInit()
752 fricas_sprintf_to_buf2(psData[drawlineps].filename, "%s%s", env_fricas, in PSGlobalInit()
754 fricas_sprintf_to_buf2(psData[drawlinesps].filename, "%s%s", env_fricas, in PSGlobalInit()
756 fricas_sprintf_to_buf2(psData[drawrectps].filename, "%s%s", env_fricas, in PSGlobalInit()
758 fricas_sprintf_to_buf2(psData[drawstrps].filename, "%s%s", env_fricas, in PSGlobalInit()
760 fricas_sprintf_to_buf2(psData[drawIstrps].filename, "%s%s", env_fricas, in PSGlobalInit()
762 fricas_sprintf_to_buf2(psData[fillarcps].filename, "%s%s", env_fricas, in PSGlobalInit()
764 fricas_sprintf_to_buf2(psData[setupps].filename, "%s%s", env_fricas, in PSGlobalInit()
766 fricas_sprintf_to_buf2(psData[endps].filename, "%s%s", env_fricas, in PSGlobalInit()
792 fricas_sprintf_to_buf1(psData[output].filename, "%s", PSfilename); /* output file name */ in PSInit()
794 psData[drawps].flag = no; /* ps procedures flags */ in PSInit()
795 psData[drawarcps].flag = no; in PSInit()
796 psData[drawfilledps].flag = no; in PSInit()
797 psData[drawcolorps].flag = no; in PSInit()
798 psData[fillpolyps].flag = no; in PSInit()
799 psData[fillwolps].flag = no; in PSInit()
800 psData[colorpolyps].flag = no; in PSInit()
801 psData[colorwolps].flag = no; in PSInit()
802 psData[drawpointps].flag = no; in PSInit()
803 psData[drawlineps].flag = no; in PSInit()
804 psData[drawlinesps].flag = no; in PSInit()
805 psData[drawrectps].flag = no; in PSInit()
806 psData[drawstrps].flag = no; in PSInit()
807 psData[drawIstrps].flag = no; in PSInit()
808 psData[fillarcps].flag = no; in PSInit()
810 fricas_sprintf_to_buf1(psData[scriptps].filename, "%s", tmpnam(NULL)); /* script file */ in PSInit()
857 if ((fp = fopen(psData[GCdictps].filename, "a")) == NULL) { in PSCreateContext()
859 psData[GCdictps].filename); in PSCreateContext()
911 if ((fp = fopen(psData[scriptps].filename, "a")) == NULL) { in GSetForeground()
913 psData[scriptps].filename); in GSetForeground()
947 if ((fp = fopen(psData[scriptps].filename, "a")) == NULL) { in GSetBackground()
949 psData[scriptps].filename); in GSetBackground()
1024 if ((fp = fopen(psData[scriptps].filename, "a")) == NULL) { in GSetLineAttributes()
1026 psData[scriptps].filename); in GSetLineAttributes()
1066 return (unlink(psData[GCdictps].filename)); in PSClose()
1125 if ((fp = fopen(psData[scriptps].filename, "a")) == NULL) { in PSColorPolygon()
1127 psData[scriptps].filename); in PSColorPolygon()
1131 psData[colorpolyps].flag = yes; /* sets procedure flag */ in PSColorPolygon()
1161 if ((fp = fopen(psData[scriptps].filename, "a")) == NULL) { in PSColorwOutline()
1162 fprintf(stderr, "PSDrawFOL cannot open %s\n", psData[scriptps].filename); in PSColorwOutline()
1166 psData[colorwolps].flag = yes; /* sets procedure flag */ in PSColorwOutline()
1196 if ((fp = fopen(psData[scriptps].filename, "a")) == NULL) { in PSDrawColor()
1198 psData[scriptps].filename); in PSDrawColor()
1202 psData[drawcolorps].flag = yes; /* set procedure flag */ in PSDrawColor()
1230 if ((fp = fopen(psData[scriptps].filename, "a")) == NULL) { in PSFillPolygon()
1232 psData[scriptps].filename); in PSFillPolygon()
1236 psData[fillpolyps].flag = yes; /* sets procedure flag */ in PSFillPolygon()
1264 if ((fp = fopen(psData[scriptps].filename, "a")) == NULL) { in PSFillwOutline()
1265 fprintf(stderr, "PSDrawFOL cannot open %s\n", psData[scriptps].filename); in PSFillwOutline()
1269 psData[fillwolps].flag = yes; /* sets procedure flag */ in PSFillwOutline()